Lines Matching full:9998
209 WRITE( NOUT, FMT = 9998 )EPS
389 9998 FORMAT( ' RELATIVE MACHINE PRECISION IS TAKEN TO BE', 1P, D9.1 )
629 $ WRITE( NOUT, FMT = 9998 )I
694 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
937 $ WRITE( NOUT, FMT = 9998 )I
1007 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1251 $ WRITE( NOUT, FMT = 9998 )I
1354 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1586 $ WRITE( NOUT, FMT = 9998 )I
1679 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1927 $ WRITE( NOUT, FMT = 9998 )I
2035 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2297 WRITE( NOUT, FMT = 9998 )I, CT( I ), CC( I, J )
2299 WRITE( NOUT, FMT = 9998 )I, CC( I, J ), CT( I )
2311 9998 FORMAT( 1X, I7, 2G18.6 )