.TH "TESTING/LIN/xerbla.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/xerbla.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBxerbla\fP (srname, info)" .br .RI "\fBXERBLA\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine xerbla (character*(*) srname, integer info)" .PP \fBXERBLA\fP .PP \fBPurpose:\fP .RS 4 .PP .nf This is a special version of XERBLA to be used only as part of the test program for testing error exits from the LAPACK routines\&. Error messages are printed if INFO\&.NE\&.INFOT or if SRNAME\&.NE\&.SRNAMT, where INFOT and SRNAMT are values stored in COMMON\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fISRNAME\fP .PP .nf SRNAME is CHARACTER*(*) The name of the subroutine calling XERBLA\&. This name should match the COMMON variable SRNAMT\&. .fi .PP .br \fIINFO\fP .PP .nf INFO is INTEGER The error return code from the calling subroutine\&. INFO should equal the COMMON variable INFOT\&. .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 \fBFurther Details:\fP .RS 4 .PP .nf The following variables are passed via the common blocks INFOC and SRNAMC: INFOT INTEGER Expected integer return code NOUT INTEGER Unit number for printing error messages OK LOGICAL Set to \&.TRUE\&. if INFO = INFOT and SRNAME = SRNAMT, otherwise set to \&.FALSE\&. LERR LOGICAL Set to \&.TRUE\&., indicating that XERBLA was called SRNAMT CHARACTER*(*) Expected name of calling subroutine .fi .PP .RE .PP .PP Definition at line \fB74\fP of file \fBxerbla\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.