Contents
cscal - Compute y := alpha * y
SUBROUTINE CSCAL(N, ALPHA, Y, INCY)
COMPLEX ALPHA
COMPLEX Y(*)
INTEGER N, INCY
SUBROUTINE CSCAL_64(N, ALPHA, Y, INCY)
COMPLEX ALPHA
COMPLEX Y(*)
INTEGER*8 N, INCY
F95 INTERFACE
SUBROUTINE SCAL([N], ALPHA, Y, [INCY])
COMPLEX :: ALPHA
COMPLEX, DIMENSION(:) :: Y
INTEGER :: N, INCY
SUBROUTINE SCAL_64([N], ALPHA, Y, [INCY])
COMPLEX :: ALPHA
COMPLEX, DIMENSION(:) :: Y
INTEGER(8) :: N, INCY
C INTERFACE
#include <sunperf.h>
void cscal(int n, complex *alpha, complex *y, int incy);
void cscal_64(long n, complex *alpha, complex *y, long
incy);
cscal 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.