Lines Matching full:9999
169 WRITE( NOUT, FMT = 9999 )THRESH
335 9999 FORMAT( ' ROUTINES PASS COMPUTATIONAL TESTS IF TEST RATIO IS LES',
621 WRITE( NOUT, FMT = 9999 )SNAME, NC
635 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
900 WRITE( NOUT, FMT = 9999 )SNAME, NC
914 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1211 WRITE( NOUT, FMT = 9999 )SNAME, NC
1225 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1530 WRITE( NOUT, FMT = 9999 )SNAME, NC
1553 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1904 WRITE( NOUT, FMT = 9999 )SNAME, NC
1927 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
2861 WRITE( NOUT, FMT = 9999 )SRNAMT
2867 9999 FORMAT( ' ', A6, ' PASSED THE TESTS OF ERROR-EXITS' )
3170 WRITE( NOUT, FMT = 9999 )
3184 9999 FORMAT( ' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',
3378 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3384 9999 FORMAT( ' ***** ILLEGAL VALUE OF PARAMETER NUMBER ', I2, ' NOT D',
3423 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3435 9999 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6, ' INSTEAD',