Contents
zscal - Compute y := alpha * y
SUBROUTINE ZSCAL(N, ALPHA, Y, INCY)
DOUBLE COMPLEX ALPHA
DOUBLE COMPLEX Y(*)
INTEGER N, INCY
SUBROUTINE ZSCAL_64(N, ALPHA, Y, INCY)
DOUBLE COMPLEX ALPHA
DOUBLE COMPLEX Y(*)
INTEGER*8 N, INCY
F95 INTERFACE
SUBROUTINE SCAL([N], ALPHA, Y, [INCY])
COMPLEX(8) :: ALPHA
COMPLEX(8), DIMENSION(:) :: Y
INTEGER :: N, INCY
SUBROUTINE SCAL_64([N], ALPHA, Y, [INCY])
COMPLEX(8) :: ALPHA
COMPLEX(8), DIMENSION(:) :: Y
INTEGER(8) :: N, INCY
C INTERFACE
#include <sunperf.h>
void zscal(int n, doublecomplex *alpha, doublecomplex *y,
int incy);
void zscal_64(long n, doublecomplex *alpha, doublecomplex
*y, long incy);
zscal Compute y := alpha * y where alpha is a scalar and y
is an n-vector.
N (input)
On entry, N specifies the number of elements in
the vector. N must be at least one for the sub-
routine to have any visible effect. Unchanged on
exit.
ALPHA (input)
On entry, ALPHA specifies the scalar alpha.
Unchanged on exit.
Y (input/output)
( 1 + ( n - 1 )*INCY ). On entry, the incremented
array Y must contain the vector y. On exit, Y is
overwritten by the updated vector y.
INCY (input)
On entry, INCY specifies the increment for the
elements of Y. This routine returns immediately if
INCY is less than or equal to zero. Unchanged on
exit.