Lines Matching full:9998
263 WRITE( NOUT, FMT = 9998 )EPS
428 9998 FORMAT( ' RELATIVE MACHINE PRECISION IS TAKEN TO BE', 1P, E9.1 )
732 $ WRITE( NOUT, FMT = 9998 )I
799 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1086 $ WRITE( NOUT, FMT = 9998 )I
1152 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1457 $ WRITE( NOUT, FMT = 9998 )I
1536 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1743 $ WRITE( NOUT, FMT = 9998 )I
1816 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2020 $ WRITE( NOUT, FMT = 9998 )I
2107 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2334 $ WRITE( NOUT, FMT = 9998 )I
2434 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2564 WRITE( NOUT, FMT = 9998 )I, YT( I ),
2567 WRITE( NOUT, FMT = 9998 )I,
2578 9998 FORMAT( 1X, I7, 2( ' (', G15.6, ',', G15.6, ')' ) )