stdlib_stpsv Subroutine

public pure subroutine stdlib_stpsv(uplo, trans, diag, n, ap, x, incx)

STPSV solves one of the systems of equations Ax = b, or ATx = b, where b and x are n element vectors and A is an n by n unit, or non-unit, upper or lower triangular matrix, supplied in packed form. No test for singularity or near-singularity is included in this routine. Such tests must be performed before calling this routine.

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
real(kind=sp), intent(in) :: ap(*)
real(kind=sp), intent(inout) :: x(*)
integer(kind=ilp), intent(in) :: incx