TESTING/LIN/xerbla.f(3) Library Functions Manual TESTING/LIN/xerbla.f(3) NAME TESTING/LIN/xerbla.f SYNOPSIS Functions/Subroutines subroutine xerbla (srname, info) XERBLA Function/Subroutine Documentation subroutine xerbla (character*(*) srname, integer info) XERBLA Purpose: !> !> 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. !> Parameters SRNAME !> SRNAME is CHARACTER*(*) !> The name of the subroutine calling XERBLA. This name should !> match the COMMON variable SRNAMT. !> INFO !> INFO is INTEGER !> The error return code from the calling subroutine. INFO !> should equal the COMMON variable INFOT. !> Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd. Further Details: !> !> 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 !> Definition at line 74 of file xerbla.f. Author Generated automatically by Doxygen for LAPACK from the source code. LAPACK Version 3.12.0 TESTING/LIN/xerbla.f(3)