#ifndef CERNLIB_ISAJET_PJETS_INC #define CERNLIB_ISAJET_PJETS_INC * * * pjets.inc * INTEGER MXJETS PARAMETER (MXJETS=10) COMMON/PJETS/PJETS(5,MXJETS),IDJETS(MXJETS),QWJET(5),IDENTW $,PPAIR(5,4),IDPAIR(4),JPAIR(4),NPAIR,IFRAME(MXJETS) SAVE /PJETS/ INTEGER IDJETS,IDENTW,IDPAIR,JPAIR,NPAIR,IFRAME REAL PJETS,QWJET,PPAIR #endif