CTITLES1ATP -- DUMMY ROUTINE -- WILL ABORT IF CALLED 00010002 C*********************************************************************** C COPYRIGHT ATLANTIC RICHFIELD COMPANY 1991 * C*********************************************************************** CA AUTHOR STU NELAN 00020000 CA DESIGNER STU NELAN 00030000 CA LANGUAGE FORTRAN 00040000 CA SYSTEM IBM AND CRAY 00050000 CA WRITTEN 09-10-84 00060000 C REVISED 07-11-86 ESN. FOR USE ON THE IBM. 00070000 CA 00080000 CA 00090000 CA CALL S1ATP 00100000 CA 00110000 CA 00120000 CA S1ATP IS A DUMMY SUBROUTINE. IT WILL ABORT IF CALLED. 00130000 CAEND 00140000 SUBROUTINE S1ATP 00150000 C 00160000 CALL XDUMPX 00170000 C 00180000 RETURN 00190000 C 00200000 END 00210000