sget33.f - Man Page

subroutine sget33 (rmax, lmax, ninfo, knt)
SGET33

SGET33

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.

Parameters

RMAX

          RMAX is REAL
          Value of the largest test ratio.

LMAX

          LMAX is INTEGER
          Example number where largest test ratio achieved.

NINFO

          NINFO is INTEGER
          Number of examples returned with INFO .NE. 0.

KNT

          KNT is INTEGER
          Total number of examples tested.

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 75 of file sget33.f.