Lines Matching full:9999
161 WRITE( NOUT, FMT = 9999 )THRESH
326 9999 FORMAT( ' ROUTINES PASS COMPUTATIONAL TESTS IF TEST RATIO IS LES',
606 WRITE( NOUT, FMT = 9999 )SNAME, NC
620 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
876 WRITE( NOUT, FMT = 9999 )SNAME, NC
890 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1182 WRITE( NOUT, FMT = 9999 )SNAME, NC
1196 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1452 WRITE( NOUT, FMT = 9999 )SNAME, NC
1470 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
1765 WRITE( NOUT, FMT = 9999 )SNAME, NC
1783 9999 FORMAT( ' ', A6, ' PASSED THE COMPUTATIONAL TESTS (', I6, ' CALL',
2331 WRITE( NOUT, FMT = 9999 )SRNAMT
2337 9999 FORMAT( ' ', A6, ' PASSED THE TESTS OF ERROR-EXITS' )
2556 WRITE( NOUT, FMT = 9999 )
2570 9999 FORMAT( ' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',
2756 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
2762 9999 FORMAT( ' ***** ILLEGAL VALUE OF PARAMETER NUMBER ', I2, ' NOT D',
2801 WRITE( NOUT, FMT = 9999 )INFO, INFOT
2813 9999 FORMAT( ' ******* XERBLA WAS CALLED WITH INFO = ', I6, ' INSTEAD',