Matrix-vector multiply

SSPMV/DSPMV/CHPMV/ZHPMV

CHARACTER*1

uplo

INTEGER*8

n, incx, incy

REAL*8

alpha, beta, ap(lenap), x(lenx), y(leny)

CALL DSPMV(uplo, n, alpha, ap, x, incx, beta, y, incy)

CHARACTER*1

uplo

INTEGER*8

n, incx, incy

COMPLEX*8

alpha, beta, ap(lenap), x(lenx), y(leny)

CALL CHPMV(uplo, n, alpha, ap, x, incx, beta, y, incy)

CHARACTER*1

uplo

INTEGER*8

n, incx, incy

COMPLEX*16

alpha, beta, ap(lenap), x(lenx), y(leny)

CALL ZHPMV(uplo, n, alpha, ap, x, incx, beta, y, incy)

Chapter 3 Basic Matrix Operations 251