.TH "TESTING/EIG/dget36.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
TESTING/EIG/dget36.f
.SH SYNOPSIS
.br
.PP
.SS "Functions/Subroutines"

.in +1c
.ti -1c
.RI "subroutine \fBdget36\fP (rmax, lmax, ninfo, knt, nin)"
.br
.RI "\fBDGET36\fP "
.in -1c
.SH "Function/Subroutine Documentation"
.PP 
.SS "subroutine dget36 (double precision rmax, integer lmax, integer, dimension( 3 ) ninfo, integer knt, integer nin)"

.PP
\fBDGET36\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
 DGET36 tests DTREXC, a routine for moving blocks (either 1 by 1 or
 2 by 2) on the diagonal of a matrix in real Schur form\&.  Thus, DLAEXC
 computes an orthogonal 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 (within +-1)\&.

 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 DOUBLE PRECISION
          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 array, dimension (3)
          NINFO(J) is the number of examples where INFO=J\&.
.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 \fB87\fP of file \fBdget36\&.f\fP\&.
.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.