Improved consistency for primaries.
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Tue, 2 Feb 2010 10:03:21 +0000 (10:03 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Tue, 2 Feb 2010 10:03:21 +0000 (10:03 +0000)
PYTHIA6/AliDecayerPythia.cxx
STEER/AliStack.cxx
TDPMjet/TDPMjet.cxx

index 8f30e29..bcfd04b 100644 (file)
@@ -122,7 +122,7 @@ void AliDecayerPythia::Init()
     fPythia->SetMDCY(fPythia->Pycomp(310) ,1, isw);
     fPythia->SetMDCY(fPythia->Pycomp(3122),1, isw);
     fPythia->SetMDCY(fPythia->Pycomp(3112),1, isw);
-    fPythia->SetMDCY(fPythia->Pycomp(3212),1, isw);
+//    fPythia->SetMDCY(fPythia->Pycomp(3212),1, isw); // Sigma0 decays elem.
     fPythia->SetMDCY(fPythia->Pycomp(3222),1, isw);
     fPythia->SetMDCY(fPythia->Pycomp(3312),1, isw);
     fPythia->SetMDCY(fPythia->Pycomp(3322),1, isw);
index 8cac2bd..d635c93 100644 (file)
@@ -952,7 +952,7 @@ Bool_t AliStack::IsStable(Int_t pdg) const
   // Nuclear code is 10LZZZAAAI
   if(pdg>1000000000)return kTRUE;
 
-  const Int_t kNstable = 16;
+  const Int_t kNstable = 18;
   Int_t i;
   
   Int_t pdgStable[kNstable] = {
@@ -968,10 +968,12 @@ Bool_t AliStack::IsStable(Int_t pdg) const
     kLambda0,           // Lambda_0
     kSigmaMinus,        // Sigma Minus
     kSigmaPlus,         // Sigma Plus
-    kSigma0,            // Sigma 0
     3312,               // Xsi Minus 
     3322,               // Xsi 
     3334,               // Omega
+    kNuE,               // Electron Neutrino 
+    kNuMu,              // Muon Neutrino
+    kNuTau              // Tau Neutrino
   };
     
   Bool_t isStable = kFALSE;
index a0ea803..2fef2bb 100644 (file)
@@ -59,6 +59,7 @@
 # define dt_rndmin dt_rndmin_
 # define dt_rndmou dt_rndmou_
 # define dpmjet_openinp dpmjet_openinp_
+# define dt_evtout dt_evtout_
 # define type_of_call
 #else
 # define dt_dtuini DT_DTUINI
 # define dt_rndmst DT_RNDMST
 # define dt_rndmin DT_RNDMIN
 # define dt_rndmou DT_RNDMOU
+# define dt_evtout DT_EVTOUT_
 # define dpmjet_openinp DPMJET_OPENINP
 # define type_of_call _stdcall
 #endif
 
+
 #ifndef WIN32
 extern "C" void   type_of_call dt_dtuini(Int_t & , Double_t &, Int_t & , Int_t &, 
                        Int_t &, Int_t &, Int_t &, Int_t &);
@@ -82,6 +85,7 @@ extern "C" void   type_of_call dt_kkinc(Int_t &, Int_t &, Int_t &, Int_t &,
                                    Int_t &, Double_t &, Int_t &, Int_t &);
 extern "C" void   type_of_call pho_phist(Int_t &, Double_t &);
 extern "C" void   type_of_call dt_dtuout();
+extern "C" int    type_of_call dt_evtout(const Int_t &);
 extern "C" void   type_of_call dt_rndm(Int_t &);
 extern "C" void   type_of_call dt_rndmst(Int_t &, Int_t &, Int_t &, Int_t &);
 extern "C" void   type_of_call dt_rndmin(Int_t &, Int_t &, Int_t &, Int_t &, Int_t &, Int_t &);
@@ -223,6 +227,17 @@ Int_t TDPMjet::ImportParticles(TClonesArray *particles, Option_t *option)
              printf("\n        pc#%d -> A = %d, Z = %d -> PDGcode = %d\n",
                     i,DTEVT2.idres[i],DTEVT2.idxres[i],DTEVT1.idhkk[i]);
 */       
+/*
+         printf("%5d %5d %5d %5d %13.3f %13.3f %13.3f %13.3f \n", i,
+                DTEVT1.idhkk[i],
+                DTEVT1.isthkk[i],
+                iParent,  
+                DTEVT1.phkk[i][0],
+                DTEVT1.phkk[i][1],
+                DTEVT1.phkk[i][2],
+                DTEVT1.phkk[i][3]
+                );
+*/
          new(Particles[i]) TParticle(
              DTEVT1.idhkk[i],
              DTEVT1.isthkk[i],
@@ -300,7 +315,7 @@ void TDPMjet::Initialize()
         fprintf(out, "PROCESS           0 0 0 1 0 0 0 0\n");
     }
     
-    Int_t iPDG[19] = 
+    Int_t iPDG[18] = 
        {
 //          K0s   pi0  lam   sig+  sig-  tet0
        310,  111, 3122, 3222, 3112, 3322,
@@ -309,12 +324,12 @@ void TDPMjet::Initialize()
 //          etac lamc+ sigc++ sigc+ sigc0 Ksic+
         441, 4122, 4222, 4212, 4112, 4232,
 //         Ksic0 sig0 
-       4132, 3212
+       4132
        };
     
     
     Int_t iON = (fDecayAll) ? 1:0;
-    for (Int_t i = 0; i < 19; i++) {
+    for (Int_t i = 0; i < 8; i++) {
        fprintf(out, "LUND-DECAY%5d %5d\n",  iPDG[i], iON);    
     }
        
@@ -346,6 +361,7 @@ void TDPMjet::GenerateEvent()
    Float_t Elab = fEpn;
    Int_t irej=0;
    Dt_Kkinc(fIp, fIpz, fIt, fItz, fIdp, Elab, kkmat, irej);
+//   dt_evtout(4);
    if(irej!=0) return;
 }
 //______________________________________________________________________________