See Modelica_LinearSystems2.Math.Matrices.LAPACK.dhseqr for details
function eigenvaluesHessenberg import Modelica_LinearSystems2.Math.Matrices.Internal; import Modelica_LinearSystems2.Math.Matrices.LAPACK; input Real H[:, size(H, 1)]; output Real alphaReal[size(H, 1)] "Real part of alpha (eigenvalue=(alphaReal+i*alphaImag))"; output Real alphaImag[size(H, 1)] "Imaginary part of alpha (eigenvalue=(alphaReal+i*alphaImag))"; output Integer info = 0; end eigenvaluesHessenberg;