1ZLARTV(1) LAPACK auxiliary routine (version 3.2) ZLARTV(1)
2
3
4
6 ZLARTV - applies a vector of complex plane rotations with real cosines
7 to elements of the complex vectors x and y
8
10 SUBROUTINE ZLARTV( N, X, INCX, Y, INCY, C, S, INCC )
11
12 INTEGER INCC, INCX, INCY, N
13
14 DOUBLE PRECISION C( * )
15
16 COMPLEX*16 S( * ), X( * ), Y( * )
17
19 ZLARTV 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*16 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*16 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) DOUBLE PRECISION array, dimension (1+(N-1)*INCC)
41 The cosines of the plane rotations.
42
43 S (input) COMPLEX*16 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 ZLARTV(1)