CALL ONFATL( NAME ) -- This subroutine will call the user supplied subroutine NAME just prior to a FATAL OTS error. If called without any arguments, this function is disabled and normal error processing returns. For example: EXTERNAL OOPS, CLEAN . . . C C - CALL OOPS ON FATAL ERRORS. CALL ONFATL( OOPS ) C C - CALL CLEAN WHEN TERMINATED. CALL USEREX( CLEAN ) If a FATAL error occurs, OOPS then CLEAN will be called; if the program terminates normally, only CLEAN will be called. For more information on USEREX, see HELP FORTRAN FUNCTIONS USEREX. NAME Name of subroutine to be called upon occurence of a FATAL error, error number will be passed as a single argument, must be declared EXTERNAL. Written by: P. Nystrom Located at: [4,4] as both .MAC & .OBJ