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