Lines Matching defs:INFO
3188 SUBROUTINE XERBLA( SRNAME, INFO )
3206 INFO
3217 IF( INFO.NE.INFOT )THEN
3219 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3221 WRITE( NOUT, FMT = 9997 )INFO
3231 9999 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6, ' INSTEAD',
3235 9997 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6,
