CSROT(3F)							     CSROT(3F)

NAME    [Toc]    [Back]

     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    [Toc]    [Back]

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

DESCRIPTION    [Toc]    [Back]

     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.


									PPPPaaaaggggeeee 1111