]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - macros/Config_gener.C
config time calib
[u/mrichter/AliRoot.git] / macros / Config_gener.C
index 3510d406c971526630649433f84baa93261b8170..8820a33bbd3ba49d08835badd20d6cc95cdfff0c 100644 (file)
-enum gentype_t {hijing, gun, box, pythia, param, cocktail, fluka, halo, ntuple, scan};
+#if !defined(__CINT__) || defined(__MAKECINT__)
+#include <Riostream.h>
+#include <TRandom.h>
+#include <TSystem.h>
+#include <TVirtualMC.h>
+#include <TGeant3.h>
+#include "STEER/AliRunLoader.h"
+#include "STEER/AliRun.h"
+#include "STEER/AliConfig.h"
+#include "PYTHIA6/AliDecayerPythia.h"
+#include "EVGEN/AliGenCocktail.h"
+#include "EVGEN/AliGenFixed.h"
+#include "EVGEN/AliGenBox.h"
+#include "EVGEN/AliGenScan.h"
+#include "EVGEN/AliGenHIJINGpara.h"
+#include "THijing/AliGenHijing.h"
+#include "PYTHIA6/AliGenPythia.h"
+#include "THerwig/AliGenHerwig.h"
+#include "EVGEN/AliGenParam.h"
+#include "EVGEN/AliGenMUONlib.h"
+#include "EVGEN/AliGenPHOSlib.h"
+#include "EVGEN/AliGenGSIlib.h"
+#include "EVGEN/AliGenFLUKAsource.h"
+#include "EVGEN/AliGenExtFile.h"
+#include "EVGEN/AliGenHalo.h"
+#include "EVGEN/AliGenReaderTreeK.h"
+#include "STRUCT/AliBODY.h"
+#include "STRUCT/AliMAG.h"
+#endif
+
+enum gentype_t {hijing, hijingParam, gun, box, pythia, herwig, mcatnlo, 
+               param1, param2, param3, param4, 
+               cocktail, fluka, halo, ntuple, scan};
+
+gentype_t gentype = mcatnlo;
+
+Int_t ntracks=1;
 
