Solve real system of linear equations X*A=B where A is symmetrix positive definite
function solve2rSym_C extends Modelica.Icons.Function; input Real A[:, size(A, 1)] "Matrix A of X*A = B"; input Real B[:, :] "Matrix B of X*op(A) = B"; input Boolean isTriangular = false "True if the A is already lower triangular"; input Boolean upper = false "True if A is upper triAngular"; output Real X[size(B, 1), size(B, 2)] = B "Matrix X such that X*A = B"; output Integer info; end solve2rSym_C;
Date | Author | Comment |
---|---|---|
2010-05-31 | Marcus Baur, DLR-RM | Realization |