Lines Matching defs:FATAL
84 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,
484 LOGICAL FATAL, REWI, TRACE
681 FATAL = .TRUE.
735 FATAL = .TRUE.
746 $ FATAL, NOUT, .TRUE. )
750 IF( FATAL )
799 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
811 9993 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
818 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
839 LOGICAL FATAL, REWI, TRACE
1027 FATAL = .TRUE.
1089 FATAL = .TRUE.
1099 $ YY, EPS, ERR, FATAL, NOUT,
1104 IF( FATAL )
1152 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1167 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1174 $ FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, NMAX,
1195 LOGICAL FATAL, REWI, TRACE
1408 FATAL = .TRUE.
1460 FATAL = .TRUE.
1471 $ XX, EPS, ERR, FATAL, NOUT,
1485 $ XX, EPS, ERR, FATAL, NOUT,
1490 IF( FATAL )
1536 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1548 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1555 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1577 LOGICAL FATAL, REWI, TRACE
1716 FATAL = .TRUE.
1746 FATAL = .TRUE.
1774 $ ERR, FATAL, NOUT, .TRUE. )
1777 IF( FATAL )
1816 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1825 9993 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1832 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1854 LOGICAL FATAL, REWI, TRACE
1993 FATAL = .TRUE.
2023 FATAL = .TRUE.
2052 $ AA( JA ), EPS, ERR, FATAL, NOUT,
2065 IF( FATAL )
2107 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2118 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2125 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
2147 LOGICAL FATAL, REWI, TRACE
2305 FATAL = .TRUE.
2337 FATAL = .TRUE.
2376 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2389 IF( FATAL )
2434 9998 FORMAT(' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2445 9992 FORMAT(' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2452 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2471 LOGICAL FATAL, MV
2560 60 FATAL = .TRUE.
2575 9999 FORMAT(' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',