* $Id$
      REAL PARU, PARJ
      COMMON/LUDAT1_HIJING/MSTU(200),PARU(200),MSTJ(200),PARJ(200) 
      SAVE /LUDAT1_HIJING/