Go to the source code of this file.
Functions/Subroutines | |
| INTEGER | SCHKGG (NSIZES, NN, NTYPES, DOTYPE, ISEED, THRESH, TSTDIF, THRSHN, NOUNIT, A, LDA, B, H, T, S1, S2, P1, P2, U, LDU, V, Q, Z, ALPHR1, ALPHI1, BETA1, ALPHR3, ALPHI3, BETA3, EVECTL, EVECTR, WORK, LWORK, LLWORK, RESULT, INFO) |
| INTEGER SCHKGG | ( | INTEGER | NSIZES, |
| INTEGER,dimension( * ) | NN, | ||
| INTEGER | NTYPES, | ||
| LOGICAL,dimension( * ) | DOTYPE, | ||
| INTEGER,dimension( 4 ) | ISEED, | ||
| REAL | THRESH, | ||
| LOGICAL | TSTDIF, | ||
| REAL | THRSHN, | ||
| INTEGER | NOUNIT, | ||
| REAL,dimension( lda, * ) | A, | ||
| INTEGER | LDA, | ||
| REAL,dimension( lda, * ) | B, | ||
| REAL,dimension( lda, * ) | H, | ||
| REAL,dimension( lda, * ) | T, | ||
| REAL,dimension( lda, * ) | S1, | ||
| REAL,dimension( lda, * ) | S2, | ||
| REAL,dimension( lda, * ) | P1, | ||
| REAL,dimension( lda, * ) | P2, | ||
| REAL,dimension( ldu, * ) | U, | ||
| INTEGER | LDU, | ||
| REAL,dimension( ldu, * ) | V, | ||
| REAL,dimension( ldu, * ) | Q, | ||
| REAL,dimension( ldu, * ) | Z, | ||
| REAL,dimension( * ) | ALPHR1, | ||
| REAL,dimension( * ) | ALPHI1, | ||
| REAL,dimension( * ) | BETA1, | ||
| REAL,dimension( * ) | ALPHR3, | ||
| REAL,dimension( * ) | ALPHI3, | ||
| REAL,dimension( * ) | BETA3, | ||
| REAL,dimension( ldu, * ) | EVECTL, | ||
| REAL,dimension( ldu, * ) | EVECTR, | ||
| REAL,dimension( * ) | WORK, | ||
| INTEGER | LWORK, | ||
| LOGICAL,dimension( * ) | LLWORK, | ||
| REAL,dimension( 15 ) | RESULT, | ||
| INTEGER | INFO | ||
| ) |
1.7.2