* $Id$ REAL PARP, PARI COMMON/PYPARS_HIJING/MSTP(200),PARP(200),MSTI(200),PARI(200) SAVE /PYPARS_HIJING/