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

Chapter 3 Basic Matrix Operations 411
Multiple triangular matrix-vector multiply F_STRMVT/F_DTRMVT/F_CTRMVT/F_ZTRMVT
Name F_STRMVT/F_DTRMVT/F_CTRMVT/F_ZTRMVT
Multiple triangular matrix-vector multiply
Purpose F_xTRMVT combines a matrix-vector and a transpose matrix-vector multiply.
F_xTRMVT multiplies a vector y by a triangular matrix T
T
, storing the result
as x. It also multiplies the matrix by the vector z, storing the result as w. If n is
less than or equal to zero, this function returns immediately.
Usage VECLIB
INTEGER*4 INCW, INCX, INCY, INCZ, LDT, N, UPLO
REAL*4 T( LDT, * ), W( * ), X( * ), Y( * ), Z( * )
SUBROUTINE F_STRMVT (UPLO, N, T, LDT, X, INCX, Y, INCY, W, INCW,
Z, INCZ)
INTEGER*4 INCW, INCX, INCY, INCZ, LDT, N, UPLO
REAL*8 T( LDT, * ), W( * ), X( * ), Y( * ), Z( * )
SUBROUTINE F_DTRMVT (UPLO, N, T, LDT, X, INCX, Y, INCY, W, INCW,
Z, INCZ)
INTEGER*4 INCW, INCX, INCY, INCZ, LDT, N, UPLO
COMPLEX*8 T( LDT, * ), W( * ), X( * ), Y( * ), Z( * )
SUBROUTINE F_CTRMVT (UPLO, N, T, LDT, X, INCX, Y, INCY, W, INCW,
Z, INCZ)
INTEGER*4 INCW, INCX, INCY, INCZ, LDT, N, UPLO
COMPLEX*16 T( LDT, * ), W( * ), X( * ), Y( * ), Z( * )
SUBROUTINE F_ZTRMVT (UPLO, N, T, LDT, X, INCX, Y, INCY, W, INCW,
Z, INCZ)
VECLIB8
INTEGER*8 INCW, INCX, INCY, INCZ, LDT, N, UPLO
REAL*4 T( LDT, * ), W( * ), X( * ), Y( * ), Z( * )
SUBROUTINE F_STRMVT (UPLO, N, T, LDT, X, INCX, Y, INCY, W, INCW,
Z, INCZ)
INTEGER*8 INCW, INCX, INCY, INCZ, LDT, N, UPLO
REAL*8 T( LDT, * ), W( * ), X( * ), Y( * ), Z( * )
SUBROUTINE F_DTRMVT (UPLO, N, T, LDT, X, INCX, Y, INCY, W, INCW,
Z, INCZ)
xT
T
y←
wTz←