Lines Matching full:9999
220 WRITE( NOUT, FMT = 9999 )THRESH
363 9999 FORMAT( ' ROUTINES PASS COMPUTATIONAL TESTS IF TEST RATIO IS LES',
706 WRITE( NOUT, FMT = 9999 )SNAME, NC
725 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1049 WRITE( NOUT, FMT = 9999 )SNAME, NC
1071 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1415 WRITE( NOUT, FMT = 9999 )SNAME, NC
1436 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1700 WRITE( NOUT, FMT = 9999 )SNAME, NC
1716 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1980 WRITE( NOUT, FMT = 9999 )SNAME, NC
2000 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
2300 WRITE( NOUT, FMT = 9999 )SNAME, NC
2321 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
2672 WRITE( NOUT, FMT = 9999 )SRNAMT
2678 9999 FORMAT( ' ', A6, ' PASSED THE TESTS OF ERROR-EXITS' )
2988 WRITE( NOUT, FMT = 9999 )
3002 9999 FORMAT( ' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',
3184 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3190 9999 FORMAT( ' ***** ILLEGAL VALUE OF PARAMETER NUMBER ', I2, ' NOT D',
3227 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3239 9999 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6, ' INSTEAD',
