CSROT(3F)

NAME
     CSROT   - CSROT applies the complex Givens rotation

        (X)   ( C S)(X)
        (Y) = (-S C)(Y)

     N times where for I = 0,...,N-1

        X = CX(1+I*INCX)
        Y = CY(1+I*INCY)


SYNOPSYS
      SUBROUTINE CSROT(N,CX,INCX,CY,INCY,C,S)

DESCRIPTION
     Argument Description

     N (integer)  number of elements in each vector

     CX (complex array)  beginning of one vector

     INCX (integer)  memory spacing of successive elements
        of vector CX

     CY (complex array)  beginning of the other vector

     INCY (integer)  memory spacing of successive elements
        of vector CY

     C (real)  cosine term of the rotation

     S (real)  sine term of the rotation.