1CSROT(1) CSROT(1)
2
3
4
6 CSROT - plane rotation, where the cos and sin (c and s) are real and
7 the vectors cx and cy are complex
8
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
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
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)