Reorders a real Schur factorization according to a given pattern of the eigenvalues
function reorderRSF import Modelica_LinearSystems2.Math.Matrices.LAPACK; input Boolean iscontinuous; input Real T[:, :]; input Real Q[:, size(T, 2)]; input Real alphaReal[size(T, 1)] "Real part of eigenvalue=alphaReal+i*alphaImag"; input Real alphaImag[size(T, 1)] "Imaginary part of eigenvalue=(alphaReal+i*alphaImag"; output Real To[size(T, 1), size(T, 2)]; output Real Qo[size(T, 1), size(T, 2)]; output Real wr[size(T, 2)]; output Real wi[size(T, 2)]; end reorderRSF;