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
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
#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.