Contents

• NAME
• SYNOPSIS
  • F95 INTERFACE
  • C INTERFACE
• PURPOSE
• ARGUMENTS

NAME

     zscal - Compute y := alpha * y

SYNOPSIS

     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);

PURPOSE

     zscal Compute y := alpha * y where alpha is a scalar  and  y
     is an n-vector.

ARGUMENTS

     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.