HP MLIB User's Guide Vol. 1 7th Ed.

418 HP MLIB User’s Guide
F_STRSV/F_DTRSV/F_CTRSV/F_ZTRSV Triangular solve
INTEGER*8 DIAG, INCX, N, TRANS, UPLO
REAL*4 ALPHA, A( LDA, * ), X( * )
SUBROUTINE F_STRSV (UPLO, TRANS, DIAG, N, ALPHA, A, LDA, X,
INCX)
INTEGER*8 DIAG, INCX, N, TRANS, UPLO
REAL*8 ALPHA, A( LDA, * ), X( * )
SUBROUTINE F_DTRSV (UPLO, TRANS, DIAG, N, ALPHA, A, LDA, X,
INCX)
INTEGER*8 DIAG, INCX, N, TRANS, UPLO
COMPLEX*8 ALPHA, A( LDA, * ), X( * )
SUBROUTINE F_CTRSV (UPLO, TRANS, DIAG, N, ALPHA, A, LDA, X,
INCX)
INTEGER*8 DIAG, INCX, N, TRANS, UPLO
COMPLEX*16 ALPHA, A( LDA, * ), X( * )
SUBROUTINE F_ZTRSV (UPLO, TRANS, DIAG, N, ALPHA, A, LDA, X,
INCX)
Input UPLO Specifies whether a triangular matrix is upper or lower
triangular. Use either BLAS_UPPER or BLAS_LOWER.
TRANS Specifies whether to apply the matrix (A), its transpose
(A
T
), or its conjugate transpose (A*). Use one of the
following: BLAS_NO_TRANS, BLAS_TRANS, or
BLAS_CONJ_TRANS.
DIAG Specifies whether the triangular matrix has
unit-diagonal or not. Use one of the following:
BLAS_UNIT_DIAG or BLAS_NON_UNIT_DIAG.
N Number of columns in matrix A, n > 0. If , the
subprograms do not reference A or X.
ALPHA The scalar ALPHA.
A REAL or COMPLEX array, dimension (LDA, N).
LDA Leading dimension of array A. lda < 1 and lda < n are
illegal values.
X REAL or COMPLEX array, minimum length
(N - 1) x |incx| + 1.
INCX Increment for the array x. A vector x having component
x
i
, i = 1,..., n, is stored in an array X() with increment
argument incx. If incx > 0 then x
i
is stored in
X (1 + (i - 1) x incx). If incx < 0 then x
i
is stored in
X (1 + (N - i) x |incx|). incx = 0 is an illegal value.
n 0≤