CSRSCL  -  multiplie  an n-element complex vector x by the
       real scalar 1/a


SYNOPSIS

       SUBROUTINE CSRSCL( N, SA, SX, INCX )

           INTEGER        INCX, N

           REAL           SA

           COMPLEX        SX( * )


PURPOSE

       CSRSCL multiplies an n-element complex  vector  x  by  the
       real  scalar  1/a. This is done without overflow or under­
       flow as long as the final result x/a does not overflow  or
       underflow.


ARGUMENTS

       N       (input) INTEGER
               The number of components of the vector x.

       SA      (input) REAL
               The  scalar  a which is used to divide each compo­
               nent of x.  SA must be >=  0,  or  the  subroutine
               will divide by zero.

       SX      (input/output) COMPLEX array, dimension
               (1+(N-1)*abs(INCX)) The n-element vector x.

       INCX    (input) INTEGER
               The  increment  between  successive  values of the
               vector   SX.    >   0:    SX(1)   =    X(1)    and
               SX(1+(i-1)*INCX) = x(i),     1< i<= n


Man(1) output converted with man2html