1CSROT(1)                                                              CSROT(1)
2
3
4

NAME

6       CSROT  -  plane  rotation, where the cos and sin (c and s) are real and
7       the vectors cx and cy are complex
8

SYNOPSIS

10       SUBROUTINE CSROT( N, CX, INCX, CY, INCY, C, S )
11
12           INTEGER       INCX, INCY, N
13
14           REAL          C, S
15
16           COMPLEX       CX( * ), CY( * )
17

PURPOSE

19       Applies a plane rotation, where the cos and sin (c and s) are real  and
20       the vectors cx and cy are complex.  jack dongarra, linpack, 3/11/78.
21
22

ARGUMENTS

24       N        (input) INTEGER
25                On  entry,  N specifies the order of the vectors cx and cy.  N
26                must be at least zero.  Unchanged on exit.
27
28       CX       (input) COMPLEX array, dimension at least
29                ( 1 + ( N - 1 )*abs( INCX ) ).  Before entry, the  incremented
30                array  CX must contain the n element vector cx. On exit, CX is
31                overwritten by the updated vector cx.
32
33       INCX     (input) INTEGER
34                On entry, INCX specifies the increment for the elements of CX.
35                INCX must not be zero.  Unchanged on exit.
36
37       CY       (input) COMPLEX array, dimension at least
38                (  1 + ( N - 1 )*abs( INCY ) ).  Before entry, the incremented
39                array CY must contain the n element vector cy. On exit, CY  is
40                overwritten by the updated vector cy.
41
42       INCY     (input) INTEGER
43                On entry, INCY specifies the increment for the elements of CY.
44                INCY must not be zero.  Unchanged on exit.
45
46       C        (input) REAL
47                On entry, C specifies the cosine, cos.  Unchanged on exit.
48
49       S        (input) REAL
50                On entry, S specifies the sine, sin.  Unchanged on exit.
51
52
53
54                                 October 2006                         CSROT(1)