Warning, /include/isajet/hcon.inc is written in an unsupported language. File is not indexed.
0001 #ifndef CERNLIB_ISAJET_HCON_INC
0002 #define CERNLIB_ISAJET_HCON_INC
0003 *
0004 *
0005 * hcon.inc
0006 *
0007 COMMON/HCON/ANWWWW(4,4,4),ADWWWW(2,4),AIWWWW(4)
0008 $,HMASS,HGAM,HGAMS(29),ETAHGG,MATCHH(29),ZSTARS(4,2)
0009 $,IHTYPE,HGAMSS(85,85)
0010 SAVE /HCON/
0011 #if defined(CERNLIB_DOUBLE)
0012 #include "isajet/hcon2.inc"
0013 * Ignoring t=pass
0014 #endif
0015 #if defined(CERNLIB_SINGLE)
0016 #include "isajet/hcon1.inc"
0017 * Ignoring t=pass
0018 #endif
0019 INTEGER MATCHH,IHTYPE
0020 REAL HMASS,HGAM,HGAMS,ETAHGG,ZSTARS,HGAMSS
0021
0022 #endif
