nwtc_lapack::lapack_getrs Interface Reference

Solve system(s) of linear equations Ax=PLUx=b. More...

Public Member Functions
subroutine	lapack_dgetrs (TRANS, N, A, IPIV, B, ErrStat, ErrMsg)
	general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b. More...
subroutine	lapack_sgetrs (TRANS, N, A, IPIV, B, ErrStat, ErrMsg)
	general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b. More...
subroutine	lapack_dgetrs1 (TRANS, N, A, IPIV, B, ErrStat, ErrMsg)
	general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b. More...
subroutine	lapack_sgetrs1 (TRANS, N, A, IPIV, B, ErrStat, ErrMsg)
	general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b. More...

Detailed Description

Solve system(s) of linear equations Ax=PLUx=b.

Member Function/Subroutine Documentation

lapack_dgetrs()

subroutine nwtc_lapack::lapack_getrs::lapack_dgetrs	(	character(1), intent(in)	TRANS,
		integer, intent(in)	N,
		real(r8ki), dimension( :, : ), intent(in)	A,
		integer, dimension( : ), intent(in)	IPIV,
		real(r8ki), dimension( :, : ), intent(inout)	B,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b.

use LAPACK_GETRS (nwtc_lapack::lapack_getrs) instead of this specific function.

Parameters

[in]	trans	Specifies the form of the system of equations: = 'N': A * X = B (No transpose) = 'T': A**T* X = B (Transpose) = 'C': A**T* X = B (Conjugate transpose = Transpose)
[in]	n	The order of the matrix A. N >= 0.
[in]	ipiv	The pivot indices from DGETRF (nwtc_lapack::lapack_getrf); for 1<=i<=N, row i of the matrix was interchanged with row IPIV(i).
[in]	a	The factors L and U from the factorization A = P*L*U as computed by DGETRF.
[in,out]	b	On entry, the right hand side matrix B. On exit, the solution matrix X.
[out]	errstat	Error level
[out]	errmsg	Message describing error

lapack_dgetrs1()

subroutine nwtc_lapack::lapack_getrs::lapack_dgetrs1	(	character(1), intent(in)	TRANS,
		integer, intent(in)	N,
		real(r8ki), dimension( :, : ), intent(in)	A,
		integer, dimension( : ), intent(in)	IPIV,
		real(r8ki), dimension( : ), intent(inout)	B,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b.

use LAPACK_GETRS (nwtc_lapack::lapack_getrs) instead of this specific function.

Parameters

[in]	trans	Specifies the form of the system of equations: = 'N': A * X = B (No transpose) = 'T': A**T* X = B (Transpose) = 'C': A**T* X = B (Conjugate transpose = Transpose)
[in]	n	The order of the matrix A. N >= 0.
[in]	ipiv	The pivot indices from DGETRF (nwtc_lapack::lapack_getrf); for 1<=i<=N, row i of the matrix was interchanged with row IPIV(i).
[in]	a	The factors L and U from the factorization A = P*L*U as computed by DGETRF.
[in,out]	b	On entry, the right hand side matrix B. On exit, the solution matrix X.
[out]	errstat	Error level
[out]	errmsg	Message describing error

lapack_sgetrs()

subroutine nwtc_lapack::lapack_getrs::lapack_sgetrs	(	character(1), intent(in)	TRANS,
		integer, intent(in)	N,
		real(siki), dimension( :, : ), intent(in)	A,
		integer, dimension( : ), intent(in)	IPIV,
		real(siki), dimension( :, : ), intent(inout)	B,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b.

use LAPACK_GETRS (nwtc_lapack::lapack_getrs) instead of this specific function.

Parameters

[in]	trans	Specifies the form of the system of equations: = 'N': A * X = B (No transpose) = 'T': A**T* X = B (Transpose) = 'C': A**T* X = B (Conjugate transpose = Transpose)
[in]	n	The order of the matrix A. N >= 0.
[in]	ipiv	The pivot indices from DGETRF; for 1<=i<=N, row i of the matrix was interchanged with row IPIV(i).
[in]	a	The factors L and U from the factorization A = P*L*U as computed by SGETRF.
[in,out]	b	On entry, the right hand side matrix B. On exit, the solution matrix X.
[out]	errstat	Error level
[out]	errmsg	Message describing error

lapack_sgetrs1()

subroutine nwtc_lapack::lapack_getrs::lapack_sgetrs1	(	character(1), intent(in)	TRANS,
		integer, intent(in)	N,
		real(siki), dimension( :, : ), intent(in)	A,
		integer, dimension( : ), intent(in)	IPIV,
		real(siki), dimension( : ), intent(inout)	B,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

general solve of factorized matrix: Solve system of linear equations Ax=PLUx=b.

use LAPACK_GETRS (nwtc_lapack::lapack_getrs) instead of this specific function.

Parameters

[in]	trans	Specifies the form of the system of equations: = 'N': A * X = B (No transpose) = 'T': A**T* X = B (Transpose) = 'C': A**T* X = B (Conjugate transpose = Transpose)
[in]	n	The order of the matrix A. N >= 0.
[in]	ipiv	The pivot indices from DGETRF; for 1<=i<=N, row i of the matrix was interchanged with row IPIV(i).
[in]	a	The factors L and U from the factorization A = P*L*U as computed by SGETRF.
[in,out]	b	On entry, the right hand side matrix B. On exit, the solution matrix X.
[out]	errstat	Error level
[out]	errmsg	Message describing error

---

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

• NWTC_LAPACK.f90