Warning, /include/isajet/getjet.inc is written in an unsupported language. File is not indexed.
0001 #ifndef CERNLIB_ISAJET_GETJET_INC
0002 #define CERNLIB_ISAJET_GETJET_INC
0003 *
0004 *
0005 * getjet.inc
0006 *
0007 INTEGER NJMAX
0008 PARAMETER (NJMAX=50)
0009 COMMON/GETCOM/JETNO(NCY,NCPHI),NCJET,PCJET(4,NJMAX),ETJET(NJMAX)
0010 SAVE /GETCOM/
0011 #if defined(CERNLIB_LEVEL2)
0012 #include "isajet/l2getj.inc"
0013 * Ignoring t=pass
0014 #endif
0015 INTEGER JETNO,NCJET
0016 REAL PCJET,ETJET
0017
0018 #endif