HIJING/hijing/ludat1_hijing.inc

   1 #ifdef __APPLE__
   2 #ifndef __INTEL_COMPILER
   3 #define STOP CALL EXIT !
   4 #define stop CALL EXIT !
   5 #endif
   6 #endif
   7 * $Id$
   8       REAL PARU, PARJ
   9       COMMON/LUDAT1_HIJING/MSTU(200),PARU(200),MSTJ(200),PARJ(200)
  10 #ifndef BLANKET_SAVE
  11       SAVE /LUDAT1_HIJING/
  12 #endif