spsv Interface

public interface spsv

SPSV computes the solution to a complex system of linear equations A * X = B, where A is an N-by-N symmetric matrix stored in packed format and X and B are N-by-NRHS matrices. The diagonal pivoting method is used to factor A as A = U * D * UT, if UPLO = 'U', or A = L * D * LT, if UPLO = 'L', where U (or L) is a product of permutation and unit upper (lower) triangular matrices, D is symmetric and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. The factored form of A is then used to solve the system of equations A * X = B.


Subroutines

public pure subroutine cspsv(uplo, n, nrhs, ap, 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(inout) :: ap(*)
integer(kind=ilp), intent(out) :: ipiv(*)
complex(kind=sp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
integer(kind=ilp), intent(out) :: info

public pure subroutine dspsv(uplo, n, nrhs, ap, 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(inout) :: ap(*)
integer(kind=ilp), intent(out) :: ipiv(*)
real(kind=dp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
integer(kind=ilp), intent(out) :: info

public pure subroutine sspsv(uplo, n, nrhs, ap, 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(inout) :: ap(*)
integer(kind=ilp), intent(out) :: ipiv(*)
real(kind=sp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
integer(kind=ilp), intent(out) :: info

public pure subroutine zspsv(uplo, n, nrhs, ap, 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(inout) :: ap(*)
integer(kind=ilp), intent(out) :: 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_cspsv()

Arguments

None

public interface stdlib_dspsv()

Arguments

None

public interface stdlib_sspsv()

Arguments

None

public interface stdlib_zspsv()

Arguments

None