ce5c5c42566db46521bbd84434eded417e81f8fb
[u/mrichter/AliRoot.git] / macros / Config.C
1 static Int_t    eventsPerRun = 100;
2 void Config()
3 {
4     // 7-DEC-2000 09:00
5     // Switch on Transition Radiation simulation. 6/12/00 18:00
6     // iZDC=1  7/12/00 09:00
7     // ThetaRange is (0., 180.). It was (0.28,179.72) 7/12/00 09:00
8     // Theta range given through pseudorapidity limits 22/6/2001
9
10     // Set Random Number seed
11     // gRandom->SetSeed(12345);
12
13     new     AliGeant3("C++ Interface to Geant3");
14
15     if (!gSystem->Getenv("CONFIG_FILE"))
16     {
17         TFile  *rootfile = new TFile("galice.root", "recreate");
18
19         rootfile->SetCompressionLevel(2);
20     }
21
22     TGeant3 *geant3 = (TGeant3 *) gMC;
23
24     //
25     // Set External decayer
26     AliDecayer *decayer = new AliDecayerPythia();
27
28     decayer->SetForceDecay(kAll);
29     decayer->Init();
30     gMC->SetExternalDecayer(decayer);
31     //
32     //
33     //=======================================================================
34     // ******* GEANT STEERING parameters FOR ALICE SIMULATION *******
35     geant3->SetTRIG(1);         //Number of events to be processed 
36     geant3->SetSWIT(4, 10);
37     geant3->SetDEBU(0, 0, 1);
38     //geant3->SetSWIT(2,2);
39     geant3->SetDCAY(1);
40     geant3->SetPAIR(1);
41     geant3->SetCOMP(1);
42     geant3->SetPHOT(1);
43     geant3->SetPFIS(0);
44     geant3->SetDRAY(0);
45     geant3->SetANNI(1);
46     geant3->SetBREM(1);
47     geant3->SetMUNU(1);
48     geant3->SetCKOV(1);
49     geant3->SetHADR(1);         //Select pure GEANH (HADR 1) or GEANH/NUCRIN (HADR 3)
50     geant3->SetLOSS(2);
51     geant3->SetMULS(1);
52     geant3->SetRAYL(1);
53     geant3->SetAUTO(1);         //Select automatic STMIN etc... calc. (AUTO 1) or manual (AUTO 0)
54     geant3->SetABAN(0);         //Restore 3.16 behaviour for abandoned tracks
55     geant3->SetOPTI(2);         //Select optimisation level for GEANT geometry searches (0,1,2)
56     geant3->SetERAN(5.e-7);
57
58     Float_t cut = 1.e-3;        // 1MeV cut by default
59     Float_t tofmax = 1.e10;
60
61     //             GAM ELEC NHAD CHAD MUON EBREM MUHAB EDEL MUDEL MUPA TOFMAX
62     geant3->SetCUTS(cut, cut, cut, cut, cut, cut, cut, cut, cut, cut,
63                     tofmax);
64     //
65     //=======================================================================
66     // ************* STEERING parameters FOR ALICE SIMULATION **************
67     // --- Specify event type to be tracked through the ALICE setup
68     // --- All positions are in cm, angles in degrees, and P and E in GeV
69     if (gSystem->Getenv("CONFIG_NPARTICLES"))
70     {
71         int     nParticles = atoi(gSystem->Getenv("CONFIG_NPARTICLES"));
72     } else
73     {
74         int     nParticles = 50;
75     }
76     AliGenHIJINGpara *gener = new AliGenHIJINGpara(nParticles);
77
78     gener->SetMomentumRange(0, 999);
79     gener->SetPhiRange(0, 360);
80     // Set pseudorapidity range from -8 to 8.
81     Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
82     Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
83     gener->SetThetaRange(thmin,thmax);
84     gener->SetOrigin(0, 0, 0);  //vertex position
85     gener->SetSigma(0, 0, 0);   //Sigma in (X,Y,Z) (cm) on IP position
86     gener->Init();
87     // 
88     // Activate this line if you want the vertex smearing to happen
89     // track by track
90     //
91     //gener->SetVertexSmear(perTrack); 
92
93     gAlice->SetField(-999, 2);  //Specify maximum magnetic field in Tesla (neg. ==> default field)
94
95     Int_t   iABSO = 1;
96     Int_t   iDIPO = 1;
97     Int_t   iFMD = 1;
98     Int_t   iFRAME = 1;
99     Int_t   iHALL = 1;
100     Int_t   iITS = 1;
101     Int_t   iMAG = 1;
102     Int_t   iMUON = 1;
103     Int_t   iPHOS = 1;
104     Int_t   iPIPE = 1;
105     Int_t   iPMD = 1;
106     Int_t   iRICH = 1;
107     Int_t   iSHIL = 1;
108     Int_t   iSTART = 1;
109     Int_t   iTOF = 1;
110     Int_t   iTPC = 1;
111     Int_t   iTRD = 1;
112     Int_t   iZDC = 1;
113     Int_t   iEMCAL = 0;
114
115     //=================== Alice BODY parameters =============================
116     AliBODY *BODY = new AliBODY("BODY", "Alice envelop");
117
118
119     if (iMAG)
120     {
121         //=================== MAG parameters ============================
122         // --- Start with Magnet since detector layouts may be depending ---
123         // --- on the selected Magnet dimensions ---
124         AliMAG *MAG = new AliMAG("MAG", "Magnet");
125     }
126
127
128     if (iABSO)
129     {
130         //=================== ABSO parameters ============================
131         AliABSO *ABSO = new AliABSOv0("ABSO", "Muon Absorber");
132     }
133
134     if (iDIPO)
135     {
136         //=================== DIPO parameters ============================
137
138         AliDIPO *DIPO = new AliDIPOv2("DIPO", "Dipole version 2");
139     }
140
141     if (iHALL)
142     {
143         //=================== HALL parameters ============================
144
145         AliHALL *HALL = new AliHALL("HALL", "Alice Hall");
146     }
147
148
149     if (iFRAME)
150     {
151         //=================== FRAME parameters ============================
152
153         AliFRAME *FRAME = new AliFRAMEv2("FRAME", "Space Frame");
154
155     }
156
157     if (iSHIL)
158     {
159         //=================== SHIL parameters ============================
160
161         AliSHIL *SHIL = new AliSHILvF("SHIL", "Shielding");
162     }
163
164
165     if (iPIPE)
166     {
167         //=================== PIPE parameters ============================
168
169         AliPIPE *PIPE = new AliPIPEv0("PIPE", "Beam Pipe");
170     }
171  
172   if(iITS) {
173
174 //=================== ITS parameters ============================
175     //
176     // As the innermost detector in ALICE, the Inner Tracking System "impacts" on
177     // almost all other detectors. This involves the fact that the ITS geometry
178     // still has several options to be followed in parallel in order to determine
179     // the best set-up which minimizes the induced background. All the geometries
180     // available to date are described in the following. Read carefully the comments
181     // and use the default version (the only one uncommented) unless you are making
182     // comparisons and you know what you are doing. In this case just uncomment the
183     // ITS geometry you want to use and run Aliroot.
184     //
185     // Detailed geometries:         
186     //
187     //
188     //AliITS *ITS  = new AliITSv5symm("ITS","Updated ITS TDR detailed version with symmetric services");
189     //
190     //AliITS *ITS  = new AliITSv5asymm("ITS","Updates ITS TDR detailed version with asymmetric services");
191     //
192     AliITSvPPRasymm *ITS  = new AliITSvPPRasymm("ITS","New ITS PPR detailed version with asymmetric services");
193     ITS->SetMinorVersion(2);                                     // don't touch this parameter if you're not an ITS developer
194     ITS->SetReadDet(kFALSE);                                     // don't touch this parameter if you're not an ITS developer
195     //    ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det");  // don't touch this parameter if you're not an ITS developer
196     ITS->SetThicknessDet1(200.);   // detector thickness on layer 1 must be in the range [100,300]
197     ITS->SetThicknessDet2(200.);   // detector thickness on layer 2 must be in the range [100,300]
198     ITS->SetThicknessChip1(200.);  // chip thickness on layer 1 must be in the range [150,300]
199     ITS->SetThicknessChip2(200.);  // chip thickness on layer 2 must be in the range [150,300]
200     ITS->SetRails(1);        // 1 --> rails in ; 0 --> rails out
201     ITS->SetCoolingFluid(1);   // 1 --> water ; 0 --> freon
202     //
203     //AliITSvPPRsymm *ITS  = new AliITSvPPRsymm("ITS","New ITS PPR detailed version with symmetric services");
204     //ITS->SetMinorVersion(2);                                       // don't touch this parameter if you're not an ITS developer
205     //ITS->SetReadDet(kFALSE);                                       // don't touch this parameter if you're not an ITS developer
206     //ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRsymm2.det"); // don't touch this parameter if you're not an ITS developer
207     //ITS->SetThicknessDet1(200.);   // detector thickness on layer 1 must be in the range [100,300]
208     //ITS->SetThicknessDet2(200.);   // detector thickness on layer 2 must be in the range [100,300]
209     //ITS->SetThicknessChip1(200.);  // chip thickness on layer 1 must be in the range [150,300]
210     //ITS->SetThicknessChip2(200.);  // chip thickness on layer 2 must be in the range [150,300]
211     //ITS->SetRails(1);              // 1 --> rails in ; 0 --> rails out
212     //ITS->SetCoolingFluid(1);       // 1 --> water ; 0 --> freon
213     //
214     //
215     // Coarse geometries (warning: no hits are produced with these coarse geometries and they unuseful 
216     // for reconstruction !):
217     //                                                     
218     //
219     //AliITSvPPRcoarseasymm *ITS  = new AliITSvPPRcoarseasymm("ITS","New ITS PPR coarse version with asymmetric services");
220     //ITS->SetRails(1);                // 1 --> rails in ; 0 --> rails out
221     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
222     //
223     //AliITS *ITS  = new AliITSvPPRcoarsesymm("ITS","New ITS PPR coarse version with symmetric services");
224     //ITS->SetRails(1);                // 1 --> rails in ; 0 --> rails out
225     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
226     //                      
227     //
228     //
229     // Geant3 <-> EUCLID conversion
230     // ============================
231     //
232     // SetEUCLID is a flag to output (=1) or not to output (=0) both geometry and
233     // media to two ASCII files (called by default ITSgeometry.euc and
234     // ITSgeometry.tme) in a format understandable to the CAD system EUCLID.
235     // The default (=0) means that you dont want to use this facility.
236     //
237     ITS->SetEUCLID(0);  
238   }
239   
240
241     if (iTPC)
242     {
243         //============================ TPC parameters ================================
244         // --- This allows the user to specify sectors for the SLOW (TPC geometry 2)
245         // --- Simulator. SecAL (SecAU) <0 means that ALL lower (upper)
246         // --- sectors are specified, any value other than that requires at least one 
247         // --- sector (lower or upper)to be specified!
248         // --- Reminder: sectors 1-24 are lower sectors (1-12 -> z>0, 13-24 -> z<0)
249         // ---           sectors 25-72 are the upper ones (25-48 -> z>0, 49-72 -> z<0)
250         // --- SecLows - number of lower sectors specified (up to 6)
251         // --- SecUps - number of upper sectors specified (up to 12)
252         // --- Sens - sensitive strips for the Slow Simulator !!!
253         // --- This does NOT work if all S or L-sectors are specified, i.e.
254         // --- if SecAL or SecAU < 0
255         //
256         //
257         //-----------------------------------------------------------------------------
258
259         //  gROOT->LoadMacro("SetTPCParam.C");
260         //  AliTPCParam *param = SetTPCParam();
261         AliTPC *TPC = new AliTPCv2("TPC", "Default");
262
263         // All sectors included 
264         TPC->SetSecAL(-1);
265         TPC->SetSecAU(-1);
266
267     }
268
269     if (iTOF)
270     {
271         //=================== TOF parameters ============================
272         AliTOF *TOF = new AliTOFv2("TOF", "normal TOF");
273     }
274
275     if (iRICH)
276     {
277         //=================== RICH parameters ===========================
278         AliRICH *RICH = new AliRICHv1("RICH", "normal RICH");
279
280     }
281
282
283     if (iZDC)
284     {
285         //=================== ZDC parameters ============================
286
287         AliZDC *ZDC = new AliZDCv2("ZDC", "normal ZDC");
288     }
289
290
291     if (iTRD)
292     {
293         //=================== TRD parameters ============================
294
295         AliTRD *TRD = new AliTRDv1("TRD", "TRD slow simulator");
296
297         // Select the gas mixture (0: 97% Xe + 3% isobutane, 1: 90% Xe + 10% CO2)
298         TRD->SetGasMix(1);
299
300         // With hole in front of PHOS
301         TRD->SetPHOShole();
302         // With hole in front of RICH
303         TRD->SetRICHhole();
304         // Switch on TR
305         AliTRDsim *TRDsim = TRD->CreateTR();
306     }
307
308     if (iFMD)
309     {
310         //=================== FMD parameters ============================
311
312         AliFMD *FMD = new AliFMDv1("FMD", "normal FMD");
313         FMD->SetRingsSi1(256);
314         FMD->SetRingsSi2(64);
315         FMD->SetSectorsSi1(20);
316         FMD->SetSectorsSi2(24);
317    }
318
319     if (iMUON)
320     {
321         //=================== MUON parameters ===========================
322
323         AliMUON *MUON = new AliMUONv1("MUON", "default");
324     }
325     //=================== PHOS parameters ===========================
326
327     if (iPHOS)
328     {
329         AliPHOS *PHOS = new AliPHOSv1("PHOS", "GPS2");
330     }
331
332
333     if (iPMD)
334     {
335         //=================== PMD parameters ============================
336
337         AliPMD *PMD = new AliPMDv1("PMD", "normal PMD");
338
339         PMD->SetPAR(1., 1., 0.8, 0.02);
340         PMD->SetIN(6., 18., -580., 27., 27.);
341         PMD->SetGEO(0.0, 0.2, 4.);
342         PMD->SetPadSize(0.8, 1.0, 1.0, 1.5);
343
344     }
345
346     if (iEMCAL && !iRICH)
347     {
348         //=================== EMCAL parameters ============================
349         AliEMCAL *EMCAL = new AliEMCALv1("EMCAL", "EMCALArch1a");
350     }
351
352     if (iSTART)
353     {
354         //=================== START parameters ============================
355         AliSTART *START = new AliSTARTv1("START", "START Detector");
356     }
357
358
359 }
360
361 Float_t EtaToTheta(Float_t arg){
362   return (180./TMath::Pi())*2.*atan(exp(-arg));
363 }