.Modelica_LinearSystems2.WorkInProgress.Math.LAPACK.wrapper_zungrq

Interface

function wrapper_zungrq
  input Real RQ_real[:, :] "Square or rectangular matrix";
  input Real RQ_imag[size(RQ_real, 1), size(RQ_real, 2)] "Square or rectangular matrix";
  input Real tau_real[min(size(RQ_real, 1), size(RQ_real, 2))] "The scalar factors of the elementary reflectors of Q, real part";
  input Real tau_imag[min(size(RQ_real, 1), size(RQ_real, 2))] "The scalar factors of the elementary reflectors of Q, imaginary part";
  output Real Q_real[size(RQ_real, 1), size(RQ_real, 2)] = RQ_real;
  output Real Q_imag[size(RQ_real, 1), size(RQ_real, 2)] = RQ_imag;
  output Integer info;
end wrapper_zungrq;