.TH "SRC/zrot.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME SRC/zrot.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBzrot\fP (n, cx, incx, cy, incy, c, s)" .br .RI "\fBZROT\fP applies a plane rotation with real cosine and complex sine to a pair of complex vectors\&. " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine zrot (integer n, complex*16, dimension( * ) cx, integer incx, complex*16, dimension( * ) cy, integer incy, double precision c, complex*16 s)" .PP \fBZROT\fP applies a plane rotation with real cosine and complex sine to a pair of complex vectors\&. .PP \fBPurpose:\fP .RS 4 .PP .nf ZROT applies a plane rotation, where the cos (C) is real and the sin (S) is complex, and the vectors CX and CY are complex\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf N is INTEGER The number of elements in the vectors CX and CY\&. .fi .PP .br \fICX\fP .PP .nf CX is COMPLEX*16 array, dimension (N) On input, the vector X\&. On output, CX is overwritten with C*X + S*Y\&. .fi .PP .br \fIINCX\fP .PP .nf INCX is INTEGER The increment between successive values of CX\&. INCX <> 0\&. .fi .PP .br \fICY\fP .PP .nf CY is COMPLEX*16 array, dimension (N) On input, the vector Y\&. On output, CY is overwritten with -CONJG(S)*X + C*Y\&. .fi .PP .br \fIINCY\fP .PP .nf INCY is INTEGER The increment between successive values of CY\&. INCX <> 0\&. .fi .PP .br \fIC\fP .PP .nf C is DOUBLE PRECISION .fi .PP .br \fIS\fP .PP .nf S is COMPLEX*16 C and S define a rotation [ C S ] [ -conjg(S) C ] where C*C + S*CONJG(S) = 1\&.0\&. .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP .PP Definition at line \fB102\fP of file \fBzrot\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.