b61437982590b59d88739a12fed5cade04992da5
[u/mrichter/AliRoot.git] / macros / ConfigPPR.C
1 // One can use the configuration macro in compiled mode by
2 // root [0] gSystem->Load("libgeant321");
3 // root [0] gSystem->SetIncludePath("-I$ROOTSYS/include -I$ALICE_ROOT/include\
4 //                   -I$ALICE_ROOT -I$ALICE/geant3/TGeant3");
5 // root [0] .x grun.C(1,"ConfigPPR.C++")
6
7 #if !defined(__CINT__) || defined(__MAKECINT__)
8 #include <Riostream.h>
9 #include <TRandom.h>
10 #include <TSystem.h>
11 #include <TVirtualMC.h>
12 #include <TGeant3TGeo.h>
13 #include <TPDGCode.h>
14 #include <TF1.h>
15 #include "STEER/AliRunLoader.h"
16 #include "STEER/AliRun.h"
17 #include "STEER/AliConfig.h"
18 #include "STEER/AliGenerator.h"
19 #include "STEER/AliLog.h"
20 #include "PYTHIA6/AliDecayerPythia.h"
21 #include "EVGEN/AliGenHIJINGpara.h"
22 #include "THijing/AliGenHijing.h"
23 #include "EVGEN/AliGenCocktail.h"
24 #include "EVGEN/AliGenSlowNucleons.h"
25 #include "EVGEN/AliSlowNucleonModelExp.h"
26 #include "EVGEN/AliGenParam.h"
27 #include "EVGEN/AliGenMUONlib.h"
28 #include "EVGEN/AliGenSTRANGElib.h"
29 #include "EVGEN/AliGenMUONCocktail.h"
30 #include "EVGEN/AliGenCocktail.h"
31 #include "EVGEN/AliGenGeVSim.h"
32 #include "EVGEN/AliGeVSimParticle.h"
33 #include "PYTHIA6/AliGenPythia.h"
34 #include "STEER/AliMagFMaps.h"
35 #include "STRUCT/AliBODY.h"
36 #include "STRUCT/AliMAG.h"
37 #include "STRUCT/AliABSOv0.h"
38 #include "STRUCT/AliDIPOv2.h"
39 #include "STRUCT/AliHALL.h"
40 #include "STRUCT/AliFRAMEv2.h"
41 #include "STRUCT/AliSHILv2.h"
42 #include "STRUCT/AliPIPEv0.h"
43 #include "ITS/AliITSvPPRasymmFMD.h"
44 #include "TPC/AliTPCv2.h"
45 #include "TOF/AliTOFv4T0.h"
46 #include "RICH/AliRICHv1.h"
47 #include "ZDC/AliZDCv2.h"
48 #include "TRD/AliTRDv1.h"
49 #include "FMD/AliFMDv1.h"
50 #include "MUON/AliMUONv1.h"
51 #include "PHOS/AliPHOSv1.h"
52 #include "PMD/AliPMDv1.h"
53 #include "START/AliSTARTv1.h"
54 #include "EMCAL/AliEMCALv2.h"
55 #include "CRT/AliCRTv0.h"
56 #include "VZERO/AliVZEROv5.h"
57 #endif
58
59 enum PprRun_t 
60 {
61     test50,
62     kParam_8000,   kParam_4000,  kParam_2000, 
63     kHijing_cent1, kHijing_cent2, 
64     kHijing_per1,  kHijing_per2, kHijing_per3, kHijing_per4,  kHijing_per5,
65     kHijing_jj25,  kHijing_jj50, kHijing_jj75, kHijing_jj100, kHijing_jj200, 
66     kHijing_gj25,  kHijing_gj50, kHijing_gj75, kHijing_gj100, kHijing_gj200,
67     kHijing_pA, kPythia6, 
68     kPythia6Jets20_24,   kPythia6Jets24_29,   kPythia6Jets29_35,
69     kPythia6Jets35_42,   kPythia6Jets42_50,   kPythia6Jets50_60,
70     kPythia6Jets60_72,   kPythia6Jets72_86,   kPythia6Jets86_104,
71     kPythia6Jets104_125, kPythia6Jets125_150, kPythia6Jets150_180,
72     kD0PbPb5500, kCharmSemiElPbPb5500, kBeautySemiElPbPb5500,
73     kCocktailTRD, kPyJJ, kPyGJ, 
74     kMuonCocktailCent1, kMuonCocktailPer1, kMuonCocktailPer4, 
75     kMuonCocktailCent1HighPt, kMuonCocktailPer1HighPt, kMuonCocktailPer4HighPt,
76     kMuonCocktailCent1Single, kMuonCocktailPer1Single, kMuonCocktailPer4Single,
77     kFlow_2_2000, kFlow_10_2000, kFlow_6_2000, kFlow_6_5000,
78     kHIJINGplus, kRunMax
79 };
80
81 const char* pprRunName[] = {
82     "test50",
83     "kParam_8000",   "kParam_4000",  "kParam_2000", 
84     "kHijing_cent1", "kHijing_cent2", 
85     "kHijing_per1",  "kHijing_per2", "kHijing_per3", "kHijing_per4",  
86     "kHijing_per5",
87     "kHijing_jj25",  "kHijing_jj50", "kHijing_jj75", "kHijing_jj100", 
88     "kHijing_jj200", 
89     "kHijing_gj25",  "kHijing_gj50", "kHijing_gj75", "kHijing_gj100", 
90     "kHijing_gj200", "kHijing_pA", "kPythia6", 
91     "kPythia6Jets20_24",   "kPythia6Jets24_29",   "kPythia6Jets29_35",
92     "kPythia6Jets35_42",   "kPythia6Jets42_50",   "kPythia6Jets50_60",
93     "kPythia6Jets60_72",   "kPythia6Jets72_86",   "kPythia6Jets86_104",
94     "kPythia6Jets104_125", "kPythia6Jets125_150", "kPythia6Jets150_180",
95     "kD0PbPb5500", "kCharmSemiElPbPb5500", "kBeautySemiElPbPb5500",
96     "kCocktailTRD", "kPyJJ", "kPyGJ", 
97     "kMuonCocktailCent1", "kMuonCocktailPer1", "kMuonCocktailPer4",  
98     "kMuonCocktailCent1HighPt", "kMuonCocktailPer1HighPt", "kMuonCocktailPer4HighPt",
99     "kMuonCocktailCent1Single", "kMuonCocktailPer1Single", "kMuonCocktailPer4Single",
100     "kFlow_2_2000", "kFlow_10_2000", "kFlow_6_2000", "kFlow_6_5000", "kHIJINGplus"
101 };
102
103 enum PprGeo_t 
104 {
105     kHoles, kNoHoles
106 };
107
108 enum PprRad_t
109 {
110     kGluonRadiation, kNoGluonRadiation
111 };
112
113 enum PprMag_t
114 {
115     k2kG, k4kG, k5kG
116 };
117
118
119 // This part for configuration    
120 //static PprRun_t srun = test50;
121 static PprRun_t srun = kHIJINGplus;
122 static PprGeo_t sgeo = kNoHoles;
123 static PprRad_t srad = kGluonRadiation;
124 static PprMag_t smag = k5kG;
125 static Int_t    sseed = 12345; //Set 0 to use the current time
126
127 // Comment line 
128 static TString  comment;
129
130 // Functions
131 Float_t EtaToTheta(Float_t arg);
132 AliGenerator* GeneratorFactory(PprRun_t srun);
133 AliGenHijing* HijingStandard();
134 AliGenGeVSim* GeVSimStandard(Float_t, Float_t);
135 void ProcessEnvironmentVars();
136
137 void Config()
138 {
139     // ThetaRange is (0., 180.). It was (0.28,179.72) 7/12/00 09:00
140     // Theta range given through pseudorapidity limits 22/6/2001
141
142     // Get settings from environment variables
143     ProcessEnvironmentVars();
144
145     // Set Random Number seed
146     gRandom->SetSeed(sseed);
147     cout<<"Seed for random number generation= "<<gRandom->GetSeed()<<endl; 
148
149
150    // libraries required by geant321
151 #if defined(__CINT__)
152     gSystem->Load("libgeant321");
153 #endif
154
155     new     TGeant3TGeo("C++ Interface to Geant3");
156
157     AliRunLoader* rl=0x0;
158
159     AliLog::Message(AliLog::kInfo, "Creating Run Loader", "", "", "Config()"," ConfigPPR.C", __LINE__);
160
161     rl = AliRunLoader::Open("galice.root",
162                             AliConfig::GetDefaultEventFolderName(),
163                             "recreate");
164     if (rl == 0x0)
165       {
166         gAlice->Fatal("Config.C","Can not instatiate the Run Loader");
167         return;
168       }
169     rl->SetCompressionLevel(2);
170     rl->SetNumberOfEventsPerFile(3);
171     gAlice->SetRunLoader(rl);
172
173     //
174     // Set External decayer
175     AliDecayer *decayer = new AliDecayerPythia();
176
177
178     switch (srun) {
179     case kD0PbPb5500:
180       decayer->SetForceDecay(kHadronicD);
181       break;
182     case kCharmSemiElPbPb5500:
183       decayer->SetForceDecay(kSemiElectronic);
184       break;
185     case kBeautySemiElPbPb5500:
186       decayer->SetForceDecay(kSemiElectronic);
187       break;
188     default:
189       decayer->SetForceDecay(kAll);
190       break;
191     }
192     decayer->Init();
193     gMC->SetExternalDecayer(decayer);
194     //
195     //
196     //=======================================================================
197     //
198     //=======================================================================
199     // ************* STEERING parameters FOR ALICE SIMULATION **************
200     // --- Specify event type to be tracked through the ALICE setup
201     // --- All positions are in cm, angles in degrees, and P and E in GeV
202
203     gMC->SetProcess("DCAY",1);
204     gMC->SetProcess("PAIR",1);
205     gMC->SetProcess("COMP",1);
206     gMC->SetProcess("PHOT",1);
207     gMC->SetProcess("PFIS",0);
208     gMC->SetProcess("DRAY",0);
209     gMC->SetProcess("ANNI",1);
210     gMC->SetProcess("BREM",1);
211     gMC->SetProcess("MUNU",1);
212     gMC->SetProcess("CKOV",1);
213     gMC->SetProcess("HADR",1);
214     gMC->SetProcess("LOSS",2);
215     gMC->SetProcess("MULS",1);
216     gMC->SetProcess("RAYL",1);
217
218     Float_t cut = 1.e-3;        // 1MeV cut by default
219     Float_t tofmax = 1.e10;
220
221     gMC->SetCut("CUTGAM", cut);
222     gMC->SetCut("CUTELE", cut);
223     gMC->SetCut("CUTNEU", cut);
224     gMC->SetCut("CUTHAD", cut);
225     gMC->SetCut("CUTMUO", cut);
226     gMC->SetCut("BCUTE",  cut); 
227     gMC->SetCut("BCUTM",  cut); 
228     gMC->SetCut("DCUTE",  cut); 
229     gMC->SetCut("DCUTM",  cut); 
230     gMC->SetCut("PPCUTM", cut);
231     gMC->SetCut("TOFMAX", tofmax); 
232
233     // Debug and log level
234     AliLog::SetGlobalDebugLevel(0);
235     AliLog::SetGlobalLogLevel(AliLog::kError);
236
237     // Generator Configuration
238     AliGenerator* gener = GeneratorFactory(srun);
239     gener->SetOrigin(0, 0, 0);    // vertex position
240     gener->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position
241     gener->SetCutVertexZ(1.);     // Truncate at 1 sigma
242     gener->SetVertexSmear(kPerEvent); 
243     gener->SetTrackingFlag(1);
244     gener->Init();
245     
246     if (smag == k2kG) {
247         comment = comment.Append(" | L3 field 0.2 T");
248     } else if (smag == k4kG) {
249         comment = comment.Append(" | L3 field 0.4 T");
250     } else if (smag == k5kG) {
251         comment = comment.Append(" | L3 field 0.5 T");
252     }
253     
254     
255     if (srad == kGluonRadiation)
256     {
257         comment = comment.Append(" | Gluon Radiation On");
258         
259     } else {
260         comment = comment.Append(" | Gluon Radiation Off");
261     }
262
263     if (sgeo == kHoles)
264     {
265         comment = comment.Append(" | Holes for PHOS/RICH");
266         
267     } else {
268         comment = comment.Append(" | No holes for PHOS/RICH");
269     }
270
271     printf("\n \n Comment: %s \n \n", comment.Data());
272     
273     
274 // Field (L3 0.4 T)
275     AliMagFMaps* field = new AliMagFMaps("Maps","Maps", 2, 1., 10., smag);
276     field->SetL3ConstField(0); //Using const. field in the barrel
277     rl->CdGAFile();
278     gAlice->SetField(field);    
279 //
280     Int_t   iABSO   = 1;
281     Int_t   iDIPO   = 1;
282     Int_t   iFMD    = 1;
283     Int_t   iFRAME  = 1;
284     Int_t   iHALL   = 1;
285     Int_t   iITS    = 1;
286     Int_t   iMAG    = 1;
287     Int_t   iMUON   = 1;
288     Int_t   iPHOS   = 1;
289     Int_t   iPIPE   = 1;
290     Int_t   iPMD    = 1;
291     Int_t   iRICH   = 1;
292     Int_t   iSHIL   = 1;
293     Int_t   iSTART  = 1;
294     Int_t   iTOF    = 1;
295     Int_t   iTPC    = 1;
296     Int_t   iTRD    = 1;
297     Int_t   iZDC    = 1;
298     Int_t   iEMCAL  = 1;
299     Int_t   iVZERO  = 1;
300     Int_t   iCRT    = 0;
301
302     //=================== Alice BODY parameters =============================
303     AliBODY *BODY = new AliBODY("BODY", "Alice envelop");
304
305
306     if (iMAG)
307     {
308         //=================== MAG parameters ============================
309         // --- Start with Magnet since detector layouts may be depending ---
310         // --- on the selected Magnet dimensions ---
311         AliMAG *MAG = new AliMAG("MAG", "Magnet");
312     }
313
314
315     if (iABSO)
316     {
317         //=================== ABSO parameters ============================
318         AliABSO *ABSO = new AliABSOv0("ABSO", "Muon Absorber");
319     }
320
321     if (iDIPO)
322     {
323         //=================== DIPO parameters ============================
324
325         AliDIPO *DIPO = new AliDIPOv2("DIPO", "Dipole version 2");
326     }
327
328     if (iHALL)
329     {
330         //=================== HALL parameters ============================
331
332         AliHALL *HALL = new AliHALL("HALL", "Alice Hall");
333     }
334
335
336     if (iFRAME)
337     {
338         //=================== FRAME parameters ============================
339
340         AliFRAMEv2 *FRAME = new AliFRAMEv2("FRAME", "Space Frame");
341         if (sgeo == kHoles) {
342             FRAME->SetHoles(1);
343         } else {
344             FRAME->SetHoles(0);
345         }
346     }
347
348     if (iSHIL)
349     {
350         //=================== SHIL parameters ============================
351
352         AliSHIL *SHIL = new AliSHILv2("SHIL", "Shielding Version 2");
353     }
354
355
356     if (iPIPE)
357     {
358         //=================== PIPE parameters ============================
359
360         AliPIPE *PIPE = new AliPIPEv0("PIPE", "Beam Pipe");
361     }
362  
363     if(iITS) {
364
365     //=================== ITS parameters ============================
366     //
367     // As the innermost detector in ALICE, the Inner Tracking System "impacts" on
368     // almost all other detectors. This involves the fact that the ITS geometry
369     // still has several options to be followed in parallel in order to determine
370     // the best set-up which minimizes the induced background. All the geometries
371     // available to date are described in the following. Read carefully the comments
372     // and use the default version (the only one uncommented) unless you are making
373     // comparisons and you know what you are doing. In this case just uncomment the
374     // ITS geometry you want to use and run Aliroot.
375     //
376     // Detailed geometries:         
377     //
378     //
379     //AliITS *ITS  = new AliITSv5symm("ITS","Updated ITS TDR detailed version with symmetric services");
380     //
381     //AliITS *ITS  = new AliITSv5asymm("ITS","Updates ITS TDR detailed version with asymmetric services");
382     //
383         AliITSvPPRasymmFMD *ITS  = new AliITSvPPRasymmFMD("ITS","New ITS PPR detailed version with asymmetric services");
384         ITS->SetMinorVersion(2);  // don't touch this parameter if you're not an ITS developer
385         ITS->SetReadDet(kTRUE);   // don't touch this parameter if you're not an ITS developer
386     //    ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det");  // don't touch this parameter if you're not an ITS developer
387         ITS->SetThicknessDet1(200.);   // detector thickness on layer 1 must be in the range [100,300]
388         ITS->SetThicknessDet2(200.);   // detector thickness on layer 2 must be in the range [100,300]
389         ITS->SetThicknessChip1(200.);  // chip thickness on layer 1 must be in the range [150,300]
390         ITS->SetThicknessChip2(200.);  // chip thickness on layer 2 must be in the range [150,300]
391         ITS->SetRails(0);            // 1 --> rails in ; 0 --> rails out
392         ITS->SetCoolingFluid(1);   // 1 --> water ; 0 --> freon
393
394     // Coarse geometries (warning: no hits are produced with these coarse geometries and they unuseful 
395     // for reconstruction !):
396     //                                                     
397     //
398     //AliITSvPPRcoarseasymm *ITS  = new AliITSvPPRcoarseasymm("ITS","New ITS PPR coarse version with asymmetric services");
399     //ITS->SetRails(0);                // 1 --> rails in ; 0 --> rails out
400     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
401     //
402     //AliITS *ITS  = new AliITSvPPRcoarsesymm("ITS","New ITS PPR coarse version with symmetric services");
403     //ITS->SetRails(0);                // 1 --> rails in ; 0 --> rails out
404     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
405     //                      
406     //
407     //
408     // Geant3 <-> EUCLID conversion
409     // ============================
410     //
411     // SetEUCLID is a flag to output (=1) or not to output (=0) both geometry and
412     // media to two ASCII files (called by default ITSgeometry.euc and
413     // ITSgeometry.tme) in a format understandable to the CAD system EUCLID.
414     // The default (=0) means that you dont want to use this facility.
415     //
416         ITS->SetEUCLID(0);  
417     }
418
419     if (iTPC)
420     {
421       //============================ TPC parameters =====================
422         AliTPC *TPC = new AliTPCv2("TPC", "Default");
423     }
424
425
426     if (iTOF) {
427         //=================== TOF parameters ============================
428         AliTOF *TOF = new AliTOFv4T0("TOF", "normal TOF");
429     }
430
431
432     if (iRICH)
433     {
434         //=================== RICH parameters ===========================
435         AliRICH *RICH = new AliRICHv1("RICH", "normal RICH");
436
437     }
438
439
440     if (iZDC)
441     {
442         //=================== ZDC parameters ============================
443
444         AliZDC *ZDC = new AliZDCv2("ZDC", "normal ZDC");
445     }
446
447     if (iTRD)
448     {
449         //=================== TRD parameters ============================
450
451         AliTRD *TRD = new AliTRDv1("TRD", "TRD slow simulator");
452
453         // Select the gas mixture (0: 97% Xe + 3% isobutane, 1: 90% Xe + 10% CO2)
454         TRD->SetGasMix(1);
455         if (sgeo == kHoles) {
456             // With hole in front of PHOS
457             TRD->SetPHOShole();
458             // With hole in front of RICH
459             TRD->SetRICHhole();
460         }
461             // Switch on TR
462             AliTRDsim *TRDsim = TRD->CreateTR();
463     }
464
465     if (iFMD)
466     {
467         //=================== FMD parameters ============================
468         AliFMD *FMD = new AliFMDv1("FMD", "normal FMD");
469    }
470
471     if (iMUON)
472     {
473         //=================== MUON parameters ===========================
474         // New MUONv1 version (geometry defined via builders)
475         AliMUON *MUON = new AliMUONv1("MUON", "default");
476     }
477     //=================== PHOS parameters ===========================
478
479     if (iPHOS)
480     {
481         AliPHOS *PHOS = new AliPHOSv1("PHOS", "IHEP");
482     }
483
484
485     if (iPMD)
486     {
487         //=================== PMD parameters ============================
488         AliPMD *PMD = new AliPMDv1("PMD", "normal PMD");
489     }
490
491     if (iSTART)
492     {
493         //=================== START parameters ============================
494         AliSTART *START = new AliSTARTv1("START", "START Detector");
495     }
496
497     if (iEMCAL)
498     {
499         //=================== EMCAL parameters ============================
500         AliEMCAL *EMCAL = new AliEMCALv2("EMCAL", "SHISH");
501     }
502
503      if (iCRT)
504     {
505         //=================== CRT parameters ============================
506         AliCRT *CRT = new AliCRTv0("CRT", "normal ACORDE");
507     }
508
509      if (iVZERO)
510     {
511         //=================== CRT parameters ============================
512         AliVZERO *VZERO = new AliVZEROv5("VZERO", "normal VZERO");
513     }
514  
515              
516 }
517
518 Float_t EtaToTheta(Float_t arg){
519   return (180./TMath::Pi())*2.*atan(exp(-arg));
520 }
521
522
523
524 AliGenerator* GeneratorFactory(PprRun_t srun) {
525     Int_t isw = 3;
526     if (srad == kNoGluonRadiation) isw = 0;
527     
528
529     AliGenerator * gGener = 0x0;
530     switch (srun) {
531     case test50:
532       {
533         comment = comment.Append(":HIJINGparam test 50 particles");
534         AliGenHIJINGpara *gener = new AliGenHIJINGpara(50);
535         gener->SetMomentumRange(0, 999999.);
536         gener->SetPhiRange(0., 360.);
537         // Set pseudorapidity range from -8 to 8.
538         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
539         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
540         gener->SetThetaRange(thmin,thmax);
541         gGener=gener;
542       }
543       break;
544     case kParam_8000:
545       {
546         comment = comment.Append(":HIJINGparam N=8000");
547         AliGenHIJINGpara *gener = new AliGenHIJINGpara(86030);
548         gener->SetMomentumRange(0, 999999.);
549         gener->SetPhiRange(0., 360.);
550         // Set pseudorapidity range from -8 to 8.
551         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
552         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
553         gener->SetThetaRange(thmin,thmax);
554         gGener=gener;
555       }
556       break;
557     case kParam_4000:
558       {
559         comment = comment.Append("HIJINGparam N=4000");
560         AliGenHIJINGpara *gener = new AliGenHIJINGpara(43015);
561         gener->SetMomentumRange(0, 999999.);
562         gener->SetPhiRange(0., 360.);
563         // Set pseudorapidity range from -8 to 8.
564         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
565         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
566         gener->SetThetaRange(thmin,thmax);
567         gGener=gener;
568       }
569         break;
570     case kParam_2000:
571       {
572         comment = comment.Append("HIJINGparam N=2000");
573         AliGenHIJINGpara *gener = new AliGenHIJINGpara(21507);
574         gener->SetMomentumRange(0, 999999.);
575         gener->SetPhiRange(0., 360.);
576         // Set pseudorapidity range from -8 to 8.
577         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
578         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
579         gener->SetThetaRange(thmin,thmax);
580         gGener=gener;
581       }
582       break;
583 //
584 //  Hijing Central
585 //
586     case kHijing_cent1:
587       {
588         comment = comment.Append("HIJING cent1");
589         AliGenHijing *gener = HijingStandard();
590 // impact parameter range
591         gener->SetImpactParameterRange(0., 5.);
592         gGener=gener;
593       }
594       break;
595     case kHijing_cent2:
596       {
597         comment = comment.Append("HIJING cent2");
598         AliGenHijing *gener = HijingStandard();
599 // impact parameter range
600         gener->SetImpactParameterRange(0., 2.);
601         gGener=gener;
602       }
603       break;
604 //
605 // Hijing Peripheral 
606 //
607     case kHijing_per1:
608       {
609         comment = comment.Append("HIJING per1");
610         AliGenHijing *gener = HijingStandard();
611 // impact parameter range
612         gener->SetImpactParameterRange(5., 8.6);
613         gGener=gener;
614       }
615       break;
616     case kHijing_per2:
617       {
618         comment = comment.Append("HIJING per2");
619         AliGenHijing *gener = HijingStandard();
620 // impact parameter range
621         gener->SetImpactParameterRange(8.6, 11.2);
622         gGener=gener;
623       }
624       break;
625     case kHijing_per3:
626       {
627         comment = comment.Append("HIJING per3");
628         AliGenHijing *gener = HijingStandard();
629 // impact parameter range
630         gener->SetImpactParameterRange(11.2, 13.2);
631         gGener=gener;
632       }
633       break;
634     case kHijing_per4:
635       {
636         comment = comment.Append("HIJING per4");
637         AliGenHijing *gener = HijingStandard();
638 // impact parameter range
639         gener->SetImpactParameterRange(13.2, 15.);
640         gGener=gener;
641       }
642       break;
643     case kHijing_per5:
644       {
645         comment = comment.Append("HIJING per5");
646         AliGenHijing *gener = HijingStandard();
647 // impact parameter range
648         gener->SetImpactParameterRange(15., 100.);
649         gGener=gener;
650       }
651       break;
652 //
653 //  Jet-Jet
654 //
655     case kHijing_jj25:
656       {
657         comment = comment.Append("HIJING Jet 25 GeV");
658         AliGenHijing *gener = HijingStandard();
659 // impact parameter range
660         gener->SetImpactParameterRange(0., 5.);
661         // trigger
662         gener->SetTrigger(1);
663         gener->SetPtJet(25.);
664         gener->SetRadiation(isw);
665         gener->SetSimpleJets(!isw);
666         gener->SetJetEtaRange(-0.3,0.3);
667         gener->SetJetPhiRange(75., 165.);   
668         gGener=gener;
669       }
670       break;
671
672     case kHijing_jj50:
673       {
674         comment = comment.Append("HIJING Jet 50 GeV");
675         AliGenHijing *gener = HijingStandard();
676 // impact parameter range
677         gener->SetImpactParameterRange(0., 5.);
678         // trigger
679         gener->SetTrigger(1);
680         gener->SetPtJet(50.);
681         gener->SetRadiation(isw);
682         gener->SetSimpleJets(!isw);
683         gener->SetJetEtaRange(-0.3,0.3);
684         gener->SetJetPhiRange(75., 165.);   
685         gGener=gener;
686       }
687         break;
688
689     case kHijing_jj75:
690       {
691         comment = comment.Append("HIJING Jet 75 GeV");
692         AliGenHijing *gener = HijingStandard();
693 // impact parameter range
694         gener->SetImpactParameterRange(0., 5.);
695         // trigger
696         gener->SetTrigger(1);
697         gener->SetPtJet(75.);
698         gener->SetRadiation(isw);
699         gener->SetSimpleJets(!isw);
700         gener->SetJetEtaRange(-0.3,0.3);
701         gener->SetJetPhiRange(75., 165.);   
702         gGener=gener;
703       }
704       break;
705
706     case kHijing_jj100:
707       {
708         comment = comment.Append("HIJING Jet 100 GeV");
709         AliGenHijing *gener = HijingStandard();
710 // impact parameter range
711         gener->SetImpactParameterRange(0., 5.);
712         // trigger
713         gener->SetTrigger(1);
714         gener->SetPtJet(100.);
715         gener->SetRadiation(isw);
716         gener->SetSimpleJets(!isw);
717         gener->SetJetEtaRange(-0.3,0.3);
718         gener->SetJetPhiRange(75., 165.);   
719         gGener=gener;
720       }
721       break;
722
723     case kHijing_jj200:
724       {
725         comment = comment.Append("HIJING Jet 200 GeV");
726         AliGenHijing *gener = HijingStandard();
727 // impact parameter range
728         gener->SetImpactParameterRange(0., 5.);
729         // trigger
730         gener->SetTrigger(1);
731         gener->SetPtJet(200.);
732         gener->SetRadiation(isw);
733         gener->SetSimpleJets(!isw);
734         gener->SetJetEtaRange(-0.3,0.3);
735         gener->SetJetPhiRange(75., 165.);   
736         gGener=gener;
737       }
738       break;
739 //
740 // Gamma-Jet
741 //
742     case kHijing_gj25:
743       {
744         comment = comment.Append("HIJING Gamma 25 GeV");
745         AliGenHijing *gener = HijingStandard();
746 // impact parameter range
747         gener->SetImpactParameterRange(0., 5.);
748         // trigger
749         gener->SetTrigger(2);
750         gener->SetPtJet(25.);
751         gener->SetRadiation(isw);
752         gener->SetSimpleJets(!isw);
753         gener->SetJetEtaRange(-0.12, 0.12);
754         gener->SetJetPhiRange(220., 320.);
755         gGener=gener;
756       }
757       break;
758
759     case kHijing_gj50:
760       {
761         comment = comment.Append("HIJING Gamma 50 GeV");
762         AliGenHijing *gener = HijingStandard();
763 // impact parameter range
764         gener->SetImpactParameterRange(0., 5.);
765         // trigger
766         gener->SetTrigger(2);
767         gener->SetPtJet(50.);
768         gener->SetRadiation(isw);
769         gener->SetSimpleJets(!isw);
770         gener->SetJetEtaRange(-0.12, 0.12);
771         gener->SetJetPhiRange(220., 320.);
772         gGener=gener;
773       }
774       break;
775
776     case kHijing_gj75:
777       {
778         comment = comment.Append("HIJING Gamma 75 GeV");
779         AliGenHijing *gener = HijingStandard();
780 // impact parameter range
781         gener->SetImpactParameterRange(0., 5.);
782         // trigger
783         gener->SetTrigger(2);
784         gener->SetPtJet(75.);
785         gener->SetRadiation(isw);
786         gener->SetSimpleJets(!isw);
787         gener->SetJetEtaRange(-0.12, 0.12);
788         gener->SetJetPhiRange(220., 320.);
789         gGener=gener;
790       }
791       break;
792
793     case kHijing_gj100:
794       {
795         comment = comment.Append("HIJING Gamma 100 GeV");
796         AliGenHijing *gener = HijingStandard();
797 // impact parameter range
798         gener->SetImpactParameterRange(0., 5.);
799         // trigger
800         gener->SetTrigger(2);
801         gener->SetPtJet(100.);
802         gener->SetRadiation(isw);
803         gener->SetSimpleJets(!isw);
804         gener->SetJetEtaRange(-0.12, 0.12);
805         gener->SetJetPhiRange(220., 320.);
806         gGener=gener;
807       }
808       break;
809
810     case kHijing_gj200:
811       {
812         comment = comment.Append("HIJING Gamma 200 GeV");
813         AliGenHijing *gener = HijingStandard();
814 // impact parameter range
815         gener->SetImpactParameterRange(0., 5.);
816         // trigger
817         gener->SetTrigger(2);
818         gener->SetPtJet(200.);
819         gener->SetRadiation(isw);
820         gener->SetSimpleJets(!isw);
821         gener->SetJetEtaRange(-0.12, 0.12);
822         gener->SetJetPhiRange(220., 320.);
823         gGener=gener;
824       }
825       break;
826     case kHijing_pA:
827       {
828         comment = comment.Append("HIJING pA");
829
830         AliGenCocktail *gener  = new AliGenCocktail();
831
832         AliGenHijing   *hijing = new AliGenHijing(-1);
833 // centre of mass energy 
834         hijing->SetEnergyCMS(TMath::Sqrt(82./208.) * 14000.);
835 // impact parameter range
836         hijing->SetImpactParameterRange(0., 15.);
837 // reference frame
838         hijing->SetReferenceFrame("CMS");
839         hijing->SetBoostLHC(1);
840 // projectile
841         hijing->SetProjectile("P", 1, 1);
842         hijing->SetTarget    ("A", 208, 82);
843 // tell hijing to keep the full parent child chain
844         hijing->KeepFullEvent();
845 // enable jet quenching
846         hijing->SetJetQuenching(0);
847 // enable shadowing
848         hijing->SetShadowing(1);
849 // Don't track spectators
850         hijing->SetSpectators(0);
851 // kinematic selection
852         hijing->SetSelectAll(0);
853 //
854         AliGenSlowNucleons*  gray    = new AliGenSlowNucleons(1);
855         AliSlowNucleonModel* model   = new AliSlowNucleonModelExp();
856         gray->SetSlowNucleonModel(model);
857         gray->SetDebug(1);
858         gener->AddGenerator(hijing,"Hijing pPb", 1);
859         gener->AddGenerator(gray,  "Gray Particles",1);
860         gGener=gener;
861       }
862       break;
863     case kPythia6:
864       {
865         comment = comment.Append(":Pythia p-p @ 14 TeV");
866         AliGenPythia *gener = new AliGenPythia(-1); 
867         gener->SetMomentumRange(0,999999);
868         gener->SetThetaRange(0., 180.);
869         gener->SetYRange(-12,12);
870         gener->SetPtRange(0,1000);
871         gener->SetProcess(kPyMb);
872         gener->SetEnergyCMS(14000.);
873         gGener=gener;
874       }
875       break;
876     case kPythia6Jets20_24:
877       {
878         comment = comment.Append(":Pythia jets 20-24 GeV @ 5.5 TeV");
879         AliGenPythia * gener = new AliGenPythia(-1);
880         gener->SetEnergyCMS(5500.);//        Centre of mass energy
881         gener->SetProcess(kPyJets);//        Process type
882         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
883         gener->SetJetPhiRange(0., 360.);
884         gener->SetJetEtRange(10., 1000.);
885         gener->SetGluonRadiation(1,1);
886         //    gener->SetPtKick(0.);
887         //   Structure function
888         gener->SetStrucFunc(kCTEQ4L);
889         gener->SetPtHard(20., 24.);// Pt transfer of the hard scattering
890         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
891         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
892         gGener=gener;
893       }
894       break;
895     case kPythia6Jets24_29:
896       {
897         comment = comment.Append(":Pythia jets 24-29 GeV @ 5.5 TeV");
898         AliGenPythia * gener = new AliGenPythia(-1);
899         gener->SetEnergyCMS(5500.);//        Centre of mass energy
900         gener->SetProcess(kPyJets);//        Process type
901         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
902         gener->SetJetPhiRange(0., 360.);
903         gener->SetJetEtRange(10., 1000.);
904         gener->SetGluonRadiation(1,1);
905         //    gener->SetPtKick(0.);
906         //   Structure function
907         gener->SetStrucFunc(kCTEQ4L);
908         gener->SetPtHard(24., 29.);// Pt transfer of the hard scattering
909         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
910         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
911         gGener=gener;
912       }
913       break;
914     case kPythia6Jets29_35:
915       {
916         comment = comment.Append(":Pythia jets 29-35 GeV @ 5.5 TeV");
917         AliGenPythia * gener = new AliGenPythia(-1);
918         gener->SetEnergyCMS(5500.);//        Centre of mass energy
919         gener->SetProcess(kPyJets);//        Process type
920         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
921         gener->SetJetPhiRange(0., 360.);
922         gener->SetJetEtRange(10., 1000.);
923         gener->SetGluonRadiation(1,1);
924         //    gener->SetPtKick(0.);
925         //   Structure function
926         gener->SetStrucFunc(kCTEQ4L);
927         gener->SetPtHard(29., 35.);// Pt transfer of the hard scattering
928         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
929         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
930         gGener=gener;
931       }
932       break;
933     case kPythia6Jets35_42:
934       {
935         comment = comment.Append(":Pythia jets 35-42 GeV @ 5.5 TeV");
936         AliGenPythia * gener = new AliGenPythia(-1);
937         gener->SetEnergyCMS(5500.);//        Centre of mass energy
938         gener->SetProcess(kPyJets);//        Process type
939         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
940         gener->SetJetPhiRange(0., 360.);
941         gener->SetJetEtRange(10., 1000.);
942         gener->SetGluonRadiation(1,1);
943         //    gener->SetPtKick(0.);
944         //   Structure function
945         gener->SetStrucFunc(kCTEQ4L);
946         gener->SetPtHard(35., 42.);// Pt transfer of the hard scattering
947         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
948         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
949         gGener=gener;
950       }
951       break;
952     case kPythia6Jets42_50:
953       {
954         comment = comment.Append(":Pythia jets 42-50 GeV @ 5.5 TeV");
955         AliGenPythia * gener = new AliGenPythia(-1);
956         gener->SetEnergyCMS(5500.);//        Centre of mass energy
957         gener->SetProcess(kPyJets);//        Process type
958         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
959         gener->SetJetPhiRange(0., 360.);
960         gener->SetJetEtRange(10., 1000.);
961         gener->SetGluonRadiation(1,1);
962         //    gener->SetPtKick(0.);
963         //   Structure function
964         gener->SetStrucFunc(kCTEQ4L);
965         gener->SetPtHard(42., 50.);// Pt transfer of the hard scattering
966         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
967         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
968         gGener=gener;
969       }
970       break;
971     case kPythia6Jets50_60:
972       {
973         comment = comment.Append(":Pythia jets 50-60 GeV @ 5.5 TeV");
974         AliGenPythia * gener = new AliGenPythia(-1);
975         gener->SetEnergyCMS(5500.);//        Centre of mass energy
976         gener->SetProcess(kPyJets);//        Process type
977         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
978         gener->SetJetPhiRange(0., 360.);
979         gener->SetJetEtRange(10., 1000.);
980         gener->SetGluonRadiation(1,1);
981         //    gener->SetPtKick(0.);
982         //   Structure function
983         gener->SetStrucFunc(kCTEQ4L);
984         gener->SetPtHard(50., 60.);// Pt transfer of the hard scattering
985         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
986         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
987         gGener=gener;
988       }
989       break;
990     case kPythia6Jets60_72:
991       {
992         comment = comment.Append(":Pythia jets 60-72 GeV @ 5.5 TeV");
993         AliGenPythia * gener = new AliGenPythia(-1);
994         gener->SetEnergyCMS(5500.);//        Centre of mass energy
995         gener->SetProcess(kPyJets);//        Process type
996         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
997         gener->SetJetPhiRange(0., 360.);
998         gener->SetJetEtRange(10., 1000.);
999         gener->SetGluonRadiation(1,1);
1000         //    gener->SetPtKick(0.);
1001         //   Structure function
1002         gener->SetStrucFunc(kCTEQ4L);
1003         gener->SetPtHard(60., 72.);// Pt transfer of the hard scattering
1004         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1005         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1006         gGener=gener;
1007       }
1008       break;
1009     case kPythia6Jets72_86:
1010       {
1011         comment = comment.Append(":Pythia jets 72-86 GeV @ 5.5 TeV");
1012         AliGenPythia * gener = new AliGenPythia(-1);
1013         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1014         gener->SetProcess(kPyJets);//        Process type
1015         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1016         gener->SetJetPhiRange(0., 360.);
1017         gener->SetJetEtRange(10., 1000.);
1018         gener->SetGluonRadiation(1,1);
1019         //    gener->SetPtKick(0.);
1020         //   Structure function
1021         gener->SetStrucFunc(kCTEQ4L);
1022         gener->SetPtHard(72., 86.);// Pt transfer of the hard scattering
1023         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1024         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1025         gGener=gener;
1026       }
1027       break;
1028     case kPythia6Jets86_104:
1029       {
1030         comment = comment.Append(":Pythia jets 86-104 GeV @ 5.5 TeV");
1031         AliGenPythia * gener = new AliGenPythia(-1);
1032         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1033         gener->SetProcess(kPyJets);//        Process type
1034         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1035         gener->SetJetPhiRange(0., 360.);
1036         gener->SetJetEtRange(10., 1000.);
1037         gener->SetGluonRadiation(1,1);
1038         //    gener->SetPtKick(0.);
1039         //   Structure function
1040         gener->SetStrucFunc(kCTEQ4L);
1041         gener->SetPtHard(86., 104.);// Pt transfer of the hard scattering
1042         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1043         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1044         gGener=gener;
1045       }
1046       break;
1047     case kPythia6Jets104_125:
1048       {
1049         comment = comment.Append(":Pythia jets 105-125 GeV @ 5.5 TeV");
1050         AliGenPythia * gener = new AliGenPythia(-1);
1051         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1052         gener->SetProcess(kPyJets);//        Process type
1053         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1054         gener->SetJetPhiRange(0., 360.);
1055         gener->SetJetEtRange(10., 1000.);
1056         gener->SetGluonRadiation(1,1);
1057         //    gener->SetPtKick(0.);
1058         //   Structure function
1059         gener->SetStrucFunc(kCTEQ4L);
1060         gener->SetPtHard(104., 125.);// Pt transfer of the hard scattering
1061         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1062         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1063         gGener=gener;
1064       }
1065       break;
1066     case kPythia6Jets125_150:
1067       {
1068         comment = comment.Append(":Pythia jets 125-150 GeV @ 5.5 TeV");
1069         AliGenPythia * gener = new AliGenPythia(-1);
1070         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1071         gener->SetProcess(kPyJets);//        Process type
1072         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1073         gener->SetJetPhiRange(0., 360.);
1074         gener->SetJetEtRange(10., 1000.);
1075         gener->SetGluonRadiation(1,1);
1076         //    gener->SetPtKick(0.);
1077         //   Structure function
1078         gener->SetStrucFunc(kCTEQ4L);
1079         gener->SetPtHard(125., 150.);// Pt transfer of the hard scattering
1080         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1081         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1082         gGener=gener;
1083       }
1084       break;
1085     case kPythia6Jets150_180:
1086       {
1087         comment = comment.Append(":Pythia jets 150-180 GeV @ 5.5 TeV");
1088         AliGenPythia * gener = new AliGenPythia(-1);
1089         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1090         gener->SetProcess(kPyJets);//        Process type
1091         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1092         gener->SetJetPhiRange(0., 360.);
1093         gener->SetJetEtRange(10., 1000.);
1094         gener->SetGluonRadiation(1,1);
1095         //    gener->SetPtKick(0.);
1096         //   Structure function
1097         gener->SetStrucFunc(kCTEQ4L);
1098         gener->SetPtHard(150., 180.);// Pt transfer of the hard scattering
1099         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1100         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1101         gGener=gener;
1102       }
1103       break;
1104     case kD0PbPb5500:
1105       {
1106         comment = comment.Append(" D0 in Pb-Pb at 5.5 TeV");
1107         AliGenPythia * gener = new AliGenPythia(10);
1108         gener->SetProcess(kPyD0PbPbMNR);
1109         gener->SetStrucFunc(kCTEQ4L);
1110         gener->SetPtHard(2.1,-1.0);
1111         gener->SetEnergyCMS(5500.);
1112         gener->SetNuclei(208,208);
1113         gener->SetForceDecay(kHadronicD);
1114         gener->SetYRange(-2,2);
1115         gener->SetFeedDownHigherFamily(kFALSE);
1116         gener->SetStackFillOpt(AliGenPythia::kParentSelection);
1117         gener->SetCountMode(AliGenPythia::kCountParents);
1118         gGener=gener;
1119       }
1120       break;
1121     case kCharmSemiElPbPb5500:
1122       {
1123         comment = comment.Append(" Charm in Pb-Pb at 5.5 TeV");
1124         AliGenPythia * gener = new AliGenPythia(10);
1125         gener->SetProcess(kPyCharmPbPbMNR);
1126         gener->SetStrucFunc(kCTEQ4L);
1127         gener->SetPtHard(2.1,-1.0);
1128         gener->SetEnergyCMS(5500.);
1129         gener->SetNuclei(208,208);
1130         gener->SetForceDecay(kSemiElectronic);
1131         gener->SetYRange(-2,2);
1132         gener->SetFeedDownHigherFamily(kFALSE);
1133         gener->SetCountMode(AliGenPythia::kCountParents);
1134         gGener=gener;
1135       }
1136       break;
1137     case kBeautySemiElPbPb5500:
1138       {
1139         comment = comment.Append(" Beauty in Pb-Pb at 5.5 TeV");
1140         AliGenPythia *gener = new AliGenPythia(10);
1141         gener->SetProcess(kPyBeautyPbPbMNR);
1142         gener->SetStrucFunc(kCTEQ4L);
1143         gener->SetPtHard(2.75,-1.0);
1144         gener->SetEnergyCMS(5500.);
1145         gener->SetNuclei(208,208);
1146         gener->SetForceDecay(kSemiElectronic);
1147         gener->SetYRange(-2,2);
1148         gener->SetFeedDownHigherFamily(kFALSE);
1149         gener->SetCountMode(AliGenPythia::kCountParents);
1150         gGener=gener;
1151       }
1152       break;
1153     case kCocktailTRD:
1154       {
1155         comment = comment.Append(" Cocktail for TRD at 5.5 TeV");
1156         AliGenCocktail *gener  = new AliGenCocktail();
1157         
1158         AliGenParam *phi = new AliGenParam(10,
1159                                            new AliGenMUONlib(),
1160                                            AliGenMUONlib::kPhi,
1161                                            "Vogt PbPb");
1162
1163         phi->SetPtRange(0, 100);
1164         phi->SetYRange(-1., +1.);
1165         phi->SetForceDecay(kDiElectron);
1166
1167         AliGenParam *omega = new AliGenParam(10,
1168                                              new AliGenMUONlib(),
1169                                              AliGenMUONlib::kOmega,
1170                                              "Vogt PbPb");
1171
1172         omega->SetPtRange(0, 100);
1173         omega->SetYRange(-1., +1.);
1174         omega->SetForceDecay(kDiElectron);
1175         
1176         AliGenParam *jpsi = new AliGenParam(10,
1177                                             new AliGenMUONlib(),
1178                                             AliGenMUONlib::kJpsiFamily,
1179                                             "Vogt PbPb");
1180
1181         jpsi->SetPtRange(0, 100);
1182         jpsi->SetYRange(-1., +1.);
1183         jpsi->SetForceDecay(kDiElectron);
1184
1185         AliGenParam *ups = new AliGenParam(10,
1186                                            new AliGenMUONlib(),
1187                                            AliGenMUONlib::kUpsilonFamily,
1188                                            "Vogt PbPb");
1189         ups->SetPtRange(0, 100);
1190         ups->SetYRange(-1., +1.);
1191         ups->SetForceDecay(kDiElectron);
1192         
1193         AliGenParam *charm = new AliGenParam(10,
1194                                              new AliGenMUONlib(), 
1195                                              AliGenMUONlib::kCharm,
1196                                              "central");
1197         charm->SetPtRange(0, 100);
1198         charm->SetYRange(-1.5, +1.5);
1199         charm->SetForceDecay(kSemiElectronic);
1200         
1201         
1202         AliGenParam *beauty = new AliGenParam(10,
1203                                               new AliGenMUONlib(), 
1204                                               AliGenMUONlib::kBeauty,
1205                                               "central");
1206         beauty->SetPtRange(0, 100);
1207         beauty->SetYRange(-1.5, +1.5);
1208         beauty->SetForceDecay(kSemiElectronic);
1209
1210         AliGenParam *beautyJ = new AliGenParam(10,
1211                                                new AliGenMUONlib(), 
1212                                                AliGenMUONlib::kBeauty,
1213                                                "central");
1214         beautyJ->SetPtRange(0, 100);
1215         beautyJ->SetYRange(-1.5, +1.5);
1216         beautyJ->SetForceDecay(kBJpsiDiElectron);
1217
1218         gener->AddGenerator(phi,"Phi",1);
1219         gener->AddGenerator(omega,"Omega",1);
1220         gener->AddGenerator(jpsi,"J/psi",1);
1221         gener->AddGenerator(ups,"Upsilon",1);
1222         gener->AddGenerator(charm,"Charm",1);
1223         gener->AddGenerator(beauty,"Beauty",1);
1224         gener->AddGenerator(beautyJ,"J/Psi from Beauty",1);
1225         gGener=gener;
1226       }
1227       break;
1228     case kPyJJ:
1229       {
1230         comment = comment.Append(" Jet-jet at 5.5 TeV");
1231         AliGenPythia *gener = new AliGenPythia(-1);
1232         gener->SetEnergyCMS(5500.);
1233         gener->SetProcess(kPyJets);
1234         Double_t ptHardMin=10.0, ptHardMax=-1.0;
1235         gener->SetPtHard(ptHardMin,ptHardMax);
1236         gener->SetYHard(-0.7,0.7);
1237         gener->SetJetEtaRange(-0.2,0.2);
1238         gener->SetEventListRange(0,1);
1239         gGener=gener;
1240       }
1241       break;
1242     case kPyGJ:
1243       {
1244         comment = comment.Append(" Gamma-jet at 5.5 TeV");
1245         AliGenPythia *gener = new AliGenPythia(-1);
1246         gener->SetEnergyCMS(5500.);
1247         gener->SetProcess(kPyDirectGamma);
1248         Double_t ptHardMin=10.0, ptHardMax=-1.0;
1249         gener->SetPtHard(ptHardMin,ptHardMax);
1250         gener->SetYHard(-1.0,1.0);
1251         gener->SetGammaEtaRange(-0.13,0.13);
1252         gener->SetGammaPhiRange(210.,330.);
1253         gener->SetEventListRange(0,1);
1254         gGener=gener;
1255       }
1256       break;
1257     case kMuonCocktailCent1:
1258       {
1259         comment = comment.Append(" Muon Cocktail Cent1");
1260         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1261         gener->SetPtRange(0.4,100.);       // Transverse momentum range   
1262         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1263         gener->SetYRange(-4.0,-2.4);
1264         gener->SetMuonPtCut(0.8);
1265         gener->SetMuonThetaCut(171.,178.);
1266         gener->SetMuonMultiplicity(2);
1267         gener->SetImpactParameterRange(12.,16.);  //Centrality class Cent1 for PDC04
1268         gGener=gener;
1269       }
1270       break;
1271     case kMuonCocktailPer1:
1272       {
1273         comment = comment.Append(" Muon Cocktail Per1");
1274         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1275         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1276         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1277         gener->SetYRange(-4.0,-2.4);
1278         gener->SetMuonPtCut(0.8);
1279         gener->SetMuonThetaCut(171.,178.);
1280         gener->SetMuonMultiplicity(2);
1281         gener->SetImpactParameterRange(5.,8.6);//Centrality class Per1 for PDC04
1282         gGener=gener;
1283       }
1284       break;
1285     case kMuonCocktailPer4:
1286       {
1287         comment = comment.Append(" Muon Cocktail Per4");
1288         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1289         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1290         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1291         gener->SetYRange(-4.0,-2.4);
1292         gener->SetMuonPtCut(0.8);
1293         gener->SetMuonThetaCut(171.,178.);
1294         gener->SetMuonMultiplicity(2);
1295         gener->SetImpactParameterRange(13.2,15.0);//Centrality class Per4 for PDC04
1296         gGener=gener;
1297       }
1298       break;
1299     case kMuonCocktailCent1HighPt:
1300       {
1301         comment = comment.Append(" Muon Cocktail HighPt Cent1");
1302         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1303         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1304         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1305         gener->SetYRange(-4.0,-2.4);
1306         gener->SetMuonPtCut(2.5);
1307         gener->SetMuonThetaCut(171.,178.);
1308         gener->SetMuonMultiplicity(2);
1309         gener->SetImpactParameterRange(0.,5.);  //Centrality class Cent1 for PDC04
1310         gGener=gener;
1311       }
1312       break;
1313     case kMuonCocktailPer1HighPt :
1314       {
1315         comment = comment.Append(" Muon Cocktail HighPt Per1");
1316         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1317         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1318         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1319         gener->SetYRange(-4.0,-2.4);
1320         gener->SetMuonPtCut(2.5);
1321         gener->SetMuonThetaCut(171.,178.);
1322         gener->SetMuonMultiplicity(2);
1323         gener->SetImpactParameterRange(5.,8.6);//Centrality class Per1 for PDC04
1324         gGener=gener;
1325       }
1326       break;
1327     case kMuonCocktailPer4HighPt:
1328       {
1329         comment = comment.Append(" Muon Cocktail HighPt Per4");
1330         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1331         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1332         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1333         gener->SetYRange(-4.0,-2.4);
1334         gener->SetMuonPtCut(2.5);
1335         gener->SetMuonThetaCut(171.,178.);
1336         gener->SetMuonMultiplicity(2);
1337         gener->SetImpactParameterRange(13.2,15.0);//Centrality class Per4 for PDC04
1338         gGener=gener;
1339       }
1340       break;
1341     case kMuonCocktailCent1Single:
1342       {
1343         comment = comment.Append(" Muon Cocktail Single Cent1");
1344         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1345         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1346         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1347         gener->SetYRange(-4.0,-2.4);
1348         gener->SetMuonPtCut(0.8);
1349         gener->SetMuonThetaCut(171.,178.);
1350         gener->SetMuonMultiplicity(1);
1351         gener->SetImpactParameterRange(0.,5.);  //Centrality class Cent1 for PDC04
1352         gGener=gener;
1353       }
1354       break;
1355     case kMuonCocktailPer1Single :
1356       {
1357         comment = comment.Append(" Muon Cocktail Single Per1");
1358         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1359         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1360         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1361         gener->SetYRange(-4.0,-2.4);
1362         gener->SetMuonPtCut(0.8);
1363         gener->SetMuonThetaCut(171.,178.);
1364         gener->SetMuonMultiplicity(1);
1365         gener->SetImpactParameterRange(5.,8.6);//Centrality class Per1 for PDC04
1366         gener->SetNumberOfParticipants(229.3);//Centrality class Per1 for PDC04
1367         gGener=gener;
1368       }
1369       break;
1370     case kMuonCocktailPer4Single:
1371       {
1372         comment = comment.Append(" Muon Cocktail Single Per4");
1373         AliGenMUONCocktail * gener = new AliGenMUONCocktail();
1374         gener->SetPtRange(0.0,100.);       // Transverse momentum range   
1375         gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
1376         gener->SetYRange(-4.0,-2.4);
1377         gener->SetMuonPtCut(0.8);
1378         gener->SetMuonThetaCut(171.,178.);
1379         gener->SetMuonMultiplicity(1);
1380         gener->SetImpactParameterRange(13.2,15.0);//Centrality class Per4 for PDC04
1381         gGener=gener;
1382       }
1383       break;
1384     case kFlow_2_2000:
1385     {
1386         comment = comment.Append(" Flow with dN/deta  = 2000, vn = 2%");
1387         gGener = GeVSimStandard(2000., 2.);
1388     }
1389     break;
1390     
1391     case kFlow_10_2000:
1392     {
1393         comment = comment.Append(" Flow with dN/deta  = 2000, vn = 10%");
1394         gGener = GeVSimStandard(2000., 10.);
1395     }
1396     break;
1397     
1398     case kFlow_6_2000:
1399     {
1400         comment = comment.Append(" Flow with dN/deta  = 2000, vn = 6%");
1401         gGener = GeVSimStandard(2000., 6.);
1402     }
1403     break;
1404     
1405     case kFlow_6_5000:
1406     {
1407         comment = comment.Append(" Flow with dN/deta  = 5000, vn = 6%");
1408         gGener = GeVSimStandard(5000., 6.);
1409     }
1410     break;
1411     case kHIJINGplus:
1412     {
1413         //
1414         // The cocktail
1415         AliGenCocktail *gener  = new AliGenCocktail();
1416
1417         //
1418         // Charm production by Pythia
1419         AliGenPythia * genpyc = new AliGenPythia(230);
1420         genpyc->SetProcess(kPyCharmPbPbMNR);
1421         genpyc->SetStrucFunc(kCTEQ4L);
1422         genpyc->SetPtHard(2.1,-1.0);
1423         genpyc->SetEnergyCMS(5500.);
1424         genpyc->SetNuclei(208,208);
1425         genpyc->SetYRange(-999,999);
1426         genpyc->SetForceDecay(kAll);
1427         genpyc->SetFeedDownHigherFamily(kFALSE);
1428         genpyc->SetCountMode(AliGenPythia::kCountParents);
1429         //
1430         // Beauty production by Pythia
1431         AliGenPythia * genpyb = new AliGenPythia(9);
1432         genpyb->SetProcess(kPyBeautyPbPbMNR);
1433         genpyb->SetStrucFunc(kCTEQ4L);
1434         genpyb->SetPtHard(2.75,-1.0);
1435         genpyb->SetEnergyCMS(5500.);
1436         genpyb->SetNuclei(208,208);
1437         genpyb->SetYRange(-999,999);
1438         genpyb->SetForceDecay(kAll);
1439         genpyb->SetFeedDownHigherFamily(kFALSE);
1440         genpyb->SetCountMode(AliGenPythia::kCountParents);
1441         //
1442         // Hyperons
1443         //
1444         AliGenSTRANGElib *lib = new AliGenSTRANGElib();
1445         Int_t particle;
1446         // Xi
1447         particle = AliGenSTRANGElib::kXiMinus;
1448         AliGenParam *genXi = new AliGenParam(16,particle,lib->GetPt(particle),lib->GetY(particle),lib->GetIp(particle));
1449         genXi->SetPtRange(0., 12.);
1450         genXi->SetYRange(-1.1, 1.1);
1451         genXi->SetForceDecay(kNoDecay); 
1452  
1453         //
1454         // Omega
1455         particle = AliGenSTRANGElib::kOmegaMinus;
1456         AliGenParam *genOmega = new AliGenParam(10,particle,lib->GetPt(particle),lib->GetY(particle),lib->GetIp(particle));     
1457         genOmega->SetPtRange(0, 12.);
1458         genOmega->SetYRange(-1.1, 1.1);
1459         genOmega->SetForceDecay(kNoDecay);
1460         
1461         //
1462         // Central Hijing 
1463         AliGenHijing *genHi = HijingStandard();
1464         genHi->SwitchOffHeavyQuarks(kTRUE);
1465         genHi->SetImpactParameterRange(0.,5.);
1466         //
1467         // Add everything to the cocktail and shake ...
1468         gener->AddGenerator(genHi,    "Hijing cent1", 1);
1469         gener->AddGenerator(genpyc,   "Extra charm",  1);
1470         gener->AddGenerator(genpyb,   "Extra beauty", 1);
1471         gener->AddGenerator(genXi,    "Xi"          , 1);
1472         gener->AddGenerator(genOmega, "Omega",        1);
1473         gGener = gener;
1474     }
1475     break;
1476     default: break;
1477     }
1478     
1479     return gGener;
1480 }
1481
1482 AliGenHijing* HijingStandard()
1483 {
1484     AliGenHijing *gener = new AliGenHijing(-1);
1485 // centre of mass energy 
1486     gener->SetEnergyCMS(5500.);
1487 // reference frame
1488     gener->SetReferenceFrame("CMS");
1489 // projectile
1490      gener->SetProjectile("A", 208, 82);
1491      gener->SetTarget    ("A", 208, 82);
1492 // tell hijing to keep the full parent child chain
1493      gener->KeepFullEvent();
1494 // enable jet quenching
1495      gener->SetJetQuenching(1);
1496 // enable shadowing
1497      gener->SetShadowing(1);
1498 // neutral pion and heavy particle decays switched off
1499      gener->SetDecaysOff(1);
1500 // Don't track spectators
1501      gener->SetSpectators(0);
1502 // kinematic selection
1503      gener->SetSelectAll(0);
1504      return gener;
1505 }
1506
1507 AliGenGeVSim* GeVSimStandard(Float_t mult, Float_t vn)
1508 {
1509     AliGenGeVSim* gener = new AliGenGeVSim(0);
1510 //
1511 // Mult is the number of charged particles in |eta| < 0.5
1512 // Vn is in (%)
1513 //
1514 // Sigma of the Gaussian dN/deta
1515     Float_t sigma_eta  = 2.75;
1516 //
1517 // Maximum eta
1518     Float_t etamax     = 7.00;
1519 //
1520 //
1521 // Scale from multiplicity in |eta| < 0.5 to |eta| < |etamax|   
1522     Float_t mm = mult * (TMath::Erf(etamax/sigma_eta/sqrt(2.)) / TMath::Erf(0.5/sigma_eta/sqrt(2.))); 
1523 //
1524 // Scale from charged to total multiplicity
1525 // 
1526     mm *= 1.587;
1527 //
1528 // Vn 
1529     vn /= 100.;          
1530 //
1531 // Define particles
1532 //
1533 //
1534 // 78% Pions (26% pi+, 26% pi-, 26% p0)              T = 250 MeV
1535     AliGeVSimParticle *pp =  new AliGeVSimParticle(kPiPlus,  1, 0.26 * mm, 0.25, sigma_eta) ;
1536     AliGeVSimParticle *pm =  new AliGeVSimParticle(kPiMinus, 1, 0.26 * mm, 0.25, sigma_eta) ;
1537     AliGeVSimParticle *p0 =  new AliGeVSimParticle(kPi0,     1, 0.26 * mm, 0.25, sigma_eta) ;
1538 //
1539 // 12% Kaons (3% K0short, 3% K0long, 3% K+, 3% K-)   T = 300 MeV
1540     AliGeVSimParticle *ks =  new AliGeVSimParticle(kK0Short, 1, 0.03 * mm, 0.30, sigma_eta) ;
1541     AliGeVSimParticle *kl =  new AliGeVSimParticle(kK0Long,  1, 0.03 * mm, 0.30, sigma_eta) ;
1542     AliGeVSimParticle *kp =  new AliGeVSimParticle(kKPlus,   1, 0.03 * mm, 0.30, sigma_eta) ;
1543     AliGeVSimParticle *km =  new AliGeVSimParticle(kKMinus,  1, 0.03 * mm, 0.30, sigma_eta) ;
1544 //
1545 // 10% Protons / Neutrons (5% Protons, 5% Neutrons)  T = 250 MeV
1546     AliGeVSimParticle *pr =  new AliGeVSimParticle(kProton,  1, 0.05 * mm, 0.25, sigma_eta) ;
1547     AliGeVSimParticle *ne =  new AliGeVSimParticle(kNeutron, 1, 0.05 * mm, 0.25, sigma_eta) ;
1548 //
1549 // Set Elliptic Flow properties         
1550
1551     Float_t pTsaturation = 2. ;
1552
1553     pp->SetEllipticParam(vn,pTsaturation,0.) ;
1554     pm->SetEllipticParam(vn,pTsaturation,0.) ;
1555     p0->SetEllipticParam(vn,pTsaturation,0.) ;
1556     pr->SetEllipticParam(vn,pTsaturation,0.) ;
1557     ne->SetEllipticParam(vn,pTsaturation,0.) ;
1558     ks->SetEllipticParam(vn,pTsaturation,0.) ;
1559     kl->SetEllipticParam(vn,pTsaturation,0.) ;
1560     kp->SetEllipticParam(vn,pTsaturation,0.) ;
1561     km->SetEllipticParam(vn,pTsaturation,0.) ;
1562 //
1563 // Set Direct Flow properties   
1564     pp->SetDirectedParam(vn,1.0,0.) ;
1565     pm->SetDirectedParam(vn,1.0,0.) ;
1566     p0->SetDirectedParam(vn,1.0,0.) ;
1567     pr->SetDirectedParam(vn,1.0,0.) ;
1568     ne->SetDirectedParam(vn,1.0,0.) ;
1569     ks->SetDirectedParam(vn,1.0,0.) ;
1570     kl->SetDirectedParam(vn,1.0,0.) ;
1571     kp->SetDirectedParam(vn,1.0,0.) ;
1572     km->SetDirectedParam(vn,1.0,0.) ;
1573 //
1574 // Add particles to the list
1575     gener->AddParticleType(pp) ;
1576     gener->AddParticleType(pm) ;
1577     gener->AddParticleType(p0) ;
1578     gener->AddParticleType(pr) ;
1579     gener->AddParticleType(ne) ;
1580     gener->AddParticleType(ks) ;
1581     gener->AddParticleType(kl) ;
1582     gener->AddParticleType(kp) ;
1583     gener->AddParticleType(km) ;
1584 //      
1585 // Random Ev.Plane ----------------------------------
1586     TF1 *rpa = new TF1("gevsimPsiRndm","1", 0, 360);
1587 // --------------------------------------------------
1588     gener->SetPtRange(0., 9.) ; // Use a resonable range! (used for bin size in numerical integration)
1589     gener->SetPhiRange(0, 360);
1590     //
1591     // Set pseudorapidity range 
1592     Float_t thmin = EtaToTheta(+etamax);   
1593     Float_t thmax = EtaToTheta(-etamax);   
1594     gener->SetThetaRange(thmin,thmax);     
1595     return gener;
1596 }
1597
1598
1599
1600 void ProcessEnvironmentVars()
1601 {
1602     // Run type
1603     if (gSystem->Getenv("CONFIG_RUN_TYPE")) {
1604       for (Int_t iRun = 0; iRun < kRunMax; iRun++) {
1605         if (strcmp(gSystem->Getenv("CONFIG_RUN_TYPE"), pprRunName[iRun])==0) {
1606           srun = (PprRun_t)iRun;
1607           cout<<"Run type set to "<<pprRunName[iRun]<<endl;
1608         }
1609       }
1610     }
1611
1612     // Random Number seed
1613     if (gSystem->Getenv("CONFIG_SEED")) {
1614       sseed = atoi(gSystem->Getenv("CONFIG_SEED"));
1615     }
1616 }