Warning, /GeneratorInterface/ReggeGribovPartonMCInterface/src/epos.inchy is written in an unsupported language. File is not indexed.
0001 parameter (ncenthx=7)
0002 parameter (netahx=21,ntauhx=123)
0003 parameter (nphihx=121,nradhx=75)
0004 parameter (nraphx=20)
0005
0006 common/chydim/ncenthy,netahy,ntauhy,nphihy,nradhy
0007 common/ctau/ntauho
0008
0009 common/ctauhoc/ntauhoc(ncenthx),tauhoc(ncenthx,ntauhx)
0010 common/ctauhec/ntauhec(ncenthx,-netahx+1:netahx-1,nphihx)
0011
0012 common/hydtab/centhy(ncenthx),etahy(netahx)
0013 * ,tauhy(ntauhx),phihy(nphihx),radhy(nradhx)
0014 * ,epsii(ncenthx,netahx,nphihx,nradhx)
0015 common/czeta/zetahy(1-netahx:netahx-1)
0016
0017 common/cpau/
0018 * paut(ncenthx,-netahx+1:netahx-1,ntauhx)
0019 * ,pauf(ncenthx,-netahx+1:netahx-1,ntauhx,nphihx)
0020
0021 common/hydtab4/
0022 * raa(ncenthx,-netahx+1:netahx-1,ntauhx,nphihx)
0023 *,vaa(3,ncenthx,-netahx+1:netahx-1,ntauhx,nphihx)
0024 * ,waa(ncenthx,-netahx+1:netahx-1,ntauhx,nphihx)
0025
0026 common/hydtab3/rar(ncenthx,netahx,ntauhx,nphihx)
0027 * ,var(3,ncenthx,netahx,ntauhx,nphihx)
0028 * ,war(ncenthx,netahx,ntauhx,nphihx)
0029
0030 parameter (mxeos=50001 )
0031 common/ceos/eos(3,mxeos)
0032 * ,eosmu(17,mxeos),meos,meosmu
0033
0034 parameter (mxcenty=200 )
0035 common/ccenty/bcenty(mxcenty),pcenty(mxcenty),mcenty
0036
0037 parameter (mxbimp=500 )
0038 common/cbimp/bimpar(2,mxbimp),nbimp
0039
0040 common/hydtab6/geff(ncenthx,netahx)
0041
0042 common/hydtab7/feff(ncenthx,-netahx+1:netahx-1)
0043