![]() |
LAPACK
3.7.0
LAPACK: Linear Algebra PACKage
|
| subroutine dget34 | ( | double precision | RMAX, |
| integer | LMAX, | ||
| integer, dimension( 2 ) | NINFO, | ||
| integer | KNT | ||
| ) |
DGET34
DGET34 tests DLAEXC, a routine for swapping adjacent 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' * [ A B ] * Q = [ C1 B1 ]
[ 0 C ] [ 0 A1 ]
where C1 is similar to C and A1 is similar to A. Both A and C are
assumed to be in standard form (equal diagonal entries and
offdiagonal with differing signs) and A1 and C1 are returned with the
same properties.
The test code verifies these last last assertions, as well as that
the residual in the above equation is small. | [out] | RMAX | RMAX is DOUBLE PRECISION
Value of the largest test ratio. |
| [out] | LMAX | LMAX is INTEGER
Example number where largest test ratio achieved. |
| [out] | NINFO | NINFO is INTEGER array, dimension (2)
NINFO(J) is the number of examples where INFO=J occurred. |
| [out] | KNT | KNT is INTEGER
Total number of examples tested. |