1CLARTV(1) LAPACK auxiliary routine (version 3.2) CLARTV(1)
2
3
4
6 CLARTV - applies a vector of complex plane rotations with real cosines
7 to elements of the complex vectors x and y
8
10 SUBROUTINE CLARTV( N, X, INCX, Y, INCY, C, S, INCC )
11
12 INTEGER INCC, INCX, INCY, N
13
14 REAL C( * )
15
16 COMPLEX S( * ), X( * ), Y( * )
17
19 CLARTV applies a vector of complex plane rotations with real cosines to
20 elements of the complex vectors x and y. For i = 1,2,...,n
21 ( x(i) ) := ( c(i) s(i) ) ( x(i) )
22 ( y(i) ) ( -conjg(s(i)) c(i) ) ( y(i) )
23
25 N (input) INTEGER
26 The number of plane rotations to be applied.
27
28 X (input/output) COMPLEX array, dimension (1+(N-1)*INCX)
29 The vector x.
30
31 INCX (input) INTEGER
32 The increment between elements of X. INCX > 0.
33
34 Y (input/output) COMPLEX array, dimension (1+(N-1)*INCY)
35 The vector y.
36
37 INCY (input) INTEGER
38 The increment between elements of Y. INCY > 0.
39
40 C (input) REAL array, dimension (1+(N-1)*INCC)
41 The cosines of the plane rotations.
42
43 S (input) COMPLEX array, dimension (1+(N-1)*INCC)
44 The sines of the plane rotations.
45
46 INCC (input) INTEGER
47 The increment between elements of C and S. INCC > 0.
48
49
50
51 LAPACK auxiliary routine (versionNo3v.e2m)ber 2008 CLARTV(1)