Lines Matching defs:FATAL
85 LOGICAL FATAL, LTESTT, REWI, SAME, SFATAL, TRACE,
282 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
290 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
314 FATAL = .FALSE.
321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
327 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
335 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
341 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
350 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
356 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
364 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
370 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
378 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
384 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
392 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
398 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
403 200 IF( FATAL.AND.SFATAL )
456 9981 FORMAT( /' ******* FATAL ERROR - TESTS ABANDONED *******' )
463 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
485 LOGICAL FATAL, REWI, TRACE
682 FATAL = .TRUE.
736 FATAL = .TRUE.
747 $ FATAL, NOUT, .TRUE. )
751 IF( FATAL )
800 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
812 9993 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
819 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
841 LOGICAL FATAL, REWI, TRACE
1029 FATAL = .TRUE.
1091 FATAL = .TRUE.
1101 $ YY, EPS, ERR, FATAL, NOUT,
1106 IF( FATAL )
1154 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1169 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1176 $ FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, NMAX,
1198 LOGICAL FATAL, REWI, TRACE
1411 FATAL = .TRUE.
1463 FATAL = .TRUE.
1474 $ XX, EPS, ERR, FATAL, NOUT,
1488 $ XX, EPS, ERR, FATAL, NOUT,
1493 IF( FATAL )
1539 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1551 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1558 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1581 LOGICAL FATAL, REWI, TRACE
1720 FATAL = .TRUE.
1750 FATAL = .TRUE.
1778 $ ERR, FATAL, NOUT, .TRUE. )
1781 IF( FATAL )
1820 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1829 9993 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1836 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1859 LOGICAL FATAL, REWI, TRACE
1998 FATAL = .TRUE.
2028 FATAL = .TRUE.
2057 $ AA( JA ), EPS, ERR, FATAL, NOUT,
2070 IF( FATAL )
2112 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2123 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2130 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
2153 LOGICAL FATAL, REWI, TRACE
2311 FATAL = .TRUE.
2343 FATAL = .TRUE.
2382 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2395 IF( FATAL )
2440 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2451 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2458 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2477 LOGICAL FATAL, MV
2564 * Report fatal error.
2566 60 FATAL = .TRUE.
2581 9999 FORMAT(' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',