Lines Matching defs:INFO
3196 SUBROUTINE XERBLA( SRNAME, INFO )
3214 INTEGER INFO
3225 IF( INFO.NE.INFOT )THEN
3227 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3229 WRITE( NOUT, FMT = 9997 )INFO
3239 9999 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6, ' INSTEAD',
3243 9997 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6,
