Lines Matching defs:INFO
3226 SUBROUTINE XERBLA( SRNAME, INFO )
3244 INTEGER INFO
3255 IF( INFO.NE.INFOT )THEN
3257 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3259 WRITE( NOUT, FMT = 9997 )INFO
3269 9999 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6, ' INSTEAD',
3273 9997 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6,
