!>
!> 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.
!> 

PATH

!>          PATH is CHARACTER*3
!>          The LAPACK path name of subroutine SUBNAM.
!> 

SUBNAM

!>          SUBNAM is CHARACTER*(*)
!>          The name of the subroutine that returned an error code.
!> 

INFO

!>          INFO is INTEGER
!>          The error code returned from routine SUBNAM.
!> 

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.
!> 

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'.
!> 

M

!>          M is INTEGER
!>          The matrix row dimension.
!> 

N

!>          N is INTEGER
!>          The matrix column dimension.  Accessed only if PATH = xGE or
!>          xGB.
!> 

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.
!> 

KU

!>          KU is INTEGER
!>          The number of super-diagonals of the matrix.  Accessed only
!>          if PATH = xGB.
!> 

N5

!>          N5 is INTEGER
!>          A fifth integer parameter, may be the blocksize NB or the
!>          number of right hand sides NRHS.
!> 

IMAT

!>          IMAT is INTEGER
!>          The matrix type.
!> 

NFAIL

!>          NFAIL is INTEGER
!>          The number of prior tests that did not pass the threshold;
!>          used to determine if the header should be printed.
!> 

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.
!> 

NOUT

!>          NOUT is INTEGER
!>          The unit number on which results are to be printed.
!> 

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.