Warning, /include/isajet/types.inc is written in an unsupported language. File is not indexed.
0001 #ifndef CERNLIB_ISAJET_TYPES_INC
0002 #define CERNLIB_ISAJET_TYPES_INC
0003 *
0004 *
0005 * types.inc
0006 *
0007 INTEGER MXTYPE
0008 PARAMETER (MXTYPE=8)
0009 COMMON/TYPES/LOC(100),NTYP,NJTTYP(MXTYPE),NWWTYP(2),NWMODE(3)
0010 COMMON/XTYPES/PARTYP(40),TITLE(10),JETYP(30,MXTYPE),WWTYP(30,2)
0011 $,WMODES(30,3)
0012 SAVE /TYPES/,/XTYPES/
0013 CHARACTER*8 JETYP,WWTYP,TITLE,PARTYP,WMODES
0014 INTEGER LOC,NTYP,NJTTYP,NWWTYP,NWMODE
0015
0016 #endif
