SYSV_RK: computes the solution to a complex system of linear equations A * X = B, where A is an N-by-N symmetric matrix and X and B are N-by-NRHS matrices. The bounded Bunch-Kaufman (rook) diagonal pivoting method is used to factor A as A = P*U*D*(U**T)*(P**T), if UPLO = 'U', or A = P*L*D*(L**T)*(P**T), if UPLO = 'L', where U (or L) is unit upper (or lower) triangular matrix, U**T (or L**T) is the transpose of U (or L), P is a permutation matrix, P**T is the transpose of P, and D is symmetric and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. CSYTRF_RK is called to compute the factorization of a complex symmetric matrix. The factored form of A is then used to solve the system of equations A * X = B by calling BLAS3 routine CSYTRS_3.
More...
|
pure subroutine | csysv_rk (uplo, n, nrhs, a, lda, e, ipiv, b, ldb, work, lwork, info) |
|
| la_csysv_rk |
|
pure subroutine | dsysv_rk (uplo, n, nrhs, a, lda, e, ipiv, b, ldb, work, lwork, info) |
|
| la_dsysv_rk |
|
| la_qsysv_rk |
|
pure subroutine | ssysv_rk (uplo, n, nrhs, a, lda, e, ipiv, b, ldb, work, lwork, info) |
|
| la_ssysv_rk |
|
| la_wsysv_rk |
|
pure subroutine | zsysv_rk (uplo, n, nrhs, a, lda, e, ipiv, b, ldb, work, lwork, info) |
|
| la_zsysv_rk |
|
SYSV_RK: computes the solution to a complex system of linear equations A * X = B, where A is an N-by-N symmetric matrix and X and B are N-by-NRHS matrices. The bounded Bunch-Kaufman (rook) diagonal pivoting method is used to factor A as A = P*U*D*(U**T)*(P**T), if UPLO = 'U', or A = P*L*D*(L**T)*(P**T), if UPLO = 'L', where U (or L) is unit upper (or lower) triangular matrix, U**T (or L**T) is the transpose of U (or L), P is a permutation matrix, P**T is the transpose of P, and D is symmetric and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. CSYTRF_RK is called to compute the factorization of a complex symmetric matrix. The factored form of A is then used to solve the system of equations A * X = B by calling BLAS3 routine CSYTRS_3.
◆ csysv_rk()
pure subroutine la_lapack::sysv_rk::csysv_rk |
( |
character, intent(in) |
uplo, |
|
|
integer(ilp), intent(in) |
n, |
|
|
integer(ilp), intent(in) |
nrhs, |
|
|
complex(sp), dimension(lda,*), intent(inout) |
a, |
|
|
integer(ilp), intent(in) |
lda, |
|
|
complex(sp), dimension(*), intent(out) |
e, |
|
|
integer(ilp), dimension(*), intent(out) |
ipiv, |
|
|
complex(sp), dimension(ldb,*), intent(inout) |
b, |
|
|
integer(ilp), intent(in) |
ldb, |
|
|
complex(sp), dimension(*), intent(out) |
work, |
|
|
integer(ilp), intent(in) |
lwork, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
◆ dsysv_rk()
pure subroutine la_lapack::sysv_rk::dsysv_rk |
( |
character, intent(in) |
uplo, |
|
|
integer(ilp), intent(in) |
n, |
|
|
integer(ilp), intent(in) |
nrhs, |
|
|
real(dp), dimension(lda,*), intent(inout) |
a, |
|
|
integer(ilp), intent(in) |
lda, |
|
|
real(dp), dimension(*), intent(out) |
e, |
|
|
integer(ilp), dimension(*), intent(out) |
ipiv, |
|
|
real(dp), dimension(ldb,*), intent(inout) |
b, |
|
|
integer(ilp), intent(in) |
ldb, |
|
|
real(dp), dimension(*), intent(out) |
work, |
|
|
integer(ilp), intent(in) |
lwork, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
◆ la_csysv_rk()
la_lapack::sysv_rk::la_csysv_rk |
◆ la_dsysv_rk()
la_lapack::sysv_rk::la_dsysv_rk |
◆ la_qsysv_rk()
la_lapack::sysv_rk::la_qsysv_rk |
◆ la_ssysv_rk()
la_lapack::sysv_rk::la_ssysv_rk |
◆ la_wsysv_rk()
la_lapack::sysv_rk::la_wsysv_rk |
◆ la_zsysv_rk()
la_lapack::sysv_rk::la_zsysv_rk |
◆ ssysv_rk()
pure subroutine la_lapack::sysv_rk::ssysv_rk |
( |
character, intent(in) |
uplo, |
|
|
integer(ilp), intent(in) |
n, |
|
|
integer(ilp), intent(in) |
nrhs, |
|
|
real(sp), dimension(lda,*), intent(inout) |
a, |
|
|
integer(ilp), intent(in) |
lda, |
|
|
real(sp), dimension(*), intent(out) |
e, |
|
|
integer(ilp), dimension(*), intent(out) |
ipiv, |
|
|
real(sp), dimension(ldb,*), intent(inout) |
b, |
|
|
integer(ilp), intent(in) |
ldb, |
|
|
real(sp), dimension(*), intent(out) |
work, |
|
|
integer(ilp), intent(in) |
lwork, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
◆ zsysv_rk()
pure subroutine la_lapack::sysv_rk::zsysv_rk |
( |
character, intent(in) |
uplo, |
|
|
integer(ilp), intent(in) |
n, |
|
|
integer(ilp), intent(in) |
nrhs, |
|
|
complex(dp), dimension(lda,*), intent(inout) |
a, |
|
|
integer(ilp), intent(in) |
lda, |
|
|
complex(dp), dimension(*), intent(out) |
e, |
|
|
integer(ilp), dimension(*), intent(out) |
ipiv, |
|
|
complex(dp), dimension(ldb,*), intent(inout) |
b, |
|
|
integer(ilp), intent(in) |
ldb, |
|
|
complex(dp), dimension(*), intent(out) |
work, |
|
|
integer(ilp), intent(in) |
lwork, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
The documentation for this interface was generated from the following file: