SABER
tools_asa007 Module Reference

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
 

Detailed Description

Inverse of symmetric positive definite matrix routines.

Function/Subroutine Documentation

◆ asa007_cholesky()

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.

Parameters
[in,out]mplMPI data
[in]nMatrix rank
[in]nnHalf-matrix size (n*(n-1)/2)
[in]aMatrix
[out]uMatrix square-root
[out]ierrError status

Definition at line 32 of file tools_asa007.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ asa007_syminv()

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.

Parameters
[in,out]mplMPI data
[in]nMatrix rank
[in]nnHalf-matrix size (n*(n-1)/2)
[in]aMatrix
[out]cMatrix inverse
[out]ierrError status

Definition at line 111 of file tools_asa007.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

Variable Documentation

◆ eta

real(kind_real), parameter tools_asa007::eta = 1.0e-9_kind_real

Definition at line 21 of file tools_asa007.F90.