function modifyX_old
import Modelica_LinearSystems2;
import Modelica_LinearSystems2.Math.Complex;
import Re = Modelica_LinearSystems2.Math.Complex.real;
import Im = Modelica_LinearSystems2.Math.Complex.imag;
input Complex X[:, size(X, 1)] "Complex eigenvector matrix";
input Complex S[size(X, 1), :] "Complex eigenvector matrix";
input Integer m "Rank of the system input matrix B; S_real and S_imag must have n*m columns";
input Integer ncp "number of complex pairs";
input Integer steps "Number of iterations";
output Complex Xm[size(X, 1), size(X, 2)];
end modifyX_old;