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.

x← TT y w ← Tz

F_xTRMVT multiplies a vector y by a triangular matrix TT, 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)

Chapter 3 Basic Matrix Operations 411