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;