d3de10b3fd3b80bc47fa6906a04c6bc346f4f3d9
[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 <TGeant3.h>
13 #include "STEER/AliRunLoader.h"
14 #include "STEER/AliRun.h"
15 #include "STEER/AliConfig.h"
16 #include "STEER/AliGenerator.h"
17 #include "PYTHIA6/AliDecayerPythia.h"
18 #include "EVGEN/AliGenHIJINGpara.h"
19 #include "THijing/AliGenHijing.h"
20 #include "EVGEN/AliGenCocktail.h"
21 #include "EVGEN/AliGenSlowNucleons.h"
22 #include "EVGEN/AliSlowNucleonModelExp.h"
23 #include "EVGEN/AliGenParam.h"
24 #include "EVGEN/AliGenGSIlib.h"
25 #include "PYTHIA6/AliGenPythia.h"
26 #include "STEER/AliMagFMaps.h"
27 #include "STRUCT/AliBODY.h"
28 #include "STRUCT/AliMAG.h"
29 #include "STRUCT/AliABSOv0.h"
30 #include "STRUCT/AliDIPOv2.h"
31 #include "STRUCT/AliHALL.h"
32 #include "STRUCT/AliFRAMEv2.h"
33 #include "STRUCT/AliSHILv2.h"
34 #include "STRUCT/AliPIPEv0.h"
35 #include "ITS/AliITSvPPRasymmFMD.h"
36 #include "TPC/AliTPCv2.h"
37 #include "TOF/AliTOFv4T0.h"
38 #include "RICH/AliRICHv1.h"
39 #include "ZDC/AliZDCv2.h"
40 #include "TRD/AliTRDv1.h"
41 #include "FMD/AliFMDv1.h"
42 #include "MUON/AliMUONv1.h"
43 #include "MUON/AliMUONSt1GeometryBuilder.h"
44 #include "MUON/AliMUONSt2GeometryBuilder.h"
45 #include "MUON/AliMUONSlatGeometryBuilder.h"
46 #include "MUON/AliMUONTriggerGeometryBuilder.h"
47 #include "PHOS/AliPHOSv1.h"
48 #include "PMD/AliPMDv1.h"
49 #include "START/AliSTARTv1.h"
50 #include "EMCAL/AliEMCALv1.h"
51 #include "CRT/AliCRTv0.h"
52 #include "VZERO/AliVZEROv2.h"
53 #endif
54
55 enum PprRun_t 
56 {
57     test50,
58     kParam_8000,   kParam_4000,  kParam_2000, 
59     kHijing_cent1, kHijing_cent2, 
60     kHijing_per1,  kHijing_per2, kHijing_per3, kHijing_per4,  kHijing_per5,
61     kHijing_jj25,  kHijing_jj50, kHijing_jj75, kHijing_jj100, kHijing_jj200, 
62     kHijing_gj25,  kHijing_gj50, kHijing_gj75, kHijing_gj100, kHijing_gj200,
63     kHijing_pA, kPythia6, 
64     kPythia6Jets20_24,   kPythia6Jets24_29,   kPythia6Jets29_35,
65     kPythia6Jets35_42,   kPythia6Jets42_50,   kPythia6Jets50_60,
66     kPythia6Jets60_72,   kPythia6Jets72_86,   kPythia6Jets86_104,
67     kPythia6Jets104_125, kPythia6Jets125_150, kPythia6Jets150_180,
68     kD0PbPb5500, kCharmSemiElPbPb5500, kBeautySemiElPbPb5500,
69     kD_TRD, kB_TRD, kJpsi_TRD,
70     kU_TRD, kPyJJ, kPyGJ, kRunMax
71 };
72
73 const char* pprRunName[kRunMax] = {
74     "test50",
75     "kParam_8000",   "kParam_4000",  "kParam_2000", 
76     "kHijing_cent1", "kHijing_cent2", 
77     "kHijing_per1",  "kHijing_per2", "kHijing_per3", "kHijing_per4",  
78     "kHijing_per5",
79     "kHijing_jj25",  "kHijing_jj50", "kHijing_jj75", "kHijing_jj100", 
80     "kHijing_jj200", 
81     "kHijing_gj25",  "kHijing_gj50", "kHijing_gj75", "kHijing_gj100", 
82     "kHijing_gj200", "kHijing_pA", "kPythia6", 
83     "kPythia6Jets20_24",   "kPythia6Jets24_29",   "kPythia6Jets29_35",
84     "kPythia6Jets35_42",   "kPythia6Jets42_50",   "kPythia6Jets50_60",
85     "kPythia6Jets60_72",   "kPythia6Jets72_86",   "kPythia6Jets86_104",
86     "kPythia6Jets104_125", "kPythia6Jets125_150", "kPythia6Jets150_180",
87     "kD0PbPb5500", "kCharmSemiElPbPb5500", "kBeautySemiElPbPb5500",
88     "kD_TRD", "kB_TRD", "kJpsi_TRD",
89     "kU_TRD", "kPyJJ", "kPyGJ"
90 };
91
92 enum PprGeo_t 
93 {
94     kHoles, kNoHoles
95 };
96
97 enum PprRad_t
98 {
99     kGluonRadiation, kNoGluonRadiation
100 };
101
102 enum PprMag_t
103 {
104     k2kG, k4kG, k5kG
105 };
106
107
108 // This part for configuration    
109 //static PprRun_t srun = test50;
110 static PprRun_t srun = kPythia6;
111 static PprGeo_t sgeo = kHoles;
112 static PprRad_t srad = kGluonRadiation;
113 static PprMag_t smag = k5kG;
114 static Int_t    sseed = 12345; //Set 0 to use the current time
115
116 // Comment line 
117 static TString  comment;
118
119 // Functions
120 Float_t EtaToTheta(Float_t arg);
121 AliGenerator* GeneratorFactory(PprRun_t srun);
122 AliGenHijing* HijingStandard();
123 void ProcessEnvironmentVars();
124
125 void Config()
126 {
127     // ThetaRange is (0., 180.). It was (0.28,179.72) 7/12/00 09:00
128     // Theta range given through pseudorapidity limits 22/6/2001
129
130     // Get settings from environment variables
131     ProcessEnvironmentVars();
132
133     // Set Random Number seed
134     gRandom->SetSeed(sseed);
135     cout<<"Seed for random number generation= "<<gRandom->GetSeed()<<endl; 
136
137
138    // libraries required by geant321
139 #if defined(__CINT__)
140     gSystem->Load("libgeant321");
141 #endif
142
143     new     TGeant3("C++ Interface to Geant3");
144
145     AliRunLoader* rl=0x0;
146
147     cout<<"Config.C: Creating Run Loader ..."<<endl;
148     rl = AliRunLoader::Open("galice.root",
149                             AliConfig::fgkDefaultEventFolderName,
150                             "recreate");
151     if (rl == 0x0)
152       {
153         gAlice->Fatal("Config.C","Can not instatiate the Run Loader");
154         return;
155       }
156     rl->SetCompressionLevel(2);
157     rl->SetNumberOfEventsPerFile(3);
158     gAlice->SetRunLoader(rl);
159
160     //
161     // Set External decayer
162     AliDecayer *decayer = new AliDecayerPythia();
163
164
165     switch (srun) {
166     case kD0PbPb5500:
167       decayer->SetForceDecay(kHadronicD);
168       break;
169     case kCharmSemiElPbPb5500:
170       decayer->SetForceDecay(kSemiElectronic);
171       break;
172     case kBeautySemiElPbPb5500:
173       decayer->SetForceDecay(kSemiElectronic);
174       break;
175     default:
176       decayer->SetForceDecay(kAll);
177       break;
178     }
179     decayer->Init();
180     gMC->SetExternalDecayer(decayer);
181     //
182     //
183     //=======================================================================
184     //
185     //=======================================================================
186     // ************* STEERING parameters FOR ALICE SIMULATION **************
187     // --- Specify event type to be tracked through the ALICE setup
188     // --- All positions are in cm, angles in degrees, and P and E in GeV
189
190     gMC->SetProcess("DCAY",1);
191     gMC->SetProcess("PAIR",1);
192     gMC->SetProcess("COMP",1);
193     gMC->SetProcess("PHOT",1);
194     gMC->SetProcess("PFIS",0);
195     gMC->SetProcess("DRAY",0);
196     gMC->SetProcess("ANNI",1);
197     gMC->SetProcess("BREM",1);
198     gMC->SetProcess("MUNU",1);
199     gMC->SetProcess("CKOV",1);
200     gMC->SetProcess("HADR",1);
201     gMC->SetProcess("LOSS",2);
202     gMC->SetProcess("MULS",1);
203     gMC->SetProcess("RAYL",1);
204
205     Float_t cut = 1.e-3;        // 1MeV cut by default
206     Float_t tofmax = 1.e10;
207
208     gMC->SetCut("CUTGAM", cut);
209     gMC->SetCut("CUTELE", cut);
210     gMC->SetCut("CUTNEU", cut);
211     gMC->SetCut("CUTHAD", cut);
212     gMC->SetCut("CUTMUO", cut);
213     gMC->SetCut("BCUTE",  cut); 
214     gMC->SetCut("BCUTM",  cut); 
215     gMC->SetCut("DCUTE",  cut); 
216     gMC->SetCut("DCUTM",  cut); 
217     gMC->SetCut("PPCUTM", cut);
218     gMC->SetCut("TOFMAX", tofmax); 
219
220
221 // Generator Configuration
222     gAlice->SetDebug(0);
223     AliGenerator* gener = GeneratorFactory(srun);
224     gener->SetOrigin(0, 0, 0);    // vertex position
225     gener->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position
226     gener->SetCutVertexZ(1.);     // Truncate at 1 sigma
227     gener->SetVertexSmear(kPerEvent); 
228     gener->SetTrackingFlag(1);
229     gener->Init();
230     
231     if (smag == k2kG) {
232         comment = comment.Append(" | L3 field 0.2 T");
233     } else if (smag == k4kG) {
234         comment = comment.Append(" | L3 field 0.4 T");
235     } else if (smag == k5kG) {
236         comment = comment.Append(" | L3 field 0.5 T");
237     }
238     
239     
240     if (srad == kGluonRadiation)
241     {
242         comment = comment.Append(" | Gluon Radiation On");
243         
244     } else {
245         comment = comment.Append(" | Gluon Radiation Off");
246     }
247
248     if (sgeo == kHoles)
249     {
250         comment = comment.Append(" | Holes for PHOS/RICH");
251         
252     } else {
253         comment = comment.Append(" | No holes for PHOS/RICH");
254     }
255
256     printf("\n \n Comment: %s \n \n", comment.Data());
257     
258     
259 // Field (L3 0.4 T)
260     AliMagFMaps* field = new AliMagFMaps("Maps","Maps", 2, 1., 10., smag);
261     field->SetL3ConstField(0); //Using const. field in the barrel
262     rl->CdGAFile();
263     gAlice->SetField(field);    
264 //
265     Int_t   iABSO   = 1;
266     Int_t   iDIPO   = 1;
267     Int_t   iFMD    = 1;
268     Int_t   iFRAME  = 1;
269     Int_t   iHALL   = 1;
270     Int_t   iITS    = 1;
271     Int_t   iMAG    = 1;
272     Int_t   iMUON   = 1;
273     Int_t   iPHOS   = 1;
274     Int_t   iPIPE   = 1;
275     Int_t   iPMD    = 1;
276     Int_t   iRICH   = 1;
277     Int_t   iSHIL   = 1;
278     Int_t   iSTART  = 1;
279     Int_t   iTOF    = 1;
280     Int_t   iTPC    = 1;
281     Int_t   iTRD    = 1;
282     Int_t   iZDC    = 1;
283     Int_t   iEMCAL  = 1;
284     Int_t   iVZERO  = 1;
285     Int_t   iCRT    = 0;
286
287     //=================== Alice BODY parameters =============================
288     AliBODY *BODY = new AliBODY("BODY", "Alice envelop");
289
290
291     if (iMAG)
292     {
293         //=================== MAG parameters ============================
294         // --- Start with Magnet since detector layouts may be depending ---
295         // --- on the selected Magnet dimensions ---
296         AliMAG *MAG = new AliMAG("MAG", "Magnet");
297     }
298
299
300     if (iABSO)
301     {
302         //=================== ABSO parameters ============================
303         AliABSO *ABSO = new AliABSOv0("ABSO", "Muon Absorber");
304     }
305
306     if (iDIPO)
307     {
308         //=================== DIPO parameters ============================
309
310         AliDIPO *DIPO = new AliDIPOv2("DIPO", "Dipole version 2");
311     }
312
313     if (iHALL)
314     {
315         //=================== HALL parameters ============================
316
317         AliHALL *HALL = new AliHALL("HALL", "Alice Hall");
318     }
319
320
321     if (iFRAME)
322     {
323         //=================== FRAME parameters ============================
324
325         AliFRAMEv2 *FRAME = new AliFRAMEv2("FRAME", "Space Frame");
326         if (sgeo == kHoles) {
327             FRAME->SetHoles(1);
328         } else {
329             FRAME->SetHoles(0);
330         }
331     }
332
333     if (iSHIL)
334     {
335         //=================== SHIL parameters ============================
336
337         AliSHIL *SHIL = new AliSHILv2("SHIL", "Shielding Version 2");
338     }
339
340
341     if (iPIPE)
342     {
343         //=================== PIPE parameters ============================
344
345         AliPIPE *PIPE = new AliPIPEv0("PIPE", "Beam Pipe");
346     }
347  
348     if(iITS) {
349
350     //=================== ITS parameters ============================
351     //
352     // As the innermost detector in ALICE, the Inner Tracking System "impacts" on
353     // almost all other detectors. This involves the fact that the ITS geometry
354     // still has several options to be followed in parallel in order to determine
355     // the best set-up which minimizes the induced background. All the geometries
356     // available to date are described in the following. Read carefully the comments
357     // and use the default version (the only one uncommented) unless you are making
358     // comparisons and you know what you are doing. In this case just uncomment the
359     // ITS geometry you want to use and run Aliroot.
360     //
361     // Detailed geometries:         
362     //
363     //
364     //AliITS *ITS  = new AliITSv5symm("ITS","Updated ITS TDR detailed version with symmetric services");
365     //
366     //AliITS *ITS  = new AliITSv5asymm("ITS","Updates ITS TDR detailed version with asymmetric services");
367     //
368         AliITSvPPRasymmFMD *ITS  = new AliITSvPPRasymmFMD("ITS","New ITS PPR detailed version with asymmetric services");
369         ITS->SetMinorVersion(2);  // don't touch this parameter if you're not an ITS developer
370         ITS->SetReadDet(kTRUE);   // don't touch this parameter if you're not an ITS developer
371     //    ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det");  // don't touch this parameter if you're not an ITS developer
372         ITS->SetThicknessDet1(200.);   // detector thickness on layer 1 must be in the range [100,300]
373         ITS->SetThicknessDet2(200.);   // detector thickness on layer 2 must be in the range [100,300]
374         ITS->SetThicknessChip1(200.);  // chip thickness on layer 1 must be in the range [150,300]
375         ITS->SetThicknessChip2(200.);  // chip thickness on layer 2 must be in the range [150,300]
376         ITS->SetRails(0);            // 1 --> rails in ; 0 --> rails out
377         ITS->SetCoolingFluid(1);   // 1 --> water ; 0 --> freon
378
379     // Coarse geometries (warning: no hits are produced with these coarse geometries and they unuseful 
380     // for reconstruction !):
381     //                                                     
382     //
383     //AliITSvPPRcoarseasymm *ITS  = new AliITSvPPRcoarseasymm("ITS","New ITS PPR coarse version with asymmetric services");
384     //ITS->SetRails(0);                // 1 --> rails in ; 0 --> rails out
385     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
386     //
387     //AliITS *ITS  = new AliITSvPPRcoarsesymm("ITS","New ITS PPR coarse version with symmetric services");
388     //ITS->SetRails(0);                // 1 --> rails in ; 0 --> rails out
389     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
390     //                      
391     //
392     //
393     // Geant3 <-> EUCLID conversion
394     // ============================
395     //
396     // SetEUCLID is a flag to output (=1) or not to output (=0) both geometry and
397     // media to two ASCII files (called by default ITSgeometry.euc and
398     // ITSgeometry.tme) in a format understandable to the CAD system EUCLID.
399     // The default (=0) means that you dont want to use this facility.
400     //
401         ITS->SetEUCLID(0);  
402     }
403
404     if (iTPC)
405     {
406         //============================ TPC parameters ================================
407         // --- This allows the user to specify sectors for the SLOW (TPC geometry 2)
408         // --- Simulator. SecAL (SecAU) <0 means that ALL lower (upper)
409         // --- sectors are specified, any value other than that requires at least one 
410         // --- sector (lower or upper)to be specified!
411         // --- Reminder: sectors 1-24 are lower sectors (1-12 -> z>0, 13-24 -> z<0)
412         // ---           sectors 25-72 are the upper ones (25-48 -> z>0, 49-72 -> z<0)
413         // --- SecLows - number of lower sectors specified (up to 6)
414         // --- SecUps - number of upper sectors specified (up to 12)
415         // --- Sens - sensitive strips for the Slow Simulator !!!
416         // --- This does NOT work if all S or L-sectors are specified, i.e.
417         // --- if SecAL or SecAU < 0
418         //
419         //
420         //-----------------------------------------------------------------------------
421
422         //  gROOT->LoadMacro("SetTPCParam.C");
423         //  AliTPCParam *param = SetTPCParam();
424         AliTPC *TPC = new AliTPCv2("TPC", "Default");
425
426         // All sectors included 
427         TPC->SetSecAL(-1);
428         TPC->SetSecAU(-1);
429
430     }
431
432
433     if (iTOF) {
434         //=================== TOF parameters ============================
435         AliTOF *TOF = new AliTOFv4T0("TOF", "normal TOF");
436     }
437
438
439     if (iRICH)
440     {
441         //=================== RICH parameters ===========================
442         AliRICH *RICH = new AliRICHv1("RICH", "normal RICH");
443
444     }
445
446
447     if (iZDC)
448     {
449         //=================== ZDC parameters ============================
450
451         AliZDC *ZDC = new AliZDCv2("ZDC", "normal ZDC");
452     }
453
454     if (iTRD)
455     {
456         //=================== TRD parameters ============================
457
458         AliTRD *TRD = new AliTRDv1("TRD", "TRD slow simulator");
459
460         // Select the gas mixture (0: 97% Xe + 3% isobutane, 1: 90% Xe + 10% CO2)
461         TRD->SetGasMix(1);
462         if (sgeo == kHoles) {
463             // With hole in front of PHOS
464             TRD->SetPHOShole();
465             // With hole in front of RICH
466             TRD->SetRICHhole();
467         }
468             // Switch on TR
469             AliTRDsim *TRDsim = TRD->CreateTR();
470     }
471
472     if (iFMD)
473     {
474         //=================== FMD parameters ============================
475         AliFMD *FMD = new AliFMDv1("FMD", "normal FMD");
476    }
477
478     if (iMUON)
479     {
480         //=================== MUON parameters ===========================
481
482         AliMUON *MUON = new AliMUONv1("MUON", "default");
483         MUON->AddGeometryBuilder(new AliMUONSt1GeometryBuilder(MUON));
484         MUON->AddGeometryBuilder(new AliMUONSt2GeometryBuilder(MUON));
485         MUON->AddGeometryBuilder(new AliMUONSlatGeometryBuilder(MUON));
486         MUON->AddGeometryBuilder(new AliMUONTriggerGeometryBuilder(MUON));
487     }
488     //=================== PHOS parameters ===========================
489
490     if (iPHOS)
491     {
492         AliPHOS *PHOS = new AliPHOSv1("PHOS", "IHEP");
493     }
494
495
496     if (iPMD)
497     {
498         //=================== PMD parameters ============================
499         AliPMD *PMD = new AliPMDv1("PMD", "normal PMD");
500     }
501
502     if (iSTART)
503     {
504         //=================== START parameters ============================
505         AliSTART *START = new AliSTARTv1("START", "START Detector");
506     }
507
508     if (iEMCAL)
509     {
510         //=================== EMCAL parameters ============================
511         AliEMCAL *EMCAL = new AliEMCALv1("EMCAL", "EMCAL_55_25");
512     }
513
514      if (iCRT)
515     {
516         //=================== CRT parameters ============================
517         AliCRT *CRT = new AliCRTv0("CRT", "normal ACORDE");
518     }
519
520      if (iVZERO)
521     {
522         //=================== CRT parameters ============================
523         AliVZERO *VZERO = new AliVZEROv2("VZERO", "normal VZERO");
524     }
525  
526              
527 }
528
529 Float_t EtaToTheta(Float_t arg){
530   return (180./TMath::Pi())*2.*atan(exp(-arg));
531 }
532
533
534
535 AliGenerator* GeneratorFactory(PprRun_t srun) {
536     Int_t isw = 3;
537     if (srad == kNoGluonRadiation) isw = 0;
538     
539
540     AliGenerator * gGener = 0x0;
541     switch (srun) {
542     case test50:
543       {
544         comment = comment.Append(":HIJINGparam test 50 particles");
545         AliGenHIJINGpara *gener = new AliGenHIJINGpara(50);
546         gener->SetMomentumRange(0, 999999.);
547         gener->SetPhiRange(0., 360.);
548         // Set pseudorapidity range from -8 to 8.
549         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
550         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
551         gener->SetThetaRange(thmin,thmax);
552         gGener=gener;
553       }
554       break;
555     case kParam_8000:
556       {
557         comment = comment.Append(":HIJINGparam N=8000");
558         AliGenHIJINGpara *gener = new AliGenHIJINGpara(86030);
559         gener->SetMomentumRange(0, 999999.);
560         gener->SetPhiRange(0., 360.);
561         // Set pseudorapidity range from -8 to 8.
562         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
563         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
564         gener->SetThetaRange(thmin,thmax);
565         gGener=gener;
566       }
567       break;
568     case kParam_4000:
569       {
570         comment = comment.Append("HIJINGparam N=4000");
571         AliGenHIJINGpara *gener = new AliGenHIJINGpara(43015);
572         gener->SetMomentumRange(0, 999999.);
573         gener->SetPhiRange(0., 360.);
574         // Set pseudorapidity range from -8 to 8.
575         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
576         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
577         gener->SetThetaRange(thmin,thmax);
578         gGener=gener;
579       }
580         break;
581     case kParam_2000:
582       {
583         comment = comment.Append("HIJINGparam N=2000");
584         AliGenHIJINGpara *gener = new AliGenHIJINGpara(21507);
585         gener->SetMomentumRange(0, 999999.);
586         gener->SetPhiRange(0., 360.);
587         // Set pseudorapidity range from -8 to 8.
588         Float_t thmin = EtaToTheta(8);   // theta min. <---> eta max
589         Float_t thmax = EtaToTheta(-8);  // theta max. <---> eta min 
590         gener->SetThetaRange(thmin,thmax);
591         gGener=gener;
592       }
593       break;
594 //
595 //  Hijing Central
596 //
597     case kHijing_cent1:
598       {
599         comment = comment.Append("HIJING cent1");
600         AliGenHijing *gener = HijingStandard();
601 // impact parameter range
602         gener->SetImpactParameterRange(0., 5.);
603         gGener=gener;
604       }
605       break;
606     case kHijing_cent2:
607       {
608         comment = comment.Append("HIJING cent2");
609         AliGenHijing *gener = HijingStandard();
610 // impact parameter range
611         gener->SetImpactParameterRange(0., 2.);
612         gGener=gener;
613       }
614       break;
615 //
616 // Hijing Peripheral 
617 //
618     case kHijing_per1:
619       {
620         comment = comment.Append("HIJING per1");
621         AliGenHijing *gener = HijingStandard();
622 // impact parameter range
623         gener->SetImpactParameterRange(5., 8.6);
624         gGener=gener;
625       }
626       break;
627     case kHijing_per2:
628       {
629         comment = comment.Append("HIJING per2");
630         AliGenHijing *gener = HijingStandard();
631 // impact parameter range
632         gener->SetImpactParameterRange(8.6, 11.2);
633         gGener=gener;
634       }
635       break;
636     case kHijing_per3:
637       {
638         comment = comment.Append("HIJING per3");
639         AliGenHijing *gener = HijingStandard();
640 // impact parameter range
641         gener->SetImpactParameterRange(11.2, 13.2);
642         gGener=gener;
643       }
644       break;
645     case kHijing_per4:
646       {
647         comment = comment.Append("HIJING per4");
648         AliGenHijing *gener = HijingStandard();
649 // impact parameter range
650         gener->SetImpactParameterRange(13.2, 15.);
651         gGener=gener;
652       }
653       break;
654     case kHijing_per5:
655       {
656         comment = comment.Append("HIJING per5");
657         AliGenHijing *gener = HijingStandard();
658 // impact parameter range
659         gener->SetImpactParameterRange(15., 100.);
660         gGener=gener;
661       }
662       break;
663 //
664 //  Jet-Jet
665 //
666     case kHijing_jj25:
667       {
668         comment = comment.Append("HIJING Jet 25 GeV");
669         AliGenHijing *gener = HijingStandard();
670 // impact parameter range
671         gener->SetImpactParameterRange(0., 5.);
672         // trigger
673         gener->SetTrigger(1);
674         gener->SetPtJet(25.);
675         gener->SetRadiation(isw);
676         gener->SetSimpleJets(!isw);
677         gener->SetJetEtaRange(-0.3,0.3);
678         gener->SetJetPhiRange(75., 165.);   
679         gGener=gener;
680       }
681       break;
682
683     case kHijing_jj50:
684       {
685         comment = comment.Append("HIJING Jet 50 GeV");
686         AliGenHijing *gener = HijingStandard();
687 // impact parameter range
688         gener->SetImpactParameterRange(0., 5.);
689         // trigger
690         gener->SetTrigger(1);
691         gener->SetPtJet(50.);
692         gener->SetRadiation(isw);
693         gener->SetSimpleJets(!isw);
694         gener->SetJetEtaRange(-0.3,0.3);
695         gener->SetJetPhiRange(75., 165.);   
696         gGener=gener;
697       }
698         break;
699
700     case kHijing_jj75:
701       {
702         comment = comment.Append("HIJING Jet 75 GeV");
703         AliGenHijing *gener = HijingStandard();
704 // impact parameter range
705         gener->SetImpactParameterRange(0., 5.);
706         // trigger
707         gener->SetTrigger(1);
708         gener->SetPtJet(75.);
709         gener->SetRadiation(isw);
710         gener->SetSimpleJets(!isw);
711         gener->SetJetEtaRange(-0.3,0.3);
712         gener->SetJetPhiRange(75., 165.);   
713         gGener=gener;
714       }
715       break;
716
717     case kHijing_jj100:
718       {
719         comment = comment.Append("HIJING Jet 100 GeV");
720         AliGenHijing *gener = HijingStandard();
721 // impact parameter range
722         gener->SetImpactParameterRange(0., 5.);
723         // trigger
724         gener->SetTrigger(1);
725         gener->SetPtJet(100.);
726         gener->SetRadiation(isw);
727         gener->SetSimpleJets(!isw);
728         gener->SetJetEtaRange(-0.3,0.3);
729         gener->SetJetPhiRange(75., 165.);   
730         gGener=gener;
731       }
732       break;
733
734     case kHijing_jj200:
735       {
736         comment = comment.Append("HIJING Jet 200 GeV");
737         AliGenHijing *gener = HijingStandard();
738 // impact parameter range
739         gener->SetImpactParameterRange(0., 5.);
740         // trigger
741         gener->SetTrigger(1);
742         gener->SetPtJet(200.);
743         gener->SetRadiation(isw);
744         gener->SetSimpleJets(!isw);
745         gener->SetJetEtaRange(-0.3,0.3);
746         gener->SetJetPhiRange(75., 165.);   
747         gGener=gener;
748       }
749       break;
750 //
751 // Gamma-Jet
752 //
753     case kHijing_gj25:
754       {
755         comment = comment.Append("HIJING Gamma 25 GeV");
756         AliGenHijing *gener = HijingStandard();
757 // impact parameter range
758         gener->SetImpactParameterRange(0., 5.);
759         // trigger
760         gener->SetTrigger(2);
761         gener->SetPtJet(25.);
762         gener->SetRadiation(isw);
763         gener->SetSimpleJets(!isw);
764         gener->SetJetEtaRange(-0.12, 0.12);
765         gener->SetJetPhiRange(220., 320.);
766         gGener=gener;
767       }
768       break;
769
770     case kHijing_gj50:
771       {
772         comment = comment.Append("HIJING Gamma 50 GeV");
773         AliGenHijing *gener = HijingStandard();
774 // impact parameter range
775         gener->SetImpactParameterRange(0., 5.);
776         // trigger
777         gener->SetTrigger(2);
778         gener->SetPtJet(50.);
779         gener->SetRadiation(isw);
780         gener->SetSimpleJets(!isw);
781         gener->SetJetEtaRange(-0.12, 0.12);
782         gener->SetJetPhiRange(220., 320.);
783         gGener=gener;
784       }
785       break;
786
787     case kHijing_gj75:
788       {
789         comment = comment.Append("HIJING Gamma 75 GeV");
790         AliGenHijing *gener = HijingStandard();
791 // impact parameter range
792         gener->SetImpactParameterRange(0., 5.);
793         // trigger
794         gener->SetTrigger(2);
795         gener->SetPtJet(75.);
796         gener->SetRadiation(isw);
797         gener->SetSimpleJets(!isw);
798         gener->SetJetEtaRange(-0.12, 0.12);
799         gener->SetJetPhiRange(220., 320.);
800         gGener=gener;
801       }
802       break;
803
804     case kHijing_gj100:
805       {
806         comment = comment.Append("HIJING Gamma 100 GeV");
807         AliGenHijing *gener = HijingStandard();
808 // impact parameter range
809         gener->SetImpactParameterRange(0., 5.);
810         // trigger
811         gener->SetTrigger(2);
812         gener->SetPtJet(100.);
813         gener->SetRadiation(isw);
814         gener->SetSimpleJets(!isw);
815         gener->SetJetEtaRange(-0.12, 0.12);
816         gener->SetJetPhiRange(220., 320.);
817         gGener=gener;
818       }
819       break;
820
821     case kHijing_gj200:
822       {
823         comment = comment.Append("HIJING Gamma 200 GeV");
824         AliGenHijing *gener = HijingStandard();
825 // impact parameter range
826         gener->SetImpactParameterRange(0., 5.);
827         // trigger
828         gener->SetTrigger(2);
829         gener->SetPtJet(200.);
830         gener->SetRadiation(isw);
831         gener->SetSimpleJets(!isw);
832         gener->SetJetEtaRange(-0.12, 0.12);
833         gener->SetJetPhiRange(220., 320.);
834         gGener=gener;
835       }
836       break;
837     case kHijing_pA:
838       {
839         comment = comment.Append("HIJING pA");
840
841         AliGenCocktail *gener  = new AliGenCocktail();
842
843         AliGenHijing   *hijing = new AliGenHijing(-1);
844 // centre of mass energy 
845         hijing->SetEnergyCMS(TMath::Sqrt(82./208.) * 14000.);
846 // impact parameter range
847         hijing->SetImpactParameterRange(0., 15.);
848 // reference frame
849         hijing->SetReferenceFrame("CMS");
850         hijing->SetBoostLHC(1);
851 // projectile
852         hijing->SetProjectile("P", 1, 1);
853         hijing->SetTarget    ("A", 208, 82);
854 // tell hijing to keep the full parent child chain
855         hijing->KeepFullEvent();
856 // enable jet quenching
857         hijing->SetJetQuenching(0);
858 // enable shadowing
859         hijing->SetShadowing(1);
860 // Don't track spectators
861         hijing->SetSpectators(0);
862 // kinematic selection
863         hijing->SetSelectAll(0);
864 //
865         AliGenSlowNucleons*  gray    = new AliGenSlowNucleons(1);
866         AliSlowNucleonModel* model   = new AliSlowNucleonModelExp();
867         gray->SetSlowNucleonModel(model);
868         gray->SetDebug(1);
869         gener->AddGenerator(hijing,"Hijing pPb", 1);
870         gener->AddGenerator(gray,  "Gray Particles",1);
871         gGener=gener;
872       }
873       break;
874     case kPythia6:
875       {
876         comment = comment.Append(":Pythia p-p @ 14 TeV");
877         AliGenPythia *gener = new AliGenPythia(-1); 
878         gener->SetMomentumRange(0,999999);
879         gener->SetThetaRange(0., 180.);
880         gener->SetYRange(-12,12);
881         gener->SetPtRange(0,1000);
882         gener->SetProcess(kPyMb);
883         gener->SetEnergyCMS(14000.);
884         gGener=gener;
885       }
886       break;
887     case kPythia6Jets20_24:
888       {
889         comment = comment.Append(":Pythia jets 20-24 GeV @ 5.5 TeV");
890         AliGenPythia * gener = new AliGenPythia(-1);
891         gener->SetEnergyCMS(5500.);//        Centre of mass energy
892         gener->SetProcess(kPyJets);//        Process type
893         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
894         gener->SetJetPhiRange(0., 360.);
895         gener->SetJetEtRange(10., 1000.);
896         gener->SetGluonRadiation(1,1);
897         //    gener->SetPtKick(0.);
898         //   Structure function
899         gener->SetStrucFunc(kCTEQ4L);
900         gener->SetPtHard(20., 24.);// Pt transfer of the hard scattering
901         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
902         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
903         gGener=gener;
904       }
905       break;
906     case kPythia6Jets24_29:
907       {
908         comment = comment.Append(":Pythia jets 24-29 GeV @ 5.5 TeV");
909         AliGenPythia * gener = new AliGenPythia(-1);
910         gener->SetEnergyCMS(5500.);//        Centre of mass energy
911         gener->SetProcess(kPyJets);//        Process type
912         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
913         gener->SetJetPhiRange(0., 360.);
914         gener->SetJetEtRange(10., 1000.);
915         gener->SetGluonRadiation(1,1);
916         //    gener->SetPtKick(0.);
917         //   Structure function
918         gener->SetStrucFunc(kCTEQ4L);
919         gener->SetPtHard(24., 29.);// Pt transfer of the hard scattering
920         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
921         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
922         gGener=gener;
923       }
924       break;
925     case kPythia6Jets29_35:
926       {
927         comment = comment.Append(":Pythia jets 29-35 GeV @ 5.5 TeV");
928         AliGenPythia * gener = new AliGenPythia(-1);
929         gener->SetEnergyCMS(5500.);//        Centre of mass energy
930         gener->SetProcess(kPyJets);//        Process type
931         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
932         gener->SetJetPhiRange(0., 360.);
933         gener->SetJetEtRange(10., 1000.);
934         gener->SetGluonRadiation(1,1);
935         //    gener->SetPtKick(0.);
936         //   Structure function
937         gener->SetStrucFunc(kCTEQ4L);
938         gener->SetPtHard(29., 35.);// Pt transfer of the hard scattering
939         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
940         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
941         gGener=gener;
942       }
943       break;
944     case kPythia6Jets35_42:
945       {
946         comment = comment.Append(":Pythia jets 35-42 GeV @ 5.5 TeV");
947         AliGenPythia * gener = new AliGenPythia(-1);
948         gener->SetEnergyCMS(5500.);//        Centre of mass energy
949         gener->SetProcess(kPyJets);//        Process type
950         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
951         gener->SetJetPhiRange(0., 360.);
952         gener->SetJetEtRange(10., 1000.);
953         gener->SetGluonRadiation(1,1);
954         //    gener->SetPtKick(0.);
955         //   Structure function
956         gener->SetStrucFunc(kCTEQ4L);
957         gener->SetPtHard(35., 42.);// Pt transfer of the hard scattering
958         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
959         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
960         gGener=gener;
961       }
962       break;
963     case kPythia6Jets42_50:
964       {
965         comment = comment.Append(":Pythia jets 42-50 GeV @ 5.5 TeV");
966         AliGenPythia * gener = new AliGenPythia(-1);
967         gener->SetEnergyCMS(5500.);//        Centre of mass energy
968         gener->SetProcess(kPyJets);//        Process type
969         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
970         gener->SetJetPhiRange(0., 360.);
971         gener->SetJetEtRange(10., 1000.);
972         gener->SetGluonRadiation(1,1);
973         //    gener->SetPtKick(0.);
974         //   Structure function
975         gener->SetStrucFunc(kCTEQ4L);
976         gener->SetPtHard(42., 50.);// Pt transfer of the hard scattering
977         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
978         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
979         gGener=gener;
980       }
981       break;
982     case kPythia6Jets50_60:
983       {
984         comment = comment.Append(":Pythia jets 50-60 GeV @ 5.5 TeV");
985         AliGenPythia * gener = new AliGenPythia(-1);
986         gener->SetEnergyCMS(5500.);//        Centre of mass energy
987         gener->SetProcess(kPyJets);//        Process type
988         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
989         gener->SetJetPhiRange(0., 360.);
990         gener->SetJetEtRange(10., 1000.);
991         gener->SetGluonRadiation(1,1);
992         //    gener->SetPtKick(0.);
993         //   Structure function
994         gener->SetStrucFunc(kCTEQ4L);
995         gener->SetPtHard(50., 60.);// Pt transfer of the hard scattering
996         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
997         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
998         gGener=gener;
999       }
1000       break;
1001     case kPythia6Jets60_72:
1002       {
1003         comment = comment.Append(":Pythia jets 60-72 GeV @ 5.5 TeV");
1004         AliGenPythia * gener = new AliGenPythia(-1);
1005         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1006         gener->SetProcess(kPyJets);//        Process type
1007         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1008         gener->SetJetPhiRange(0., 360.);
1009         gener->SetJetEtRange(10., 1000.);
1010         gener->SetGluonRadiation(1,1);
1011         //    gener->SetPtKick(0.);
1012         //   Structure function
1013         gener->SetStrucFunc(kCTEQ4L);
1014         gener->SetPtHard(60., 72.);// Pt transfer of the hard scattering
1015         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1016         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1017         gGener=gener;
1018       }
1019       break;
1020     case kPythia6Jets72_86:
1021       {
1022         comment = comment.Append(":Pythia jets 72-86 GeV @ 5.5 TeV");
1023         AliGenPythia * gener = new AliGenPythia(-1);
1024         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1025         gener->SetProcess(kPyJets);//        Process type
1026         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1027         gener->SetJetPhiRange(0., 360.);
1028         gener->SetJetEtRange(10., 1000.);
1029         gener->SetGluonRadiation(1,1);
1030         //    gener->SetPtKick(0.);
1031         //   Structure function
1032         gener->SetStrucFunc(kCTEQ4L);
1033         gener->SetPtHard(72., 86.);// Pt transfer of the hard scattering
1034         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1035         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1036         gGener=gener;
1037       }
1038       break;
1039     case kPythia6Jets86_104:
1040       {
1041         comment = comment.Append(":Pythia jets 86-104 GeV @ 5.5 TeV");
1042         AliGenPythia * gener = new AliGenPythia(-1);
1043         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1044         gener->SetProcess(kPyJets);//        Process type
1045         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1046         gener->SetJetPhiRange(0., 360.);
1047         gener->SetJetEtRange(10., 1000.);
1048         gener->SetGluonRadiation(1,1);
1049         //    gener->SetPtKick(0.);
1050         //   Structure function
1051         gener->SetStrucFunc(kCTEQ4L);
1052         gener->SetPtHard(86., 104.);// Pt transfer of the hard scattering
1053         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1054         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1055         gGener=gener;
1056       }
1057       break;
1058     case kPythia6Jets104_125:
1059       {
1060         comment = comment.Append(":Pythia jets 105-125 GeV @ 5.5 TeV");
1061         AliGenPythia * gener = new AliGenPythia(-1);
1062         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1063         gener->SetProcess(kPyJets);//        Process type
1064         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1065         gener->SetJetPhiRange(0., 360.);
1066         gener->SetJetEtRange(10., 1000.);
1067         gener->SetGluonRadiation(1,1);
1068         //    gener->SetPtKick(0.);
1069         //   Structure function
1070         gener->SetStrucFunc(kCTEQ4L);
1071         gener->SetPtHard(104., 125.);// Pt transfer of the hard scattering
1072         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1073         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1074         gGener=gener;
1075       }
1076       break;
1077     case kPythia6Jets125_150:
1078       {
1079         comment = comment.Append(":Pythia jets 125-150 GeV @ 5.5 TeV");
1080         AliGenPythia * gener = new AliGenPythia(-1);
1081         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1082         gener->SetProcess(kPyJets);//        Process type
1083         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1084         gener->SetJetPhiRange(0., 360.);
1085         gener->SetJetEtRange(10., 1000.);
1086         gener->SetGluonRadiation(1,1);
1087         //    gener->SetPtKick(0.);
1088         //   Structure function
1089         gener->SetStrucFunc(kCTEQ4L);
1090         gener->SetPtHard(125., 150.);// Pt transfer of the hard scattering
1091         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1092         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1093         gGener=gener;
1094       }
1095       break;
1096     case kPythia6Jets150_180:
1097       {
1098         comment = comment.Append(":Pythia jets 150-180 GeV @ 5.5 TeV");
1099         AliGenPythia * gener = new AliGenPythia(-1);
1100         gener->SetEnergyCMS(5500.);//        Centre of mass energy
1101         gener->SetProcess(kPyJets);//        Process type
1102         gener->SetJetEtaRange(-0.5, 0.5);//  Final state kinematic cuts
1103         gener->SetJetPhiRange(0., 360.);
1104         gener->SetJetEtRange(10., 1000.);
1105         gener->SetGluonRadiation(1,1);
1106         //    gener->SetPtKick(0.);
1107         //   Structure function
1108         gener->SetStrucFunc(kCTEQ4L);
1109         gener->SetPtHard(150., 180.);// Pt transfer of the hard scattering
1110         gener->SetPycellParameters(2., 274, 432, 0., 4., 5., 1.0);
1111         gener->SetForceDecay(kAll);//  Decay type (semielectronic, etc.)
1112         gGener=gener;
1113       }
1114       break;
1115     case kD0PbPb5500:
1116       {
1117         comment = comment.Append(" D0 in Pb-Pb at 5.5 TeV");
1118         AliGenPythia * gener = new AliGenPythia(10);
1119         gener->SetProcess(kPyD0PbPbMNR);
1120         gener->SetStrucFunc(kCTEQ4L);
1121         gener->SetPtHard(2.1,-1.0);
1122         gener->SetEnergyCMS(5500.);
1123         gener->SetNuclei(208,208);
1124         gener->SetForceDecay(kHadronicD);
1125         gener->SetYRange(-2,2);
1126         gener->SetFeedDownHigherFamily(kFALSE);
1127         gener->SetStackFillOpt(AliGenPythia::kParentSelection);
1128         gener->SetCountMode(AliGenPythia::kCountParents);
1129         gGener=gener;
1130       }
1131       break;
1132     case kCharmSemiElPbPb5500:
1133       {
1134         comment = comment.Append(" Charm in Pb-Pb at 5.5 TeV");
1135         AliGenPythia * gener = new AliGenPythia(10);
1136         gener->SetProcess(kPyCharmPbPbMNR);
1137         gener->SetStrucFunc(kCTEQ4L);
1138         gener->SetPtHard(2.1,-1.0);
1139         gener->SetEnergyCMS(5500.);
1140         gener->SetNuclei(208,208);
1141         gener->SetForceDecay(kSemiElectronic);
1142         gener->SetYRange(-2,2);
1143         gener->SetFeedDownHigherFamily(kFALSE);
1144         gener->SetCountMode(AliGenPythia::kCountParents);
1145         gGener=gener;
1146       }
1147       break;
1148     case kBeautySemiElPbPb5500:
1149       {
1150         comment = comment.Append(" Beauty in Pb-Pb at 5.5 TeV");
1151         AliGenPythia *gener = new AliGenPythia(10);
1152         gener->SetProcess(kPyBeautyPbPbMNR);
1153         gener->SetStrucFunc(kCTEQ4L);
1154         gener->SetPtHard(2.75,-1.0);
1155         gener->SetEnergyCMS(5500.);
1156         gener->SetNuclei(208,208);
1157         gener->SetForceDecay(kSemiElectronic);
1158         gener->SetYRange(-2,2);
1159         gener->SetFeedDownHigherFamily(kFALSE);
1160         gener->SetCountMode(AliGenPythia::kCountParents);
1161         gGener=gener;
1162       }
1163       break;
1164     case kD_TRD:
1165       {
1166         comment = comment.Append(" Charm for TRD at 5.5 TeV");
1167         AliGenPythia *gener = new AliGenPythia(1);
1168         gener->SetCutOnChild(0);
1169         gener->SetStrucFunc(kCTEQ4L);
1170         gener->SetProcess(kPyCharm);
1171         gener->SetPtHard(0.,-1);
1172         gener->SetEnergyCMS(5500.);
1173         gener->SetNuclei(208,208);
1174         gGener=gener;
1175       }
1176       break;
1177     case kB_TRD:
1178       {
1179         comment = comment.Append(" Beauty for TRD at 5.5 TeV");
1180         AliGenPythia *gener = new AliGenPythia(1);
1181         gener->SetCutOnChild(0);
1182         gener->SetStrucFunc(kCTEQ4L);
1183         gener->SetProcess(kPyBeauty);
1184         gener->SetPtHard(0.,-1);
1185         gener->SetEnergyCMS(5500.);
1186         gener->SetNuclei(208,208);
1187         gGener=gener;
1188       }
1189       break;
1190     case kJpsi_TRD:
1191       {
1192         comment = comment.Append(" J/psi for TRD at 5.5 TeV");
1193         AliGenParam *gener = new AliGenParam(1,new AliGenGSIlib(),
1194                                              AliGenGSIlib::kJPsi,"MUON");
1195         gener->SetMomentumRange(0,999);
1196         gener->SetPtRange(0,30.);
1197         gener->SetPhiRange(0., 360.);
1198         gener->SetYRange(-0.9,+0.9);
1199         gener->SetForceDecay(kDiElectron);
1200         gGener=gener;
1201       }
1202       break;
1203     case kU_TRD:
1204       {
1205         comment = comment.Append(" Upsilon for TRD at 5.5 TeV");
1206         AliGenParam *gener = new AliGenParam(1,new AliGenGSIlib(),
1207                                              AliGenGSIlib::kUpsilon,"RITMAN");
1208         gener->SetMomentumRange(0,999);
1209         gener->SetPtRange(0,30.);
1210         gener->SetPhiRange(0., 360.);
1211         gener->SetYRange(-0.9,0.9);
1212         gener->SetForceDecay(kDiElectron);
1213         gGener=gener;
1214       }
1215       break;
1216     case kPyJJ:
1217       {
1218         comment = comment.Append(" Jet-jet at 5.5 TeV");
1219         AliGenPythia *gener = new AliGenPythia(-1);
1220         gener->SetEnergyCMS(5500.);
1221         gener->SetProcess(kPyJets);
1222         Double_t ptHardMin=10.0, ptHardMax=-1.0;
1223         gener->SetPtHard(ptHardMin,ptHardMax);
1224         gener->SetYHard(-0.7,0.7);
1225         gener->SetJetEtaRange(-0.2,0.2);
1226         gener->SetEventListRange(0,1);
1227         gGener=gener;
1228       }
1229       break;
1230     case kPyGJ:
1231       {
1232         comment = comment.Append(" Gamma-jet at 5.5 TeV");
1233         AliGenPythia *gener = new AliGenPythia(-1);
1234         gener->SetEnergyCMS(5500.);
1235         gener->SetProcess(kPyDirectGamma);
1236         Double_t ptHardMin=10.0, ptHardMax=-1.0;
1237         gener->SetPtHard(ptHardMin,ptHardMax);
1238         gener->SetYHard(-1.0,1.0);
1239         gener->SetGammaEtaRange(-0.13,0.13);
1240         gener->SetGammaPhiRange(210.,330.);
1241         gener->SetEventListRange(0,1);
1242         gGener=gener;
1243       }
1244       break;
1245     default: break;
1246     }
1247     return gGener;
1248 }
1249
1250 AliGenHijing* HijingStandard()
1251 {
1252     AliGenHijing *gener = new AliGenHijing(-1);
1253 // centre of mass energy 
1254     gener->SetEnergyCMS(5500.);
1255 // reference frame
1256     gener->SetReferenceFrame("CMS");
1257 // projectile
1258      gener->SetProjectile("A", 208, 82);
1259      gener->SetTarget    ("A", 208, 82);
1260 // tell hijing to keep the full parent child chain
1261      gener->KeepFullEvent();
1262 // enable jet quenching
1263      gener->SetJetQuenching(1);
1264 // enable shadowing
1265      gener->SetShadowing(1);
1266 // neutral pion and heavy particle decays switched off
1267      gener->SetDecaysOff(1);
1268 // Don't track spectators
1269      gener->SetSpectators(0);
1270 // kinematic selection
1271      gener->SetSelectAll(0);
1272      return gener;
1273 }
1274
1275
1276 void ProcessEnvironmentVars()
1277 {
1278     // Run type
1279     if (gSystem->Getenv("CONFIG_RUN_TYPE")) {
1280       for (Int_t iRun = 0; iRun < kRunMax; iRun++) {
1281         if (strcmp(gSystem->Getenv("CONFIG_RUN_TYPE"), pprRunName[iRun])==0) {
1282           srun = (PprRun_t)iRun;
1283           cout<<"Run type set to "<<pprRunName[iRun]<<endl;
1284         }
1285       }
1286     }
1287
1288     // Random Number seed
1289     if (gSystem->Getenv("CONFIG_SEED")) {
1290       sseed = atoi(gSystem->Getenv("CONFIG_SEED"));
1291     }
1292 }