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

246 HP MLIB User’s Guide
SSBMV/DSBMV/CHBMV/ZHBMV Matrix-vector multiply
CHARACTER*1 uplo
INTEGER*4 n, kd, ldab, incx, incy
COMPLEX*8 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL CHBMV(uplo, n, kd, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 uplo
INTEGER*4 n, kd, ldab, incx, incy
COMPLEX*16 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL ZHBMV(uplo, n, kd, alpha, ab, ldab, x, incx, beta, y, incy)
VECLIB8:
CHARACTER*1 uplo
INTEGER*8 n, kd, ldab, incx, incy
REAL*4 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL SSBMV(uplo, n, kd, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 uplo
INTEGER*8 n, kd, ldab, incx, incy
REAL*8 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL DSBMV(uplo, n, kd, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 uplo
INTEGER*8 n, kd, ldab, incx, incy
COMPLEX*8 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL CHBMV(uplo, n, kd, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 uplo
INTEGER*8 n, kd, ldab, incx, incy
COMPLEX*16 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL ZHBMV(uplo, n, kd, alpha, ab, ldab, x, incx, beta, y, incy)
Input uplo Upper/lower triangular option for A:
’L’ or ’l’ The lower triangle of A is stored.
’U’ or ’u’ The upper triangle of A is stored.
n Number of rows and columns in matrix A, n ≥ 0. If
n = 0, the subprograms do not reference ab or x.
kd The number of nonzero diagonals above or below the
principal diagonal.
alpha The scalar α. If alpha = 0, the subprograms compute
y ←βy without referencing ab or x.
ab Array containing the n-by-n symmetric band matrix A
in the compressed form described above. The columns