1CLARTG(1) LAPACK auxiliary routine (version 3.1) CLARTG(1)
2
3
4
6 CLARTG - a plane rotation so that [ CS SN ] [ F ] [ R ] [ __ ]
7
9 SUBROUTINE CLARTG( F, G, CS, SN, R )
10
11 REAL CS
12
13 COMPLEX F, G, R, SN
14
16 CLARTG generates a plane rotation so that
17 [ -SN CS ] [ G ] [ 0 ]
18
19 This is a faster version of the BLAS1 routine CROTG, except for the
20 following differences:
21 F and G are unchanged on return.
22 If G=0, then CS=1 and SN=0.
23 If F=0, then CS=0 and SN is chosen so that R is real.
24
25
27 F (input) COMPLEX
28 The first component of vector to be rotated.
29
30 G (input) COMPLEX
31 The second component of vector to be rotated.
32
33 CS (output) REAL
34 The cosine of the rotation.
35
36 SN (output) COMPLEX
37 The sine of the rotation.
38
39 R (output) COMPLEX
40 The nonzero component of the rotated vector.
41
43 3-5-96 - Modified with a new algorithm by W. Kahan and J. Demmel
44
45 This version has a few statements commented out for thread safety
46 (machine parameters are computed on each entry). 10 feb 03, SJH.
47
48
49
50
51 LAPACK auxiliary routine (versionNo3v.e1m)ber 2006 CLARTG(1)