.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\&.