CGET36 tests CTREXC, a routine for reordering diagonal entries of a


 matrix in complex Schur form. Thus, CLAEXC computes a unitary matrix


 Q such that


    Q' * T1 * Q  = T2


 and where one of the diagonal blocks of T1 (the one at row IFST) has


 been moved to position ILST.


 The test code verifies that the residual Q'*T1*Q-T2 is small, that T2


 is in Schur form, and that the final position of the IFST block is


 ILST.


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

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 where INFO is 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.