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