SGET38 tests STRSEN, a routine for estimating condition numbers of a


 cluster of eigenvalues and/or its associated right invariant subspace


 The test matrices are read from a file with logical unit number NIN.

RMAX

          RMAX is REAL array, dimension (3)


          Values of the largest test ratios.


          RMAX(1) = largest residuals from SHST01 or comparing


                    different calls to STRSEN


          RMAX(2) = largest error in reciprocal condition


                    numbers taking their conditioning into account


          RMAX(3) = largest error in reciprocal condition


                    numbers not taking their conditioning into


                    account (may be larger than RMAX(2))

LMAX

          LMAX is INTEGER array, dimension (3)


          LMAX(i) is example number where largest test ratio


          RMAX(i) is achieved. Also:


          If SGEHRD returns INFO nonzero on example i, LMAX(1)=i


          If SHSEQR returns INFO nonzero on example i, LMAX(2)=i


          If STRSEN returns INFO nonzero on example i, LMAX(3)=i

NINFO

          NINFO is INTEGER array, dimension (3)


          NINFO(1) = No. of times SGEHRD returned INFO nonzero


          NINFO(2) = No. of times SHSEQR returned INFO nonzero


          NINFO(3) = No. of times STRSEN returned INFO nonzero

KNT

          KNT is INTEGER


          Total number of examples tested.

NIN

          NIN is INTEGER


          Input logical unit number.

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.