Lines Matching refs:FATAL

81       LOGICAL            FATAL, LTESTT, REWI, SAME, SFATAL, TRACE,
278 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
286 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
310 FATAL = .FALSE.
317 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
323 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
331 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
337 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
346 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
352 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
366 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
374 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
380 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
388 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
394 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
399 200 IF( FATAL.AND.SFATAL )
450 9981 FORMAT( /' ******* FATAL ERROR - TESTS ABANDONED *******' )
457 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
476 LOGICAL FATAL, REWI, TRACE
672 FATAL = .TRUE.
725 FATAL = .TRUE.
736 $ FATAL, NOUT, .TRUE. )
740 IF( FATAL )
798 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
810 9993 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
817 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
836 LOGICAL FATAL, REWI, TRACE
1022 FATAL = .TRUE.
1084 FATAL = .TRUE.
1094 $ YY, EPS, ERR, FATAL, NOUT,
1099 IF( FATAL )
1157 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1170 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1177 $ FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, NMAX,
1195 LOGICAL FATAL, REWI, TRACE
1407 FATAL = .TRUE.
1459 FATAL = .TRUE.
1470 $ XX, EPS, ERR, FATAL, NOUT,
1484 $ XX, EPS, ERR, FATAL, NOUT,
1489 IF( FATAL )
1545 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1557 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1564 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1583 LOGICAL FATAL, REWI, TRACE
1712 FATAL = .TRUE.
1742 FATAL = .TRUE.
1768 $ ERR, FATAL, NOUT, .TRUE. )
1771 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,
1855 LOGICAL FATAL, REWI, TRACE
1990 FATAL = .TRUE.
2020 FATAL = .TRUE.
2049 $ AA( JA ), EPS, ERR, FATAL, NOUT,
2062 IF( FATAL )
2114 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2125 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2132 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
2151 LOGICAL FATAL, REWI, TRACE
2307 FATAL = .TRUE.
2339 FATAL = .TRUE.
2378 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2391 IF( FATAL )
2446 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2457 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2640 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2656 LOGICAL FATAL, MV
2733 50 FATAL = .TRUE.
2748 9999 FORMAT( ' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',