Lines Matching defs:FATAL

85       LOGICAL            FATAL, LTESTT, REWI, SAME, SFATAL, TRACE,
270 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
278 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
302 FATAL = .FALSE.
308 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
314 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
326 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
332 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
338 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
342 200 IF( FATAL.AND.SFATAL )
392 9981 FORMAT( /' ******* FATAL ERROR - TESTS ABANDONED *******' )
399 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
420 LOGICAL FATAL, REWI, TRACE
609 FATAL = .TRUE.
662 FATAL = .TRUE.
673 $ FATAL, NOUT, .TRUE. )
677 IF( FATAL )
725 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
737 9993 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
744 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
765 LOGICAL FATAL, REWI, TRACE
945 FATAL = .TRUE.
1007 FATAL = .TRUE.
1017 $ YY, EPS, ERR, FATAL, NOUT,
1022 IF( FATAL )
1070 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1085 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1092 $ FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, NMAX,
1112 LOGICAL FATAL, REWI, TRACE
1307 FATAL = .TRUE.
1359 FATAL = .TRUE.
1370 $ XX, EPS, ERR, FATAL, NOUT,
1384 $ XX, EPS, ERR, FATAL, NOUT,
1389 IF( FATAL )
1434 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1446 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1453 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1474 LOGICAL FATAL, REWI, TRACE
1613 FATAL = .TRUE.
1643 FATAL = .TRUE.
1671 $ ERR, FATAL, NOUT, .TRUE. )
1674 IF( FATAL )
1713 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
1723 9993 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
1730 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1751 LOGICAL FATAL, REWI, TRACE
1882 FATAL = .TRUE.
1912 FATAL = .TRUE.
1941 $ AA( JA ), EPS, ERR, FATAL, NOUT,
1954 IF( FATAL )
1996 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2007 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2014 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
2035 LOGICAL FATAL, REWI, TRACE
2187 FATAL = .TRUE.
2219 FATAL = .TRUE.
2258 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2271 IF( FATAL )
2316 9998 FORMAT( ' ******* FATAL ERROR - PARAMETER NUMBER ', I2, ' WAS CH',
2329 9992 FORMAT( ' ******* FATAL ERROR - ERROR-EXIT TAKEN ON VALID CALL *',
2871 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2890 LOGICAL FATAL, MV
2979 60 FATAL = .TRUE.
2994 9999 FORMAT( ' ******* FATAL ERROR - COMPUTED RESULT IS LESS THAN HAL',