]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - EVGEN/AliGenParam.cxx
Small spelling/addressing mistake corrected
[u/mrichter/AliRoot.git] / EVGEN / AliGenParam.cxx
index 19b6a1279297fbce96e945acb38909123532a222..54ee2ed4153477572abc7319c4c15bf5cf5efae7 100644 (file)
@@ -1,13 +1,12 @@
 #include "AliGenParam.h"
 #include "AliGenMUONlib.h"
 #include "AliRun.h"
-#include "TGeant3.h"
 #include "AliPythia.h"
 #include <TDirectory.h>
 #include <TFile.h>
 #include <TTree.h>
 #include <stdlib.h>
-#include <TMCParticle.h>
+#include <TParticle.h>
 
 ClassImp(AliGenParam)
 
@@ -15,7 +14,7 @@ ClassImp(AliGenParam)
 
   //Begin_Html
   /*
-    <img src="gif/AliGenParam.gif">
+    <img src="picts/AliGenParam.gif">
   */
   //End_Html
 
@@ -26,12 +25,13 @@ AliGenParam::AliGenParam()
 {
   fPtPara = 0;
   fYPara  = 0;
-  fIpart  = 0;
-  fAnalog = 1;
+  fParam  = jpsi_p;
+  fAnalog = analog;
+  SetCutOnChild();
 }
 
 //____________________________________________________________
-AliGenParam::AliGenParam(Int_t npart, Int_t Ipart
+AliGenParam::AliGenParam(Int_t npart, Param_t param
 //                                Double_t (*PtPara)(Double_t*, Double_t*), 
 //                                Double_t (*YPara) (Double_t* ,Double_t*))
     :AliGenerator(npart)
@@ -39,17 +39,18 @@ AliGenParam::AliGenParam(Int_t npart, Int_t Ipart)
   //
   //  fName="HMESONpara";
   //  fTitle="Heavy Mesons Parametrisation";
-  fPtParaFunc = AliGenMUONlib::GetPt(Ipart);
-  fYParaFunc  = AliGenMUONlib::GetY(Ipart);
-  fIpParaFunc = AliGenMUONlib::GetIp(Ipart);
+  fPtParaFunc = AliGenMUONlib::GetPt(param);
+  fYParaFunc  = AliGenMUONlib::GetY(param);
+  fIpParaFunc = AliGenMUONlib::GetIp(param);
   
   fPtPara = 0;
   fYPara  = 0;
-  fIpart  = Ipart;
-  fAnalog = 1;
+  fParam  = param;
+  fAnalog = analog;
   fChildSelect.Set(5);
   for (Int_t i=0; i<5; i++) fChildSelect[i]=0;
   ForceDecay();
+  SetCutOnChild();
 }
 
 //____________________________________________________________
@@ -68,12 +69,15 @@ void AliGenParam::Init()
 //  End of the test !!!
   //Begin_Html
   /*
-    <img src="gif/AliGenParam.gif">
+    <img src="picts/AliGenParam.gif">
   */
   //End_Html
  
-  fPtPara = new TF1("Pt-Parametrization",fPtParaFunc,0,15,0);
-  fYPara  = new TF1("Y -Parametrization",fYParaFunc,-6,6,0);
+  fPtPara = new TF1("Pt-Parametrization",fPtParaFunc,fPtMin,fPtMax,0);
+  fYPara  = new TF1("Y -Parametrization",fYParaFunc,fYMin,fYMax,0);
+  TF1* PtPara = new TF1("Pt-Parametrization",fPtParaFunc,0,15,0);
+  TF1* YPara  = new TF1("Y -Parametrization",fYParaFunc,-6,6,0);
+
 //
 // dN/dy| y=0
   Double_t y1=0;
@@ -82,9 +86,9 @@ void AliGenParam::Init()
   fdNdy0=fYParaFunc(&y1,&y2);
 //
 // Integral over generation region
-  Float_t IntYS  = fYPara ->Integral(fYMin, fYMax);
-  Float_t IntPt0 = fPtPara->Integral(0,15);
-  Float_t IntPtS = fPtPara->Integral(fPtMin,fPtMax);
+  Float_t IntYS  = YPara ->Integral(fYMin, fYMax);
+  Float_t IntPt0 = PtPara->Integral(0,15);
+  Float_t IntPtS = PtPara->Integral(fPtMin,fPtMax);
   Float_t PhiWgt=(fPhiMax-fPhiMin)/2./TMath::Pi();
   if (fAnalog) {
      fYWgt  = IntYS/fdNdy0;
@@ -115,6 +119,12 @@ void AliGenParam::Init()
     case b_psip_dimuon:
        fChildSelect[0]=13;
        break;
+    case pitomu:
+       fChildSelect[0]=13;
+       break;
+    case katomu:
+       fChildSelect[0]=13;
+       break;
     }
 
 }
