tptrs Interface

public interface tptrs

TPTRS solves a triangular system of the form A * X = B, AT * X = B, or AH * X = B, where A is a triangular matrix of order N stored in packed format, and B is an N-by-NRHS matrix. A check is made to verify that A is nonsingular.


Subroutines

public pure subroutine ctptrs(uplo, trans, diag, n, nrhs, ap, b, ldb, info)

Arguments

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

public pure subroutine dtptrs(uplo, trans, diag, n, nrhs, ap, b, ldb, info)

Arguments

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

public pure subroutine stptrs(uplo, trans, diag, n, nrhs, ap, b, ldb, info)

Arguments

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

public pure subroutine ztptrs(uplo, trans, diag, n, nrhs, ap, b, ldb, info)

Arguments

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

Module Procedures

public interface stdlib_ctptrs()

Arguments

None

public interface stdlib_dtptrs()

Arguments

None

public interface stdlib_stptrs()

Arguments

None

public interface stdlib_ztptrs()

Arguments

None