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