SetChildMomentumRange, SetChildPtRange, SetChildPhiRange, SetChildThetaRange added.
[u/mrichter/AliRoot.git] / ZDC / zdc_common.inc
CommitLineData
fe4da5cc 1*
2* Variables for beam divergency and crossing angle (important for ZDC !)
3*
4 COMMON/BMDIV/BMDIV,BMCRA,IFLCR
5 REAL BMDIV,BMCRA
6 INTEGER IFLCR
7*
8*
9* Variables relative to size (and offset) of the beam
10*
11 COMMON /BMTYPE/ BEAMTY,EPERN
12 INTEGER BEAMTY
13 COMMON /INBEAM/ FX,FY,SIGX,SIGY
14*
15*
16* Flags and arrays for the generation of Fermi momentum of the spectators
17*
18 COMMON/CFERMI/IFERMI,
19 + PROBINTP(0:200),PROBINTN(0:200),PP(0:200),DDP(3)
20*
21*
22* Geometrical quantities relative to ZDC
23*
24 COMMON /ZDC_CGEOM/
25 + HDZN(3), HDZP(3), FIZN(3), FIZP(3), GRZN(3), GRZP(3),
26 + NCEN(3), NCEP(3), ZNPOS(3), ZPPOS(3)
27*
28*
29* Steering flags and variables for HIJING/VENUS
30*
31 COMMON/EVGN/IHIJ,IHIJF,IHIJSP,IVNU,IVNUF,IVNSP
32 COMMON/EVVAR/BIMP,PARTI
33*
34*
35* Files for input/output
36*
37 CHARACTER*60 FILEA,FILEV,FILEH
38 COMMON/FIL/FILEA,FILEV,FILEH
39 INTEGER FILEI(15),FILEJ(15),FILEK(15)
40 EQUIVALENCE(FILEA,FILEI(1))
41 EQUIVALENCE(FILEV,FILEJ(1))
42 EQUIVALENCE(FILEH,FILEK(1))
43*
44*
45* Variables for hit storage
46*
47* Set ZDC
48*
49 PARAMETER(NVZN=2)
50 PARAMETER(NVZP=2)
51 COMMON /ZDC_HITS/ ZSET,ZN1,ZP1,CHNMSZN(NVZN),CHNMSZP(NVZP),
52 + NBITSZN(NVZN),NBITSZP(NVZP),IDTYPZN,IDTYPZP,
53 + NWHI,NWDI,ITOLD
54 CHARACTER*4 ZSET,ZN1,ZP1
55 CHARACTER*4 CHNMSZN,CHNMSZP
56 INTEGER NBITSZN,NBITSZP
57 INTEGER IDTYPZN,IDTYPZP
58*
59* Detectors ZN1,ZP1
60*
61 PARAMETER(NHZ=7)
62 PARAMETER(NZPTX=2,NZPTY=2,NZNTX=2,NZNTY=2)
63 COMMON /ZDC_DET/ CHNAMH(NHZ),NBITSH(NHZ),ORIG(NHZ),FACT(NHZ),
64 + HITS(NHZ),HITSBUPP(NHZ),HITSBUPN(NHZ),
65 + NHSUM
66 CHARACTER*4 CHNAMH
67 INTEGER NBITSH
68 REAL ORIG,FACT
69 REAL HITS
70 REAL HITSBUPP,HITSBUPN
71 INTEGER NHSUM
72*
73* Variables for CWN
74*
75 COMMON/ZNTVAR/NPA,ENE,SFL,
76 +XZP,YZP,
77 +EZP(NZPTX,NZPTY),NPP(NZPTX,NZPTY),
78 +XZN,YZN,
79 +EZN(NZNTX,NZNTY),NPN(NZNTX,NZNTY)
80*
81 INTEGER NPA,NPP,NPN,SFL
82 REAL ENE,XZP,YZP,EZP,XZN,YZN,EZN
83*
84*
85* Flag for showering of primary particles
86*
87 COMMON/SECFL/ISECF
88*
89*
90* Arrays for Cerenkov photons
91*
92 PARAMETER (NBETA=4, NALFA=90, NBE=18)
93 COMMON /TABL/ TABLE(NBETA,NALFA,NBE)
94*