AliTOFv4T0 replaced by AliTOFv5T0
[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 //*******************************************************************//
13 #if !defined(__CINT__) || defined(__MAKECINT__)
14 #include <Riostream.h>
15 #include <TRandom.h>
16 #include <TDatime.h>
17 #include <TSystem.h>
18 #include <TVirtualMC.h>
19 #include <TGeant3.h>
20 #include "STEER/AliRunLoader.h"
21 #include "STEER/AliRun.h"
22 #include "STEER/AliConfig.h"
23 #include "PYTHIA6/AliDecayerPythia.h"
24 #include "PYTHIA6/AliGenPythia.h"
25 #include "STEER/AliMagFMaps.h"
26 #include "STRUCT/AliBODY.h"
27 #include "STRUCT/AliMAG.h"
28 #include "STRUCT/AliABSOv0.h"
29 #include "STRUCT/AliDIPOv2.h"
30 #include "STRUCT/AliHALL.h"
31 #include "STRUCT/AliFRAMEv2.h"
32 #include "STRUCT/AliSHILv2.h"
33 #include "STRUCT/AliPIPEv0.h"
34 #include "ITS/AliITSvPPRasymmFMD.h"
35 #include "TPC/AliTPCv2.h"
36 #include "TOF/AliTOFv5T0.h"
37 #include "RICH/AliRICHv1.h"
38 #include "ZDC/AliZDCv1.h"
39 #include "TRD/AliTRDv1.h"
40 #include "FMD/AliFMDv0.h"
41 #include "MUON/AliMUONv1.h"
42 #include "PHOS/AliPHOSv1.h"
43 #include "PMD/AliPMDv1.h"
44 #include "START/AliSTARTv1.h"
45 #include "CRT/AliCRTv1.h"
46 #endif
47
48 //--- Heavy Flavour Production ---
49 enum ProcessHvFl_t 
50 {
51   kCharmPbPb5500,  kCharmpPb8800,  kCharmpp14000,
52   kD0PbPb5500,     kD0pPb8800,     kD0pp14000,
53   kDPlusPbPb5500,     kDPluspPb8800,     kDPluspp14000,
54   kBeautyPbPb5500, kBeautypPb8800, kBeautypp14000
55 };
56 //--- Decay Mode ---
57 enum DecayHvFl_t 
58 {
59   kNature,  kHadr, kSemiEl, kSemiMu
60 };
61 //--- Rapidity Cut ---
62 enum YCut_t
63 {
64   kFull, kBarrel, kMuonArm
65 };
66 //--- Magnetic Field ---
67 enum Mag_t
68 {
69     k2kG, k4kG, k5kG
70 };
71 //--- Functions ---
72 AliGenPythia *PythiaHVQ(ProcessHvFl_t proc);
73
74
75 // This part for configuration
76 static ProcessHvFl_t procHvFl = kCharmPbPb5500;
77 static DecayHvFl_t   decHvFl  = kNature; 
78 static YCut_t        ycut     = kFull;
79 static Mag_t         mag      = k4kG; 
80 // nEvts = -1  : you get 1 QQbar pair and all the fragmentation and 
81 //               decay chain
82 // nEvts = N>0 : you get N charm / beauty Hadrons 
83 Int_t nEvts = -1; 
84 // stars = kTRUE : all heavy resonances and their decay stored
85 //       = kFALSE: only final heavy hadrons and their decays stored
86 Bool_t stars = kTRUE;
87
88
89 // Comment line
90 static TString comment;
91
92 void Config()
93 {
94  
95   //========================//
96   // Set Random Number seed //
97   //========================//
98   TDatime dt;
99   UInt_t curtime=dt.Get();
100   UInt_t procid=gSystem->GetPid();
101   UInt_t seed=curtime-procid;
102
103   //  gRandom->SetSeed(seed);
104   //  cerr<<"Seed for random number generation= "<<seed<<endl; 
105   gRandom->SetSeed(12345);
106   
107
108   // libraries required by geant321
109 #if defined(__CINT__)
110   gSystem->Load("libgeant321");
111 #endif
112
113   new TGeant3TGeo("C++ Interface to Geant3");
114
115   //=======================================================================
116   //  Create the output file
117
118    
119   AliRunLoader* rl=0x0;
120
121   cout<<"Config.C: Creating Run Loader ..."<<endl;
122   rl = AliRunLoader::Open("galice.root",
123                           AliConfig::GetDefaultEventFolderName(),
124                           "recreate");
125   if (rl == 0x0)
126     {
127       gAlice->Fatal("Config.C","Can not instatiate the Run Loader");
128       return;
129     }
130   rl->SetCompressionLevel(2);
131   rl->SetNumberOfEventsPerFile(3);
132   gAlice->SetRunLoader(rl);
133
134   //
135   //=======================================================================
136   // ************* STEERING parameters FOR ALICE SIMULATION **************
137   // --- Specify event type to be tracked through the ALICE setup
138   // --- All positions are in cm, angles in degrees, and P and E in GeV
139
140
141     gMC->SetProcess("DCAY",1);
142     gMC->SetProcess("PAIR",1);
143     gMC->SetProcess("COMP",1);
144     gMC->SetProcess("PHOT",1);
145     gMC->SetProcess("PFIS",0);
146     gMC->SetProcess("DRAY",0);
147     gMC->SetProcess("ANNI",1);
148     gMC->SetProcess("BREM",1);
149     gMC->SetProcess("MUNU",1);
150     gMC->SetProcess("CKOV",1);
151     gMC->SetProcess("HADR",1);
152     gMC->SetProcess("LOSS",2);
153     gMC->SetProcess("MULS",1);
154     gMC->SetProcess("RAYL",1);
155
156     Float_t cut = 1.e-3;        // 1MeV cut by default
157     Float_t tofmax = 1.e10;
158
159     gMC->SetCut("CUTGAM", cut);
160     gMC->SetCut("CUTELE", cut);
161     gMC->SetCut("CUTNEU", cut);
162     gMC->SetCut("CUTHAD", cut);
163     gMC->SetCut("CUTMUO", cut);
164     gMC->SetCut("BCUTE",  cut); 
165     gMC->SetCut("BCUTM",  cut); 
166     gMC->SetCut("DCUTE",  cut); 
167     gMC->SetCut("DCUTM",  cut); 
168     gMC->SetCut("PPCUTM", cut);
169     gMC->SetCut("TOFMAX", tofmax); 
170
171
172
173
174   // Set External decayer //
175   //======================//
176   TVirtualMCDecayer* decayer = new AliDecayerPythia();
177   // DECAYS
178   //
179   switch(decHvFl) {
180   case kNature:
181     decayer->SetForceDecay(kAll);
182     break;
183   case kHadr:
184     decayer->SetForceDecay(kHadronicD);
185     break;
186   case kSemiEl:
187     decayer->SetForceDecay(kSemiElectronic);
188     break;
189   case kSemiMu:
190     decayer->SetForceDecay(kSemiMuonic);
191     break;
192   }
193   decayer->Init();
194   gMC->SetExternalDecayer(decayer);
195
196   //=========================//
197   // Generator Configuration //
198   //=========================//
199   AliGenPythia *pythia = PythiaHVQ(procHvFl);
200   // FeedDown option
201   pythia->SetFeedDownHigherFamily(kFALSE);
202   // Stack filling option
203   if(!stars) pythia->SetStackFillOpt(AliGenPythia::kParentSelection);
204   // Set Count mode
205   if(nEvts>0) pythia->SetCountMode(AliGenPythia::kCountParents);
206   // DECAYS
207   //
208   switch(decHvFl) {
209   case kNature:
210     pythia->SetForceDecay(kAll);
211     break;
212   case kHadr:
213     pythia->SetForceDecay(kHadronicD);
214     break;
215   case kSemiEl:
216     pythia->SetForceDecay(kSemiElectronic);
217     break;
218   case kSemiMu:
219     pythia->SetForceDecay(kSemiMuonic);
220     break;
221   }
222   // GEOM & KINE CUTS
223   //
224   pythia->SetMomentumRange(0,99999999);
225   pythia->SetPhiRange(0., 360.);
226   pythia->SetThetaRange(0,180);
227   switch(ycut) {
228   case kFull:
229     pythia->SetYRange(-999,999);
230     break;
231   case kBarrel:
232     pythia->SetYRange(-2,2);
233     break;
234   case kMuonArm:
235     pythia->SetYRange(1,6);
236     break;
237   }
238
239   // PRIMARY VERTEX
240   //
241   pythia->SetOrigin(0, 0, 0);    // vertex position
242   pythia->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position
243   pythia->SetCutVertexZ(1.);     // Truncate at 1 sigma
244   pythia->SetVertexSmear(kPerEvent); 
245
246
247
248   pythia->SetTrackingFlag(0);
249   // Specify GEANT tracking limits (Rmax, Zmax)
250   //gAlice->GetMCApp()->TrackingLimits(90.,1.0e10);
251
252
253   pythia->Init();
254
255   // FIELD
256   //    
257   if (mag == k2kG) {
258     comment = comment.Append(" | L3 field 0.2 T");
259   } else if (mag == k4kG) {
260     comment = comment.Append(" | L3 field 0.4 T");
261   } else if (mag == k5kG) {
262     comment = comment.Append(" | L3 field 0.5 T");
263   }
264   printf("\n \n Comment: %s \n \n", comment.Data());
265     
266   AliMagFMaps* field = new AliMagFMaps("Maps","Maps", 2, 1., 10., mag);
267   field->SetL3ConstField(0); //Using const. field in the barrel
268   rl->CdGAFile();
269   gAlice->SetField(field);    
270
271
272   // By default all ALICE is switched off
273   Int_t iABSO=0;
274   Int_t iCRT=0;
275   Int_t iDIPO=0;
276   Int_t iFMD=0;
277   Int_t iFRAME=0;
278   Int_t iHALL=0;
279   Int_t iITS=0;
280   Int_t iMAG=0;
281   Int_t iMUON=0;
282   Int_t iPHOS=0;
283   Int_t iPIPE=0;
284   Int_t iPMD=0;
285   Int_t iRICH=0;
286   Int_t iSHIL=0;
287   Int_t iSTART=0;
288   Int_t iTOF=0;
289   Int_t iTPC=0;
290   Int_t iTRD=0;
291   Int_t iZDC=0;
292
293   //=================== Alice BODY parameters =============================
294   AliBODY *BODY = new AliBODY("BODY","Alice envelop");
295
296   if(iMAG) {
297     //=================== MAG parameters ============================
298     // --- Start with Magnet since detector layouts may be depending ---
299     // --- on the selected Magnet dimensions ---
300     AliMAG *MAG  = new AliMAG("MAG","Magnet");
301   }
302
303
304   if(iABSO) {
305     //=================== ABSO parameters ============================
306     AliABSO *ABSO  = new AliABSOv0("ABSO","Muon Absorber");
307   }
308
309   if(iDIPO) {
310     //=================== DIPO parameters ============================
311
312     AliDIPO *DIPO  = new AliDIPOv2("DIPO","Dipole version 2");
313   }
314
315   if(iHALL) {
316     //=================== HALL parameters ============================
317
318     AliHALL *HALL  = new AliHALL("HALL","Alice Hall");
319   }
320
321
322   if(iFRAME) {
323     //=================== FRAME parameters ============================
324
325     AliFRAME *FRAME  = new AliFRAMEv2("FRAME","Space Frame");
326
327   }
328
329   if(iSHIL) {
330     //=================== SHIL parameters ============================
331
332     AliSHIL *SHIL  = new AliSHILv2("SHIL","Shielding");
333   }
334
335
336   if(iPIPE) {
337     //=================== PIPE parameters ============================
338
339     AliPIPE *PIPE  = new AliPIPEv0("PIPE","Beam Pipe");
340   }
341
342
343   if(iITS) {
344
345 //=================== ITS parameters ============================
346     //
347     // As the innermost detector in ALICE, the Inner Tracking System "impacts" on
348     // almost all other detectors. This involves the fact that the ITS geometry
349     // still has several options to be followed in parallel in order to determine
350     // the best set-up which minimizes the induced background. All the geometries
351     // available to date are described in the following. Read carefully the comments
352     // and use the default version (the only one uncommented) unless you are making
353     // comparisons and you know what you are doing. In this case just uncomment the
354     // ITS geometry you want to use and run Aliroot.
355     //
356     // Detailed geometries:         
357     //
358     //
359     //AliITS *ITS  = new AliITSv5symm("ITS","Updated ITS TDR detailed version with symmetric services");
360     //
361     //AliITS *ITS  = new AliITSv5asymm("ITS","Updates ITS TDR detailed version with asymmetric services");
362     //
363     AliITSvPPRasymmFMD *ITS  = new AliITSvPPRasymmFMD("ITS","New ITS PPR detailed version with asymmetric services");
364     ITS->SetMinorVersion(2);                                         // don't touch this parameter if you're not an ITS developer
365     ITS->SetReadDet(kFALSE);                                         // don't touch this parameter if you're not an ITS developer
366     ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det");  // don't touch this parameter if you're not an ITS developer
367     ITS->SetThicknessDet1(200.);   // detector thickness on layer 1 must be in the range [150,300]
368     ITS->SetThicknessDet2(200.);   // detector thickness on layer 2 must be in the range [150,300]
369     ITS->SetThicknessChip1(200.);  // chip thickness on layer 1 must be in the range [100,300]
370     ITS->SetThicknessChip2(200.);  // chip thickness on layer 2 must be in the range [100,300]
371     ITS->SetRails(1);              // 1 --> rails in ; 0 --> rails out
372     ITS->SetCoolingFluid(1);       // 1 --> water ; 0 --> freon
373     //
374     //AliITSvPPRsymm *ITS  = new AliITSvPPRsymm("ITS","New ITS PPR detailed version with symmetric services");
375     //ITS->SetMinorVersion(2);                                       // don't touch this parameter if you're not an ITS developer
376     //ITS->SetReadDet(kFALSE);                                       // don't touch this parameter if you're not an ITS developer
377     //ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRsymm2.det"); // don't touch this parameter if you're not an ITS developer
378     //ITS->SetThicknessDet1(300.);   // detector thickness on layer 1 must be in the range [150,300]
379     //ITS->SetThicknessDet2(300.);   // detector thickness on layer 2 must be in the range [150,300]
380     //ITS->SetThicknessChip1(300.);  // chip thickness on layer 1 must be in the range [100,300]
381     //ITS->SetThicknessChip2(300.);  // chip thickness on layer 2 must be in the range [100,300]
382     //ITS->SetRails(1);              // 1 --> rails in ; 0 --> rails out
383     //ITS->SetCoolingFluid(1);       // 1 --> water ; 0 --> freon
384     //
385     //
386     // Coarse geometries (warning: no hits are produced with these coarse geometries and they unuseful 
387     // for reconstruction !):
388     //                                                     
389     //
390     //AliITSvPPRcoarseasymm *ITS  = new AliITSvPPRcoarseasymm("ITS","New ITS PPR coarse version with asymmetric services");
391     //ITS->SetRails(1);                // 1 --> rails in ; 0 --> rails out
392     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
393     //
394     //AliITS *ITS  = new AliITSvPPRcoarsesymm("ITS","New ITS PPR coarse version with symmetric services");
395     //ITS->SetRails(1);                // 1 --> rails in ; 0 --> rails out
396     //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
397     //                      
398     //
399     //
400     // Geant3 <-> EUCLID conversion
401     // ============================
402     //
403     // SetEUCLID is a flag to output (=1) or not to output (=0) both geometry and
404     // media to two ASCII files (called by default ITSgeometry.euc and
405     // ITSgeometry.tme) in a format understandable to the CAD system EUCLID.
406     // The default (=0) means that you dont want to use this facility.
407     //
408     ITS->SetEUCLID(0);  
409   }
410   
411
412   if(iTPC) {
413     //============================ TPC parameters ===================
414     AliTPC *TPC  = new AliTPCv2("TPC","Default");
415   }
416
417
418   if(iTOF) {
419     //=================== TOF parameters ============================
420     AliTOF *TOF  = new AliTOFv5T0("TOF","normal TOF");
421   }
422
423   if(iRICH) {
424     //=================== RICH parameters ===========================
425     AliRICH *RICH  = new AliRICHv1("RICH","normal RICH");    
426
427   }
428
429
430   if(iZDC) {
431     //=================== ZDC parameters ============================
432
433     AliZDC *ZDC  = new AliZDCv1("ZDC","normal ZDC");
434   }
435
436   if(iCRT) {
437     //=================== CRT parameters ============================
438
439     AliCRT *CRT  = new AliCRTv1("CRT","normal CRT");
440   }
441
442   if(iTRD) {
443     //=================== TRD parameters ============================
444   
445     AliTRD *TRD  = new AliTRDv1("TRD","TRD slow simulator");
446   
447     // Select the gas mixture (0: 97% Xe + 3% isobutane, 1: 90% Xe + 10% CO2)
448     TRD->SetGasMix(1);
449   
450     // With hole in front of PHOS
451     TRD->SetPHOShole();
452     // With hole in front of RICH
453     TRD->SetRICHhole();
454     // Switch on TR
455     AliTRDsim *TRDsim = TRD->CreateTR();
456   }
457
458   if(iFMD) {
459     //=================== FMD parameters ============================
460
461     AliFMD *FMD  = new AliFMDv0("FMD","normal FMD");
462   }
463
464   if(iMUON) {
465     //=================== MUON parameters ===========================
466     AliMUON *MUON  = new AliMUONv1("MUON","default");
467   }
468  
469   //=================== PHOS parameters ===========================
470
471   if(iPHOS) {
472     AliPHOS *PHOS  = new AliPHOSv1("PHOS","GPS2");
473   }
474
475
476   //=================== CRT parameters ===========================
477
478   if(iCRT) {
479     AliCRT *CRT  = new AliCRTv1("CRT","Normal CRTGPS2");
480   }
481
482
483   if(iPMD) {
484     //=================== PMD parameters ============================
485
486     AliPMD *PMD  = new AliPMDv1("PMD","normal PMD");
487     PMD->SetPAR(1., 1., 0.8, 0.02);
488     PMD->SetIN(6., 18., -580., 27., 27.);
489     PMD->SetGEO(0.0, 0.2, 4.);
490     PMD->SetPadSize(0.8, 1.0, 1.0, 1.5);
491
492   }
493
494   if(iSTART) {
495     //=================== START parameters ============================
496     AliSTART *START  = new AliSTARTv1("START","START Detector");
497   }
498
499          
500 }
501 //
502 //           PYTHIA
503 //
504 AliGenPythia *PythiaHVQ(ProcessHvFl_t proc) {
505
506   AliGenPythia * gener = 0x0;
507
508   switch(proc) {
509   case kCharmPbPb5500:
510     comment = comment.Append(" Charm in Pb-Pb at 5.5 TeV");
511     gener = new AliGenPythia(nEvts);
512     gener->SetProcess(kPyCharmPbPbMNR);
513     gener->SetStrucFunc(kCTEQ4L);
514     gener->SetPtHard(2.1,-1.0);
515     gener->SetEnergyCMS(5500.);
516     gener->SetNuclei(208,208);
517     break;
518   case kCharmpPb8800:
519     comment = comment.Append(" Charm in p-Pb at 8.8 TeV");
520     gener = new AliGenPythia(nEvts);
521     gener->SetProcess(kPyCharmpPbMNR);
522     gener->SetStrucFunc(kCTEQ4L);
523     gener->SetPtHard(2.1,-1.0);
524     gener->SetEnergyCMS(8800.);
525     gener->SetProjectile("P",1,1);
526     gener->SetTarget("Pb",208,82);
527     break;
528   case kCharmpp14000:
529     comment = comment.Append(" Charm in pp at 14 TeV");
530     gener = new AliGenPythia(nEvts);
531     gener->SetProcess(kPyCharmppMNR);
532     gener->SetStrucFunc(kCTEQ4L);
533     gener->SetPtHard(2.1,-1.0);
534     gener->SetEnergyCMS(14000.);
535     break;
536   case kD0PbPb5500:
537     comment = comment.Append(" D0 in Pb-Pb at 5.5 TeV");
538     gener = new AliGenPythia(nEvts);
539     gener->SetProcess(kPyD0PbPbMNR);
540     gener->SetStrucFunc(kCTEQ4L);
541     gener->SetPtHard(2.1,-1.0);
542     gener->SetEnergyCMS(5500.);
543     gener->SetNuclei(208,208);
544     break;
545   case kD0pPb8800:
546     comment = comment.Append(" D0 in p-Pb at 8.8 TeV");
547     gener = new AliGenPythia(nEvts);
548     gener->SetProcess(kPyD0pPbMNR);
549     gener->SetStrucFunc(kCTEQ4L);
550     gener->SetPtHard(2.1,-1.0);
551     gener->SetEnergyCMS(8800.);
552     gener->SetProjectile("P",1,1);
553     gener->SetTarget("Pb",208,82);
554     break;
555   case kD0pp14000:
556     comment = comment.Append(" D0 in pp at 14 TeV");
557     gener = new AliGenPythia(nEvts);
558     gener->SetProcess(kPyD0ppMNR);
559     gener->SetStrucFunc(kCTEQ4L);
560     gener->SetPtHard(2.1,-1.0);
561     gener->SetEnergyCMS(14000.);
562     break;
563   case kDPlusPbPb5500:
564     comment = comment.Append(" DPlus in Pb-Pb at 5.5 TeV");
565     gener = new AliGenPythia(nEvts);
566     gener->SetProcess(kPyDPlusPbPbMNR);
567     gener->SetStrucFunc(kCTEQ4L);
568     gener->SetPtHard(2.1,-1.0);
569     gener->SetEnergyCMS(5500.);
570     gener->SetNuclei(208,208);
571     break;
572   case kDPluspPb8800:
573     comment = comment.Append(" DPlus in p-Pb at 8.8 TeV");
574     gener = new AliGenPythia(nEvts);
575     gener->SetProcess(kPyDPluspPbMNR);
576     gener->SetStrucFunc(kCTEQ4L);
577     gener->SetPtHard(2.1,-1.0);
578     gener->SetEnergyCMS(8800.);
579     gener->SetProjectile("P",1,1);
580     gener->SetTarget("Pb",208,82);
581     break;
582   case kDPluspp14000:
583     comment = comment.Append(" DPlus in pp at 14 TeV");
584     gener = new AliGenPythia(nEvts);
585     gener->SetProcess(kPyDPlusppMNR);
586     gener->SetStrucFunc(kCTEQ4L);
587     gener->SetPtHard(2.1,-1.0);
588     gener->SetEnergyCMS(14000.);
589     break;
590   case kBeautyPbPb5500:
591     comment = comment.Append(" Beauty in Pb-Pb at 5.5 TeV");
592     gener = new AliGenPythia(nEvts);
593     gener->SetProcess(kPyBeautyPbPbMNR);
594     gener->SetStrucFunc(kCTEQ4L);
595     gener->SetPtHard(2.75,-1.0);
596     gener->SetEnergyCMS(5500.);
597     gener->SetNuclei(208,208);
598     break;
599   case kBeautypPb8800:
600     comment = comment.Append(" Beauty in p-Pb at 8.8 TeV");
601     gener = new AliGenPythia(nEvts);
602     gener->SetProcess(kPyBeautypPbMNR);
603     gener->SetStrucFunc(kCTEQ4L);
604     gener->SetPtHard(2.75,-1.0);
605     gener->SetEnergyCMS(8800.);
606     gener->SetProjectile("P",1,1);
607     gener->SetTarget("Pb",208,82);
608     break;
609   case kBeautypp14000:
610     comment = comment.Append(" Beauty in pp at 14 TeV");
611     gener = new AliGenPythia(nEvts);
612     gener->SetProcess(kPyBeautyppMNR);
613     gener->SetStrucFunc(kCTEQ4L);
614     gener->SetPtHard(2.75,-1.0);
615     gener->SetEnergyCMS(14000.);
616     break;
617   }
618
619   return gener;
620 }
621
622
623
624
625