* * $Id: zabend.F,v 1.7 1999/04/08 16:03:27 mclareni Exp $ * * $Log: zabend.F,v $ * Revision 1.7 1999/04/08 16:03:27 mclareni * Version 7.44 from authors * * #include "sys/CERNLIB_machine.h" #include "pilot.h" SUBROUTINE ZABEND C---------------------------------------------------------------- C- C- do not allow for graceful exit from a Zebra fatal error C- C------------------------------------------------------------------ PRINT *,' ZABEND CALLED IS IN ISAZEB.OLB' CALL ABORT END