1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
7 * Permission to use, copy, modify and distribute this software and its *
8 * documentation strictly for non-commercial purposes is hereby granted *
9 * without fee, provided that the above copyright notice appears in all *
10 * copies and that both the copyright notice and this permission notice *
11 * appear in the supporting documentation. The authors make no claims *
12 * about the suitability of this software for any purpose. It is *
13 * provided "as is" without express or implied warranty. *
14 **************************************************************************/
19 // Generator using the TPythia interface (via AliPythia)
20 // to generate pp collisions.
21 // Using SetNuclei() also nuclear modifications to the structure functions
22 // can be taken into account. This makes, of course, only sense for the
23 // generation of the products of hard processes (heavy flavor, jets ...)
25 // andreas.morsch@cern.ch
28 #include <TClonesArray.h>
29 #include <TDatabasePDG.h>
30 #include <TParticle.h>
32 #include <TObjArray.h>
36 #include "AliDecayerPythia.h"
37 #include "AliGenPythia.h"
38 #include "AliFastGlauber.h"
39 #include "AliHeader.h"
40 #include "AliGenPythiaEventHeader.h"
41 #include "AliPythia.h"
42 #include "AliPythiaRndm.h"
45 #include "AliRunLoader.h"
47 #include "PyquenCommon.h"
49 ClassImp(AliGenPythia)
52 AliGenPythia::AliGenPythia():
88 fDecayer(new AliDecayerPythia()),
96 fPhiMaxJet(2.* TMath::Pi()),
97 fJetReconstruction(kCell),
101 fPhiMaxGamma(2. * TMath::Pi()),
105 fPycellThreshold(0.),
107 fPycellMinEtJet(10.),
108 fPycellMaxRadius(1.),
109 fStackFillOpt(kFlavorSelection),
111 fFragmentation(kTRUE),
118 fTriggerMultiplicity(0),
119 fTriggerMultiplicityEta(0),
120 fTriggerMultiplicityPtMin(0),
121 fCountMode(kCountAll),
125 fFragPhotonInCalo(kFALSE),
127 fPhotonInCalo(kFALSE),
131 fCheckPHOSeta(kFALSE),
132 fFragPhotonOrPi0MinPt(0),
143 // Default Constructor
145 if (!AliPythiaRndm::GetPythiaRandom())
146 AliPythiaRndm::SetPythiaRandom(GetRandom());
149 AliGenPythia::AliGenPythia(Int_t npart)
161 fInteractionRate(0.),
175 fHadronisation(kTRUE),
176 fPatchOmegaDalitz(0),
178 fReadFromFile(kFALSE),
185 fDecayer(new AliDecayerPythia()),
186 fDebugEventFirst(-1),
193 fPhiMaxJet(2.* TMath::Pi()),
194 fJetReconstruction(kCell),
198 fPhiMaxGamma(2. * TMath::Pi()),
202 fPycellThreshold(0.),
204 fPycellMinEtJet(10.),
205 fPycellMaxRadius(1.),
206 fStackFillOpt(kFlavorSelection),
208 fFragmentation(kTRUE),
215 fTriggerMultiplicity(0),
216 fTriggerMultiplicityEta(0),
217 fTriggerMultiplicityPtMin(0),
218 fCountMode(kCountAll),
222 fFragPhotonInCalo(kFALSE),
224 fPhotonInCalo(kFALSE),
228 fCheckPHOSeta(kFALSE),
229 fFragPhotonOrPi0MinPt(0),
239 // default charm production at 5. 5 TeV
241 // structure function GRVHO
245 fTitle= "Particle Generator using PYTHIA";
247 // Set random number generator
248 if (!AliPythiaRndm::GetPythiaRandom())
249 AliPythiaRndm::SetPythiaRandom(GetRandom());
252 AliGenPythia::~AliGenPythia()
255 if(fEventsTime) delete fEventsTime;
258 void AliGenPythia::SetInteractionRate(Float_t rate,Float_t timewindow)
260 // Generate pileup using user specified rate
261 fInteractionRate = rate;
262 fTimeWindow = timewindow;
266 void AliGenPythia::GeneratePileup()
268 // Generate sub events time for pileup
270 if(fInteractionRate == 0.) {
271 Warning("GeneratePileup","Zero interaction specified. Skipping pileup generation.\n");
275 Int_t npart = NumberParticles();
277 Warning("GeneratePileup","Negative number of particles. Skipping pileup generation.\n");
281 if(fEventsTime) delete fEventsTime;
282 fEventsTime = new TArrayF(npart);
283 TArrayF &array = *fEventsTime;
284 for(Int_t ipart = 0; ipart < npart; ipart++)
287 Float_t eventtime = 0.;
290 eventtime += (AliPythiaRndm::GetPythiaRandom())->Exp(1./fInteractionRate);
291 if(eventtime > fTimeWindow) break;
292 array.Set(array.GetSize()+1);
293 array[array.GetSize()-1] = eventtime;
299 eventtime -= (AliPythiaRndm::GetPythiaRandom())->Exp(1./fInteractionRate);
300 if(TMath::Abs(eventtime) > fTimeWindow) break;
301 array.Set(array.GetSize()+1);
302 array[array.GetSize()-1] = eventtime;
305 SetNumberParticles(fEventsTime->GetSize());
308 void AliGenPythia::SetPycellParameters(Float_t etamax, Int_t neta, Int_t nphi,
309 Float_t thresh, Float_t etseed, Float_t minet, Float_t r)
311 // Set pycell parameters
312 fPycellEtaMax = etamax;
315 fPycellThreshold = thresh;
316 fPycellEtSeed = etseed;
317 fPycellMinEtJet = minet;
318 fPycellMaxRadius = r;
323 void AliGenPythia::SetEventListRange(Int_t eventFirst, Int_t eventLast)
325 // Set a range of event numbers, for which a table
326 // of generated particle will be printed
327 fDebugEventFirst = eventFirst;
328 fDebugEventLast = eventLast;
329 if (fDebugEventLast==-1) fDebugEventLast=fDebugEventFirst;
332 void AliGenPythia::Init()
336 SetMC(AliPythia::Instance());
337 fPythia=(AliPythia*) fMCEvGen;
340 fParentWeight=1./Float_t(fNpart);
344 fPythia->SetCKIN(3,fPtHardMin);
345 fPythia->SetCKIN(4,fPtHardMax);
346 fPythia->SetCKIN(7,fYHardMin);
347 fPythia->SetCKIN(8,fYHardMax);
349 if (fAProjectile > 0 && fATarget > 0) fPythia->SetNuclei(fAProjectile, fATarget, fNucPdf);
351 if (fFragmentation) {
352 fPythia->SetMSTP(111,1);
354 fPythia->SetMSTP(111,0);
358 // initial state radiation
359 fPythia->SetMSTP(61,fGinit);
360 // final state radiation
361 fPythia->SetMSTP(71,fGfinal);
364 fPythia->SetMSTP(91,1);
365 fPythia->SetPARP(91,fPtKick);
366 fPythia->SetPARP(93, 4. * fPtKick);
368 fPythia->SetMSTP(91,0);
373 fRL = AliRunLoader::Open(fkFileName, "Partons");
374 fRL->LoadKinematics();
380 fPythia->ProcInit(fProcess,fEnergyCMS,fStrucFunc, fItune);
381 // Forward Paramters to the AliPythia object
382 fDecayer->SetForceDecay(fForceDecay);
383 // Switch off Heavy Flavors on request
385 // Maximum number of quark flavours used in pdf
386 fPythia->SetMSTP(58, 3);
387 // Maximum number of flavors that can be used in showers
388 fPythia->SetMSTJ(45, 3);
389 // Switch off g->QQbar splitting in decay table
390 ((AliDecayerPythia*) fDecayer)->HeavyFlavourOff();
396 // Parent and Children Selection
399 case kPyOldUEQ2ordered:
400 case kPyOldUEQ2ordered2:
404 case kPyCharmUnforced:
405 case kPyCharmPbPbMNR:
408 case kPyCharmppMNRwmi:
409 fParentSelect[0] = 411;
410 fParentSelect[1] = 421;
411 fParentSelect[2] = 431;
412 fParentSelect[3] = 4122;
413 fParentSelect[4] = 4232;
414 fParentSelect[5] = 4132;
415 fParentSelect[6] = 4332;
421 fParentSelect[0] = 421;
424 case kPyDPlusPbPbMNR:
427 fParentSelect[0] = 411;
430 case kPyDPlusStrangePbPbMNR:
431 case kPyDPlusStrangepPbMNR:
432 case kPyDPlusStrangeppMNR:
433 fParentSelect[0] = 431;
436 case kPyLambdacppMNR:
437 fParentSelect[0] = 4122;
442 case kPyBeautyPbPbMNR:
443 case kPyBeautypPbMNR:
445 case kPyBeautyppMNRwmi:
446 fParentSelect[0]= 511;
447 fParentSelect[1]= 521;
448 fParentSelect[2]= 531;
449 fParentSelect[3]= 5122;
450 fParentSelect[4]= 5132;
451 fParentSelect[5]= 5232;
452 fParentSelect[6]= 5332;
455 case kPyBeautyUnforced:
456 fParentSelect[0] = 511;
457 fParentSelect[1] = 521;
458 fParentSelect[2] = 531;
459 fParentSelect[3] = 5122;
460 fParentSelect[4] = 5132;
461 fParentSelect[5] = 5232;
462 fParentSelect[6] = 5332;
467 fParentSelect[0] = 443;
470 case kPyMbAtlasTuneMC09:
472 case kPyMbWithDirectPhoton:
485 // JetFinder for Trigger
487 // Configure detector (EMCAL like)
489 fPythia->SetPARU(51, fPycellEtaMax);
490 fPythia->SetMSTU(51, fPycellNEta);
491 fPythia->SetMSTU(52, fPycellNPhi);
493 // Configure Jet Finder
495 fPythia->SetPARU(58, fPycellThreshold);
496 fPythia->SetPARU(52, fPycellEtSeed);
497 fPythia->SetPARU(53, fPycellMinEtJet);
498 fPythia->SetPARU(54, fPycellMaxRadius);
499 fPythia->SetMSTU(54, 2);
501 // This counts the total number of calls to Pyevnt() per run.
516 Warning("Init","SetNuclei used. Use SetProjectile + SetTarget instead. fDyBoost has been reset to 0\n");
519 fPythia->SetPARJ(200, 0.0);
520 fPythia->SetPARJ(199, 0.0);
521 fPythia->SetPARJ(198, 0.0);
522 fPythia->SetPARJ(197, 0.0);
525 fPythia->InitQuenching(0., 0.1, 0.6e6, 0);
529 // Nestor's change of the splittings
530 fPythia->SetPARJ(200, 0.8);
531 fPythia->SetMSTJ(41, 1); // QCD radiation only
532 fPythia->SetMSTJ(42, 2); // angular ordering
533 fPythia->SetMSTJ(44, 2); // option to run alpha_s
534 fPythia->SetMSTJ(47, 0); // No correction back to hard scattering element
535 fPythia->SetMSTJ(50, 0); // No coherence in first branching
536 fPythia->SetPARJ(82, 1.); // Cut off for parton showers
537 } else if (fQuench == 4) {
538 // Armesto-Cunqueiro-Salgado change of the splittings.
539 AliFastGlauber* glauber = AliFastGlauber::Instance();
541 //read and store transverse almonds corresponding to differnt
543 glauber->SetCentralityClass(0.,0.1);
544 fPythia->SetPARJ(200, 1.);
545 fPythia->SetPARJ(198, fQhat);
546 fPythia->SetPARJ(199, fLength);
547 fPythia->SetMSTJ(42, 2); // angular ordering
548 fPythia->SetMSTJ(44, 2); // option to run alpha_s
549 fPythia->SetPARJ(82, 1.); // Cut off for parton showers
553 void AliGenPythia::Generate()
555 // Generate one event
556 if (!fPythia) fPythia=(AliPythia*) fMCEvGen;
557 fDecayer->ForceDecay();
559 Float_t polar[3] = {0,0,0};
560 Float_t origin[3] = {0,0,0};
562 // converts from mm/c to s
563 const Float_t kconv=0.001/2.999792458e8;
573 // Set collision vertex position
574 if (fVertexSmear == kPerEvent) Vertex();
583 // Switch hadronisation off
585 fPythia->SetMSTJ(1, 0);
589 // Quenching comes through medium-modified splitting functions.
590 AliFastGlauber::Instance()->GetRandomBHard(bimp);
591 fPythia->SetPARJ(197, bimp);
596 // Either produce new event or read partons from file
598 if (!fReadFromFile) {
604 fNpartons = fPythia->GetN();
606 printf("Loading Event %d\n",AliRunLoader::Instance()->GetEventNumber());
607 fRL->GetEvent(AliRunLoader::Instance()->GetEventNumber());
609 LoadEvent(fRL->Stack(), 0 , 1);
614 // Run quenching routine
618 } else if (fQuench == 2){
619 fPythia->Pyquen(208., 0, 0.);
620 } else if (fQuench == 3) {
621 // Quenching is via multiplicative correction of the splittings
625 // Switch hadronisation on
627 if (fHadronisation) {
628 fPythia->SetMSTJ(1, 1);
630 // .. and perform hadronisation
631 // printf("Calling hadronisation %d\n", fPythia->GetN());
633 if (fPatchOmegaDalitz) {
634 fPythia->SetMDCY(fPythia->Pycomp(111) ,1, 0);
636 fPythia->DalitzDecays();
637 fPythia->SetMDCY(fPythia->Pycomp(111) ,1, 1);
642 fPythia->ImportParticles(&fParticles,"All");
644 if (TMath::Abs(fDyBoost) > 1.e-4) Boost();
651 Int_t np = fParticles.GetEntriesFast();
653 if (np == 0) continue;
657 Int_t* pParent = new Int_t[np];
658 Int_t* pSelected = new Int_t[np];
659 Int_t* trackIt = new Int_t[np];
660 for (i = 0; i < np; i++) {
666 Int_t nc = 0; // Total n. of selected particles
667 Int_t nParents = 0; // Selected parents
668 Int_t nTkbles = 0; // Trackable particles
669 if (fProcess != kPyMbDefault &&
671 fProcess != kPyMbAtlasTuneMC09 &&
672 fProcess != kPyMbWithDirectPhoton &&
673 fProcess != kPyJets &&
674 fProcess != kPyDirectGamma &&
675 fProcess != kPyMbNonDiffr &&
676 fProcess != kPyMbMSEL1 &&
679 fProcess != kPyCharmppMNRwmi &&
680 fProcess != kPyBeautyppMNRwmi &&
681 fProcess != kPyBeautyJets) {
683 for (i = 0; i < np; i++) {
684 TParticle* iparticle = (TParticle *) fParticles.At(i);
685 Int_t ks = iparticle->GetStatusCode();
686 kf = CheckPDGCode(iparticle->GetPdgCode());
687 // No initial state partons
688 if (ks==21) continue;
690 // Heavy Flavor Selection
697 if (kfl > 100000) kfl %= 100000;
698 if (kfl > 10000) kfl %= 10000;
700 if (kfl > 10) kfl/=100;
702 if (kfl > 10) kfl/=10;
703 Int_t ipa = iparticle->GetFirstMother()-1;
706 // Establish mother daughter relation between heavy quarks and mesons
708 if (kf >= fFlavorSelect && kf <= 6) {
709 Int_t idau = iparticle->GetFirstDaughter() - 1;
711 TParticle* daughter = (TParticle *) fParticles.At(idau);
712 Int_t pdgD = daughter->GetPdgCode();
713 if (pdgD == 91 || pdgD == 92) {
714 Int_t jmin = daughter->GetFirstDaughter() - 1;
715 Int_t jmax = daughter->GetLastDaughter() - 1;
716 for (Int_t jp = jmin; jp <= jmax; jp++)
717 ((TParticle *) fParticles.At(jp))->SetFirstMother(i+1);
718 } // is string or cluster
724 TParticle * mother = (TParticle *) fParticles.At(ipa);
725 kfMo = TMath::Abs(mother->GetPdgCode());
728 // What to keep in Stack?
729 Bool_t flavorOK = kFALSE;
730 Bool_t selectOK = kFALSE;
732 if (kfl >= fFlavorSelect) flavorOK = kTRUE;
734 if (kfl > fFlavorSelect) {
738 if (kfl == fFlavorSelect) flavorOK = kTRUE;
740 switch (fStackFillOpt) {
741 case kFlavorSelection:
744 case kParentSelection:
745 if (ParentSelected(kf) || kf <= 10) selectOK = kTRUE;
748 if (flavorOK && selectOK) {
750 // Heavy flavor hadron or quark
752 // Kinematic seletion on final state heavy flavor mesons
753 if (ParentSelected(kf) && !KinematicSelection(iparticle, 0))
758 if (ParentSelected(kf)) ++nParents; // Update parent count
759 // printf("\n particle (HF) %d %d %d", i, pSelected[i], kf);
761 // Kinematic seletion on decay products
762 if (fCutOnChild && ParentSelected(kfMo) && ChildSelected(kf)
763 && !KinematicSelection(iparticle, 1))
769 // Select if mother was selected and is not tracked
771 if (pSelected[ipa] &&
772 !trackIt[ipa] && // mother will be tracked ?
773 kfMo != 5 && // mother is b-quark, don't store fragments
774 kfMo != 4 && // mother is c-quark, don't store fragments
775 kf != 92) // don't store string
778 // Semi-stable or de-selected: diselect decay products:
781 if (pSelected[i] == -1 || fDecayer->GetLifetime(kf) > fMaxLifeTime)
783 Int_t ipF = iparticle->GetFirstDaughter();
784 Int_t ipL = iparticle->GetLastDaughter();
785 if (ipF > 0) for (j = ipF-1; j < ipL; j++) pSelected[j] = -1;
787 // printf("\n particle (decay) %d %d %d", i, pSelected[i], kf);
788 pSelected[i] = (pSelected[i] == -1) ? 0 : 1;
791 if (pSelected[i] == -1) pSelected[i] = 0;
792 if (!pSelected[i]) continue;
793 // Count quarks only if you did not include fragmentation
794 if (fFragmentation && kf <= 10) continue;
797 // Decision on tracking
800 // Track final state particle
801 if (ks == 1) trackIt[i] = 1;
802 // Track semi-stable particles
803 if ((ks == 1) || (fDecayer->GetLifetime(kf) > fMaxLifeTime)) trackIt[i] = 1;
804 // Track particles selected by process if undecayed.
805 if (fForceDecay == kNoDecay) {
806 if (ParentSelected(kf)) trackIt[i] = 1;
808 if (ParentSelected(kf)) trackIt[i] = 0;
810 if (trackIt[i] == 1) ++nTkbles; // Update trackable counter
814 } // particle selection loop
816 for (i = 0; i<np; i++) {
817 if (!pSelected[i]) continue;
818 TParticle * iparticle = (TParticle *) fParticles.At(i);
819 kf = CheckPDGCode(iparticle->GetPdgCode());
820 Int_t ks = iparticle->GetStatusCode();
821 p[0] = iparticle->Px();
822 p[1] = iparticle->Py();
823 p[2] = iparticle->Pz();
824 p[3] = iparticle->Energy();
826 origin[0] = fVertex[0]+iparticle->Vx()/10; // [cm]
827 origin[1] = fVertex[1]+iparticle->Vy()/10; // [cm]
828 origin[2] = fVertex[2]+iparticle->Vz()/10; // [cm]
830 Float_t tof = kconv*iparticle->T();
831 Int_t ipa = iparticle->GetFirstMother()-1;
832 Int_t iparent = (ipa > -1) ? pParent[ipa] : -1;
834 PushTrack(fTrackIt*trackIt[i], iparent, kf,
835 p[0], p[1], p[2], p[3],
836 origin[0], origin[1], origin[2], tof,
837 polar[0], polar[1], polar[2],
838 kPPrimary, nt, 1., ks);
855 switch (fCountMode) {
857 // printf(" Count all \n");
861 // printf(" Count parents \n");
864 case kCountTrackables:
865 // printf(" Count trackable \n");
869 if (jev >= fNpart || fNpart == -1) {
870 fKineBias=Float_t(fNpart)/Float_t(fTrials);
872 fQ += fPythia->GetVINT(51);
873 fX1 += fPythia->GetVINT(41);
874 fX2 += fPythia->GetVINT(42);
875 fTrialsRun += fTrials;
882 SetHighWaterMark(nt);
883 // adjust weight due to kinematic selection
886 fXsection=fPythia->GetPARI(1);
889 Int_t AliGenPythia::GenerateMB()
892 // Min Bias selection and other global selections
894 Int_t i, kf, nt, iparent;
897 Float_t polar[3] = {0,0,0};
898 Float_t origin[3] = {0,0,0};
899 // converts from mm/c to s
900 const Float_t kconv=0.001/2.999792458e8;
904 Int_t np = (fHadronisation) ? fParticles.GetEntriesFast() : fNpartons;
908 Int_t* pParent = new Int_t[np];
909 for (i=0; i< np; i++) pParent[i] = -1;
910 if (fProcess == kPyJets || fProcess == kPyDirectGamma || fProcess == kPyBeautyJets || fProcess == kPyBeautyppMNRwmi) {
911 TParticle* jet1 = (TParticle *) fParticles.At(6);
912 TParticle* jet2 = (TParticle *) fParticles.At(7);
913 if (!CheckTrigger(jet1, jet2)) {
919 // Select jets with fragmentation photon or pi0 going to PHOS or EMCAL
920 if (fProcess == kPyJets && (fFragPhotonInCalo || fPi0InCalo) ) {
925 if (fFragPhotonInCalo) pdg = 22 ; // Photon
926 else if (fPi0InCalo) pdg = 111 ; // Pi0
928 for (i=0; i< np; i++) {
929 TParticle* iparticle = (TParticle *) fParticles.At(i);
930 if(iparticle->GetStatusCode()==1 && iparticle->GetPdgCode()==pdg &&
931 iparticle->Pt() > fFragPhotonOrPi0MinPt){
932 Int_t imother = iparticle->GetFirstMother() - 1;
933 TParticle* pmother = (TParticle *) fParticles.At(imother);
935 (pdg == 22 && pmother->GetStatusCode() != 11)) //No photon from hadron decay
937 Float_t phi = iparticle->Phi()*180./TMath::Pi(); //Convert to degrees
938 Float_t eta =TMath::Abs(iparticle->Eta()); //in calos etamin=-etamax
939 if((fCheckEMCAL && IsInEMCAL(phi,eta)) ||
940 (fCheckPHOS && IsInPHOS(phi,eta)) )
949 // Select beauty jets with electron in EMCAL
950 if (fProcess == kPyBeautyJets && fEleInEMCAL) {
954 Int_t pdg = 11; //electron
959 for (i=0; i< np; i++) {
960 TParticle* iparticle = (TParticle *) fParticles.At(i);
961 if(iparticle->GetStatusCode()==1 && TMath::Abs(iparticle->GetPdgCode())==pdg &&
962 iparticle->Pt() > fElectronMinPt){
963 pt = iparticle->Pt();
964 phi = iparticle->Phi()*180./TMath::Pi(); //Convert to degrees
965 eta =TMath::Abs(iparticle->Eta()); //in calos etamin=-etamax
966 if(IsInEMCAL(phi,eta))
972 AliDebug(5,Form("Found an electron jet (pt,eta,phi) = (%f,%f,%f)",pt,eta,phi));
974 // Check for minimum multiplicity
975 if (fTriggerMultiplicity > 0) {
976 Int_t multiplicity = 0;
977 for (i = 0; i < np; i++) {
978 TParticle * iparticle = (TParticle *) fParticles.At(i);
980 Int_t statusCode = iparticle->GetStatusCode();
982 // Initial state particle
986 if (fTriggerMultiplicityEta > 0 && TMath::Abs(iparticle->Eta()) > fTriggerMultiplicityEta)
989 if (iparticle->Pt() < fTriggerMultiplicityPtMin)
992 TParticlePDG* pdgPart = iparticle->GetPDG();
993 if (pdgPart && pdgPart->Charge() == 0)
999 if (multiplicity < fTriggerMultiplicity) {
1003 Printf("Triggered on event with multiplicity of %d >= %d", multiplicity, fTriggerMultiplicity);
1006 // Select events with a photon pt > min pt going to PHOS eta acceptance or exactly PHOS eta phi
1007 if ((fProcess == kPyJets || fProcess == kPyDirectGamma) && fPhotonInCalo && (fCheckPHOSeta || fCheckPHOS)){
1009 Bool_t okd = kFALSE;
1013 for (i=0; i< np; i++) {
1014 TParticle* iparticle = (TParticle *) fParticles.At(i);
1015 Float_t phi = iparticle->Phi()*180./TMath::Pi(); //Convert to degrees
1016 Float_t eta =TMath::Abs(iparticle->Eta());//in calos etamin=-etamax
1018 if(iparticle->GetStatusCode() == 1
1019 && iparticle->GetPdgCode() == pdg
1020 && iparticle->Pt() > fPhotonMinPt
1023 // first check if the photon is in PHOS phi
1024 if(IsInPHOS(phi,eta)){
1028 if(fCheckPHOSeta) iphcand = i; // candiate photon to rotate in phi
1033 if(!okd && iphcand != -1) // execute rotation in phi
1034 RotatePhi(iphcand,okd);
1040 if (fTriggerParticle) {
1041 Bool_t triggered = kFALSE;
1042 for (i = 0; i < np; i++) {
1043 TParticle * iparticle = (TParticle *) fParticles.At(i);
1044 kf = CheckPDGCode(iparticle->GetPdgCode());
1045 if (kf != fTriggerParticle) continue;
1046 if (iparticle->Pt() == 0.) continue;
1047 if (TMath::Abs(iparticle->Eta()) > fTriggerEta) continue;
1058 // Check if there is a ccbar or bbbar pair with at least one of the two
1059 // in fYMin < y < fYMax
1061 if (fProcess == kPyCharmppMNRwmi || fProcess == kPyBeautyppMNRwmi || fProcess == kPyBeautyJets) {
1062 TParticle *partCheck;
1064 Bool_t theQ=kFALSE,theQbar=kFALSE,inYcut=kFALSE;
1065 Bool_t theChild=kFALSE;
1067 Int_t pdg,mpdg,mpdgUpperFamily;
1068 for(i=0; i<np; i++) {
1069 partCheck = (TParticle*)fParticles.At(i);
1070 pdg = partCheck->GetPdgCode();
1071 if(TMath::Abs(pdg) == fFlavorSelect) { // quark
1072 if(pdg>0) { theQ=kTRUE; } else { theQbar=kTRUE; }
1073 y = 0.5*TMath::Log((partCheck->Energy()+partCheck->Pz()+1.e-13)/
1074 (partCheck->Energy()-partCheck->Pz()+1.e-13));
1075 if(y>fYMin && y<fYMax) inYcut=kTRUE;
1077 if(fCutOnChild && TMath::Abs(pdg) == fPdgCodeParticleforAcceptanceCut) {
1078 Int_t mi = partCheck->GetFirstMother() - 1;
1080 mother = (TParticle*)fParticles.At(mi);
1081 mpdg=TMath::Abs(mother->GetPdgCode());
1082 mpdgUpperFamily=(mpdg>1000 ? mpdg+1000 : mpdg+100); // keep e from c from b
1083 if ( ParentSelected(mpdg) ||
1084 (fFlavorSelect==5 && ParentSelected(mpdgUpperFamily))) {
1085 if (KinematicSelection(partCheck,1)) {
1091 if (!theQ || !theQbar || !inYcut) { // one of the c/b conditions not satisfied
1095 if (fCutOnChild && !theChild) { // one of the child conditions not satisfied
1102 //Introducing child cuts in case kPyW, kPyZ, kPyMb, and kPyMbNonDiff
1103 if ( (fProcess == kPyW ||
1105 fProcess == kPyMbDefault ||
1106 fProcess == kPyMb ||
1107 fProcess == kPyMbAtlasTuneMC09 ||
1108 fProcess == kPyMbWithDirectPhoton ||
1109 fProcess == kPyMbNonDiffr)
1110 && (fCutOnChild == 1) ) {
1111 if ( !CheckKinematicsOnChild() ) {
1118 for (i = 0; i < np; i++) {
1120 TParticle * iparticle = (TParticle *) fParticles.At(i);
1121 kf = CheckPDGCode(iparticle->GetPdgCode());
1122 Int_t ks = iparticle->GetStatusCode();
1123 Int_t km = iparticle->GetFirstMother();
1124 if ((ks == 1 && kf!=0 && KinematicSelection(iparticle, 0)) ||
1126 ((fProcess == kPyJets || fProcess == kPyBeautyJets) && ks == 21 && km == 0 && i>1)) {
1128 if (ks == 1) trackIt = 1;
1129 Int_t ipa = iparticle->GetFirstMother()-1;
1131 iparent = (ipa > -1) ? pParent[ipa] : -1;
1134 // store track information
1135 p[0] = iparticle->Px();
1136 p[1] = iparticle->Py();
1137 p[2] = iparticle->Pz();
1138 p[3] = iparticle->Energy();
1141 origin[0] = fVertex[0]+iparticle->Vx()/10; // [cm]
1142 origin[1] = fVertex[1]+iparticle->Vy()/10; // [cm]
1143 origin[2] = fVertex[2]+iparticle->Vz()/10; // [cm]
1145 Float_t tof = fEventTime + kconv * iparticle->T();
1147 PushTrack(fTrackIt*trackIt, iparent, kf,
1148 p[0], p[1], p[2], p[3],
1149 origin[0], origin[1], origin[2], tof,
1150 polar[0], polar[1], polar[2],
1151 kPPrimary, nt, 1., ks);
1155 SetHighWaterMark(nt);
1157 } // select particle
1166 void AliGenPythia::FinishRun()
1168 // Print x-section summary
1177 printf("\nTotal number of Pyevnt() calls %d\n", fTrialsRun);
1178 printf("\nMean Q, x1, x2: %f %f %f\n", fQ, fX1, fX2);
1181 void AliGenPythia::AdjustWeights() const
1183 // Adjust the weights after generation of all events
1187 Int_t ntrack=gAlice->GetMCApp()->GetNtrack();
1188 for (Int_t i=0; i<ntrack; i++) {
1189 part= gAlice->GetMCApp()->Particle(i);
1190 part->SetWeight(part->GetWeight()*fKineBias);
1195 void AliGenPythia::SetNuclei(Int_t a1, Int_t a2, Int_t pdfset)
1197 // Treat protons as inside nuclei with mass numbers a1 and a2
1201 fNucPdf = pdfset; // 0 EKS98 1 EPS08
1206 void AliGenPythia::MakeHeader()
1209 // Make header for the simulated event
1212 if (gAlice->GetEvNumber()>=fDebugEventFirst &&
1213 gAlice->GetEvNumber()<=fDebugEventLast) fPythia->Pylist(2);
1216 // Builds the event header, to be called after each event
1217 if (fHeader) delete fHeader;
1218 fHeader = new AliGenPythiaEventHeader("Pythia");
1221 ((AliGenPythiaEventHeader*) fHeader)->SetProcessType(fPythia->GetMSTI(1));
1224 ((AliGenPythiaEventHeader*) fHeader)->SetTrials(fTrials);
1227 fHeader->SetPrimaryVertex(fVertex);
1228 fHeader->SetInteractionTime(fEventTime);
1230 // Number of primaries
1231 fHeader->SetNProduced(fNprimaries);
1233 // Jets that have triggered
1235 //Need to store jets for b-jet studies too!
1236 if (fProcess == kPyJets || fProcess == kPyDirectGamma || fProcess == kPyBeautyJets || fProcess == kPyBeautyppMNRwmi)
1239 Float_t jets[4][10];
1240 GetJets(njet, ntrig, jets);
1243 for (Int_t i = 0; i < ntrig; i++) {
1244 ((AliGenPythiaEventHeader*) fHeader)->AddJet(jets[0][i], jets[1][i], jets[2][i],
1249 // Copy relevant information from external header, if present.
1254 AliGenPythiaEventHeader* exHeader = (AliGenPythiaEventHeader*) (fRL->GetHeader()->GenEventHeader());
1255 for (Int_t i = 0; i < exHeader->NTriggerJets(); i++)
1257 printf("Adding Jet %d %d \n", i, exHeader->NTriggerJets());
1260 exHeader->TriggerJet(i, uqJet);
1261 ((AliGenPythiaEventHeader*) fHeader)->AddUQJet(uqJet[0], uqJet[1], uqJet[2], uqJet[3]);
1265 // Store quenching parameters
1272 fPythia->GetQuenchingParameters(xp, yp, z);
1273 } else if (fQuench == 2){
1275 Double_t r1 = PARIMP.rb1;
1276 Double_t r2 = PARIMP.rb2;
1277 Double_t b = PARIMP.b1;
1278 Double_t r = 0.5 * TMath::Sqrt(2. * (r1 * r1 + r2 * r2) - b * b);
1279 Double_t phi = PARIMP.psib1;
1280 xp = r * TMath::Cos(phi);
1281 yp = r * TMath::Sin(phi);
1283 } else if (fQuench == 4) {
1287 AliFastGlauber::Instance()->GetSavedXY(xy);
1288 AliFastGlauber::Instance()->GetSavedI0I1(i0i1);
1291 ((AliGenPythiaEventHeader*) fHeader)->SetImpactParameter(fImpact);
1294 ((AliGenPythiaEventHeader*) fHeader)->SetXYJet(xp, yp);
1295 ((AliGenPythiaEventHeader*) fHeader)->SetZQuench(z);
1299 ((AliGenPythiaEventHeader*) fHeader)->SetPtHard(fPythia->GetVINT(47));
1307 Bool_t AliGenPythia::CheckTrigger(TParticle* jet1, TParticle* jet2)
1309 // Check the kinematic trigger condition
1312 eta[0] = jet1->Eta();
1313 eta[1] = jet2->Eta();
1315 phi[0] = jet1->Phi();
1316 phi[1] = jet2->Phi();
1318 pdg[0] = jet1->GetPdgCode();
1319 pdg[1] = jet2->GetPdgCode();
1320 Bool_t triggered = kFALSE;
1322 if (fProcess == kPyJets || fProcess == kPyBeautyJets || fProcess == kPyBeautyppMNRwmi) {
1325 Float_t jets[4][10];
1327 // Use Pythia clustering on parton level to determine jet axis
1329 GetJets(njets, ntrig, jets);
1331 if (ntrig || fEtMinJet == 0.) triggered = kTRUE;
1336 if (pdg[0] == kGamma) {
1340 //Check eta range first...
1341 if ((eta[ij] < fEtaMaxJet && eta[ij] > fEtaMinJet) &&
1342 (eta[ig] < fEtaMaxGamma && eta[ig] > fEtaMinGamma))
1344 //Eta is okay, now check phi range
1345 if ((phi[ij] < fPhiMaxJet && phi[ij] > fPhiMinJet) &&
1346 (phi[ig] < fPhiMaxGamma && phi[ig] > fPhiMinGamma))
1357 Bool_t AliGenPythia::CheckKinematicsOnChild(){
1359 //Checking Kinematics on Child (status code 1, particle code ?, kin cuts
1361 Bool_t checking = kFALSE;
1362 Int_t j, kcode, ks, km;
1363 Int_t nPartAcc = 0; //number of particles in the acceptance range
1364 Int_t numberOfAcceptedParticles = 1;
1365 if (fNumberOfAcceptedParticles != 0) { numberOfAcceptedParticles = fNumberOfAcceptedParticles; }
1366 Int_t npart = fParticles.GetEntriesFast();
1368 for (j = 0; j<npart; j++) {
1369 TParticle * jparticle = (TParticle *) fParticles.At(j);
1370 kcode = TMath::Abs( CheckPDGCode(jparticle->GetPdgCode()) );
1371 ks = jparticle->GetStatusCode();
1372 km = jparticle->GetFirstMother();
1374 if( (ks == 1) && (kcode == fPdgCodeParticleforAcceptanceCut) && (KinematicSelection(jparticle,1)) ){
1377 if( numberOfAcceptedParticles <= nPartAcc){
1386 void AliGenPythia::LoadEvent(AliStack* stack, Int_t flag, Int_t reHadr)
1389 // Load event into Pythia Common Block
1392 Int_t npart = stack -> GetNprimary();
1396 (fPythia->GetPyjets())->N = npart;
1398 n0 = (fPythia->GetPyjets())->N;
1399 (fPythia->GetPyjets())->N = n0 + npart;
1403 for (Int_t part = 0; part < npart; part++) {
1404 TParticle *mPart = stack->Particle(part);
1406 Int_t kf = mPart->GetPdgCode();
1407 Int_t ks = mPart->GetStatusCode();
1408 Int_t idf = mPart->GetFirstDaughter();
1409 Int_t idl = mPart->GetLastDaughter();
1412 if (ks == 11 || ks == 12) {
1419 Float_t px = mPart->Px();
1420 Float_t py = mPart->Py();
1421 Float_t pz = mPart->Pz();
1422 Float_t e = mPart->Energy();
1423 Float_t m = mPart->GetCalcMass();
1426 (fPythia->GetPyjets())->P[0][part+n0] = px;
1427 (fPythia->GetPyjets())->P[1][part+n0] = py;
1428 (fPythia->GetPyjets())->P[2][part+n0] = pz;
1429 (fPythia->GetPyjets())->P[3][part+n0] = e;
1430 (fPythia->GetPyjets())->P[4][part+n0] = m;
1432 (fPythia->GetPyjets())->K[1][part+n0] = kf;
1433 (fPythia->GetPyjets())->K[0][part+n0] = ks;
1434 (fPythia->GetPyjets())->K[3][part+n0] = idf + 1;
1435 (fPythia->GetPyjets())->K[4][part+n0] = idl + 1;
1436 (fPythia->GetPyjets())->K[2][part+n0] = mPart->GetFirstMother() + 1;
1440 void AliGenPythia::LoadEvent(TObjArray* stack, Int_t flag, Int_t reHadr)
1443 // Load event into Pythia Common Block
1446 Int_t npart = stack -> GetEntries();
1450 (fPythia->GetPyjets())->N = npart;
1452 n0 = (fPythia->GetPyjets())->N;
1453 (fPythia->GetPyjets())->N = n0 + npart;
1457 for (Int_t part = 0; part < npart; part++) {
1458 TParticle *mPart = dynamic_cast<TParticle *>(stack->At(part));
1459 Int_t kf = mPart->GetPdgCode();
1460 Int_t ks = mPart->GetStatusCode();
1461 Int_t idf = mPart->GetFirstDaughter();
1462 Int_t idl = mPart->GetLastDaughter();
1465 if (ks == 11 || ks == 12) {
1472 Float_t px = mPart->Px();
1473 Float_t py = mPart->Py();
1474 Float_t pz = mPart->Pz();
1475 Float_t e = mPart->Energy();
1476 Float_t m = mPart->GetCalcMass();
1479 (fPythia->GetPyjets())->P[0][part+n0] = px;
1480 (fPythia->GetPyjets())->P[1][part+n0] = py;
1481 (fPythia->GetPyjets())->P[2][part+n0] = pz;
1482 (fPythia->GetPyjets())->P[3][part+n0] = e;
1483 (fPythia->GetPyjets())->P[4][part+n0] = m;
1485 (fPythia->GetPyjets())->K[1][part+n0] = kf;
1486 (fPythia->GetPyjets())->K[0][part+n0] = ks;
1487 (fPythia->GetPyjets())->K[3][part+n0] = idf + 1;
1488 (fPythia->GetPyjets())->K[4][part+n0] = idl + 1;
1489 (fPythia->GetPyjets())->K[2][part+n0] = mPart->GetFirstMother() + 1;
1494 void AliGenPythia::RecJetsUA1(Int_t& njets, Float_t jets [4][50])
1497 // Calls the Pythia jet finding algorithm to find jets in the current event
1502 Int_t n = fPythia->GetN();
1506 fPythia->Pycell(njets);
1508 for (i = 0; i < njets; i++) {
1509 Float_t px = (fPythia->GetPyjets())->P[0][n+i];
1510 Float_t py = (fPythia->GetPyjets())->P[1][n+i];
1511 Float_t pz = (fPythia->GetPyjets())->P[2][n+i];
1512 Float_t e = (fPythia->GetPyjets())->P[3][n+i];
1523 void AliGenPythia::GetJets(Int_t& nJets, Int_t& nJetsTrig, Float_t jets[4][10])
1526 // Calls the Pythia clustering algorithm to find jets in the current event
1528 Int_t n = fPythia->GetN();
1531 if (fJetReconstruction == kCluster) {
1533 // Configure cluster algorithm
1535 fPythia->SetPARU(43, 2.);
1536 fPythia->SetMSTU(41, 1);
1538 // Call cluster algorithm
1540 fPythia->Pyclus(nJets);
1542 // Loading jets from common block
1548 fPythia->Pycell(nJets);
1552 for (i = 0; i < nJets; i++) {
1553 Float_t px = (fPythia->GetPyjets())->P[0][n+i];
1554 Float_t py = (fPythia->GetPyjets())->P[1][n+i];
1555 Float_t pz = (fPythia->GetPyjets())->P[2][n+i];
1556 Float_t e = (fPythia->GetPyjets())->P[3][n+i];
1557 Float_t pt = TMath::Sqrt(px * px + py * py);
1558 Float_t phi = TMath::Pi() + TMath::ATan2(-py, -px);
1559 Float_t theta = TMath::ATan2(pt,pz);
1560 Float_t et = e * TMath::Sin(theta);
1561 Float_t eta = -TMath::Log(TMath::Tan(theta / 2.));
1563 eta > fEtaMinJet && eta < fEtaMaxJet &&
1564 phi > fPhiMinJet && phi < fPhiMaxJet &&
1565 et > fEtMinJet && et < fEtMaxJet
1568 jets[0][nJetsTrig] = px;
1569 jets[1][nJetsTrig] = py;
1570 jets[2][nJetsTrig] = pz;
1571 jets[3][nJetsTrig] = e;
1573 // printf("\n........-Jet #%d: %10.3f %10.3f %10.3f %10.3f \n", i, pt, et, eta, phi * kRaddeg);
1575 // printf("\n........-Jet #%d: %10.3f %10.3f %10.3f %10.3f \n", i, pt, et, eta, phi * kRaddeg);
1580 void AliGenPythia::GetSubEventTime()
1582 // Calculates time of the next subevent
1585 TArrayF &array = *fEventsTime;
1586 fEventTime = array[fCurSubEvent++];
1588 // printf(" Event time: %d %f %p",fCurSubEvent,fEventTime,fEventsTime);
1592 Bool_t AliGenPythia::IsInEMCAL(Float_t phi, Float_t eta)
1594 // Is particle in EMCAL acceptance?
1595 // phi in degrees, etamin=-etamax
1596 if(phi > fEMCALMinPhi && phi < fEMCALMaxPhi &&
1603 Bool_t AliGenPythia::IsInPHOS(Float_t phi, Float_t eta)
1605 // Is particle in PHOS acceptance?
1606 // Acceptance slightly larger considered.
1607 // phi in degrees, etamin=-etamax
1608 if(phi > fPHOSMinPhi && phi < fPHOSMaxPhi &&
1615 void AliGenPythia::RotatePhi(Int_t iphcand, Bool_t& okdd)
1617 //calculate the new position random between fPHOSMinPhi and fPHOSMaxPhi
1618 Double_t phiPHOSmin = TMath::Pi()*fPHOSMinPhi/180;
1619 Double_t phiPHOSmax = TMath::Pi()*fPHOSMaxPhi/180;
1620 Double_t phiPHOS = gRandom->Uniform(phiPHOSmin,phiPHOSmax);
1622 //calculate deltaphi
1623 TParticle* ph = (TParticle *) fParticles.At(iphcand);
1624 Double_t phphi = ph->Phi();
1625 Double_t deltaphi = phiPHOS - phphi;
1629 //loop for all particles and produce the phi rotation
1630 Int_t np = (fHadronisation) ? fParticles.GetEntriesFast() : fNpartons;
1631 Double_t oldphi, newphi;
1632 Double_t newVx, newVy, r, vZ, time;
1633 Double_t newPx, newPy, pt, pz, e;
1634 for(Int_t i=0; i< np; i++) {
1635 TParticle* iparticle = (TParticle *) fParticles.At(i);
1636 oldphi = iparticle->Phi();
1637 newphi = oldphi + deltaphi;
1638 if(newphi < 0) newphi = 2*TMath::Pi() + newphi; // correct angle
1639 if(newphi > 2*TMath::Pi()) newphi = newphi - 2*TMath::Pi(); // correct angle
1642 newVx = r * TMath::Cos(newphi);
1643 newVy = r * TMath::Sin(newphi);
1644 vZ = iparticle->Vz(); // don't transform
1645 time = iparticle->T(); // don't transform
1647 pt = iparticle->Pt();
1648 newPx = pt * TMath::Cos(newphi);
1649 newPy = pt * TMath::Sin(newphi);
1650 pz = iparticle->Pz(); // don't transform
1651 e = iparticle->Energy(); // don't transform
1654 iparticle->SetProductionVertex(newVx, newVy, vZ, time);
1655 iparticle->SetMomentum(newPx, newPy, pz, e);
1657 } //end particle loop
1659 // now let's check that we put correctly the candidate photon in PHOS
1660 Float_t phi = ph->Phi()*180./TMath::Pi(); //Convert to degrees
1661 Float_t eta =TMath::Abs(ph->Eta());//in calos etamin=-etamax
1662 if(IsInPHOS(phi,eta))