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

382 HP MLIB User’s Guide
F_SSPMV/F_DSPMV/F_CSPMV/F_ZSPMV Symmetric packed matrix-vector multiply
INTEGER*8 INCX, INCY, N, UPLO
REAL*4 ALPHA, BETA
REAL*4 AP( * ), X( * ), Y( * )
SUBROUTINE F_SSPMV (UPLO, N, ALPHA, AP, X, INCX, BETA, Y, INCY)
INTEGER*8 INCX, INCY, N, UPLO
REAL*8 ALPHA, BETA
REAL*8 AP( * ), X( * ), Y( * )
SUBROUTINE F_DSPMV (UPLO, N, ALPHA, AP, X, INCX, BETA, Y,
INCY)
INTEGER*8 INCX, INCY, N, UPLO
COMPLEX*8 ALPHA, BETA
COMPLEX*8 AP( * ), X( * ), Y( * )
SUBROUTINE F_CSPMV (UPLO, N, ALPHA, AP, X, INCX, BETA, Y,
INCY)
INTEGER*8 INCX, INCY, N, UPLO
COMPLEX*16 ALPHA, BETA
COMPLEX*16 AP( * ), X( * ), Y( * )
SUBROUTINE F_ZSPMV (UPLO, N, ALPHA, AP, X, INCX, BETA, Y, INCY)
Input UPLO Specifies whether a triangular matrix is upper or lower
triangular. Use either BLAS_UPPER or BLAS_LOWER.
N Number of columns in matrix A, n > 0. If , the
subprograms do not reference A, X, or Y.
ALPHA REAL or COMPLEX scalar ALPHA.
AP Array containing the upper or lower triangle, as
specified by uplo of an n-by-n real symmetric or
complex Hermitian matrix A, stored by columns in
packed form.
X REAL or COMPLEX array, minimum length
(N - 1) x |incx| + 1.
INCX Increment for the array x. A vector x having component
x
i
, i = 1,..., n, is stored in an array X() with increment
argument incx. If incx > 0 then x
i
is stored in
X (1 + (i - 1) x incx). If incx < 0 then x
i
is stored in
X (1 + (N - i) x |incx|). incx = 0 is an illegal value.
BETA REAL or COMPLEX scalar BETA.
Y REAL or COMPLEX array, minimum length
(N - 1) x |incy| + 1.
n 0≤