.Modelica_LinearSystems2.WorkInProgress.Math.LAPACK.wrapper_zgesv

Interface

function wrapper_zgesv
  input Real A_real[:, size(A_real, 1)] "Square or rectangular matrix";
  input Real A_imag[size(A_real, 1), size(A_real, 2)] "Square or rectangular matrix";
  input Real B_real[size(A_real, 1), :] "Square or rectangular matrix";
  input Real B_imag[size(B_real, 1), size(B_real, 2)] "Square or rectangular matrix";
  output Real X_real[size(A_real, 1), size(B_real, 2)] = B_real;
  output Real X_imag[size(A_real, 1), size(B_real, 2)] = B_imag;
  output Integer info;
end wrapper_zgesv;