encapsulated function reducedCtrSystem import Modelica; import Modelica_LinearSystems2; import Modelica_LinearSystems2.StateSpace; import Modelica_LinearSystems2.Math.Matrices; import Modelica_LinearSystems2.Math.Vectors; input StateSpace ss "State space system"; input Real tol = 1e-10 "Tolerance of reduction procedure, default tol = 1e-10"; output Modelica_LinearSystems2.Internal.StateSpaceR ssm1(redeclare Real A[size(ss.A, 1), size(ss.A, 2)], redeclare Real B[size(ss.B, 1), 1], redeclare Real C[1, size(ss.C, 2)], redeclare Real D[size(ss.D, 1), size(ss.D, 2)]) "controllable state space system"; end reducedCtrSystem;