@@ -126,37 +136,41 @@ void AliGenParam::Generate()
 // the desired theta, phi and momentum windows; Gaussian smearing 
 // on the vertex is done if selected
 
-  AliMC* pMC = AliMC::GetMC();
+
+  //printf("Generate !!!!!!!!!!!!!\n");
 
   Float_t polar[3]= {0,0,0};
   //
   Float_t origin[3], origin0[3];
   Float_t pt, pl, ptot;
   Float_t phi, theta;
-  Float_t p[3];
+  Float_t p[3], pc[3], och[3], pch[10][3];
   Float_t ty, xmt;
-  Int_t i, nt, j;
+  Int_t nt, i, j, kfch[10];
   Float_t  wgtp, wgtch;
   Double_t dummy;
+  static TClonesArray *particles;
   //
+  if(!particles) particles=new TClonesArray("TParticle",1000);
   //
   Float_t random[6];
   for (j=0;j<3;j++) origin0[j]=fOrigin[j];
   if(fVertexSmear==perEvent) {
-      pMC->Rndm(random,6);
+      gMC->Rndm(random,6);
       for (j=0;j<3;j++) {
          origin0[j]+=fOsigma[j]*TMath::Cos(2*random[2*j]*TMath::Pi())*
              TMath::Sqrt(-2*TMath::Log(random[2*j+1]));
       }
   }
