sytrs_3 Interface

public interface sytrs_3

SYTRS_3 solves a system of linear equations A * X = B with a complex symmetric matrix A using the factorization computed by CSYTRF_RK or CSYTRF_BK: A = PUD(UT)(PT) or A = PLD*(LT)(PT), where U (or L) is unit upper (or lower) triangular matrix, UT (or LT) 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. This algorithm is using Level 3 BLAS.


Subroutines

public pure subroutine csytrs_3(uplo, n, nrhs, a, lda, e, ipiv, b, ldb, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: nrhs
complex(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
complex(kind=sp), intent(in) :: e(*)
integer(kind=ilp), intent(in) :: ipiv(*)
complex(kind=sp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
integer(kind=ilp), intent(out) :: info

public pure subroutine dsytrs_3(uplo, n, nrhs, a, lda, e, ipiv, b, ldb, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: nrhs
real(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=dp), intent(in) :: e(*)
integer(kind=ilp), intent(in) :: ipiv(*)
real(kind=dp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
integer(kind=ilp), intent(out) :: info

public pure subroutine ssytrs_3(uplo, n, nrhs, a, lda, e, ipiv, b, ldb, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: nrhs
real(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=sp), intent(in) :: e(*)
integer(kind=ilp), intent(in) :: ipiv(*)
real(kind=sp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
integer(kind=ilp), intent(out) :: info

public pure subroutine zsytrs_3(uplo, n, nrhs, a, lda, e, ipiv, b, ldb, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: nrhs
complex(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
complex(kind=dp), intent(in) :: e(*)
integer(kind=ilp), intent(in) :: ipiv(*)
complex(kind=dp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
integer(kind=ilp), intent(out) :: info

Module Procedures

public interface stdlib_csytrs_3()

Arguments

None

public interface stdlib_dsytrs_3()

Arguments

None

public interface stdlib_ssytrs_3()

Arguments

None

public interface stdlib_zsytrs_3()

Arguments

None