]> git.uio.no Git - u/mrichter/AliRoot.git/blob - macros/Config_gener.C
New version of RALICE introduced
[u/mrichter/AliRoot.git] / macros / Config_gener.C
1 enum gentype_t {hijing, gun, box, pythia, param, cocktail, fluka, halo, ntuple, scan};
2
3 gentype_t gentype=param;
4
5
6 ntracks=1;
7
8 void Config()
9 {
10
11 new TGeant3("C++ Interface to Geant3");
12
13 //=======================================================================
14 //  Create the output file
15    
16 TFile *rootfile = new TFile("galice.root","recreate");
17 rootfile->SetCompressionLevel(2);
18 TGeant3 *geant3 = (TGeant3*)gMC;
19
20 //=======================================================================
21 // ******* GEANT STEERING parameters FOR ALICE SIMULATION *******
22 geant3->SetTRIG(1); //Number of events to be processed 
23 geant3->SetSWIT(4,10);
24 geant3->SetDEBU(0,0,1);
25 //geant3->SetSWIT(2,2);
26 geant3->SetDCAY(1);
27 geant3->SetPAIR(1);
28 geant3->SetCOMP(1);
29 geant3->SetPHOT(1);
30 geant3->SetPFIS(0);
31 geant3->SetDRAY(0);
32 geant3->SetANNI(1);
33 geant3->SetBREM(1);
34 geant3->SetMUNU(1);
35 geant3->SetCKOV(1);
36 geant3->SetHADR(1); //Select pure GEANH (HADR 1) or GEANH/NUCRIN (HADR 3)
37 geant3->SetLOSS(2);
38 geant3->SetMULS(1);
39 geant3->SetRAYL(1);
40 geant3->SetAUTO(1); //Select automatic STMIN etc... calc. (AUTO 1) or manual (AUTO 0)
41 geant3->SetABAN(0); //Restore 3.16 behaviour for abandoned tracks
42 geant3->SetOPTI(2); //Select optimisation level for GEANT geometry searches (0,1,2)
43 Float_t cut    = 1.e-3; // 1MeV cut by default
44 Float_t tofmax = 1.e10;
45 //             GAM ELEC NHAD CHAD MUON EBREM MUHAB EDEL MUDEL MUPA TOFMAX
46 geant3->SetCUTS(cut,cut, cut, cut, cut, cut,  cut,  cut, cut,  cut, tofmax);
47 //
48 //=======================================================================
49 // ************* STEERING parameters FOR ALICE SIMULATION **************
50 // --- Specify event type to be tracked through the ALICE setup
51 // --- All positions are in cm, angles in degrees, and P and E in GeV
52
53  switch(gentype)
54  {
55  case gun:
56 //*********************************************
57 // Example for Fixed Particle Gun             
58 //*********************************************
59      AliGenFixed *gener = new AliGenFixed(ntracks);
60      gener->SetMomentum(50);
61      gener->SetPhi(180.);
62      gener->SetTheta(5.);
63      gener->SetOrigin(0,0,0);          //vertex position
64      gener->SetPart(13);                //GEANT particle type
65      break;
66  case box:  
67 //*********************************************
68 // Example for Moving Particle Gun            *
69 //*********************************************
70      AliGenBox *gener = new AliGenBox(ntracks);
71      gener->SetMomentumRange(3,4);
72      gener->SetPhiRange(0,360);
73      gener->SetThetaRange(90, 180. );
74      gener->SetOrigin(0,0,0);   
75      //vertex position
76      gener->SetSigma(0,0,0);           //Sigma in (X,Y,Z) (cm) on IP position
77      gener->SetPart(5);                //GEANT particle type
78      break;
79  case scan:  
80 //*********************************************
81 // Scanning on a grid                         *
82 //*********************************************
83      AliGenScan *gener = new AliGenScan(-1);
84      gener->SetMomentumRange(4,4);
85      gener->SetPhiRange(0,360);
86      gener->SetThetaRange(9,9);
87      //vertex position
88      gener->SetSigma(6,6,0);           //Sigma in (X,Y,Z) (cm) on IP position
89      gener->SetPart(5); 
90      gener->SetRange(20, -100, 100, 20, -100, 100, 1, 500, 500);
91      break;
92      
93  case hijing:
94      AliGenHIJINGpara *gener = new AliGenHIJINGpara(ntracks);
95      gener->SetMomentumRange(0,999);
96      gener->SetPhiRange(0,360);
97      gener->SetThetaRange(2,10);
98      gener->SetOrigin(0,0,0);        //vertex position
99      gener->SetSigma(0,0,0);         //Sigma in (X,Y,Z) (cm) on IP position
100      break;
101
102  case pythia:
103 //********************************************
104 // Example for Charm  Production with Pythia *
105 //********************************************
106
107      AliGenPythia *gener = new AliGenPythia(ntracks);
108      gener->SetMomentumRange(0,999);
109      gener->SetPhiRange(0,360);
110      gener->SetThetaRange(0., 180.);
111      gener->SetYRange(-10,10);
112      gener->SetPtRange(0,100);
113      gener->SetOrigin(0,0,0);          // vertex position
114      gener->SetVertexSmear(perEvent); 
115      gener->SetSigma(0,0,5.6);         // Sigma in (X,Y,Z) (cm) on IP position
116 //     gener->SetStrucFunc(DO_Set_1);
117      gener->SetProcess(mb); 
118      gener->SetEnergyCMS(5500.);
119      break;
120      
121  case param:
122 //*******************************************************
123 // Example for J/psi  Production from  Parameterisation *
124 //*******************************************************
125      AliGenParam *gener = new AliGenParam(ntracks, upsilon_p);
126      gener->SetMomentumRange(0,999);
127      gener->SetPhiRange(0,360);
128      gener->SetYRange(2.5,4);
129      gener->SetThetaRange(2,9);
130      
131      gener->SetPtRange(0,10);
132      gener->SetOrigin(0,0,0);          //vertex position
133      gener->SetSigma(0,0,0);//Sigma in (X,Y,Z) (cm) on IP position
134      gener->ForceDecay(dimuon);
135      gener->SetCutOnChild(1);
136      break;
137      
138  case fluka:
139 //*******************************************************
140 // Example for a FLUKA Boundary Source                  *
141 //*******************************************************
142      AliGenFLUKAsource *gener = new AliGenFLUKAsource(-1);
143      gener->SetFileName("$(ALICE_ROOT)/data/all32.root"); 
144      gener->SetPartFlag(9);
145      gener->SetAgeMax(1.e-5);
146 //  31.7 events     
147      gener->SetFraction(0.0315);     
148 //     gener->SetFraction(0.75*0.0315);     
149      rootfile->cd();
150 //     gener->SetPartFlag(10);
151      gener->SetMomentumRange(0,999);
152      gener->SetPhiRange(0,360);
153      gener->SetThetaRange(0., 180.); 
154      gener->SetAgeMax(1.e-5);
155      
156 //  31.7 events     
157 //     gener->SetFraction(0.0315);     
158      break;
159
160  case ntuple:
161 //*******************************************************
162 // Example for reading from a external file                  *
163 //*******************************************************
164      AliGenExtFile *gener = new AliGenExtFile(-1); 
165      gener->SetFileName("$(ALICE_ROOT)/data/dtujet93.root");
166      gener->SetVertexSmear(perEvent); 
167      gener->SetTrackingFlag(1);
168      break;
169
170  case halo:
171 //*******************************************************
172 // Example for Tunnel Halo Source                       *
173 //*******************************************************
174      AliGenHalo *gener = new AliGenHalo(ntracks); 
175      gener->SetFileName("/h1/morsch/marsip/marsip5.mu");
176      break;
177      
178  case cocktail:
179 //*******************************************************
180 // Example for a Cocktail                               *
181 //*******************************************************
182      
183      AliGenCocktail *gener = new AliGenCocktail(); 
184
185      gener->SetPhiRange(0,360);
186      gener->SetYRange(2.5,4);
187      gener->SetThetaRange(2,9);
188      gener->SetPtRange(0,10);
189      gener->SetOrigin(0,0,0);          //vertex position
190      gener->SetSigma(0,0,0);           //Sigma in (X,Y,Z) (cm) on IP position
191      gener->SetMomentumRange(0,999);
192
193      AliGenParam *jpsi = new AliGenParam(1,jpsi_p);
194      jpsi->ForceDecay(dimuon);
195      jpsi->SetCutOnChild(1);
196
197      
198      AliGenFLUKAsource *bg = new AliGenFLUKAsource(-1);
199      bg->AddFile("$(ALICE_ROOT)/data/all32.root"); 
200      rootfile->cd();
201      bg->SetPartFlag(9);
202      bg->SetAgeMax(1.e-5);
203 //  31.7 events     
204 //     gener->SetFraction(0.0315);     
205      bg->SetFraction(0.01*0.0315);     
206       
207      gener->AddGenerator(jpsi,"J/Psi", 1);
208      gener->AddGenerator(bg,"Background",1);
209
210      break;
211  }
212  
213 // Activate this line if you want the vertex smearing to happen
214 // track by track
215 //
216 // gener->SetVertexSmear(perTrack); 
217
218 gener->Init();
219
220 gAlice->SetField(-999,2);    //Specify maximum magnetic field in Tesla (neg. ==> default field)
221
222 Int_t iMAG=1;
223 Int_t iITS=1;
224 Int_t iTPC=1;
225 Int_t iTOF=1;
226 Int_t iRICH=1;
227 Int_t iZDC=0;
228 Int_t iCASTOR=1;
229 Int_t iTRD=1;
230 Int_t iABSO=1;
231 Int_t iDIPO=1;
232 Int_t iHALL=1;
233 Int_t iFRAME=1;
234 Int_t iSHIL=1;
235 Int_t iPIPE=1;
236 Int_t iFMD=1;
237 Int_t iMUON=1;
238 Int_t iPHOS=1;
239 Int_t iCPV=1;
240 Int_t iPMD=1;
241 Int_t iSTART=0;
242
243 //=================== Alice BODY parameters =============================
244 AliBODY *BODY = new AliBODY("BODY","Alice envelop");
245
246
247 if(iMAG) {
248 //=================== MAG parameters ============================
249 // --- Start with Magnet since detector layouts may be depending ---
250 // --- on the selected Magnet dimensions ---
251 AliMAG *MAG  = new AliMAG("MAG","Magnet");
252 }
253
254
255 if(iABSO) {
256 //=================== ABSO parameters ============================
257 AliABSO *ABSO  = new AliABSO("ABSO","Muon Absorber");
258 }
259
260 if(iDIPO) {
261 //=================== DIPO parameters ============================
262
263 AliDIPO *DIPO  = new AliDIPOv2("DIPO","Dipole version 2");
264 }
265
266 if(iHALL) {
267 //=================== HALL parameters ============================
268
269 AliHALL *HALL  = new AliHALL("HALL","Alice Hall");
270 }
271
272
273 if(iFRAME) {
274 //=================== FRAME parameters ============================
275
276 AliFRAME *FRAME  = new AliFRAMEv0("FRAME","Space Frame");
277 }
278
279 if(iSHIL) {
280 //=================== SHIL parameters ============================
281
282 AliSHIL *SHIL  = new AliSHIL("SHIL","Shielding");
283 }
284
285
286 if(iPIPE) {
287 //=================== PIPE parameters ============================
288
289 AliPIPE *PIPE  = new AliPIPEv0("PIPE","Beam Pipe");
290 }
291
292
293 if(iITS) {
294 //=================== ITS parameters ============================
295 //
296 // EUCLID is a flag to output (=1) both geometry and media to two ASCII files 
297 // (called by default ITSgeometry.euc and ITSgeometry.tme) in a format
298 // understandable to the CAD system EUCLID. The default (=0) means that you 
299 // dont want to use this facility.
300 //
301 AliITS *ITS  = new AliITSv5("ITS","normal ITS");
302 ITS->SetEUCLID(0);
303 }
304
305 if(iTPC) {
306 //============================ TPC parameters ================================
307 // --- This allows the user to specify sectors for the SLOW (TPC geometry 2)
308 // --- Simulator. SecAL (SecAU) <0 means that ALL lower (upper)
309 // --- sectors are specified, any value other than that requires at least one 
310 // --- sector (lower or upper)to be specified!
311 // --- Reminder: sectors 1-24 are lower sectors (1-12 -> z>0, 13-24 -> z<0)
312 // ---           sectors 25-72 are the upper ones (25-48 -> z>0, 49-72 -> z<0)
313 // --- SecLows - number of lower sectors specified (up to 6)
314 // --- SecUps - number of upper sectors specified (up to 12)
315 // --- Sens - sensitive strips for the Slow Simulator !!!
316 // --- This does NOT work if all S or L-sectors are specified, i.e.
317 // --- if SecAL or SecAU < 0
318 //
319 //
320 //-----------------------------------------------------------------------------
321
322 AliTPC *TPC  = new AliTPCv2("TPC","Normal TPC");
323 AliTPCD *paramd = TPC->GetDigParam();
324 AliTPCParam *param = &(paramd->GetParam());
325
326 // Set geometrical parameters
327
328 param->SetSectorAngles(20.,0.,20.,0.);
329 param->SetInnerRadiusLow(83.9);
330 param->SetInnerRadiusUp(141.3);
331 param->SetOuterRadiusLow(146.9);
332 param->SetOuterRadiusUp(249.4);
333 param->SetInSecLowEdge(81.6);
334 param->SetInSecUpEdge(143.6);
335 param->SetOuSecLowEdge(144.2);
336 param->SetOuSecUpEdge(252.1);
337 param->SetEdge(1.5);
338 param->SetDeadZone(1.15);
339 param->SetPadLength(2.0);
340 param->SetPadWidth(0.3);
341 param->SetPadPitchLength(2.05);
342 param->SetPadPitchWidth(0.35);
343 param->Update();
344
345 if (TPC->IsVersion() != 2) paramd->Write("Param1");
346
347 // set gas mixture
348
349 TPC->SetGasMixt(2,20,10,-1,0.9,0.1,0.);
350 TPC->SetSecAL(1);
351 TPC->SetSecAU(1);
352 TPC->SetSecLows(1, 2, 3, 1+18, 2+18, 3+18);
353 TPC->SetSecUps(1+36, 2+36, 3+36, 1+38+18, 2+38+18, 3+38+18, -1,-1,-1,-1,-1,-1);
354 TPC->SetSens(1);
355
356 }
357
358 if(iTOF) {
359 //=================== TOF parameters ============================
360 AliTOF *TOF  = new AliTOFv2("TOF","normal TOF");
361 }
362
363 if(iRICH) {
364 //=================== RICH parameters ===========================
365
366   AliRICH *RICH  = new AliRICHv0("RICH","normal RICH");
367
368   RICH->SetSMAXAR(0.03);
369   RICH->SetSMAXAL(-1);
370 //
371 // Version 0
372 // Default Segmentation
373   AliRICHsegmentationV0* RsegV0 = new AliRICHsegmentationV0;
374   RsegV0->SetPADSIZ(.8, .8);
375   RsegV0->SetDAnod(0.8/3);
376 // Default response
377   AliRICHresponseV0* Rresponse0 = new AliRICHresponseV0;
378   AliRICHresponseCkv* RresponseCkv = new AliRICHresponseCkv;
379
380 //------------------------Chambers 0-6 ----------------------------
381   for (Int_t i=0; i<7; i++) {
382     RICH->SetSegmentationModel(i, 1, RsegV0);
383     RICH->SetResponseModel(i, mip     , Rresponse0);
384     RICH->SetResponseModel(i, cerenkov, RresponseCkv);
385     RICH->Chamber(i).SetRSIGM(5.);
386     RICH->Chamber(i).SetMUCHSP(43.);
387     RICH->Chamber(i).SetMUSIGM(0.18, 0.18);
388     RICH->Chamber(i).SetMAXADC( 1024);
389     RICH->Chamber(i).SetSqrtKx3(0.77459667);
390     RICH->Chamber(i).SetKx2(0.962);
391     RICH->Chamber(i).SetKx4(0.379);
392     RICH->Chamber(i).SetSqrtKy3(0.77459667);
393     RICH->Chamber(i).SetKy2(0.962);
394     RICH->Chamber(i).SetKy4(0.379);
395     RICH->Chamber(i).SetPitch(0.25);
396     RICH->SetNsec(i,1);
397   }
398 }
399
400 if(iZDC) {
401 //=================== ZDC parameters ============================
402
403 AliZDC *ZDC  = new AliZDCv1("ZDC","normal ZDC");
404 }
405
406 if(iCASTOR) {
407 //=================== CASTOR parameters ============================
408
409 AliCASTOR *CASTOR  = new AliCASTORv1("CASTOR","normal CASTOR");
410 }
411
412 if(iTRD) {
413 //=================== TRD parameters ============================
414
415 AliTRD *TRD  = new AliTRDv0("TRD","TRD version 0");
416 // Select the gas mixture (0: 97% Xe + 3% isobutane, 1: 90% Xe + 10% CO2)
417 TRD->SetGasMix(0);
418 TRD->SetHits(1);
419 }
420
421 if(iFMD) {
422 //=================== FMD parameters ============================
423
424 AliFMD *FMD  = new AliFMDv1("FMD","normal FMD");
425 }
426
427 if(iMUON) {
428 //=================== MUON parameters ===========================
429
430 AliMUON *MUON  = new AliMUONv0("MUON","normal MUON");
431
432   MUON->SetMaxStepGas(0.1);
433   MUON->SetMaxStepAlu(0.1);
434 //
435 // Version 0
436 //
437 // First define the number of planes that are segmented (1 or 2) by a call
438 // to SetNsec. 
439 // Then chose for each chamber (chamber plane) the segmentation 
440 // and response model.
441 // They should be equal for the two chambers of each station. In a future
442 // version this will be enforced.
443 //
444 //  
445  Int_t chamber;
446  Int_t station;
447 // Default response
448  AliMUONresponseV0* response0 = new AliMUONresponseV0;
449  response0->SetSqrtKx3(0.7131);
450  response0->SetKx2(1.0107);
451  response0->SetKx4(0.4036);
452  response0->SetSqrtKy3(0.7642);
453  response0->SetKy2(0.9706);
454  response0->SetKy4(0.3831);
455  response0->SetPitch(0.25);
456  response0->SetSigmaIntegration(10.);
457  response0->SetChargeSlope(50);
458  response0->SetChargeSpread(0.18, 0.18);
459  response0->SetMaxAdc(4096);
460 //--------------------------------------------------------
461 // Configuration for Chamber TC1/2  (Station 1) ----------           
462 //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
463 // Float_t rseg1[4]={17.5, 55.2, 71.3, 95.5};
464  Float_t rseg1[4]={15.5, 55.2, 71.3, 95.5};
465  Int_t   nseg1[4]={4, 4, 2, 1};
466 //
467  chamber=1;
468 //^^^^^^^^^
469  MUON->SetNsec(chamber-1,2);
470 //
471  AliMUONsegmentationV01 *seg11=new AliMUONsegmentationV01;
472  
473  seg11->SetSegRadii(rseg1);
474  seg11->SetPADSIZ(3, 0.5);
475  seg11->SetDAnod(3.0/3./4);
476  seg11->SetPadDivision(nseg1);
477  
478  MUON->SetSegmentationModel(chamber-1, 1, seg11);
479 //
480  AliMUONsegmentationV02 *seg12=new AliMUONsegmentationV02;
481  seg12->SetSegRadii(rseg1); 
482  seg12->SetPADSIZ(0.75, 2.0);
483  seg12->SetDAnod(3.0/3./4);
484  seg12->SetPadDivision(nseg1);
485
486  MUON->SetSegmentationModel(chamber-1, 2, seg12);
487
488  MUON->SetResponseModel(chamber-1, response0);      
489
490  chamber=2;
491 //^^^^^^^^^
492 //
493  MUON->SetNsec(chamber-1,2);
494 //
495  AliMUONsegmentationV01 *seg21=new AliMUONsegmentationV01;
496  seg21->SetSegRadii(rseg1);
497  seg21->SetPADSIZ(3, 0.5);
498  seg21->SetDAnod(3.0/3./4);
499  seg21->SetPadDivision(nseg1);
500  MUON->SetSegmentationModel(chamber-1, 1, seg21);
501 //
502  AliMUONsegmentationV02 *seg22=new AliMUONsegmentationV02;
503  seg22->SetSegRadii(rseg1); 
504  seg22->SetPADSIZ(0.75, 2.);
505  seg22->SetDAnod(3.0/3./4);
506  seg22->SetPadDivision(nseg1);
507  MUON->SetSegmentationModel(chamber-1, 2, seg22);
508
509  MUON->SetResponseModel(chamber-1, response0);      
510 //
511 //--------------------------------------------------------
512 // Configuration for Chamber TC3/4 -----------------------
513 //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
514 // Float_t rseg2[4]={23.5, 47.1, 87.7, 122.5};
515  Float_t rseg2[4]={21.5, 47.1, 87.7, 122.5};
516  Int_t   nseg2[4]={4, 4, 2, 1};
517 //
518  chamber=3;
519 //^^^^^^^^^
520  MUON->SetNsec(chamber-1,2);
521 //
522  AliMUONsegmentationV01 *seg31=new AliMUONsegmentationV01;
523  seg31->SetSegRadii(rseg2);
524  seg31->SetPADSIZ(3, 0.5);
525  seg31->SetDAnod(3.0/3./4);
526  seg31->SetPadDivision(nseg2);
527  MUON->SetSegmentationModel(chamber-1, 1, seg31);
528 //
529  AliMUONsegmentationV02 *seg32=new AliMUONsegmentationV02;
530  seg32->SetSegRadii(rseg2); 
531  seg32->SetPADSIZ(0.75, 2.);
532  seg32->SetPadDivision(nseg2);
533  seg32->SetDAnod(3.0/3./4);
534
535  MUON->SetSegmentationModel(chamber-1, 2, seg32);
536
537  MUON->SetResponseModel(chamber-1, response0);      
538
539  chamber=4;
540 //^^^^^^^^^
541 //
542  MUON->SetNsec(chamber-1,2);
543 //
544  AliMUONsegmentationV01 *seg41=new AliMUONsegmentationV01;
545  seg41->SetSegRadii(rseg2);
546  seg41->SetPADSIZ(3, 0.5);
547  seg41->SetDAnod(3.0/3./4);
548  seg41->SetPadDivision(nseg2);
549  MUON->SetSegmentationModel(chamber-1, 1, seg41);
550 //
551  AliMUONsegmentationV02 *seg42=new AliMUONsegmentationV02;
552  seg42->SetSegRadii(rseg2); 
553  seg42->SetPADSIZ(0.75, 2.);
554  seg42->SetPadDivision(nseg2);
555  seg42->SetDAnod(3.0/3./4);
556
557  MUON->SetSegmentationModel(chamber-1, 2, seg42);
558
559  MUON->SetResponseModel(chamber-1, response0);      
560
561
562 //--------------------------------------------------------
563 // Configuration for Chamber TC5/6 -----------------------
564 //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
565 /*
566  seg5 =  new AliMUONsegmentationV1;
567  AliMUONresponseV0* response5 =  new AliMUONresponseV0;
568  // K3 = 0.62
569  response5->SetSqrtKx3(0.78740079);
570  response5->SetKx2(0.95237319); //  0.5 * kPI * (1- 0.5*sqrtky3 )
571  response5->SetKx4(0.37480633); // 0.25/TMath::ATan(sqrtkx3)
572  // K3 = 0.55
573  response5->SetSqrtKy3(0.74161985);
574  response5->SetKy2(0.98832946);
575  response5->SetKy4(0.39177817);
576  response5->SetPitch(0.325);
577  response5->SetSigmaIntegration(10.);
578  response5->SetChargeSlope(50);
579  response5->SetChargeSpread(0.4, 0.4);
580  response5->SetMaxAdc(4096);
581
582  chamber=5;
583  MUON->SetNsec(chamber-1,1);
584  MUON->SetSegmentationModel(chamber-1, 1, seg5);
585  MUON->SetResponseModel(chamber-1, response5);      
586
587  chamber=6;
588  MUON->SetNsec(chamber-1,1);
589  MUON->SetSegmentationModel(chamber-1, 1, seg5);
590  MUON->SetResponseModel(chamber-1, response5);      
591 //
592 // Station 3
593  station=3;
594  MUON->SetPADSIZ(station, 1, 0.975, 0.55);
595 */
596
597  chamber=5;
598 //^^^^^^^^^
599  MUON->SetNsec(chamber-1,2);
600 //
601  AliMUONsegmentationV0 *seg51=new AliMUONsegmentationV0;
602  seg51->SetPADSIZ(0.75, 0.5);
603  seg51->SetDAnod(3.0/3./4);
604  MUON->SetSegmentationModel(chamber-1, 1, seg51);
605 //
606  AliMUONsegmentationV0 *seg52=new AliMUONsegmentationV0;
607  seg52->SetPADSIZ(0.5,0.75);
608  seg52->SetDAnod(3.0/3./4);
609  MUON->SetSegmentationModel(chamber-1, 2, seg52);
610
611  MUON->SetResponseModel(chamber-1, response0);      
612
613  chamber=6;
614 //^^^^^^^^^
615  MUON->SetNsec(chamber-1,2);
616 //
617  AliMUONsegmentationV0 *seg61=new AliMUONsegmentationV0;
618  seg61->SetPADSIZ(0.75, 0.5);
619  seg61->SetDAnod(3.0/3./4);
620  MUON->SetSegmentationModel(chamber-1, 1, seg61);
621 //
622  AliMUONsegmentationV0 *seg62=new AliMUONsegmentationV0;
623  seg62->SetPADSIZ(0.5,0.75);
624  seg62->SetDAnod(3.0/3./4);
625  MUON->SetSegmentationModel(chamber-1, 2, seg62);
626
627  MUON->SetResponseModel(chamber-1, response0);    
628
629 //--------------------------------------------------------
630 // Configuration for Chamber TC7/8  (Station 4) ----------           
631 //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
632
633  Int_t   nseg4[4]={4, 4, 2, 1};
634
635  chamber=7;
636 //^^^^^^^^^
637  MUON->SetNsec(chamber-1,2);
638 //
639  AliMUONsegmentationV04 *seg71=new AliMUONsegmentationV04;
640  seg71->SetPADSIZ(10.,0.5);
641  seg71->SetDAnod(0.25);
642  seg71->SetPadDivision(nseg4);
643  MUON->SetSegmentationModel(chamber-1, 1, seg71);
644
645  AliMUONsegmentationV05 *seg72=new AliMUONsegmentationV05;
646  seg72->SetPADSIZ(1,10);
647  seg72->SetDAnod(0.25);
648  seg72->SetPadDivision(nseg4);
649  MUON->SetSegmentationModel(chamber-1, 2, seg72);
650
651  MUON->SetResponseModel(chamber-1, response0);      
652
653  chamber=8;
654 //^^^^^^^^^
655  MUON->SetNsec(chamber-1,2);
656  AliMUONsegmentationV04 *seg81=new AliMUONsegmentationV04;
657  seg81->SetPADSIZ(10., 0.5);
658  seg81->SetPadDivision(nseg4);
659  seg81->SetDAnod(0.25);
660  MUON->SetSegmentationModel(chamber-1, 1, seg81);
661
662  AliMUONsegmentationV05 *seg82=new AliMUONsegmentationV05;
663  seg82->SetPADSIZ(1, 10);
664  seg82->SetPadDivision(nseg4);
665  seg82->SetDAnod(0.25);
666  MUON->SetSegmentationModel(chamber-1, 2, seg82);
667
668  MUON->SetResponseModel(chamber-1, response0);      
669 //--------------------------------------------------------
670 // Configuration for Chamber TC9/10  (Station 5) ---------           
671 //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
672  chamber=9;
673 //^^^^^^^^^
674  MUON->SetNsec(chamber-1,2);
675 //
676  AliMUONsegmentationV04 *seg91=new AliMUONsegmentationV04;
677  seg91->SetPADSIZ(10.,0.5);
678  seg91->SetDAnod(0.25);
679  seg91->SetPadDivision(nseg4);
680  MUON->SetSegmentationModel(chamber-1, 1, seg91);
681
682  AliMUONsegmentationV05 *seg92=new AliMUONsegmentationV05;
683  seg92->SetPADSIZ(1,10);
684  seg92->SetDAnod(0.25);
685  seg92->SetPadDivision(nseg4);
686
687  MUON->SetSegmentationModel(chamber-1, 2, seg92);
688
689  MUON->SetResponseModel(chamber-1, response0);      
690
691  chamber=10;
692 //^^^^^^^^^
693  MUON->SetNsec(chamber-1,2);
694  AliMUONsegmentationV04 *seg101=new AliMUONsegmentationV04;
695  seg101->SetPADSIZ(10., 0.5);
696  seg101->SetPadDivision(nseg4);
697  seg101->SetDAnod(0.25);
698  MUON->SetSegmentationModel(chamber-1, 1, seg101);
699
700  AliMUONsegmentationV05 *seg102=new AliMUONsegmentationV05;
701  seg102->SetPADSIZ(1,10);
702  seg102->SetPadDivision(nseg4);
703  seg102->SetDAnod(0.25);
704  MUON->SetSegmentationModel(chamber-1, 2, seg102);
705
706  MUON->SetResponseModel(chamber-1, response0);      
707 //--------------------------------------------------------
708 // Configuration for Trigger staions --------------------- 
709 // (not yet used/implemented) ----------------------------          
710 //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
711
712  chamber=11;
713  MUON->SetNsec(chamber-1,1);
714  AliMUONsegmentationV0 *seg1112=new AliMUONsegmentationV0;
715  seg1112->SetDAnod(0.51/3.);
716
717  MUON->SetSegmentationModel(chamber-1, 1, seg1112);
718  MUON->SetResponseModel(chamber-1, response0);      
719
720  chamber=12;
721  MUON->SetNsec(chamber-1,1);
722  MUON->SetSegmentationModel(chamber-1, 1, seg1112);
723  MUON->SetResponseModel(chamber-1, response0);      
724 //
725 // Trigger Station 1
726  station=6;
727  MUON->SetPADSIZ(station, 1, 0.75, 0.5);
728
729  chamber=13;
730  MUON->SetNsec(chamber-1,1);
731  AliMUONsegmentationV0 *seg1314=new AliMUONsegmentationV0;
732  seg1314->SetDAnod(0.51/3.);
733
734  MUON->SetSegmentationModel(chamber-1, 1, seg1314);
735  MUON->SetResponseModel(chamber-1, response0);      
736
737  chamber=14;
738  MUON->SetNsec(chamber-1,1);
739  MUON->SetSegmentationModel(chamber-1, 1, seg1314);
740  MUON->SetResponseModel(chamber-1, response0);      
741 //
742 // Trigger Station 2
743  station=7;
744  MUON->SetPADSIZ(station, 1, 0.75, 0.5);
745 }
746  
747 if(iPHOS) {
748 AliPHOS *PHOS  = new AliPHOSv1("PHOS","normal PHOS");
749 // * PHOSflags:    YES: X<>0   NO: X=0
750 // * PHOSflags(1) : -----X  Create branch for TObjArray of AliPHOSCradle
751 // *                ----X-  Create file (ftn03 on HP-UX) with list of SHAKER particles (7Mb/event)
752 // *                
753 PHOS->SetFlags(000001);
754 PHOS->SetRadius(460); //Distance from beam to PHOS crystals.
755 // (crystal_side_size,crystal_length,wrap_thikness,air_thikness,PIN_size,PIN length)
756 PHOS->SetCell(2.2,          18.,         0.01,        0.01,        1.,      0.1);
757 PHOS->SetCradleSize(48, 90, 4); // Nz (along beam), Nphi, Ncradles
758 PHOS->SetCradleA(0);   //Angle between Cradles
759 // *  ===============
760 // * PHOS extra parameters (contact Maxim Volkov volkov@mail.cern.ch)
761 // * 1. STE_THICK         Steel cover thickness
762 // * 2. SUP_Y             Crystal support height
763 // * 3. FTIU_THICK        Thermo Insulating outer cover Upper plate thickness
764 // * 4. UFP_Y             Upper Polystyrene Foam plate thickness
765 // * 5. TCB_THICK         Thermo insulating Crystal Block wall thickness
766 // * 6. UCP_Y             Upper Cooling Plate thickness
767 // * 7. ASP_Y             Al Support Plate thickness
768 // * 8. TIP_Y             Lower Thermo Insulating Plate thickness
769 // * 9. TXP_Y             Lower Textolit Plate thickness
770 PHOS->SetExtra(0.001, 6.95, 4., 5., 2., 0.06, 10., 3., 1.);   
771 PHOS->SetTextolitWall(209., 71., 250.);    //Textolit Wall box dimentions
772 PHOS->SetInnerAir(206.,    66.,     244.); //Inner AIR volume dimensions
773 // *  ===============================
774 // * 1. FTI_X             Foam Thermo Insulating outer cover dimensions
775 // * 2. FTI_Y             ==//==
776 // * 3. FTI_Z             ==//==
777 // * 4. FTI_R             Distance from IP to Foam Thermo Insulating top plate
778 PHOS->SetFoam(214.6,  80.,  260., 467.); 
779 //    =================================
780 // *******************************************************************************
781 // * KINE 700  - SHAKER generator
782 // * KINE 700 x y z NDNDY YLIM PTLIM ChargeFlag
783 // *     JWEAK=0
784 // *     JPI0=JETA=1
785 // *     JPIC=JPRO=JKAC=JKA0=JRHO=JOME=JPHI=JPSI=JDRY=ChargeFlag
786 // *     Int_t               JWEI;           // Unweighted generation
787 // *     Int_t               NDNDY;          // Density of charged particles
788 // *     Float_t             YLIM;           // Rapidity Limit
789 // *     Float_t             PTLIM;          // Pt limit in GeV/c
790 // *     Int_t               JWEAK;          // Disable weak decays
791 // *     Int_t               JPI0;           // pi0 generation
792 // *     Int_t               JETA;           // eta generation
793 // *     Int_t               JPIC;           // pi+/- generation
794 // *     Int_t               JPRO;           // proton generation
795 // *     Int_t               JKAC;           // K+/- generation
796 // *     Int_t               JKA0;           // K0 generation
797 // *     Int_t               JRHO;           // rho generation
798 // *     Int_t               JOME;           // omega generation
799 // *     Int_t               JPHI;           // phi generation
800 // *     Int_t               JPSI;           // J/psi generation
801 // *     Int_t               JDRY;           // Drell-Yan generation
802 // * KINE  700     5.    175.    0.          800. 1.5 5. 1.
803 // *******************************************************************************
804 }
805
806 if(iCPV) {
807 //=================== CPV parameters ============================
808
809   printf ("CPV in initializing\n");
810   AliCPV *CPV  = new AliCPVv0("CPV","normal CPV");
811 }
812
813 if(iPMD) {
814 //=================== PMD parameters ============================
815
816 AliPMD *PMD  = new AliPMDv0("PMD","normal PMD");
817 PMD->SetPAR(1., 1., 0.8, 0.02);
818 PMD->SetIN(6., 18., -580., 27., 27.);
819 PMD->SetGEO(0.0, 0.2, 4.);
820 PMD->SetPadSize(0.8, 1.0, 1.0, 1.5);
821
822 }
823          
824 if(iSTART) {
825 //=================== START parameters ============================
826 AliSTART *START  = new AliSTARTv0("START","START Detector");
827 }
828
829 }