]> git.uio.no Git - u/mrichter/AliRoot.git/blame - EPOS/epos167/epos.inchy
minor fixes
[u/mrichter/AliRoot.git] / EPOS / epos167 / epos.inchy
CommitLineData
9ef1c2d9 1c +++++1f
2
3 parameter (ncenthy= 5)
4 parameter (netahy= 6)
5 parameter (ntauhy= 61)
6 parameter (nphihy= 25)
7 parameter (nradhy= 75)
8
9 common/ctauhoc/ntauhoc(ncenthy)
10 * ,tauhoc(ncenthy,ntauhy)
11
12 common/hydtab/centhy(ncenthy),etahy(netahy)
13 * ,tauhy(ntauhy),phihy(nphihy),radhy(nradhy)
14 * ,epsii(ncenthy,netahy,nphihy,nradhy)
15
16 common/cpau/ paut(ncenthy,netahy,ntauhy)
17 * ,pauf(ncenthy,netahy,ntauhy,nphihy)
18
19 common/hydtab3/rom(ncenthy,netahy,ntauhy,2)
20 * ,yom(ncenthy,netahy,ntauhy,2)
21 * ,wom(ncenthy,netahy,ntauhy,2)
22
23 common/hydtab3i/romi(ncenthy,netahy,ntauhy,2)
24 * ,yomi(ncenthy,netahy,ntauhy,2)
25 * ,womi(ncenthy,netahy,ntauhy,2)
26