Matrices.solve2(A,b);
This function call returns the solution X of the linear system of equations
A*X = B
If a unique solution X does not exist (since A is singular), an assertion is triggered. If this is not desired, use instead Matrices.leastSquares2 and inquire the singularity of the solution with the return argument rank (a unique solution is computed if rank = size(A,1)).
Note, the solution is computed with the LAPACK function "dgesv", i.e., by Gaussian elimination with partial pivoting.
Real A[3,3] = [1,2,3;
3,4,5;
2,1,4];
Real B[3,2] = [10, 20;
22, 44;
12, 24];
Real X[3,2];
algorithm
X := Matrices.solve2(A, B); /* X = [3, 6;
2, 4;
1, 2] */
Matrices.LU, Matrices.LU_solve2, Matrices.leastSquares2.
function solve2 extends Modelica.Icons.Function; input Real A[:, size(A, 1)] "Matrix A of A*X = B"; input Real B[size(A, 1), :] "Matrix B of A*X = B"; output Real X[size(B, 1), size(B, 2)] "Matrix X such that A*X = B"; end solve2;