Linear_Equations contains a procedure for solving a system of linear equations A * X = B where A is an N by N real matrix and X and B are both vectors of length N. The procedure that does the solving is a front end to the LAPACK subroutine DGESV.
Module | Variables |
---|---|
DEFINITIONS | DP |
None.
There is a single public subroutine in this module.
Subroutine | Purpose |
---|---|
LINEAR_EQUATIONS_SOLVE | Solve a system of linear equations for a general real square matrix and a single right hand side. |
Argument | Type | Intent | Optional | Purpose |
---|---|---|---|---|
N | Integer | In | No | The dimension of the system of equations. |
A | Real(1:IA,1:N) | InOut | No | The matrix. |
IA | Integer | In | No | The first dimension of the matrix A. |
B | Real(1:N) | InOut | No | The RHS on input and the result on output. |
IERR | Integer | Out | No | An error flag. |
Stable.