Lines Matching defs:FATAL

86       LOGICAL            FATAL, LTESTT, REWI, SAME, SFATAL, TRACE,
271 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
279 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
303 FATAL = .FALSE.
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
315 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
322 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
327 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
333 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
339 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
343 200 IF( FATAL.AND.SFATAL )
393 9981 FORMAT( /' ******* FATAL ERROR - TESTS ABANDONED *******' )
400 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
422 LOGICAL FATAL, REWI, TRACE
611 FATAL = .TRUE.
664 FATAL = .TRUE.
675 $ FATAL, NOUT, .TRUE. )
679 IF( FATAL )
727 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
739 9993 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
746 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
768 LOGICAL FATAL, REWI, TRACE
948 FATAL = .TRUE.
1010 FATAL = .TRUE.
1020 $ YY, EPS, ERR, FATAL, NOUT,
1025 IF( FATAL )
1073 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1088 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1095 $ FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, NMAX,
1116 LOGICAL FATAL, REWI, TRACE
1311 FATAL = .TRUE.
1363 FATAL = .TRUE.
1374 $ XX, EPS, ERR, FATAL, NOUT,
1388 $ XX, EPS, ERR, FATAL, NOUT,
1393 IF( FATAL )
1438 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1450 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1457 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1479 LOGICAL FATAL, REWI, TRACE
1618 FATAL = .TRUE.
1648 FATAL = .TRUE.
1676 $ ERR, FATAL, NOUT, .TRUE. )
1679 IF( FATAL )
1718 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1728 9993 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1735 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1757 LOGICAL FATAL, REWI, TRACE
1888 FATAL = .TRUE.
1918 FATAL = .TRUE.
1947 $ AA( JA ), EPS, ERR, FATAL, NOUT,
1960 IF( FATAL )
2002 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2013 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2020 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
2042 LOGICAL FATAL, REWI, TRACE
2194 FATAL = .TRUE.
2226 FATAL = .TRUE.
2265 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2278 IF( FATAL )
2323 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2336 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2879 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2898 LOGICAL FATAL, MV
2987 60 FATAL = .TRUE.
3002 9999 FORMAT( ' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',