|
SABER
|
Inverse of symmetric positive definite matrix routines. More...
Functions/Subroutines | |
| subroutine, public | asa007_cholesky (mpl, n, nn, a, u, ierr) |
| Compute cholesky decomposition. More... | |
| subroutine, public | asa007_syminv (mpl, n, nn, a, c, ierr) |
| Compute inverse of a symmetric matrix. More... | |
Variables | |
| real(kind_real), parameter | eta = 1.0e-9_kind_real |
Inverse of symmetric positive definite matrix routines.
| subroutine, public tools_asa007::asa007_cholesky | ( | type(mpl_type), intent(inout) | mpl, |
| integer, intent(in) | n, | ||
| integer, intent(in) | nn, | ||
| real(kind_real), dimension(nn), intent(in) | a, | ||
| real(kind_real), dimension(nn), intent(out) | u, | ||
| integer, intent(out) | ierr | ||
| ) |
Compute cholesky decomposition.
| [in,out] | mpl | MPI data |
| [in] | n | Matrix rank |
| [in] | nn | Half-matrix size (n*(n-1)/2) |
| [in] | a | Matrix |
| [out] | u | Matrix square-root |
| [out] | ierr | Error status |
Definition at line 32 of file tools_asa007.F90.


| subroutine, public tools_asa007::asa007_syminv | ( | type(mpl_type), intent(inout) | mpl, |
| integer, intent(in) | n, | ||
| integer, intent(in) | nn, | ||
| real(kind_real), dimension(nn), intent(in) | a, | ||
| real(kind_real), dimension(nn), intent(out) | c, | ||
| integer, intent(out) | ierr | ||
| ) |
Compute inverse of a symmetric matrix.
| [in,out] | mpl | MPI data |
| [in] | n | Matrix rank |
| [in] | nn | Half-matrix size (n*(n-1)/2) |
| [in] | a | Matrix |
| [out] | c | Matrix inverse |
| [out] | ierr | Error status |
Definition at line 111 of file tools_asa007.F90.


| real(kind_real), parameter tools_asa007::eta = 1.0e-9_kind_real |
Definition at line 21 of file tools_asa007.F90.