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

134 HP MLIB User’s Guide
SSCAL/DSCAL/CSCAL/CSSCAL/CSCALC/ZSCAL/ZDSCAL/ZSCALC Scale vector
INTEGER*4 n, incx
COMPLEX*16 a, x(lenx)
CALL ZSCALC(n, a, x, incx)
VECLIB8:
INTEGER*8 n, incx
REAL*4 a, x(lenx)
CALL SSCAL(n, a, x, incx)
INTEGER*8 n, incx
REAL*8 a, x(lenx)
CALL DSCAL(n, a, x, incx)
INTEGER*8 n, incx
COMPLEX*8 a, x(lenx)
CALL CSCAL(n, a, x, incx)
INTEGER*8 n, incx
REAL*4 a
COMPLEX*8 x(lenx)
CALL CSSCAL(n, a, x, incx)
INTEGER*8 n, incx
COMPLEX*8 a, x(lenx)
CALL CSCALC(n, a, x, incx)
INTEGER*8 n, incx
COMPLEX*16 a, x(lenx)
CALL ZSCAL(n, a, x, incx)
INTEGER*8 n, incx
REAL*8 a
COMPLEX*16 x(lenx)
CALL ZDSCAL(n, a, x, incx)
INTEGER*8 n, incx
COMPLEX*16 a, x(lenx)
CALL ZSCALC(n, a, x, incx)
Input n Number of elements of vector x to be used in the scaling
operation. If n ≤ 0, the subprograms do not reference x.
a The scalar a.
x Array of length lenx = (n−1)×|incx|+1 containing the
n-vector x. x is used in conjugated form by CSCALC