-  for(i=0;i<fNpart;i++) {
-      while(1) {
+  Int_t ipa=0;
+  while (ipa<fNpart) {
+    while(1) {
 //
 // particle type
          Int_t Ipart = fIpParaFunc();
          fChildWeight=(fPythia->GetBraPart(Ipart))*fParentWeight;        
          Float_t am=fPythia->GetPMAS(fPythia->LuComp(Ipart),1);
-         pMC->Rndm(random,2);
+         gMC->Rndm(random,2);
 //
 // phi
          phi=fPhiMin+random[0]*(fPhiMax-fPhiMin);
@@ -185,51 +199,91 @@ void AliGenParam::Generate()
          p[1]=pt*TMath::Sin(phi);
          p[2]=pl;
          if(fVertexSmear==perTrack) {
-             pMC->Rndm(random,6);
+             gMC->Rndm(random,6);
              for (j=0;j<3;j++) {
                  origin0[j]=
                      fOrigin[j]+fOsigma[j]*TMath::Cos(2*random[2*j]*TMath::Pi())*
                      TMath::Sqrt(-2*TMath::Log(random[2*j+1]));
              }
          }
-         
-         Int_t kg=fPythia->GetGeantCode(Ipart);
-//
-// parent
-
-         gAlice->
-             SetTrack(0,-1,kg,p,origin,polar,0,"Primary",nt,wgtp);
-         Int_t iparent=nt;
 //
 // use lujet to decay particle
 
          Float_t energy=TMath::Sqrt(ptot*ptot+am*am);
          fPythia->DecayParticle(Ipart,energy,theta,phi);
+         //      fPythia->LuList(1);
+
+
+         //printf("origin0 %f %f %f\n",origin0[0],origin0[1],origin0[2]);
+         //printf("fCutOnChild %d \n",fCutOnChild);
 //
 // select muons
-         TObjArray* particles = fPythia->GetPrimaries() ;
-         Int_t np = particles->GetEntriesFast();
-         for (Int_t i = 0; i<np; i++) {
-             TMCParticle *  iparticle = (TMCParticle *) particles->At(i);
-             Int_t kf = iparticle->GetKF();
+         Int_t np=fPythia->ImportParticles(particles,"All");
+          //printf("np     %d \n",np);
+         Int_t ncsel=0;
+         for (i = 1; i<np; i++) {
+             TParticle *  iparticle = (TParticle *) particles->At(i);
+             Int_t kf = iparticle->GetPdgCode();
+              //printf("kf %d\n",kf);
 //
 // children
              if (ChildSelected(TMath::Abs(kf)))
              {
-                 p[0]=iparticle->GetPx();
-                 p[1]=iparticle->GetPy();
-                 p[2]=iparticle->GetPz();
-                 origin[0]=origin0[0]+iparticle->GetVx()/10;
-                 origin[1]=origin0[1]+iparticle->GetVy()/10;
-                 origin[2]=origin0[2]+iparticle->GetVz()/10;
-                 gAlice->SetTrack(1,iparent,fPythia->GetGeantCode(kf),
-                                  p,origin,polar,
-                                  0,"Decay",nt,wgtch);
-                 gAlice->KeepTrack(nt);
+                 pc[0]=iparticle->Px();
+                 pc[1]=iparticle->Py();
+                 pc[2]=iparticle->Pz();
+                 och[0]=origin0[0]+iparticle->Vx()/10;
+                 och[1]=origin0[1]+iparticle->Vy()/10;
+                 och[2]=origin0[2]+iparticle->Vz()/10;
+                 if (fCutOnChild) {
+                   Float_t PtChild=TMath::Sqrt(pc[0]*pc[0]+pc[1]*pc[1]);
+                   Float_t PChild=TMath::Sqrt(PtChild*PtChild+pc[2]*pc[2]);
+                   Float_t ThetaChild=TMath::ATan2(PtChild,pc[2]);
+                   Float_t PhiChild=TMath::ATan2(pc[1],pc[0])+TMath::Pi();
+                   Bool_t childok = 
+                     ((PtChild   > fPtMin   && PtChild   <fPtMax)      &&
+                       (PChild    > fPMin    && PChild    <fPMax)       &&
+                       (ThetaChild>fThetaMin && ThetaChild<fThetaMax)   &&
+                       (PhiChild  >  fPhiMin && PhiChild  <fPhiMax));
+                   if(childok)
+                     {
+                       pch[ncsel][0]=pc[0];
+                       pch[ncsel][1]=pc[1];
+                       pch[ncsel][2]=pc[2];
+                       kfch[ncsel]=kf;
+                       ncsel++;
+                     } else {
+                       ncsel=-1;
+                       break;
+                     } // child kine cuts
+                 } else {
+                   pch[ncsel][0]=pc[0];
+                   pch[ncsel][1]=pc[1];
+                   pch[ncsel][2]=pc[2];
+                   kfch[ncsel]=kf;
+                   ncsel++;
+                 } // if child selection
              } // select muon
          } // decay particle loop
+         Int_t iparent;
+         if ((fCutOnChild && ncsel >0) || !fCutOnChild){
+             ipa++;
+//
+// parent
+             gAlice->
+                 SetTrack(0,-1,Ipart,p,origin,polar,0,"Primary",nt,wgtp);
+             iparent=nt;
+
+             for (i=0; i< ncsel; i++) {
+                 gAlice->SetTrack(fTrackIt,iparent,kfch[i],
+                                  &pch[i][0],och,polar,
+                                  0,"Decay",nt,wgtch);
+                 gAlice->KeepTrack(nt); 
+             }
+             
+         } // kinematic selection
          break;
-      } // kinematic selection
+    } // while
   } // event loop
 }
 
@@ -242,11 +296,11 @@ Bool_t AliGenParam::ChildSelected(Int_t ip)
     return kFALSE;
 }
 
-Bool_t AliGenParam::KinematicSelection(TMCParticle *particle)
+Bool_t AliGenParam::KinematicSelection(TParticle *particle)
 {
-    Float_t px=particle->GetPx();
-    Float_t py=particle->GetPy();
-    Float_t pz=particle->GetPz();
+    Float_t px=particle->Px();
+    Float_t py=particle->Py();
+    Float_t pz=particle->Pz();
 //
 // momentum cut
     Float_t p=TMath::Sqrt(px*px+py*py+pz*pz);