SUBROUTINE CLACRT( N, CX, INCX, CY, INCY, C, S ) INTEGER INCX, INCY, N COMPLEX C, S COMPLEX CX( * ), CY( * )
CLACRT applies a plane rotation, where the cos and sin (C and S) are complex and the vectors CX and CY are complex.
N (input) INTEGER The number of elements in the vectors CX and CY. CX (input/output) COMPLEX array, dimension (N) On input, the vector X. On output, CX is overwritten with C*X + S*Y. INCX (input) INTEGER The increment between successive values of CY. INCX <> 0. CY (input/output) COMPLEX array, dimension (N) On input, the vector Y. On output, CY is overwritten with -S*X + C*Y. INCY (input) INTEGER The increment between successive values of CY. INCX <> 0. C (input) COMPLEX S (input) COMPLEX C and S define a complex rotation [ C S ] [ -S C ] where C*C + S*S = 1.0.