-gentype_t gentype=param;
+void Config()
+{
 
+  // Set Random Number seed
+  gRandom->SetSeed(12345); //Set 0 to use the current time
+  cout<<"Seed for random number generation= "<<gRandom->GetSeed()<<endl; 
 
-ntracks=1;
 
-void Config()
-{
+  // libraries required by geant321
+#if defined(__CINT__)
+  gSystem->Load("libgeant321");
+#endif
 
-new TGeant3("C++ Interface to Geant3");
+  new TGeant3TGeo("C++ Interface to Geant3");
 
 //=======================================================================
 //  Create the output file
    
-TFile *rootfile = new TFile("galice.root","recreate");
-rootfile->SetCompressionLevel(2);
-TGeant3 *geant3 = (TGeant3*)gMC;
+  AliRunLoader* rl=0x0;
+
+  cout<<"Config.C: Creating Run Loader ..."<<endl;
+  rl = AliRunLoader::Open("galice.root",
+                         AliConfig::GetDefaultEventFolderName(),
+                         "recreate");
+  if (rl == 0x0)
+    {
+      gAlice->Fatal("Config.C","Can not instatiate the Run Loader");
+      return;
+    }
+  rl->SetCompressionLevel(2);
+  rl->SetNumberOfEventsPerFile(3);
+  gAlice->SetRunLoader(rl);
+
+//
+// Set External decayer
+  AliDecayer* decayer = new AliDecayerPythia();
+  decayer->SetForceDecay(kAll);
+  decayer->Init();
+  gMC->SetExternalDecayer(decayer);
+
 
-//=======================================================================
-// ******* GEANT STEERING parameters FOR ALICE SIMULATION *******
-geant3->SetTRIG(1); //Number of events to be processed 
-geant3->SetSWIT(4,10);
-geant3->SetDEBU(0,0,1);
-//geant3->SetSWIT(2,2);
-geant3->SetDCAY(1);
-geant3->SetPAIR(1);
-geant3->SetCOMP(1);
-geant3->SetPHOT(1);
-geant3->SetPFIS(0);
-geant3->SetDRAY(0);
-geant3->SetANNI(1);
-geant3->SetBREM(1);
-geant3->SetMUNU(1);
-geant3->SetCKOV(1);
-geant3->SetHADR(1); //Select pure GEANH (HADR 1) or GEANH/NUCRIN (HADR 3)
-geant3->SetLOSS(2);
-geant3->SetMULS(1);
-geant3->SetRAYL(1);
-geant3->SetAUTO(1); //Select automatic STMIN etc... calc. (AUTO 1) or manual (AUTO 0)
-geant3->SetABAN(0); //Restore 3.16 behaviour for abandoned tracks
-geant3->SetOPTI(2); //Select optimisation level for GEANT geometry searches (0,1,2)
-Float_t cut    = 1.e-3; // 1MeV cut by default
-Float_t tofmax = 1.e10;
-//             GAM ELEC NHAD CHAD MUON EBREM MUHAB EDEL MUDEL MUPA TOFMAX
-geant3->SetCUTS(cut,cut, cut, cut, cut, cut,  cut,  cut, cut,  cut, tofmax);
 //
 //=======================================================================
 // ************* STEERING parameters FOR ALICE SIMULATION **************
 // --- Specify event type to be tracked through the ALICE setup
 // --- All positions are in cm, angles in degrees, and P and E in GeV
 
- switch(gentype)
- {
- case gun:
+
+  gMC->SetProcess("DCAY",1);
+  gMC->SetProcess("PAIR",1);
+  gMC->SetProcess("COMP",1);
+  gMC->SetProcess("PHOT",1);
+  gMC->SetProcess("PFIS",0);
+  gMC->SetProcess("DRAY",0);
+  gMC->SetProcess("ANNI",1);
+  gMC->SetProcess("BREM",1);
+  gMC->SetProcess("MUNU",1);
+  gMC->SetProcess("CKOV",1);
+  gMC->SetProcess("HADR",1);
+  gMC->SetProcess("LOSS",2);
+  gMC->SetProcess("MULS",1);
+  gMC->SetProcess("RAYL",1);
+  
+  Float_t cut = 1.e-3;        // 1MeV cut by default
+  Float_t tofmax = 1.e10;
+  
+  gMC->SetCut("CUTGAM", cut);
+  gMC->SetCut("CUTELE", cut);
+  gMC->SetCut("CUTNEU", cut);
+  gMC->SetCut("CUTHAD", cut);
+  gMC->SetCut("CUTMUO", cut);
+  gMC->SetCut("BCUTE",  cut); 
+  gMC->SetCut("BCUTM",  cut); 
+  gMC->SetCut("DCUTE",  cut); 
+  gMC->SetCut("DCUTM",  cut); 
+  gMC->SetCut("PPCUTM", cut);
+  gMC->SetCut("TOFMAX", tofmax); 
+  
+
+  AliGenerator * gGener = 0x0;
+  switch(gentype)
+    {
+    case gun:
 //*********************************************
 // Example for Fixed Particle Gun             
 //*********************************************
-     AliGenFixed *gener = new AliGenFixed(ntracks);
-     gener->SetMomentum(50);
-     gener->SetPhi(180.);
-     gener->SetTheta(5.);
-     gener->SetOrigin(0,0,0);          //vertex position
-     gener->SetPart(13);                //GEANT particle type
-     break;
- case box:  
+      {
+       AliGenFixed *gener = new AliGenFixed(ntracks);
+       gener->SetMomentum(50);
+       gener->SetPhi(180.);
+       gener->SetTheta(5.);
+       gener->SetOrigin(0,0,0);        //vertex position
+       gener->SetPart(kNeutron);
+       gGener = gener;
+      }
+      break;
+    case box:  
 //*********************************************
 // Example for Moving Particle Gun            *
 //*********************************************
-     AliGenBox *gener = new AliGenBox(ntracks);
-     gener->SetMomentumRange(3,4);
-     gener->SetPhiRange(0,360);
-     gener->SetThetaRange(90, 180. );
-     gener->SetOrigin(0,0,0);   
-     //vertex position
-     gener->SetSigma(0,0,0);           //Sigma in (X,Y,Z) (cm) on IP position
-     gener->SetPart(5);                //GEANT particle type
-     break;
- case scan:  
+      {
+       AliGenBox *gener = new AliGenBox(ntracks);
+       gener->SetMomentumRange(3,4);
+       gener->SetPhiRange(0,360);
+       gener->SetThetaRange(90, 180. );
+       gener->SetOrigin(0,0,0);   
+       //vertex position
+       gener->SetSigma(0,0,0);         //Sigma in (X,Y,Z) (cm) on IP position
+       gener->SetPart(kMuonPlus);
+       gGener = gener;
+      }
+      break;
+    case scan:  
 //*********************************************
 // Scanning on a grid                         *
 //*********************************************
-     AliGenScan *gener = new AliGenScan(-1);
-     gener->SetMomentumRange(4,4);
-     gener->SetPhiRange(0,360);
-     gener->SetThetaRange(9,9);
-     //vertex position
-     gener->SetSigma(6,6,0);           //Sigma in (X,Y,Z) (cm) on IP position
-     gener->SetPart(5); 
-     gener->SetRange(20, -100, 100, 20, -100, 100, 1, 500, 500);
-     break;
+      {
+       AliGenScan *gener = new AliGenScan(-1);
+       gener->SetMomentumRange(4,4);
+       gener->SetPhiRange(0,360);
+       gener->SetThetaRange(9,9);
+       //vertex position
+       gener->SetSigma(6,6,0);         //Sigma in (X,Y,Z) (cm) on IP position
+       gener->SetPart(kMuonPlus); 
+       gener->SetRange(20, -100, 100, 20, -100, 100, 1, 500, 500);
+       gGener = gener;
+      }
+      break;
+     
+    case hijingParam:
+      {
+       AliGenHIJINGpara *gener = new AliGenHIJINGpara(ntracks);
+       gener->SetMomentumRange(0,999);
+       gener->SetPhiRange(0,360);
+       gener->SetThetaRange(2,10);
+       gener->SetOrigin(0,0,0);        //vertex position
+       gener->SetSigma(0,0,0);         //Sigma in (X,Y,Z) (cm) on IP position
+       gGener = gener;
+      }
+      break;
+    case hijing:
+      {
+       AliGenHijing *gener = new AliGenHijing(-1);
+// centre of mass energy 
+       gener->SetEnergyCMS(5500);
+// reference frame
+       gener->SetReferenceFrame("CMS     ");
+// projectile
+       gener->SetProjectile("A       ", 208, 82);
+       gener->SetTarget    ("A       ", 208, 82);
+// impact parameter range
+       gener->SetImpactParameterRange(0, 3.);
+// evaluate cross section before run
+       gener->SetEvaluate(0);
+// tell hijing to keep the full parent child chain
+       gener->KeepFullEvent();
+// enable jet quenching
+       gener->SetJetQuenching(1);
+// enable shadowing
+       gener->SetShadowing(1);
+// neutral pion and heavy particle decays switched off
+       gener->SetDecaysOff(1);
+// trigger
+       gener->SetTrigger(0);
+// kinematic selection
+       gener->SetSelectAll(0);
+// momentum range
+       gener->SetMomentumRange(0,999);
+// phi range
+       gener->SetPhiRange(0.,360.);
+// theta range 
+       gener->SetThetaRange(0,180.);
+// select flavor (0: no, 4: charm+beauty, 5:beauty)
+       gener->SetFlavor(0);
+//     
+       gener->SetOrigin(0., 0.0 ,0);
+       gener->SetSigma(0,0,5.3);
+       gener->SetVertexSmear(kPerEvent); 
+// no tracking
+       gener->SetTrackingFlag(0);
+       gGener = gener;
+      }
+      break;
      
- case hijing:
-     AliGenHIJINGpara *gener = new AliGenHIJINGpara(ntracks);
-     gener->SetMomentumRange(0,999);
-     gener->SetPhiRange(0,360);
-     gener->SetThetaRange(2,10);
-     gener->SetOrigin(0,0,0);        //vertex position
-     gener->SetSigma(0,0,0);         //Sigma in (X,Y,Z) (cm) on IP position
-     break;
-
- case pythia:
+    case pythia:
 //********************************************
 // Example for Charm  Production with Pythia *
 //********************************************
-
-     AliGenPythia *gener = new AliGenPythia(ntracks);
-     gener->SetMomentumRange(0,999);
-     gener->SetPhiRange(0,360);
-     gener->SetThetaRange(0., 180.);
-     gener->SetYRange(-10,10);
-     gener->SetPtRange(0,100);
-     gener->SetOrigin(0,0,0);          // vertex position
-     gener->SetVertexSmear(perEvent); 
-     gener->SetSigma(0,0,5.6);         // Sigma in (X,Y,Z) (cm) on IP position
-//     gener->SetStrucFunc(DO_Set_1);
-     gener->SetProcess(mb); 
-     gener->SetEnergyCMS(5500.);
-     break;
-     
- case param:
+      {
+       AliGenPythia *gener = new AliGenPythia(-1);
+//   final state kinematic cuts
+       gener->SetMomentumRange(0,999);
+       gener->SetPhiRange(0. ,360.);
+       gener->SetThetaRange(0., 180.);
+       gener->SetYRange(-10,10);
+       gener->SetPtRange(0,100);
+//   vertex position and smearing 
+       gener->SetOrigin(0,0,0);       // vertex position
+       gener->SetVertexSmear(kPerEvent);
+       gener->SetSigma(0,0,5.6);      // Sigma in (X,Y,Z) (cm) on IP position
+//   Structure function. See the list in EVGEN/AliStructFuncType.h
+       gener->SetStrucFunc(kGRVHO);
+// Select corection for nuclear structure functions
+//     gener->SetNuclei(208,208);
+//
+//   Process type. See the list in PYTHIA6/AliPythia.h
+       gener->SetProcess(kPyBeauty);
+//   
+//   Pt transfer of the hard scattering
+       gener->SetPtHard(0.,5.);
+//   Decay type (semielectronic, semimuonic, nodecay)
+       gener->SetForceDecay(kSemiElectronic);
+//   Centre of mass energy 
+       gener->SetEnergyCMS(5500.);
+//   No Tracking 
+       gener->SetTrackingFlag(0);
+       gGener = gener;
+      }
+      break;              
+
+    case herwig:
+//********************************************
+// Example for Charm  Production with Pythia *
+//********************************************
+      {
+       AliGenHerwig *gener = new AliGenHerwig(-1);
+//   final state kinematic cuts
+       gener->SetMomentumRange(0,7000);
+       gener->SetPhiRange(0. ,360.);
+       gener->SetThetaRange(0., 180.);
+       gener->SetYRange(-10,10);
+       gener->SetPtRange(0,7000);
+//   vertex position and smearing 
+       gener->SetOrigin(0,0,0);       // vertex position
+       gener->SetVertexSmear(kPerEvent);
+       gener->SetSigma(0,0,5.6);      // Sigma in (X,Y,Z) (cm) on IP position
+//   Beam momenta
+       gener->SetBeamMomenta(7000,7000);
+//   Beams
+       gener->SetProjectile("P");
+       gener->SetTarget("P");
+//   Structure function
+       gener->SetStrucFunc(kGRVHO);
+//   Hard scatering
+       gener->SetPtHardMin(200);
+       gener->SetPtRMS(20);
+//   Min bias
+       gener->SetProcess(8000);
+//   No Tracking 
+       gener->SetTrackingFlag(0);
+       gGener = gener;
+      }
+      break;              
+
+    case mcatnlo:
+    {
+      AliGenHerwig *gener = new AliGenHerwig(-1);
+      gener->SetMomentumRange(0,7000);
+      gener->SetPhiRange(0. ,360.);
+      gener->SetThetaRange(0., 180.);
+      gener->SetYRange(-10,10);
+      gener->SetPtRange(0,7000);
+      gener->SetOrigin(0,0,0);       // vertex position
+      gener->SetVertexSmear(kPerEvent);
+      gener->SetSigma(0,0,5.6);      // Sigma in (X,Y,Z) (cm) on IP position
+      gener->SetBeamMomenta(7000,7000);
+      gener->SetProjectile("P");
+      gener->SetTarget("P");
+      gener->SetStrucFunc(kCTEQ5M);
+      gener->SetProcess(-1705);
+      gener->SetHardProcessFile("sb.events");
+      gener->SetEventListRange(0,1);
+      gener->SetTrackingFlag(0);
+      gGener = gener;
+    }
+    break;  
+      
+    case param1:
 //*******************************************************
-// Example for J/psi  Production from  Parameterisation *
+// Example for J/psi  Production from  Parameterisation 
+// using default library (AliMUONlib)                                       
 //*******************************************************
-     AliGenParam *gener = new AliGenParam(ntracks, upsilon_p);
-     gener->SetMomentumRange(0,999);
-     gener->SetPhiRange(0,360);
-     gener->SetYRange(2.5,4);
-     gener->SetThetaRange(2,9);
-     
-     gener->SetPtRange(0,10);
-     gener->SetOrigin(0,0,0);          //vertex position
-     gener->SetSigma(0,0,0);//Sigma in (X,Y,Z) (cm) on IP position
-     gener->ForceDecay(dimuon);
-     gener->SetCutOnChild(1);
-     break;
+      {
+       AliGenParam *gener =
+         new AliGenParam(ntracks, AliGenMUONlib::kUpsilon);
+       gener->SetMomentumRange(0,999);
+       gener->SetPtRange(0,999);     
+       gener->SetPhiRange(0. , 360.);
+       gener->SetYRange(2.5,4);
+       gener->SetCutOnChild(1);
+       gener->SetChildThetaRange(2,9);
+       gener->SetOrigin(0,0,0);        //vertex position
+       gener->SetSigma(0,0,5.3);       //Sigma in (X,Y,Z) (cm) on IP position
+       gener->SetForceDecay(kDiMuon);
+       gener->SetTrackingFlag(0);
+       gGener = gener;
+      }
+      break;
+
+    case param2:
+//*******************************************************
+// Example for Omega  Production from  Parameterisation 
+// specifying library.                                       
+//*******************************************************
+      {
+       AliGenParam *gener = new AliGenParam(1000,new AliGenPHOSlib(), 
+                                            AliGenPHOSlib::kOmega);
+       gener->SetWeighting(kNonAnalog);
+       gener->SetForceDecay(kNoDecay);
+       gener->SetPtRange(0,100);
+       gener->SetThetaRange(45,135);
+       gener->SetTrackingFlag(0);
+       gGener = gener;
+      }
+      break;
+
+    case param3:
+//*******************************************************
+// Example for Upsilon  Production from  Parameterisation 
+// specifying library.                                       
+// GSI style
+//*******************************************************
+      {
+       AliGenParam *gener = new AliGenParam(1000,new AliGenGSIlib(), 
+                                            AliGenGSIlib::kUpsilon, "MUON");
+       gener->SetMomentumRange(0,999);
+       gener->SetPtRange(0,999);     
+       gener->SetPhiRange(0., 360.);
+       gener->SetYRange(2.5,4);
+       gener->SetCutOnChild(1);
+       gener->SetChildThetaRange(2,9);
+       gener->SetOrigin(0,0,0);        //vertex position
+       gener->SetSigma(0,0,5.3);       //Sigma in (X,Y,Z) (cm) on IP position
+       gener->SetForceDecay(kDiMuon);
+       gener->SetTrackingFlag(0);
+       gGener = gener;
+      }
+      break;
      
- case fluka:
+    case param4:
+//*******************************************************
+// Example for Omega  Production from  Parameterisation 
+// specifying library.
+// The alternative way.                                       
+//*******************************************************
+      {
+       AliGenLib* Lib=new AliGenPHOSlib();
+       Int_t iOmega = AliGenPHOSlib::kOmega;
+       AliGenParam *gener = new AliGenParam(50, iOmega,            
+                                            Lib->GetPt(iOmega, ""),
+                                            Lib->GetY (iOmega, ""),
+                                            Lib->GetIp(iOmega, ""));
+       gener->SetPtRange(0,999);     
+       gener->SetWeighting(kNonAnalog);
+       gener->SetForceDecay(kNoDecay);
+       gener->SetTrackingFlag(0);
+       gGener = gener;
+      }
+      break;
+      
+    case fluka:
 //*******************************************************
 // Example for a FLUKA Boundary Source                  *
 //*******************************************************
-     AliGenFLUKAsource *gener = new AliGenFLUKAsource(-1);
-     gener->AddFile("$(ALICE_ROOT)/data/all32.root"); 
-     gener->SetPartFlag(9);
-     gener->SetAgeMax(1.e-5);
+      {
+       AliGenFLUKAsource *gener = new AliGenFLUKAsource(-1);
+       gener->SetFileName("$(ALICE_ROOT)/data/all32.root"); 
+       gener->SetPartFlag(9);
+       gener->SetAgeMax(1.e-5);
 //  31.7 events     
-     gener->SetFraction(0.0315);     
+       gener->SetFraction(0.0315);     
 //     gener->SetFraction(0.75*0.0315);     
-     rootfile->cd();
+       rl->CdGAFile();
 //     gener->SetPartFlag(10);
-     gener->SetMomentumRange(0,999);
-     gener->SetPhiRange(0,360);
-     gener->SetThetaRange(0., 180.); 
-     gener->SetAgeMax(1.e-5);
+       gener->SetMomentumRange(0,999);
+       gener->SetPhiRange(0.,360.);
+       gener->SetThetaRange(0., 180.); 
+       gener->SetAgeMax(1.e-5);
      
 //  31.7 events     
 //     gener->SetFraction(0.0315);     
-     break;
+       gGener = gener;
+      }
+      break;
 
- case ntuple:
   case ntuple:
 //*******************************************************
 // Example for reading from a external file                  *
 //*******************************************************
-     AliGenExtFile *gener = new AliGenExtFile(-1); 
-     gener->SetFileName("$(ALICE_ROOT)/data/dtujet93.root");
-     gener->SetVertexSmear(perEvent); 
-     gener->SetTrackingFlag(1);
-     break;
-
- case halo:
+      {
+       AliGenExtFile *gener = new AliGenExtFile(-1); 
+       gener->SetVertexSmear(kPerEvent); 
+       gener->SetTrackingFlag(1);
+       
+       AliGenReaderTreeK * reader = new AliGenReaderTreeK();
+       reader->SetFileName("$(ALICE_ROOT)/data/dtujet93.root");
+       gener->SetReader(reader);
+       gGener = gener;
+      }
+      break;
+
+    case halo:
 //*******************************************************
 // Example for Tunnel Halo Source                       *
 //*******************************************************
-     AliGenHalo *gener = new AliGenHalo(ntracks); 
-     gener->SetFileName("/h1/morsch/marsip/marsip5.mu");
-     break;
-     
- case cocktail:
+      {
+       AliGenHalo *gener = new AliGenHalo(ntracks); 
+       gener->SetFileName("/h1/morsch/marsip/marsip5.mu");
+       gGener = gener;
+      }
+      break;
+      
+    case cocktail:
 //*******************************************************
 // Example for a Cocktail                               *
 //*******************************************************
-     
-     AliGenCocktail *gener = new AliGenCocktail(); 
+      {
+       AliGenCocktail *gener = new AliGenCocktail(); 
 
-     gener->SetPhiRange(0,360);
-     gener->SetYRange(2.5,4);
-     gener->SetThetaRange(2,9);
-     gener->SetPtRange(0,10);
-     gener->SetOrigin(0,0,0);          //vertex position
-     gener->SetSigma(0,0,0);           //Sigma in (X,Y,Z) (cm) on IP position
-     gener->SetMomentumRange(0,999);
+       gener->SetPhiRange(0,360);
+       gener->SetYRange(2.5,4);
+       gener->SetThetaRange(2,9);
+       gener->SetPtRange(0,10);
+       gener->SetOrigin(0,0,0);        //vertex position
+       gener->SetSigma(0,0,0);         //Sigma in (X,Y,Z) (cm) on IP position
+       gener->SetMomentumRange(0,999);
 
-     AliGenParam *jpsi = new AliGenParam(1,jpsi_p);
-     jpsi->ForceDecay(dimuon);
-     jpsi->SetCutOnChild(1);
+       AliGenParam *jpsi = new AliGenParam(1,AliGenMUONlib::kJpsi);
+       jpsi->SetForceDecay(kDiMuon);
+       jpsi->SetCutOnChild(1);
 
      
-     AliGenFLUKAsource *bg = new AliGenFLUKAsource(-1);
-     bg->AddFile("$(ALICE_ROOT)/data/all32.root"); 
-     rootfile->cd();
-     bg->SetPartFlag(9);
-     bg->SetAgeMax(1.e-5);
+       AliGenFLUKAsource *bg = new AliGenFLUKAsource(-1);
+       bg->AddFile("$(ALICE_ROOT)/data/all32.root"); 
+       rl->CdGAFile();
+       bg->SetPartFlag(9);
+       bg->SetAgeMax(1.e-5);
 //  31.7 events     
 //     gener->SetFraction(0.0315);     
-     bg->SetFraction(0.01*0.0315);     
+       bg->SetFraction(0.01*0.0315);     
       
-     gener->AddGenerator(jpsi,"J/Psi", 1);
-     gener->AddGenerator(bg,"Background",1);
+       gener->AddGenerator(jpsi,"J/Psi", 1);
+       gener->AddGenerator(bg,"Background",1);
 
-     break;
- }
+       gGener = gener;
+      }
+      break;
+    }
  
 // Activate this line if you want the vertex smearing to happen
 // track by track
 //
-// gener->SetVertexSmear(perTrack); 
-
-gener->Init();
-
-gAlice->SetField(-999,2);    //Specify maximum magnetic field in Tesla (neg. ==> default field)
-
-Int_t iMAG=1;
-Int_t iITS=1;
-Int_t iTPC=1;
-Int_t iTOF=1;
-Int_t iRICH=1;
-Int_t iZDC=0;
-Int_t iCASTOR=1;
-Int_t iTRD=1;
-Int_t iABSO=1;
-Int_t iDIPO=1;
-Int_t iHALL=1;
-Int_t iFRAME=1;
-Int_t iSHIL=1;
-Int_t iPIPE=1;
-Int_t iFMD=1;
-Int_t iMUON=1;
-Int_t iPHOS=1;
-Int_t iPMD=1;
-Int_t iSTART=0;
+// gener->SetVertexSmear(kPerTrack); 
+
+  gGener->Init();
+
+  gAlice->SetField(-999,2);    //Specify maximum magnetic field in Tesla (neg. ==> default field)
+
+  Int_t iMAG=1;
+  rl->CdGAFile();
 
 //=================== Alice BODY parameters =============================
-AliBODY *BODY = new AliBODY("BODY","Alice envelop");
+  AliBODY *BODY = new AliBODY("BODY","Alice envelop");
 
 
-if(iMAG) {
+  if(iMAG) {
 //=================== MAG parameters ============================
 // --- Start with Magnet since detector layouts may be depending ---
 // --- on the selected Magnet dimensions ---
-AliMAG *MAG  = new AliMAG("MAG","Magnet");
-}
-
-
-if(iABSO) {
-//=================== ABSO parameters ============================
-AliABSO *ABSO  = new AliABSO("ABSO","Muon Absorber");
-}
-
-if(iDIPO) {
-//=================== DIPO parameters ============================
-
-AliDIPO *DIPO  = new AliDIPOv2("DIPO","Dipole version 2");
-}
-
-if(iHALL) {
-//=================== HALL parameters ============================
-
-AliHALL *HALL  = new AliHALL("HALL","Alice Hall");
-}
-
-
-if(iFRAME) {
-//=================== FRAME parameters ============================
-
-AliFRAME *FRAME  = new AliFRAMEv0("FRAME","Space Frame");
-}
-
-if(iSHIL) {
-//=================== SHIL parameters ============================
-
-AliSHIL *SHIL  = new AliSHIL("SHIL","Shielding");
-}
-
-
-if(iPIPE) {
-//=================== PIPE parameters ============================
-
-AliPIPE *PIPE  = new AliPIPEv0("PIPE","Beam Pipe");
-}
-
-
-if(iITS) {
-//=================== ITS parameters ============================
-//
-// EUCLID is a flag to output (=1) both geometry and media to two ASCII files 
-// (called by default ITSgeometry.euc and ITSgeometry.tme) in a format
-// understandable to the CAD system EUCLID. The default (=0) means that you 
-// dont want to use this facility.
-//
-AliITS *ITS  = new AliITSv3("ITS","normal ITS");
-ITS->SetEUCLID(1);
-}
-
-if(iTPC) {
-//============================ TPC parameters ================================
-// --- This allows the user to specify sectors for the SLOW (TPC geometry 2)
-// --- Simulator. SecAL (SecAU) <0 means that ALL lower (upper)
-// --- sectors are specified, any value other than that requires at least one 
-// --- sector (lower or upper)to be specified!
-// --- Reminder: sectors 1-24 are lower sectors (1-12 -> z>0, 13-24 -> z<0)
-// ---           sectors 25-72 are the upper ones (25-48 -> z>0, 49-72 -> z<0)
-// --- SecLows - number of lower sectors specified (up to 6)
-// --- SecUps - number of upper sectors specified (up to 12)
-// --- Sens - sensitive strips for the Slow Simulator !!!
-// --- This does NOT work if all S or L-sectors are specified, i.e.
-// --- if SecAL or SecAU < 0
-//
-//
-//-----------------------------------------------------------------------------
-
-AliTPC *TPC  = new AliTPCv1("TPC","Normal TPC");
-AliTPCD *paramd = TPC->GetDigParam();
-AliTPCParam *param = &(paramd->GetParam());
-
-// Set geometrical parameters
-
-param->SetSectorAngles(40.,0.,20.,10.);
-param->SetInnerRadiusLow(83.7);
-param->SetInnerRadiusUp(132.9);
-param->SetOuterRadiusLow(146.9);
-param->SetOuterRadiusUp(249.4);
-param->SetInSecLowEdge(81.6);
-param->SetInSecUpEdge(135.);
-param->SetOuSecLowEdge(144.2);
-param->SetOuSecUpEdge(252.1);
-param->SetEdge(1.5);
-param->SetDeadZone(1.15);
-param->Update();
-
-// set gas mixture
-
-TPC->SetGasMixt(2,20,10,-1,0.9,0.1,0.);
-TPC->SetSecAL(1);
-TPC->SetSecAU(1);
-TPC->SetSecLows(0, -1, -1, -1, -1, -1);
-TPC->SetSecUps(18, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1);
-TPC->SetSens(-1);
-}
-
-if(iTOF) {
-//=================== TOF parameters ============================
-AliTOF *TOF  = new AliTOFv2("TOF","normal TOF");
-}
-
-if(iRICH) {
-//=================== RICH parameters ===========================
-
-  AliRICH *RICH  = new AliRICHv0("RICH","normal RICH");
-
-  RICH->SetSMAXAR(0.03);
-  RICH->SetSMAXAL(-1);
-//
-// Version 0
-// Default Segmentation
-  AliRICHsegmentationV0* RsegV0 = new AliRICHsegmentationV0;
-  RsegV0->SetPADSIZ(.8, .8);
-  RsegV0->SetDAnod(0.8/3);
-// Default response
-  AliRICHresponseV0* Rresponse0 = new AliRICHresponseV0;
-  AliRICHresponseCkv* RresponseCkv = new AliRICHresponseCkv;
-
-//------------------------Chambers 0-6 ----------------------------
-  for (Int_t i=0; i<7; i++) {
-    RICH->SetSegmentationModel(i, 1, RsegV0);
-    RICH->SetResponseModel(i, mip     , Rresponse0);
-    RICH->SetResponseModel(i, cerenkov, RresponseCkv);
-    RICH->Chamber(i).SetRSIGM(5.);
-    RICH->Chamber(i).SetMUCHSP(43.);
-    RICH->Chamber(i).SetMUSIGM(0.18, 0.18);
-    RICH->Chamber(i).SetMAXADC( 1024);
-    RICH->Chamber(i).SetSqrtKx3(0.77459667);
-    RICH->Chamber(i).SetKx2(0.962);
-    RICH->Chamber(i).SetKx4(0.379);
-    RICH->Chamber(i).SetSqrtKy3(0.77459667);
-    RICH->Chamber(i).SetKy2(0.962);
-    RICH->Chamber(i).SetKy4(0.379);
-    RICH->Chamber(i).SetPitch(0.25);
-    RICH->SetNsec(i,1);
+    AliMAG *MAG  = new AliMAG("MAG","Magnet");
   }
 }
-
-if(iZDC) {
-//=================== ZDC parameters ============================
-
-AliZDC *ZDC  = new AliZDCv1("ZDC","normal ZDC");
-}
-
-if(iCASTOR) {
-//=================== CASTOR parameters ============================
-
-AliCASTOR *CASTOR  = new AliCASTORv1("CASTOR","normal CASTOR");
-}
-
-if(iTRD) {
-//=================== TRD parameters ============================
-
-AliTRD *TRD  = new AliTRDv0("TRD","TRD version 0");
-// Select the gas mixture (0: 97% Xe + 3% isobutane, 1: 90% Xe + 10% CO2)
-TRD->SetGasMix(0);
-TRD->SetHits(1);
-}
-
-if(iFMD) {
-//=================== FMD parameters ============================
-
-AliFMD *FMD  = new AliFMDv1("FMD","normal FMD");
-}
-
-if(iMUON) {
-//=================== MUON parameters ===========================
-
-AliMUON *MUON  = new AliMUONv0("MUON","normal MUON");
-
-  MUON->SetMaxStepGas(0.1);
-  MUON->SetMaxStepAlu(0.1);
-//
-// Version 0
-//
-// First define the number of planes that are segmented (1 or 2) by a call
-// to SetNsec. 
-// Then chose for each chamber (chamber plane) the segmentation 
-// and response model.
-// They should be equal for the two chambers of each station. In a future
-// version this will be enforced.
-//
-//  
- Int_t chamber;
- Int_t station;
-// Default response
- AliMUONresponseV0* response0 = new AliMUONresponseV0;
- response0->SetSqrtKx3(0.7131);
- response0->SetKx2(1.0107);
- response0->SetKx4(0.4036);
- response0->SetSqrtKy3(0.7642);
- response0->SetKy2(0.9706);
- response0->SetKy4(0.3831);
- response0->SetPitch(0.25);
- response0->SetSigmaIntegration(10.);
- response0->SetChargeSlope(50);
- response0->SetChargeSpread(0.18, 0.18);
- response0->SetMaxAdc(4096);
-//--------------------------------------------------------
-// Configuration for Chamber TC1/2  (Station 1) ----------           
-//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
-// Float_t rseg1[4]={17.5, 55.2, 71.3, 95.5};
- Float_t rseg1[4]={15.5, 55.2, 71.3, 95.5};
- Int_t   nseg1[4]={4, 4, 2, 1};
-//
- chamber=1;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV01 *seg11=new AliMUONsegmentationV01;
- seg11->SetSegRadii(rseg1);
- seg11->SetPADSIZ(3, 0.5);
- seg11->SetDAnod(3.0/3./4);
- seg11->SetPadDivision(nseg1);
- MUON->SetSegmentationModel(chamber-1, 1, seg11);
-//
- AliMUONsegmentationV02 *seg12=new AliMUONsegmentationV02;
- seg12->SetSegRadii(rseg1); 
- seg12->SetPADSIZ(0.75, 2.0);
- seg12->SetDAnod(3.0/3./4);
- seg12->SetPadDivision(nseg1);
-
- MUON->SetSegmentationModel(chamber-1, 2, seg12);
-
- MUON->SetResponseModel(chamber-1, response0);     
-
- chamber=2;
-//^^^^^^^^^
-//
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV01 *seg21=new AliMUONsegmentationV01;
- seg21->SetSegRadii(rseg1);
- seg21->SetPADSIZ(3, 0.5);
- seg21->SetDAnod(3.0/3./4);
- seg21->SetPadDivision(nseg1);
- MUON->SetSegmentationModel(chamber-1, 1, seg21);
-//
- AliMUONsegmentationV02 *seg22=new AliMUONsegmentationV02;
- seg22->SetSegRadii(rseg1); 
- seg22->SetPADSIZ(0.75, 2.);
- seg22->SetDAnod(3.0/3./4);
- seg22->SetPadDivision(nseg1);
- MUON->SetSegmentationModel(chamber-1, 2, seg22);
-
- MUON->SetResponseModel(chamber-1, response0);     
-//
-//--------------------------------------------------------
-// Configuration for Chamber TC3/4 -----------------------
-//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
-// Float_t rseg2[4]={23.5, 47.1, 87.7, 122.5};
- Float_t rseg2[4]={21.5, 47.1, 87.7, 122.5};
- Int_t   nseg2[4]={4, 4, 2, 1};
-//
- chamber=3;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV01 *seg31=new AliMUONsegmentationV01;
- seg31->SetSegRadii(rseg2);
- seg31->SetPADSIZ(3, 0.5);
- seg31->SetDAnod(3.0/3./4);
- seg31->SetPadDivision(nseg2);
- MUON->SetSegmentationModel(chamber-1, 1, seg31);
-//
- AliMUONsegmentationV02 *seg32=new AliMUONsegmentationV02;
- seg32->SetSegRadii(rseg2); 
- seg32->SetPADSIZ(0.75, 2.);
- seg32->SetPadDivision(nseg2);
- seg32->SetDAnod(3.0/3./4);
-
- MUON->SetSegmentationModel(chamber-1, 2, seg32);
-
- MUON->SetResponseModel(chamber-1, response0);     
-
- chamber=4;
-//^^^^^^^^^
-//
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV01 *seg41=new AliMUONsegmentationV01;
- seg41->SetSegRadii(rseg2);
- seg41->SetPADSIZ(3, 0.5);
- seg41->SetDAnod(3.0/3./4);
- seg41->SetPadDivision(nseg2);
- MUON->SetSegmentationModel(chamber-1, 1, seg41);
-//
- AliMUONsegmentationV02 *seg42=new AliMUONsegmentationV02;
- seg42->SetSegRadii(rseg2); 
- seg42->SetPADSIZ(0.75, 2.);
- seg42->SetPadDivision(nseg2);
- seg42->SetDAnod(3.0/3./4);
-
- MUON->SetSegmentationModel(chamber-1, 2, seg42);
-
- MUON->SetResponseModel(chamber-1, response0);     
-
-
-//--------------------------------------------------------
-// Configuration for Chamber TC5/6 -----------------------
-//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
-/*
- seg5 =  new AliMUONsegmentationV1;
- AliMUONresponseV0* response5 =  new AliMUONresponseV0;
- // K3 = 0.62
- response5->SetSqrtKx3(0.78740079);
- response5->SetKx2(0.95237319); //  0.5 * kPI * (1- 0.5*sqrtky3 )
- response5->SetKx4(0.37480633); // 0.25/TMath::ATan(sqrtkx3)
- // K3 = 0.55
- response5->SetSqrtKy3(0.74161985);
- response5->SetKy2(0.98832946);
- response5->SetKy4(0.39177817);
- response5->SetPitch(0.325);
- response5->SetSigmaIntegration(10.);
- response5->SetChargeSlope(50);
- response5->SetChargeSpread(0.4, 0.4);
- response5->SetMaxAdc(4096);
-
- chamber=5;
- MUON->SetNsec(chamber-1,1);
- MUON->SetSegmentationModel(chamber-1, 1, seg5);
- MUON->SetResponseModel(chamber-1, response5);     
-
- chamber=6;
- MUON->SetNsec(chamber-1,1);
- MUON->SetSegmentationModel(chamber-1, 1, seg5);
- MUON->SetResponseModel(chamber-1, response5);     
-//
-// Station 3
- station=3;
- MUON->SetPADSIZ(station, 1, 0.975, 0.55);
-*/
-
- chamber=5;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV0 *seg51=new AliMUONsegmentationV0;
- seg51->SetPADSIZ(0.75, 0.5);
- seg51->SetDAnod(3.0/3./4);
- MUON->SetSegmentationModel(chamber-1, 1, seg51);
-//
- AliMUONsegmentationV0 *seg52=new AliMUONsegmentationV0;
- seg52->SetPADSIZ(0.5,0.75);
- seg52->SetDAnod(3.0/3./4);
- MUON->SetSegmentationModel(chamber-1, 2, seg52);
-
- MUON->SetResponseModel(chamber-1, response0);     
-
- chamber=6;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV0 *seg61=new AliMUONsegmentationV0;
- seg61->SetPADSIZ(0.75, 0.5);
- seg61->SetDAnod(3.0/3./4);
- MUON->SetSegmentationModel(chamber-1, 1, seg61);
-//
- AliMUONsegmentationV0 *seg62=new AliMUONsegmentationV0;
- seg62->SetPADSIZ(0.5,0.75);
- seg62->SetDAnod(3.0/3./4);
- MUON->SetSegmentationModel(chamber-1, 2, seg62);
-
- MUON->SetResponseModel(chamber-1, response0);   
-
-//--------------------------------------------------------
-// Configuration for Chamber TC7/8  (Station 4) ----------           
-//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
-
- Int_t   nseg4[4]={4, 4, 2, 1};
-
- chamber=7;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV04 *seg71=new AliMUONsegmentationV04;
- seg71->SetPADSIZ(10.,0.5);
- seg71->SetDAnod(0.25);
- seg71->SetPadDivision(nseg4);
- MUON->SetSegmentationModel(chamber-1, 1, seg71);
-
- AliMUONsegmentationV05 *seg72=new AliMUONsegmentationV05;
- seg72->SetPADSIZ(1,10);
- seg72->SetDAnod(0.25);
- seg72->SetPadDivision(nseg4);
- MUON->SetSegmentationModel(chamber-1, 2, seg72);
-
- MUON->SetResponseModel(chamber-1, response0);     
-
- chamber=8;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
- AliMUONsegmentationV04 *seg81=new AliMUONsegmentationV04;
- seg81->SetPADSIZ(10., 0.5);
- seg81->SetPadDivision(nseg4);
- seg81->SetDAnod(0.25);
- MUON->SetSegmentationModel(chamber-1, 1, seg81);
-
- AliMUONsegmentationV05 *seg82=new AliMUONsegmentationV05;
- seg82->SetPADSIZ(1, 10);
- seg82->SetPadDivision(nseg4);
- seg82->SetDAnod(0.25);
- MUON->SetSegmentationModel(chamber-1, 2, seg82);
-
- MUON->SetResponseModel(chamber-1, response0);     
-//--------------------------------------------------------
-// Configuration for Chamber TC9/10  (Station 5) ---------           
-//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- chamber=9;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
-//
- AliMUONsegmentationV04 *seg91=new AliMUONsegmentationV04;
- seg91->SetPADSIZ(10.,0.5);
- seg91->SetDAnod(0.25);
- seg91->SetPadDivision(nseg4);
- MUON->SetSegmentationModel(chamber-1, 1, seg91);
-
- AliMUONsegmentationV05 *seg92=new AliMUONsegmentationV05;
- seg92->SetPADSIZ(1,10);
- seg92->SetDAnod(0.25);
- seg92->SetPadDivision(nseg4);
-
- MUON->SetSegmentationModel(chamber-1, 2, seg92);
-
- MUON->SetResponseModel(chamber-1, response0);     
-
- chamber=10;
-//^^^^^^^^^
- MUON->SetNsec(chamber-1,2);
- AliMUONsegmentationV04 *seg101=new AliMUONsegmentationV04;
- seg101->SetPADSIZ(10., 0.5);
- seg101->SetPadDivision(nseg4);
- seg101->SetDAnod(0.25);
- MUON->SetSegmentationModel(chamber-1, 1, seg101);
-
- AliMUONsegmentationV05 *seg102=new AliMUONsegmentationV05;
- seg102->SetPADSIZ(1,10);
- seg102->SetPadDivision(nseg4);
- seg102->SetDAnod(0.25);
- MUON->SetSegmentationModel(chamber-1, 2, seg102);
-
- MUON->SetResponseModel(chamber-1, response0);     
-//--------------------------------------------------------
-// Configuration for Trigger staions --------------------- 
-// (not yet used/implemented) ----------------------------          
-//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
-
- chamber=11;
- MUON->SetNsec(chamber-1,1);
- AliMUONsegmentationV0 *seg1112=new AliMUONsegmentationV0;
- seg1112->SetDAnod(0.51/3.);
-
- MUON->SetSegmentationModel(chamber-1, 1, seg1112);
- MUON->SetResponseModel(chamber-1, response0);     
-
- chamber=12;
- MUON->SetNsec(chamber-1,1);
- MUON->SetSegmentationModel(chamber-1, 1, seg1112);
- MUON->SetResponseModel(chamber-1, response0);     
-//
-// Trigger Station 1
- station=6;
- MUON->SetPADSIZ(station, 1, 0.75, 0.5);
-
- chamber=13;
- MUON->SetNsec(chamber-1,1);
- AliMUONsegmentationV0 *seg1314=new AliMUONsegmentationV0;
- seg1314->SetDAnod(0.51/3.);
-
- MUON->SetSegmentationModel(chamber-1, 1, seg1314);
- MUON->SetResponseModel(chamber-1, response0);     
-
- chamber=14;
- MUON->SetNsec(chamber-1,1);
- MUON->SetSegmentationModel(chamber-1, 1, seg1314);
- MUON->SetResponseModel(chamber-1, response0);     
-//
-// Trigger Station 2
- station=7;
- MUON->SetPADSIZ(station, 1, 0.75, 0.5);
-}
-if(iPHOS) {
-//=================== PHOS parameters ===========================
-
-AliPHOS *PHOS  = new AliPHOSv1("PHOS","normal PHOS");
-// * PHOSflags:    YES: X<>0   NO: X=0
-// * PHOSflags(1) : -----X  Create branch for TObjArray of AliPHOSCradle
-// *                ----X-  Create file (ftn03 on HP-UX) with list of SHAKER particles (7Mb/event)
-// *                
-PHOS->SetFlags(000001);
-PHOS->SetRadius(460); //Distance from beam to PHOS crystals.
-// (crystal_side_size,crystal_length,wrap_thikness,air_thikness,PIN_size,PIN length)
-PHOS->SetCell(2.2,          18.,         0.01,        0.01,        1.,      0.1);
-PHOS->SetCradleSize(104, 88, 4); // Nz (along beam), Nphi, Ncradles
-PHOS->SetCradleA(0);   //Angle between Cradles
-PHOS->SetCPV(1., 2.); //CPV thikness, CPV-PHOS distance
-// *  ===============
-// * PHOS extra parameters (contact Maxim Volkov volkov@mail.cern.ch)
-// * 1. STE_THICK         Steel cover thickness
-// * 2. SUP_Y             Crystal support height
-// * 3. FTIU_THICK        Thermo Insulating outer cover Upper plate thickness
-// * 4. UFP_Y             Upper Polystyrene Foam plate thickness
-// * 5. TCB_THICK         Thermo insulating Crystal Block wall thickness
-// * 6. UCP_Y             Upper Cooling Plate thickness
-// * 7. ASP_Y             Al Support Plate thickness
-// * 8. TIP_Y             Lower Thermo Insulating Plate thickness
-// * 9. TXP_Y             Lower Textolit Plate thickness
-PHOS->SetExtra(0.001, 6.95, 4., 5., 2., 0.06, 10., 3., 1.);   
-PHOS->SetTextolitWall(209., 71., 250.);    //Textolit Wall box dimentions
-PHOS->SetInnerAir(206.,    66.,     244.); //Inner AIR volume dimensions
-// *  ===============================
-// * 1. FTI_X             Foam Thermo Insulating outer cover dimensions
-// * 2. FTI_Y             ==//==
-// * 3. FTI_Z             ==//==
-// * 4. FTI_R             Distance from IP to Foam Thermo Insulating top plate
-PHOS->SetFoam(214.6,  80.,  260., 467.); 
-//    =================================
-// *******************************************************************************
-// * KINE 700  - SHAKER generator
-// * KINE 700 x y z NDNDY YLIM PTLIM ChargeFlag
-// *     JWEAK=0
-// *     JPI0=JETA=1
-// *     JPIC=JPRO=JKAC=JKA0=JRHO=JOME=JPHI=JPSI=JDRY=ChargeFlag
-// *     Int_t               JWEI;           // Unweighted generation
-// *     Int_t               NDNDY;          // Density of charged particles
-// *     Float_t             YLIM;           // Rapidity Limit
-// *     Float_t             PTLIM;          // Pt limit in GeV/c
-// *     Int_t               JWEAK;          // Disable weak decays
-// *     Int_t               JPI0;           // pi0 generation
-// *     Int_t               JETA;           // eta generation
-// *     Int_t               JPIC;           // pi+/- generation
-// *     Int_t               JPRO;           // proton generation
-// *     Int_t               JKAC;           // K+/- generation
-// *     Int_t               JKA0;           // K0 generation
-// *     Int_t               JRHO;           // rho generation
-// *     Int_t               JOME;           // omega generation
-// *     Int_t               JPHI;           // phi generation
-// *     Int_t               JPSI;           // J/psi generation
-// *     Int_t               JDRY;           // Drell-Yan generation
-// * KINE  700     5.    175.    0.          800. 1.5 5. 1.
-// *******************************************************************************
-}
-
-if(iPMD) {
-//=================== PMD parameters ============================
-
-AliPMD *PMD  = new AliPMDv0("PMD","normal PMD");
-PMD->SetPAR(1., 1., 0.8, 0.02);
-PMD->SetIN(6., 18., -580., 27., 27.);
-PMD->SetGEO(0.0, 0.2, 4.);
-PMD->SetPadSize(0.8, 1.0, 1.0, 1.5);
-
-}
-         
-if(iSTART) {
-//=================== START parameters ============================
-AliSTART *START  = new AliSTARTv0("START","START Detector");
-}
-
-}