nwtc_lapack::lapack_getri Interface Reference

Compute the inverse of a matrix using the LU factorization. More...

Public Member Functions
subroutine	lapack_dgetri (N, A, IPIV, WORK, LWORK, ErrStat, ErrMsg)
	Compute the inverse of a general matrix using the LU factorization. More...
subroutine	lapack_sgetri (N, A, IPIV, WORK, LWORK, ErrStat, ErrMsg)
	Compute the inverse of a general matrix using the LU factorization. More...

Detailed Description

Compute the inverse of a matrix using the LU factorization.

Member Function/Subroutine Documentation

lapack_dgetri()

subroutine nwtc_lapack::lapack_getri::lapack_dgetri	(	integer, intent(in)	N,
		real(r8ki), dimension( :, : ), intent(inout)	A,
		integer, dimension( : ), intent(in)	IPIV,
		real(r8ki), dimension( : ), intent(inout)	WORK,
		integer, intent(in)	LWORK,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

Compute the inverse of a general matrix using the LU factorization.

use LAPACK_GETRI (nwtc_lapack::lapack_getri) instead of this specific function.

Parameters

[in]	n	The order of the matrix A. N >= 0.
[in]	lwork	The dimension of the array WORK. LWORK >= max(1,N). For optimal performance LWORK >= N*NB, where NB is the optimal blocksize returned by ILAENV. If LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA.
[in]	ipiv	dimension (N). The pivot indices from DGETRF; for 1<=i<=N, row i of the matrix was interchanged with row IPIV(i).
[in,out]	a	On entry, the factors L and U from the factorization A = P*L*U as computed by DGETRF. On exit, if INFO = 0, the inverse of the original matrix A.
[in,out]	work	On exit, if INFO=0, then WORK(1) returns the optimal LWORK.
[out]	errstat	Error level
[out]	errmsg	Message describing error

lapack_sgetri()

subroutine nwtc_lapack::lapack_getri::lapack_sgetri	(	integer, intent(in)	N,
		real(siki), dimension( :, : ), intent(inout)	A,
		integer, dimension( : ), intent(in)	IPIV,
		real(siki), dimension( : ), intent(inout)	WORK,
		integer, intent(in)	LWORK,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

Compute the inverse of a general matrix using the LU factorization.

use LAPACK_GETRI (nwtc_lapack::lapack_getri) instead of this specific function.

Parameters

[in]	n	The order of the matrix A. N >= 0.
[in]	lwork	The dimension of the array WORK. LWORK >= max(1,N). For optimal performance LWORK >= N*NB, where NB is the optimal blocksize returned by ILAENV. If LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA.
[in]	ipiv	dimension (N). The pivot indices from DGETRF; for 1<=i<=N, row i of the matrix was interchanged with row IPIV(i).
[in,out]	a	On entry, the factors L and U from the factorization A = P*L*U as computed by SGETRF. On exit, if INFO = 0, the inverse of the original matrix A.
[in,out]	work	On exit, if INFO=0, then WORK(1) returns the optimal LWORK.
[out]	errstat	Error level
[out]	errmsg	Message describing error

---

The documentation for this interface was generated from the following file:

• NWTC_LAPACK.f90