// The main Herwig options are accessable for the user through this interface.
// Uses the THerwig implementation of TGenerator.
-#include "AliGenHerwig.h"
-#include "AliHerwigRndm.h"
-#include "AliRun.h"
+#include <Riostream.h>
+#include <TClonesArray.h>
#include <TParticle.h>
-#include "THerwig6.h"
-#include "Riostream.h"
+#include <THerwig6.h>
+
+#include "AliGenHerwig.h"
+#include "AliHerwigRndm.h"
#include "AliMC.h"
+#include "AliRun.h"
+#include "driver.h"
ClassImp(AliGenHerwig)
AliGenHerwig::AliGenHerwig() :
AliGenMC(),
- fAutPDF("GRV"),
- fModPDF(5),
- fStrucFunc(kGRVHO),
+ fAutPDF("LHAPDF"),
+ fModPDF(19070),
+ fStrucFunc(kCTEQ5L),
fKeep(0),
fDecaysOff(1),
fTrigger(0),
fXsection(0),
fHerwig(0x0),
fProcess(0),
- fPtHardMin(0),
- fPtRMS(0),
+ fPtHardMin(0.),
+ fPtRMS(0.),
fMaxPr(10),
fMaxErrors(1000),
- fEnSoft(1)
+ fEnSoft(1),
+ fEv1Pr(0),
+ fEv2Pr(0),
+ fFileName(0)
{
// Constructor
}
AliGenHerwig::AliGenHerwig(Int_t npart)
- :AliGenMC(npart)
+ :AliGenMC(npart),
+ fAutPDF("LHAPDF"),
+ fModPDF(19070),
+ fStrucFunc(kCTEQ5L),
+ fKeep(0),
+ fDecaysOff(1),
+ fTrigger(0),
+ fSelectAll(0),
+ fFlavor(0),
+ fEnergyCMS(14000),
+ fMomentum1(7000),
+ fMomentum2(7000),
+ fKineBias(1),
+ fTrials(0),
+ fXsection(0),
+ fHerwig(0x0),
+ fProcess(0),
+ fPtHardMin(0.),
+ fPtRMS(0.),
+ fMaxPr(10),
+ fMaxErrors(1000),
+ fEnSoft(1),
+ fEv1Pr(0),
+ fEv2Pr(0),
+ fFileName(0)
{
- SetBeamMomenta();
SetTarget();
SetProjectile();
- SetStrucFunc(kGRVLO98);
- fKeep=0;
- fTrigger=0;
- fDecaysOff=1;
- fSelectAll=0;
- fFlavor=0;
- fPtHardMin=0.;
- fPtRMS=0.0;
- fEnSoft=1.0;
- fMaxPr=10;
- fMaxErrors=1000;
- // Set random number generator
+ // Set random number generator
AliHerwigRndm::SetHerwigRandom(GetRandom());
}
-AliGenHerwig::AliGenHerwig(const AliGenHerwig & Herwig)
- :AliGenMC(Herwig)
+AliGenHerwig::~AliGenHerwig()
{
-// Copy constructor
- Herwig.Copy(*this);
+// Destructor
}
-
-AliGenHerwig::~AliGenHerwig()
+void AliGenHerwig::SetEventListRange(Int_t eventFirst, Int_t eventLast)
{
-// Destructor
+ fEv1Pr = ++eventFirst;
+ fEv2Pr = ++eventLast;
+ if ( fEv2Pr == -1 ) fEv2Pr = fEv2Pr;
}
void AliGenHerwig::Init()
fHerwig->SetMAXPR(fMaxPr);
fHerwig->SetMAXER(fMaxErrors);
fHerwig->SetENSOF(fEnSoft);
+
+ fHerwig->SetEV1PR(fEv1Pr);
+ fHerwig->SetEV2PR(fEv2Pr);
+
+// C---D,U,S,C,B,T QUARK AND GLUON MASSES (IN THAT ORDER)
+// RMASS(1)=0.32
+// RMASS(2)=0.32
+// RMASS(3)=0.5
+// RMASS(4)=1.55
+// RMASS(5)=4.75
+// RMASS(6)=174.3
+// RMASS(13)=0.75
+
+ fHerwig->SetRMASS(4,1.2);
+ fHerwig->SetRMASS(5,4.75);
+
+ if ( fProcess < 0 ) strncpy(VVJIN.QQIN,fFileName.Data(),50);
+
+ fHerwig->Hwusta("PI0 ");
+
// compute parameter dependent constants
fHerwig->PrepareRun();
}
+void AliGenHerwig::InitJimmy()
+{
+// Initialisation
+ fTarget.Resize(8);
+ fProjectile.Resize(8);
+ SetMC(new THerwig6());
+ fHerwig=(THerwig6*) fMCEvGen;
+ // initialize common blocks
+ fHerwig->InitializeJimmy(fProjectile, fTarget, fMomentum1, fMomentum2, fProcess);
+ // reset parameters according to user needs
+ InitPDF();
+ fHerwig->SetPTMIN(fPtHardMin);
+ fHerwig->SetPTRMS(fPtRMS);
+ fHerwig->SetMAXPR(fMaxPr);
+ fHerwig->SetMAXER(fMaxErrors);
+ fHerwig->SetENSOF(fEnSoft);
+
+ fHerwig->SetEV1PR(fEv1Pr);
+ fHerwig->SetEV2PR(fEv2Pr);
+
+// C---D,U,S,C,B,T QUARK AND GLUON MASSES (IN THAT ORDER)
+// RMASS(1)=0.32
+// RMASS(2)=0.32
+// RMASS(3)=0.5
+// RMASS(4)=1.55
+// RMASS(5)=4.75
+// RMASS(6)=174.3
+// RMASS(13)=0.75
+
+ fHerwig->SetRMASS(4,1.2);
+ fHerwig->SetRMASS(5,4.75);
+
+ if ( fProcess < 0 ) strncpy(VVJIN.QQIN,fFileName.Data(),50);
+
+ fHerwig->Hwusta("PI0 ");
+
+ // compute parameter dependent constants
+ fHerwig->PrepareRunJimmy();
+}
+
void AliGenHerwig::InitPDF()
{
switch(fStrucFunc)
{
- case kGRVLO:
- fModPDF=5;
- fAutPDF="GRV";
+// ONLY USES LHAPDF STRUCTURE FUNCTIONS
+ case kGRVLO98:
+ fModPDF=80060;
+ fAutPDF="HWLHAPDF";
break;
- case kGRVHO:
- fModPDF=6;
- fAutPDF="GRV";
+ case kCTEQ6:
+ fModPDF=10040;
+ fAutPDF="HWLHAPDF";
break;
- case kGRVLO98:
- fModPDF=12;
- fAutPDF="GRV";
+ case kCTEQ61:
+ fModPDF=10100;
+ fAutPDF="HWLHAPDF";
+ break;
+ case kCTEQ6m:
+ fModPDF=10050;
+ fAutPDF="HWLHAPDF";
break;
- case kMRSDminus:
- fModPDF=31;
- fAutPDF="MRS";
+ case kCTEQ6l:
+ fModPDF=10041;
+ fAutPDF="HWLHAPDF";
break;
- case kMRSD0:
- fModPDF=30;
- fAutPDF="MRS";
+ case kCTEQ6ll:
+ fModPDF=10042;
+ fAutPDF="HWLHAPDF";
break;
- case kMRSG:
- fModPDF=41;
- fAutPDF="MRS";
+ case kCTEQ5M:
+ fModPDF=19050;
+ fAutPDF="HWLHAPDF";
break;
- case kMRSTcgLO:
- fModPDF=72;
- fAutPDF="MRS";
+ case kCTEQ5L:
+ fModPDF=19070;
+ fAutPDF="HWLHAPDF";
break;
case kCTEQ4M:
- fModPDF=34;
- fAutPDF="CTEQ";
+ fModPDF=19150;
+ fAutPDF="HWLHAPDF";
break;
- case kCTEQ5L:
- fModPDF=46;
- fAutPDF="CTEQ";
+ case kCTEQ4L:
+ fModPDF=19170;
+ fAutPDF="HWLHAPDF";
break;
+// case kMRST2004nlo:
+// fModPDF=20400;
+// fAutPDF="HWLHAPDF";
+// break;
default:
cerr << "This structure function is not inplemented " << fStrucFunc << endl;
break;
}
- fAutPDF.Resize(20);
+ fAutPDF.Resize(20);
fHerwig->SetMODPDF(1,fModPDF);
fHerwig->SetMODPDF(2,fModPDF);
fHerwig->SetAUTPDF(1,fAutPDF);
Float_t origin[3]= {0,0,0};
Float_t origin0[3]= {0,0,0};
Float_t p[4], random[6];
-
+
static TClonesArray *particles;
// converts from mm/c to s
const Float_t kconv=0.001/2.999792458e8;
Int_t jev=0;
Int_t j, kf, ks, imo;
kf=0;
-
+
if(!particles) particles=new TClonesArray("TParticle",10000);
-
+
fTrials=0;
for (j=0;j<3;j++) origin0[j]=fOrigin[j];
if(fVertexSmear==kPerEvent) {
TMath::Sqrt(-2*TMath::Log(random[2*j+1]));
}
}
-
+
while(1)
{
fHerwig->GenerateEvent();
fTrials++;
fHerwig->ImportParticles(particles,"All");
Int_t np = particles->GetEntriesFast()-1;
- printf("Particles from Herwig %d \n", np);
-
if (np == 0 ) continue;
-
+
Int_t nc=0;
-
+
Int_t * newPos = new Int_t[np];
for (Int_t i = 0; i<np; i++) *(newPos+i)=-1;
-
+
for (Int_t i = 0; i<np; i++) {
TParticle * iparticle = (TParticle *) particles->At(i);
imo = iparticle->GetFirstMother();
kf = iparticle->GetPdgCode();
ks = iparticle->GetStatusCode();
- if (ks != 3 &&
- KinematicSelection(iparticle,0))
+ if (ks != 3 &&
+ KinematicSelection(iparticle,0))
{
nc++;
p[0]=iparticle->Px();
Int_t trackIt = (ks == 1) && fTrackIt;
PushTrack(trackIt, iparent, kf,
p[0], p[1], p[2], p[3],
- origin[0], origin[1], origin[2],
+ origin[0], origin[1], origin[2],
tof,
polar[0], polar[1], polar[2],
- kPPrimary, nt, 1., ks);
+ kPPrimary, nt, fHerwig->GetEVWGT(), ks);
KeepTrack(nt);
newPos[i]=nt;
} // end of if: selection of particle
} // end of for: particle loop
if (newPos) delete[] newPos;
- printf("\n I've put %i particles on the stack \n",nc);
// MakeHeader();
- printf("nc: %d %d\n", nc, fNpart);
-
if (nc > 0) {
jev+=nc;
if (jev >= fNpart || fNpart == -1) {
fKineBias=Float_t(fNpart)/Float_t(fTrials);
- printf("\n Trials: %i %i %i\n",fTrials, fNpart, jev);
break;
}
}
part->SetWeight(part->GetWeight()*fKineBias);
}
}
-
+
void AliGenHerwig::KeepFullEvent()
{
Bool_t selected=kFALSE;
if (hasDaughters) {
imin=iparticle->GetFirstDaughter();
- imax=iparticle->GetLastDaughter();
+ imax=iparticle->GetLastDaughter();
for (i=imin; i<= imax; i++){
- TParticle * jparticle = (TParticle *) particles->At(i);
+ TParticle * jparticle = (TParticle *) particles->At(i);
Int_t ip=jparticle->GetPdgCode();
if (KinematicSelection(jparticle,0)&&SelectFlavor(ip)) {
selected=kTRUE; break;
// 4: charm and beauty
// 5: beauty
if (fFlavor == 0) return kTRUE;
-
+
Int_t ifl=TMath::Abs(pid/100);
if (ifl > 10) ifl/=10;
return (fFlavor == ifl);
// Return true for a stable particle
//
Int_t kf = TMath::Abs(particle->GetPdgCode());
-
+
if ( (particle->GetFirstDaughter() < 0 ) || (kf == 1000*fFlavor+122))
-
+
{
return kTRUE;
} else {
fHerwig->Hwefin();
}
-
-AliGenHerwig& AliGenHerwig::operator=(const AliGenHerwig& rhs)
+void AliGenHerwig::FinishRunJimmy()
{
-// Assignment operator
- rhs.Copy(*this);
- return (*this);
-}
+ fHerwig->Hwefin();
+ fHerwig->Jmefin();
+}