.TH "TESTING/EIG/cget36.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/EIG/cget36.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBcget36\fP (rmax, lmax, ninfo, knt, nin)" .br .RI "\fBCGET36\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine cget36 (real rmax, integer lmax, integer ninfo, integer knt, integer nin)" .PP \fBCGET36\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> 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\&. !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIRMAX\fP .PP .nf !> RMAX is REAL !> Value of the largest test ratio\&. !> .fi .PP .br \fILMAX\fP .PP .nf !> LMAX is INTEGER !> Example number where largest test ratio achieved\&. !> .fi .PP .br \fININFO\fP .PP .nf !> NINFO is INTEGER !> Number of examples where INFO is nonzero\&. !> .fi .PP .br \fIKNT\fP .PP .nf !> KNT is INTEGER !> Total number of examples tested\&. !> .fi .PP .br \fININ\fP .PP .nf !> NIN is INTEGER !> Input logical unit number\&. !> .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP .PP Definition at line \fB84\fP of file \fBcget36\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.