Warning, /include/isajet/jetset.inc is written in an unsupported language. File is not indexed.
0001 #ifndef CERNLIB_ISAJET_JETSET_INC
0002 #define CERNLIB_ISAJET_JETSET_INC
0003 *
0004 *
0005 * jetset.inc
0006 *
0007 INTEGER MXJSET,JPACK
0008 PARAMETER (MXJSET=400,JPACK=1000)
0009 COMMON/JETSET/NJSET,PJSET(5,MXJSET),JORIG(MXJSET),JTYPE(MXJSET),
0010 $JDCAY(MXJSET)
0011 SAVE /JETSET/
0012 #if defined(CERNLIB_LEVEL2)
0013 #include "isajet/l2jset.inc"
0014 * Ignoring t=pass
0015 #endif
0016 INTEGER NJSET,JORIG,JTYPE,JDCAY
0017 REAL PJSET
0018
0019 #endif