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

214 HP MLIB User’s Guide
SGBMV/DGBMV/CGBMV/ZGBMV Matrix-vector multiply
CHARACTER*1 trans
INTEGER*4 m, n, kl, ku, ldab, incx, incy
COMPLEX*8 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL CGBMV(trans, m, n, kl, ku, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 trans
INTEGER*4 m, n, kl, ku, ldab, incx, incy
COMPLEX*16 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL ZGBMV(trans, m, n, kl, ku, alpha, ab, ldab, x, incx, beta, y, incy)
VECLIB8:
CHARACTER*1 trans
INTEGER*8 m, n, kl, ku, ldab, incx, incy
REAL*4 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL SGBMV(trans, m, n, kl, ku, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 trans
INTEGER*8 m, n, kl, ku, ldab, incx, incy
REAL*8 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL DGBMV(trans, m, n, kl, ku, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 trans
INTEGER*8 m, n, kl, ku, ldab, incx, incy
COMPLEX*8 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL CGBMV(trans, m, n, kl, ku, alpha, ab, ldab, x, incx, beta, y, incy)
CHARACTER*1 trans
INTEGER*8 m, n, kl, ku, ldab, incx, incy
COMPLEX*16 alpha, beta, ab(ldab, n), x(lenx), y(leny)
CALL ZGBMV(trans, m, n, kl, ku, alpha, ab, ldab, x, incx, beta, y, incy)
Input trans Transposition option for A:
’N’ or ’n’ Compute y ←αAx + βy
’T’ or ’t’ Compute y ←αA
T
x + βy
’C’ or ’c’ Compute y ←αA*x + βy
where A
T
is the transpose of A and A* is the conjugate
transpose. In the real subprograms, ’C’ and ’c’ have the
same meaning as ’T’ and ’t’.
m Number of rows in matrix A, m ≥ 0. If m = 0, the
subprograms do not reference ab, x, or y.
n Number of columns in matrix A, n ≥ 0. If n = 0, the
subprograms do not reference ab, x, or y.