SGET33
   Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..
November 2006
November 2006
Purpose
SGET33 tests SLANV2, a routine for putting 2 by 2 blocks into
standard form. In other words, it computes a two by two rotation
[[C,S];[-S,C]] where in
[ C S ][T(1,1) T(1,2)][ C -S ] = [ T11 T12 ]
[-S C ][T(2,1) T(2,2)][ S C ] [ T21 T22 ]
either
1) T21=0 (real eigenvalues), or
2) T11=T22 and T21*T12<0 (complex conjugate eigenvalues).
We also verify that the residual is small.
standard form. In other words, it computes a two by two rotation
[[C,S];[-S,C]] where in
[ C S ][T(1,1) T(1,2)][ C -S ] = [ T11 T12 ]
[-S C ][T(2,1) T(2,2)][ S C ] [ T21 T22 ]
either
1) T21=0 (real eigenvalues), or
2) T11=T22 and T21*T12<0 (complex conjugate eigenvalues).
We also verify that the residual is small.
Arguments
| RMAX | 
 
(output) REAL
 
Value of the largest test ratio. 
 | 
| LMAX | 
 
(output) INTEGER
 
Example number where largest test ratio achieved. 
 | 
| NINFO | 
 
(output) INTEGER
 
Number of examples returned with INFO .NE. 0. 
 | 
| KNT | 
 
(output) INTEGER
 
Total number of examples tested. 
 |