]> git.uio.no Git - u/mrichter/AliRoot.git/blob - macros/Config_PythiaHeavyFlavours.C
0cca098233df94ad567a770f92eeebda0820186b
[u/mrichter/AliRoot.git] / macros / Config_PythiaHeavyFlavours.C
1 //*******************************************************************//
2 // Configuration file for charm / beauty generation with PYTHIA      //
3 //                                                                   //
4 // The parameters have been tuned in order to reproduce the inclusive//
5 // heavy quark pt distribution given by the NLO pQCD calculation by  //
6 // Mangano, Nason and Ridolfi.                                       //
7 //                                                                   //
8 // For details and for the NORMALIZATION of the yields see:          //
9 //   N.Carrer and A.Dainese,                                         //
10 //   "Charm and beauty production at the LHC",                       //
11 //   ALICE-INT-2003-019, [arXiv:hep-ph/0311225];                     //
12 //   PPR Chapter 6.6, CERN/LHCC 2005-030 (2005).                     //
13 //*******************************************************************//
14 #if !defined(__CINT__) || defined(__MAKECINT__)
15 #include <Riostream.h>
16 #include <TRandom.h>
17 #include <TDatime.h>
18 #include <TSystem.h>
19 #include <TVirtualMC.h>
20 #include <TGeant3TGeo.h>
21 #include "STEER/AliRunLoader.h"
22 #include "STEER/AliRun.h"
23 #include "STEER/AliConfig.h"
24 #include "PYTHIA6/AliDecayerPythia.h"
25 #include "PYTHIA6/AliGenPythia.h"
26 #include "STEER/AliMagFMaps.h"
27 #include "STRUCT/AliBODY.h"
28 #include "STRUCT/AliMAG.h"
29 #include "STRUCT/AliABSOv3.h"
30 #include "STRUCT/AliDIPOv3.h"
31 #include "STRUCT/AliHALLv3.h"
32 #include "STRUCT/AliFRAMEv2.h"
33 #include "STRUCT/AliSHILv3.h"
34 #include "STRUCT/AliPIPEv3.h"
35 #include "ITS/AliITSvPPRasymmFMD.h"
36 #include "TPC/AliTPCv2.h"
37 #include "TOF/AliTOFv6T0.h"
38 #include "HMPID/AliHMPIDv2.h"
39 #include "ZDC/AliZDCv3.h"
40 #include "TRD/AliTRDv1.h"
41 #include "FMD/AliFMDv0.h"
42 #include "MUON/AliMUONv1.h"
43 #include "PHOS/AliPHOSv1.h"
44 #include "PMD/AliPMDv1.h"
45 #include "T0/AliT0v1.h"
46 #include "ACORDE/AliACORDEv1.h"
47 #endif
48
49 //--- Heavy Flavour Production ---
50 enum ProcessHvFl_t 
51 {
52   kCharmPbPb5500,  kCharmpPb8800,  kCharmpp14000,  kCharmpp14000wmi,
53   kD0PbPb5500,     kD0pPb8800,     kD0pp14000,
54   kDPlusPbPb5500,  kDPluspPb8800,  kDPluspp14000,
55   kDPlusStrangePbPb5500, kDPlusStrangepPb8800, kDPlusStrangepp14000,
56   kBeautyPbPb5500, kBeautypPb8800, kBeautypp14000, kBeautypp14000wmi
57 };
58 //--- Decay Mode ---
59 enum DecayHvFl_t 
60 {
61   kNature,  kHadr, kSemiEl, kSemiMu
62 };
63 //--- Rapidity Cut ---
64 enum YCut_t
65 {
66   kFull, kBarrel, kMuonArm
67 };
68 //--- Magnetic Field ---
69 enum Mag_t
70 {
71     k2kG, k4kG, k5kG
72 };
73 //--- Trigger config ---
74 enum TrigConf_t
75 {
76     kDefaultPPTrig, kDefaultPbPbTrig
77 };
78 const char * TrigConfName[] = {
79     "p-p","Pb-Pb"
80 };
81 enum PprGeo_t
82   {
83     kHoles, kNoHoles
84   };
85
86 //--- Functions ---
87 AliGenPythia *PythiaHVQ(ProcessHvFl_t proc);
88 void          LoadPythia();
89
90
91 // This part for configuration
92 static ProcessHvFl_t procHvFl = kCharmPbPb5500;
93 static DecayHvFl_t   decHvFl  = kNature; 
94 static YCut_t        ycut     = kFull;
95 static Mag_t         mag      = k5kG; 
96 static TrigConf_t    trig     = kDefaultPbPbTrig; // default PbPb trigger configuration
97 static PprGeo_t      geo      = kHoles;
98 // nEvts = -1  : you get 1 QQbar pair and all the fragmentation and 
99 //               decay chain
100 // nEvts = N>0 : you get N charm / beauty Hadrons 
101 Int_t nEvts = -1; 
102 // stars = kTRUE : all heavy resonances and their decay stored
103 //       = kFALSE: only final heavy hadrons and their decays stored
104 Bool_t stars = kTRUE;
105
106 // To be used only with kCharmppMNRwmi and kBeautyppMNRwmi
107 // To get a "reasonable" agreement with MNR results, events have to be 
108 // generated with the minimum ptHard set to 2.76 GeV.
109 // To get a "perfect" agreement with MNR results, events have to be 
110 // generated in four ptHard bins with the following relative 
111 // normalizations:
112 //  CHARM
113 // 2.76-3 GeV: 25%
114 //    3-4 GeV: 40%
115 //    4-8 GeV: 29%
116 //     >8 GeV:  6%
117 //  BEAUTY
118 // 2.76-4 GeV:  5% 
119 //    4-6 GeV: 31%
120 //    6-8 GeV: 28%
121 //     >8 GeV: 36%
122 Float_t ptHardMin =  2.76;
123 Float_t ptHardMax = -1.;
124
125
126 // Comment line
127 static TString comment;
128
129 void Config()
130 {
131  
132   //========================//
133   // Set Random Number seed //
134   //========================//
135   TDatime dt;
136   UInt_t curtime=dt.Get();
137   UInt_t procid=gSystem->GetPid();
138   UInt_t seed=curtime-procid;
139
140   //  gRandom->SetSeed(seed);
141   //  cerr<<"Seed for random number generation= "<<seed<<endl; 
142   gRandom->SetSeed(12345);
143   
144   // Load Pythia libraries
145   LoadPythia();
146   // libraries required by geant321
147 #if defined(__CINT__)
148   gSystem->Load("libgeant321");
149 #endif
150
151   new TGeant3TGeo("C++ Interface to Geant3");
152
153   if(!AliCDBManager::Instance()->IsDefaultStorageSet()){
154     AliCDBManager::Instance()->SetDefaultStorage("local://$ALICE_ROOT");
155     AliCDBManager::Instance()->SetRun(0);
156   }
157   
158   //=======================================================================
159   //  Create the output file
160
161    
162   AliRunLoader* rl=0x0;
163
164   cout<<"Config.C: Creating Run Loader ..."<<endl;
165   rl = AliRunLoader::Open("galice.root",
166                           AliConfig::GetDefaultEventFolderName(),
167                           "recreate");
168   if (rl == 0x0)
169     {
170       gAlice->Fatal("Config.C","Can not instatiate the Run Loader");
171       return;
172     }
173   rl->SetCompressionLevel(2);
174   rl->SetNumberOfEventsPerFile(3);
175   gAlice->SetRunLoader(rl);
176   // gAlice->SetGeometryFromFile("geometry.root");
177   // gAlice->SetGeometryFromCDB();
178
179   // Set the trigger configuration
180   gAlice->SetTriggerDescriptor(TrigConfName[trig]);
181   cout<<"Trigger configuration is set to  "<<TrigConfName[trig]<<endl;
182
183   //
184   //=======================================================================
185   // ************* STEERING parameters FOR ALICE SIMULATION **************
186   // --- Specify event type to be tracked through the ALICE setup
187   // --- All positions are in cm, angles in degrees, and P and E in GeV
188
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
222
223   // Set External decayer //
224   //======================//
225   TVirtualMCDecayer* decayer = new AliDecayerPythia();
226   // DECAYS
227   //
228   switch(decHvFl) {
229   case kNature:
230     decayer->SetForceDecay(kAll);
231     break;
232   case kHadr:
233     decayer->SetForceDecay(kHadronicD);
234     break;
235   case kSemiEl:
236     decayer->SetForceDecay(kSemiElectronic);
237     break;
238   case kSemiMu:
239     decayer->SetForceDecay(kSemiMuonic);
240     break;
241   }
242   decayer->Init();
243   gMC->SetExternalDecayer(decayer);
244
245   //=========================//
246   // Generator Configuration //
247   //=========================//
248   AliGenPythia *pythia = PythiaHVQ(procHvFl);
249   // FeedDown option
250   pythia->SetFeedDownHigherFamily(kFALSE);
251   // Stack filling option
252   if(!stars) pythia->SetStackFillOpt(AliGenPythia::kParentSelection);
253   // Set Count mode
254   if(nEvts>0) pythia->SetCountMode(AliGenPythia::kCountParents);
255   // DECAYS
256   //
257   switch(decHvFl) {
258   case kNature:
259     pythia->SetForceDecay(kAll);
260     break;
261   case kHadr:
262     pythia->SetForceDecay(kHadronicD);
263     break;
264   case kSemiEl:
265     pythia->SetForceDecay(kSemiElectronic);
266     break;
267   case kSemiMu:
268     pythia->SetForceDecay(kSemiMuonic);
269     break;
270   }
271   // GEOM & KINE CUTS
272   //
273   pythia->SetMomentumRange(0,99999999);
274   pythia->SetPhiRange(0., 360.);
275   pythia->SetThetaRange(0,180);
276   switch(ycut) {
277   case kFull:
278     pythia->SetYRange(-999,999);
279     break;
280   case kBarrel:
281     pythia->SetYRange(-2,2);
282     break;
283   case kMuonArm:
284     pythia->SetYRange(1,6);
285     break;
286   }
287
288   // PRIMARY VERTEX
289   //
290   pythia->SetOrigin(0, 0, 0);    // vertex position
291   pythia->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position
292   pythia->SetCutVertexZ(1.);     // Truncate at 1 sigma
293   pythia->SetVertexSmear(kPerEvent); 
294
295
296
297   pythia->SetTrackingFlag(0);
298   // Specify GEANT tracking limits (Rmax, Zmax)
299   //gAlice->GetMCApp()->TrackingLimits(90.,1.0e10);
300
301
302   pythia->Init();
303
304   // FIELD
305   //    
306   if (mag == k2kG) {
307     comment = comment.Append(" | L3 field 0.2 T");
308   } else if (mag == k4kG) {
309     comment = comment.Append(" | L3 field 0.4 T");
310   } else if (mag == k5kG) {
311     comment = comment.Append(" | L3 field 0.5 T");
312   }
313   printf("\n \n Comment: %s \n \n", comment.Data());
314     
315   AliMagFMaps* field = new AliMagFMaps("Maps","Maps", 2, 1., 10., mag);
316   field->SetL3ConstField(0); //Using const. field in the barrel
317   rl->CdGAFile();
318   gAlice->SetField(field);    
319
320
321   // By default all ALICE is switched off
322   Int_t iABSO=0;
323   Int_t iACORDE=0;
324   Int_t iDIPO=0;
325   Int_t iFMD=0;
326   Int_t iFRAME=0;
327   Int_t iHALL=0;
328   Int_t iITS=0;
329   Int_t iMAG=0;
330   Int_t iMUON=0;
331   Int_t iPHOS=0;
332   Int_t iPIPE=0;
333   Int_t iPMD=0;
334   Int_t iHMPID=0;
335   Int_t iSHIL=0;
336   Int_t iT0=0;
337   Int_t iTOF=0;
338   Int_t iTPC=0;
339   Int_t iTRD=0;
340   Int_t iZDC=0;
341
342   //=================== Alice BODY parameters =============================
343   AliBODY *BODY = new AliBODY("BODY","Alice envelop");
344
345   if(iMAG) {
346     //=================== MAG parameters ============================
347     // --- Start with Magnet since detector layouts may be depending ---
348     // --- on the selected Magnet dimensions ---
349     AliMAG *MAG  = new AliMAG("MAG","Magnet");
350   }
351
352
353   if(iABSO) {
354     //=================== ABSO parameters ============================
355     AliABSO *ABSO  = new AliABSOv3("ABSO","Muon Absorber");
356   }
357
358   if(iDIPO) {
359     //=================== DIPO parameters ============================
360
361     AliDIPO *DIPO  = new AliDIPOv3("DIPO","Dipole version 3");
362   }
363
364   if(iHALL) {
365     //=================== HALL parameters ============================
366
367     AliHALL *HALL  = new AliHALLv3("HALL","Alice Hall");
368   }
369
370
371   if(iFRAME) {
372     //=================== FRAME parameters ============================
373
374     AliFRAME *FRAME  = new AliFRAMEv2("FRAME","Space Frame");
375     if (geo == kHoles) {
376       FRAME->SetHoles(1);
377     } else {
378       FRAME->SetHoles(0);
379     }
380
381   }
382
383   if(iSHIL) {
384     //=================== SHIL parameters ============================
385
386     AliSHIL *SHIL  = new AliSHILv3("SHIL","Shielding");
387   }
388
389
390   if(iPIPE) {
391     //=================== PIPE parameters ============================
392
393     AliPIPE *PIPE  = new AliPIPEv3("PIPE","Beam Pipe");
394   }
395
396
397   if(iITS) {
398     //=================== ITS parameters ============================
399
400     AliITSvPPRasymmFMD *ITS  = new AliITSvPPRasymmFMD("ITS","New ITS PPR detailed version with asymmetric services");
401   }
402   
403
404   if(iTPC) {
405     //============================ TPC parameters ===================
406     AliTPC *TPC  = new AliTPCv2("TPC","Default");
407   }
408
409
410   if(iTOF) {
411     //=================== TOF parameters ============================
412     AliTOF *TOF  = new AliTOFv6T0("TOF","normal TOF");
413   }
414
415   if(iHMPID) {
416     //=================== HMPID parameters ===========================
417     AliHMPID *HMPID  = new AliHMPIDv2("HMPID","normal HMPID");    
418
419   }
420
421
422   if(iZDC) {
423     //=================== ZDC parameters ============================
424
425     AliZDC *ZDC  = new AliZDCv3("ZDC","normal ZDC");
426   }
427
428   if(iACORDE) {
429     //=================== ACORDE parameters ============================
430
431     AliACORDE *ACORDE  = new AliACORDEv1("ACORDE","normal ACORDE");
432   }
433
434   if(iTRD) {
435     //=================== TRD parameters ============================
436   
437     AliTRD *TRD  = new AliTRDv1("TRD","TRD slow simulator");
438   }
439
440   if(iFMD) {
441     //=================== FMD parameters ============================
442
443     AliFMD *FMD  = new AliFMDv0("FMD","normal FMD");
444   }
445
446   if(iMUON) {
447     //=================== MUON parameters ===========================
448     AliMUON *MUON  = new AliMUONv1("MUON","default");
449   }
450  
451   //=================== PHOS parameters ===========================
452
453   if(iPHOS) {
454     AliPHOS *PHOS  = new AliPHOSv1("PHOS","GPS2");
455   }
456
457
458   //=================== ACORDE parameters ===========================
459
460   if(iACORDE) {
461     AliACORDE *ACORDE  = new AliACORDEv1("ACORDE","Normal ACORDEGPS2");
462   }
463
464
465   if(iPMD) {
466     //=================== PMD parameters ============================
467
468     AliPMD *PMD  = new AliPMDv1("PMD","normal PMD");
469     PMD->SetPAR(1., 1., 0.8, 0.02);
470     PMD->SetIN(6., 18., -580., 27., 27.);
471     PMD->SetGEO(0.0, 0.2, 4.);
472     PMD->SetPadSize(0.8, 1.0, 1.0, 1.5);
473
474   }
475
476   if(iT0) {
477     //=================== T0 parameters ============================
478     AliT0 *T0  = new AliT0v1("T0","T0 Detector");
479   }
480
481          
482 }
483 //
484 //           PYTHIA
485 //
486 AliGenPythia *PythiaHVQ(ProcessHvFl_t proc) {
487
488   AliGenPythia * gener = 0x0;
489
490   switch(proc) {
491   case kCharmPbPb5500:
492     comment = comment.Append(" Charm in Pb-Pb at 5.5 TeV");
493     gener = new AliGenPythia(nEvts);
494     gener->SetProcess(kPyCharmPbPbMNR);
495     gener->SetStrucFunc(kCTEQ4L);
496     gener->SetPtHard(2.1,-1.0);
497     gener->SetEnergyCMS(5500.);
498     gener->SetNuclei(208,208);
499     break;
500   case kCharmpPb8800:
501     comment = comment.Append(" Charm in p-Pb at 8.8 TeV");
502     gener = new AliGenPythia(nEvts);
503     gener->SetProcess(kPyCharmpPbMNR);
504     gener->SetStrucFunc(kCTEQ4L);
505     gener->SetPtHard(2.1,-1.0);
506     gener->SetEnergyCMS(8800.);
507     gener->SetProjectile("P",1,1);
508     gener->SetTarget("Pb",208,82);
509     break;
510   case kCharmpp14000:
511     comment = comment.Append(" Charm in pp at 14 TeV");
512     gener = new AliGenPythia(nEvts);
513     gener->SetProcess(kPyCharmppMNR);
514     gener->SetStrucFunc(kCTEQ4L);
515     gener->SetPtHard(2.1,-1.0);
516     gener->SetEnergyCMS(14000.);
517     break;
518   case kCharmpp14000wmi:
519     comment = comment.Append(" Charm in pp at 14 TeV with mult. interactions");
520     gener = new AliGenPythia(-1);
521     gener->SetProcess(kPyCharmppMNRwmi);
522     gener->SetStrucFunc(kCTEQ5L);
523     gener->SetPtHard(ptHardMin,ptHardMax);
524     gener->SetEnergyCMS(14000.);
525     break;
526   case kD0PbPb5500:
527     comment = comment.Append(" D0 in Pb-Pb at 5.5 TeV");
528     gener = new AliGenPythia(nEvts);
529     gener->SetProcess(kPyD0PbPbMNR);
530     gener->SetStrucFunc(kCTEQ4L);
531     gener->SetPtHard(2.1,-1.0);
532     gener->SetEnergyCMS(5500.);
533     gener->SetNuclei(208,208);
534     break;
535   case kD0pPb8800:
536     comment = comment.Append(" D0 in p-Pb at 8.8 TeV");
537     gener = new AliGenPythia(nEvts);
538     gener->SetProcess(kPyD0pPbMNR);
539     gener->SetStrucFunc(kCTEQ4L);
540     gener->SetPtHard(2.1,-1.0);
541     gener->SetEnergyCMS(8800.);
542     gener->SetProjectile("P",1,1);
543     gener->SetTarget("Pb",208,82);
544     break;
545   case kD0pp14000:
546     comment = comment.Append(" D0 in pp at 14 TeV");
547     gener = new AliGenPythia(nEvts);
548     gener->SetProcess(kPyD0ppMNR);
549     gener->SetStrucFunc(kCTEQ4L);
550     gener->SetPtHard(2.1,-1.0);
551     gener->SetEnergyCMS(14000.);
552     break;
553   case kDPlusPbPb5500:
554     comment = comment.Append(" DPlus in Pb-Pb at 5.5 TeV");
555     gener = new AliGenPythia(nEvts);
556     gener->SetProcess(kPyDPlusPbPbMNR);
557     gener->SetStrucFunc(kCTEQ4L);
558     gener->SetPtHard(2.1,-1.0);
559     gener->SetEnergyCMS(5500.);
560     gener->SetNuclei(208,208);
561     break;
562   case kDPluspPb8800:
563     comment = comment.Append(" DPlus in p-Pb at 8.8 TeV");
564     gener = new AliGenPythia(nEvts);
565     gener->SetProcess(kPyDPluspPbMNR);
566     gener->SetStrucFunc(kCTEQ4L);
567     gener->SetPtHard(2.1,-1.0);
568     gener->SetEnergyCMS(8800.);
569     gener->SetProjectile("P",1,1);
570     gener->SetTarget("Pb",208,82);
571     break;
572   case kDPluspp14000:
573     comment = comment.Append(" DPlus in pp at 14 TeV");
574     gener = new AliGenPythia(nEvts);
575     gener->SetProcess(kPyDPlusppMNR);
576     gener->SetStrucFunc(kCTEQ4L);
577     gener->SetPtHard(2.1,-1.0);
578     gener->SetEnergyCMS(14000.);
579     break;
580  case kDPlusStrangePbPb5500:
581     comment = comment.Append(" DPlusStrange in Pb-Pb at 5.5 TeV");
582     gener = new AliGenPythia(nEvts);
583     gener->SetProcess(kPyDPlusStrangePbPbMNR);
584     gener->SetStrucFunc(kCTEQ4L);
585     gener->SetPtHard(2.1,-1.0);
586     gener->SetEnergyCMS(5500.);
587     gener->SetNuclei(208,208);
588     break;
589   case kDPlusStrangepPb8800:
590     comment = comment.Append(" DPlusStrange in p-Pb at 8.8 TeV");
591     gener = new AliGenPythia(nEvts);
592     gener->SetProcess(kPyDPlusStrangepPbMNR);
593     gener->SetStrucFunc(kCTEQ4L);
594     gener->SetPtHard(2.1,-1.0);
595     gener->SetEnergyCMS(8800.);
596     gener->SetProjectile("P",1,1);
597     gener->SetTarget("Pb",208,82);
598     break;
599   case kDPlusStrangepp14000:
600     comment = comment.Append(" DPlusStrange in pp at 14 TeV");
601     gener = new AliGenPythia(nEvts);
602     gener->SetProcess(kPyDPlusStrangeppMNR);
603     gener->SetStrucFunc(kCTEQ4L);
604     gener->SetPtHard(2.1,-1.0);
605     gener->SetEnergyCMS(14000.);
606     break;
607   case kBeautyPbPb5500:
608     comment = comment.Append(" Beauty in Pb-Pb at 5.5 TeV");
609     gener = new AliGenPythia(nEvts);
610     gener->SetProcess(kPyBeautyPbPbMNR);
611     gener->SetStrucFunc(kCTEQ4L);
612     gener->SetPtHard(2.75,-1.0);
613     gener->SetEnergyCMS(5500.);
614     gener->SetNuclei(208,208);
615     break;
616   case kBeautypPb8800:
617     comment = comment.Append(" Beauty in p-Pb at 8.8 TeV");
618     gener = new AliGenPythia(nEvts);
619     gener->SetProcess(kPyBeautypPbMNR);
620     gener->SetStrucFunc(kCTEQ4L);
621     gener->SetPtHard(2.75,-1.0);
622     gener->SetEnergyCMS(8800.);
623     gener->SetProjectile("P",1,1);
624     gener->SetTarget("Pb",208,82);
625     break;
626   case kBeautypp14000:
627     comment = comment.Append(" Beauty in pp at 14 TeV");
628     gener = new AliGenPythia(nEvts);
629     gener->SetProcess(kPyBeautyppMNR);
630     gener->SetStrucFunc(kCTEQ4L);
631     gener->SetPtHard(2.75,-1.0);
632     gener->SetEnergyCMS(14000.);
633     break;
634   case kBeautypp14000wmi:
635     comment = comment.Append(" Beauty in pp at 14 TeV with mult. interactions");
636     gener = new AliGenPythia(-1);
637     gener->SetProcess(kPyBeautyppMNRwmi);
638     gener->SetStrucFunc(kCTEQ5L);
639     gener->SetPtHard(ptHardMin,ptHardMax);
640     gener->SetEnergyCMS(14000.);
641     break;
642   }
643
644   return gener;
645 }
646
647
648
649 void LoadPythia()
650 {
651     // Load Pythia related libraries
652     gSystem->Load("liblhapdf.so");      // Parton density functions
653     gSystem->Load("libEGPythia6.so");   // TGenerator interface
654     gSystem->Load("libpythia6.so");     // Pythia
655     gSystem->Load("libAliPythia6.so");  // ALICE specific implementations
656 }
657
658
659