Back to home page

Project CMSSW displayed by LXR

 
 

    


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