Lines Matching full:9999
214 WRITE( NOUT, FMT = 9999 )THRESH
357 9999 FORMAT( ' ROUTINES PASS COMPUTATIONAL TESTS IF TEST RATIO IS LES',
694 WRITE( NOUT, FMT = 9999 )SNAME, NC
713 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1032 WRITE( NOUT, FMT = 9999 )SNAME, NC
1054 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1391 WRITE( NOUT, FMT = 9999 )SNAME, NC
1412 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1660 WRITE( NOUT, FMT = 9999 )SNAME, NC
1676 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1932 WRITE( NOUT, FMT = 9999 )SNAME, NC
1952 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
2246 WRITE( NOUT, FMT = 9999 )SNAME, NC
2267 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
2599 WRITE( NOUT, FMT = 9999 )SRNAMT
2605 9999 FORMAT( ' ', A6, ' PASSED THE TESTS OF ERROR-EXITS' )
2883 WRITE( NOUT, FMT = 9999 )
2897 9999 FORMAT( ' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',
3073 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3079 9999 FORMAT( ' ***** ILLEGAL VALUE OF PARAMETER NUMBER ', I2, ' NOT D',
3116 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3128 9999 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6, ' INSTEAD',
