F_STRMVT/F_DTRMVT/F_CTRMVT/F_ZTRMVT

Multiple triangular matrix-vector multiply

 

INTEGER*8

 

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*8

 

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)

 

 

Input

UPLO

Specifies whether a triangular matrix is upper or lower

 

 

triangular. Use either BLAS_UPPER or BLAS_LOWER.

 

N

Number of rows and columns in matrix T, n > 0.

 

T

REAL or COMPLEX array, dimension (LDT,

 

 

N)—triangular matrix.

 

LDT

Leading dimension of array T. If ldt < 1 or ldt < m, an

 

 

error flag is set and passed to the error handler.

 

INCX

Increment for the array x. A vector x having component

 

 

xi, i = 1,..., n, is stored in an array X() with increment

 

 

argument incx. If incx > 0 then xi is stored in

 

 

X (1 + (i - 1) x incx). If incx < 0 then xi is stored in

 

 

X (1 + (N - i) x incx). incx = 0 is an illegal value.

 

Y

REAL or COMPLEX array, minimum length

 

 

(N - 1) xincy + 1.

 

INCY

Increment for the array y. A vector y having component

 

 

yi, i = 1,..., n, is stored in an array Y() with increment

 

 

argument incy. If incy > 0 then yi is stored in

 

 

Y(1 + (i - 1) x incy). If incy < 0 then yi is stored in

 

 

Y(1 + (N - i) x incy). incy = 0 is an illegal value.

 

INCW

Increment for the array w. A vector w having

 

 

component wi, i = 1,..., n, is stored in an array W() with

 

 

increment argument incw. If incw > 0 then wi is stored

 

 

in W (1 + (i - 1) x incw). If incw < 0 then wi is stored in

 

 

W (1 + (N - i) x incw). incw = 0 is an illegal value.

 

Z

REAL or COMPLEX array, minimum length

 

 

(N - 1) x incz + 1.

 

INCZ

Increment for the array y. A vector z having component

 

 

zi, i = 1,..., n, is stored in an array Z() with increment

 

 

argument incw. If incw > 0 then zi is stored in

 

 

Z(1 + (i - 1) x incw). If incw < 0 then ziis stored in

 

 

Z(1 + (N - i) x incw). incw = 0 is an illegal value.

412HP MLIB User’s Guide