![]() |
LAPACK
3.7.0
LAPACK: Linear Algebra PACKage
|
| subroutine alaerh | ( | character*3 | PATH, |
| character*( * ) | SUBNAM, | ||
| integer | INFO, | ||
| integer | INFOE, | ||
| character*( * ) | OPTS, | ||
| integer | M, | ||
| integer | N, | ||
| integer | KL, | ||
| integer | KU, | ||
| integer | N5, | ||
| integer | IMAT, | ||
| integer | NFAIL, | ||
| integer | NERRS, | ||
| integer | NOUT | ||
| ) |
ALAERH
ALAERH is an error handler for the LAPACK routines. It prints the header if this is the first error message and prints the error code and form of recovery, if any. The character evaluations in this routine may make it slow, but it should not be called once the LAPACK routines are fully debugged.
| [in] | PATH | PATH is CHARACTER*3
The LAPACK path name of subroutine SUBNAM. |
| [in] | SUBNAM | SUBNAM is CHARACTER*(*)
The name of the subroutine that returned an error code. |
| [in] | INFO | INFO is INTEGER
The error code returned from routine SUBNAM. |
| [in] | INFOE | INFOE is INTEGER
The expected error code from routine SUBNAM, if SUBNAM were
error-free. If INFOE = 0, an error message is printed, but
if INFOE.NE.0, we assume only the return code INFO is wrong. |
| [in] | OPTS | OPTS is CHARACTER*(*)
The character options to the subroutine SUBNAM, concatenated
into a single character string. For example, UPLO = 'U',
TRANS = 'T', and DIAG = 'N' for a triangular routine would
be specified as OPTS = 'UTN'. |
| [in] | M | M is INTEGER
The matrix row dimension. |
| [in] | N | N is INTEGER
The matrix column dimension. Accessed only if PATH = xGE or
xGB. |
| [in] | KL | KL is INTEGER
The number of sub-diagonals of the matrix. Accessed only if
PATH = xGB, xPB, or xTB. Also used for NRHS for PATH = xLS. |
| [in] | KU | KU is INTEGER
The number of super-diagonals of the matrix. Accessed only
if PATH = xGB. |
| [in] | N5 | N5 is INTEGER
A fifth integer parameter, may be the blocksize NB or the
number of right hand sides NRHS. |
| [in] | IMAT | IMAT is INTEGER
The matrix type. |
| [in] | NFAIL | NFAIL is INTEGER
The number of prior tests that did not pass the threshold;
used to determine if the header should be printed. |
| [in,out] | NERRS | NERRS is INTEGER
On entry, the number of errors already detected; used to
determine if the header should be printed.
On exit, NERRS is increased by 1. |
| [in] | NOUT | NOUT is INTEGER
The unit number on which results are to be printed. |