Overlaps corrected, new shape of sectors
[u/mrichter/AliRoot.git] / FMD / Config.C
index f8a5265..54961d6 100644 (file)
@@ -8,54 +8,11 @@
 //                   -I$ALICE_ROOT -I$ALICE/geant3/TGeant3");
 // root [0] .x grun.C(1,"ConfigPPR.C++")
 //
-#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 "STEER/AliGenerator.h"
-#include "PYTHIA6/AliDecayerPythia.h"
-#include "EVGEN/AliGenHIJINGpara.h"
-#include "THijing/AliGenHijing.h"
-#include "EVGEN/AliGenCocktail.h"
-#include "EVGEN/AliGenSlowNucleons.h"
-#include "EVGEN/AliSlowNucleonModelExp.h"
-#include "EVGEN/AliGenParam.h"
-#include "EVGEN/AliGenMUONlib.h"
-#include "EVGEN/AliGenMUONCocktail.h"
-#include "PYTHIA6/AliGenPythia.h"
-#include "STEER/AliMagFMaps.h"
-#include "STRUCT/AliBODY.h"
-#include "STRUCT/AliMAG.h"
-#include "STRUCT/AliABSOv0.h"
-#include "STRUCT/AliDIPOv2.h"
-#include "STRUCT/AliHALL.h"
-#include "STRUCT/AliFRAMEv2.h"
-#include "STRUCT/AliSHILv2.h"
-#include "STRUCT/AliPIPEv0.h"
-#include "ITS/AliITSvPPRasymmFMD.h"
-#include "TPC/AliTPCv2.h"
-#include "TOF/AliTOFv4T0.h"
-#include "RICH/AliRICHv1.h"
-#include "ZDC/AliZDCv2.h"
-#include "TRD/AliTRDv1.h"
-#include "FMD/AliFMDv1.h"
-#include "MUON/AliMUONv1.h"
-#include "MUON/AliMUONSt1GeometryBuilderV2.h"
-#include "MUON/AliMUONSt2GeometryBuilder.h"
-#include "MUON/AliMUONSlatGeometryBuilder.h"
-#include "MUON/AliMUONTriggerGeometryBuilder.h"
-#include "PHOS/AliPHOSv1.h"
-#include "PMD/AliPMDv1.h"
-#include "START/AliSTARTv1.h"
-#include "EMCAL/AliEMCALv1.h"
-#include "CRT/AliCRTv0.h"
-#include "VZERO/AliVZEROv2.h"
-#endif
+/** @file    Config.C
+    @author  Christian Holm Christensen <cholm@nbi.dk>
+    @date    Mon Mar 27 12:50:29 2006
+    @brief   Simulation configuration script
+*/
 
 //____________________________________________________________________
 // 
@@ -113,6 +70,10 @@ enum EG_t {
   kMuonCocktailCent1Single,    //
   kMuonCocktailPer1Single,     //
   kMuonCocktailPer4Single,
+  kFMD1Flat, 
+  kFMD2Flat, 
+  kFMD3Flat,
+  kFMDFlat,
   kEgMax
 };
 
@@ -171,7 +132,11 @@ const char* egName[kEgMax] = {
   "kMuonCocktailPer4HighPt",   //
   "kMuonCocktailCent1Single",  //
   "kMuonCocktailPer1Single",   //
-  "kMuonCocktailPer4Single"
+  "kMuonCocktailPer4Single",
+  "kFMD1Flat",
+  "kFMD2Flat",
+  "kFMD3Flat",
+  "kFMDFlat"
 };
 
 //____________________________________________________________________
@@ -187,13 +152,6 @@ enum Rad_t {
 };
 
 //____________________________________________________________________
-enum Mag_t {
-  k2kG,                                //
-  k4kG,                                //
-  k5kG                         //
-};
-
-//____________________________________________________________________
 enum MC_t {
   kFLUKA, 
   kGEANT3, 
@@ -204,8 +162,8 @@ enum MC_t {
 //____________________________________________________________________
 // Functions
 Float_t       EtaToTheta(Float_t eta);
-Eg_t          LookupEG(const Char_t* name);
-AliGenerator* GeneratorFactory(EG_t eg, Rad_t rad, TString& comment);
+EG_t          LookupEG(const Char_t* name);
+AliGenerator* GeneratorFactory(EG_t eg, Rad_t rad);
 AliGenHijing* HijingStandard();
 void          ProcessEnvironmentVars(EG_t& eg, Int_t& seed);
 
@@ -215,19 +173,14 @@ Config()
 {
   //____________________________________________________________________
   // This part for configuration    
-  //static EG_t eg = test50;
-  EG_t  eg   = kParam_fmd;
+  EG_t  eg   = kPythia6;
   Geo_t geo  = kNoHoles;
   Rad_t rad  = kGluonRadiation;
-  Mag_t mag  = k5kG;
+  AliMagF::BMap_t mag  = AliMagF::k5kG;
   Int_t seed = 12345; //Set 0 to use the current time
   MC_t  mc   = kGEANT3TGEO;
   
   //____________________________________________________________________
-  // Comment line 
-  static TString  comment;
-  
-  //____________________________________________________________________
   // Get settings from environment variables
   ProcessEnvironmentVars(eg, seed);
 
@@ -246,7 +199,7 @@ Config()
     gSystem->Load("libGeom");
     cout << "\t* Loading TFluka..." << endl;  
     gSystem->Load("libTFluka");    
-    
+    gSystem->MakeDirectory("peg");
     // 
     // FLUKA MC
     //
@@ -254,27 +207,38 @@ Config()
     new TFluka("C++ Interface to Fluka", 0/*verbosity*/);
     break;
   case kGEANT3: 
-    //
-    // Libraries needed by GEANT 3.21 
-    //
-    gSystem->Load("libgeant321");
-    
-    // 
-    // GEANT 3.21 MC 
-    // 
-    new TGeant3("C++ Interface to Geant3");
+    {
+      //
+      // Libraries needed by GEANT 3.21 
+      //
+      gSystem->Load("$ALICE_ROOT/lib/tgt_$ALICE_TARGET/libpythia6");
+      gSystem->Load("libgeant321");
+      
+      // 
+      // GEANT 3.21 MC 
+      // 
+      TGeant3* gmc = new TGeant3("C++ Interface to Geant3");
+      gmc->SetSWIT(4, 1000);
+    }
     break;
   case kGEANT3TGEO:
-    //
-    // Libraries needed by GEANT 3.21 
-    //
-    gSystem->Load("libgeant321");
+    {
+      //
+      // Libraries needed by GEANT 3.21 
+      //
+      gSystem->Load("$ALICE_ROOT/lib/tgt_$ALICE_TARGET/liblhapdf");
+      gSystem->Load("$ALICE_ROOT/lib/tgt_$ALICE_TARGET/libpythia6");
+      gSystem->Load("libEGPythia6"); //<- For non-debian (sigh!)
+      // gSystem->Load("EGPythia6");
+      gSystem->Load("libgeant321");
     
-    // 
-    // GEANT 3.21 MC 
-    // 
-    new TGeant3TGeo("C++ Interface to Geant3");
-    Printf("Making a TGeant3TGeo objet");
+      // 
+      // GEANT 3.21 MC 
+      // 
+      TGeant3TGeo* gmc  = new TGeant3TGeo("C++ Interface to Geant3");
+      gmc->SetSWIT(4, 1000);
+      Printf("Making a TGeant3TGeo objet");
+    }
     break;
   default:
     gAlice->Fatal("Config.C", "No MC type chosen");
@@ -309,6 +273,28 @@ Config()
        ((TFluka*)gMC)->SetGeneratePemf(kFALSE);
       else
        ((TFluka*)gMC)->SetGeneratePemf(kTRUE);
+      TString flupro(gSystem->Getenv("FLUPRO"));
+      if (flupro.IsNull()) 
+       Fatal("Config.C", "Environment variable FLUPRO not set");
+#if 0
+      char* files[] = { "brems_fin.bin", "cohff.bin", "elasct.bin", 
+                       "gxsect.bin", "nuclear.bin", "sigmapi.bin", 
+                       0 };
+      char* file = files[0];
+      while (file) {
+       TString which(gSystem->Which(".", file));
+       if (which.IsNull()) {
+         if (gSystem->Symlink(Form("%s/%s", flupro.Data(), file), file)!=0) 
+           Fatal("Config.C", "Couldn't link $(FLUPRO)/%s -> .", file);
+       }
+       file++;
+      }
+#endif
+      TString neuxsc(gSystem->Which(".", "neuxsc.bin"));
+      if (neuxsc.IsNull()) 
+       gSystem->Symlink(Form("%s/neuxsc_72.bin", flupro.Data()), 
+                        "neuxsc.bin"); 
+      gSystem->CopyFile("$(FLUPRO)/random.dat", "old.seed", kTRUE);
     }
     break;
   }
@@ -316,6 +302,7 @@ Config()
   //__________________________________________________________________
   //
   // Set External decayer
+#if 0
   AliDecayer *decayer = new AliDecayerPythia();
   switch (eg) {
   case kD0PbPb5500:           decayer->SetForceDecay(kHadronicD);      break;
@@ -325,11 +312,12 @@ Config()
   }
   decayer->Init();
   gMC->SetExternalDecayer(decayer);
+#endif
 
   //__________________________________________________________________
-  // ************* 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
+  // *********** 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 
   gMC->SetProcess("DCAY",1);
   gMC->SetProcess("PAIR",1);
   gMC->SetProcess("COMP",1);
@@ -341,7 +329,7 @@ Config()
   gMC->SetProcess("MUNU",1);
   gMC->SetProcess("CKOV",1);
   gMC->SetProcess("HADR",1);
-  gMC->SetProcess("LOSS",2);
+  gMC->SetProcess("LOSS",1); // 0:none 1,3:dray 2:nodray 4:nofluct (def:2)
   gMC->SetProcess("MULS",1);
   gMC->SetProcess("RAYL",1);
 
@@ -360,10 +348,10 @@ Config()
   gMC->SetCut("PPCUTM", cut);
   gMC->SetCut("TOFMAX", tofmax); 
 
-
+  
   //__________________________________________________________________
   // Generator Configuration
-  AliGenerator* gener = GeneratorFactory(eg, rad, comment);
+  AliGenerator* gener = GeneratorFactory(eg, rad);
   gener->SetOrigin(0, 0, 0);    // vertex position
   gener->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position
   gener->SetCutVertexZ(1.);     // Truncate at 1 sigma
@@ -372,294 +360,74 @@ Config()
   gener->Init();
     
   //__________________________________________________________________
-  // 
-  // Comments 
-  // 
-  switch (mag) {
-  case k2kG: comment = comment.Append(" | L3 field 0.2 T"); break;
-  case k4kG: comment = comment.Append(" | L3 field 0.4 T"); break;
-  case k5kG: comment = comment.Append(" | L3 field 0.5 T"); break;
-  }
-
-  switch (rad) {
-  case kGluonRadiation: 
-    comment = comment.Append(" | Gluon Radiation On");  break;
-  default:
-    comment = comment.Append(" | Gluon Radiation Off"); break;
-  }
-
-  switch(geo) {
-  case kHoles: comment = comment.Append(" | Holes for PHOS/RICH"); break;
-  default:     comment = comment.Append(" | No holes for PHOS/RICH"); break;
-  }
-
-  std::cout << "\n\n Comment: " << comment << "\n" << std::endl;
-
-  //__________________________________________________________________
   // Field (L3 0.4 T)
-  AliMagFMaps* field = new AliMagFMaps("Maps","Maps", 2, 1., 10., mag);
-  field->SetL3ConstField(0); //Using const. field in the barrel
+  AliMagF* field = new AliMagF("Maps","Maps",-1., -1., mag);
+  TGeoGlobalMagField::Instance()->SetField(field);
+
   rl->CdGAFile();
-  gAlice->SetField(field);    
+
+  TFile* magF = TFile::Open("mag.root", "RECREATE");
+  field->Write("mag");
+  magF->Close();
 
   //__________________________________________________________________
   // 
   // Used detectors 
   // 
-  Bool_t useABSO  = kTRUE; 
-  Bool_t useCRT   = kTRUE; 
-  Bool_t useDIPO  = kTRUE; 
+  Bool_t useABSO  = kFALSE; 
+  Bool_t useACORDE= kFALSE; 
+  Bool_t useDIPO  = kFALSE; 
   Bool_t useFMD   = kTRUE; 
-  Bool_t useFRAME = kTRUE; 
+  Bool_t useFRAME = kFALSE; 
   Bool_t useHALL  = kFALSE; 
-  Bool_t useITS   = kTRUE; 
-  Bool_t useMAG   = kTRUE; 
-  Bool_t useMUON  = kTRUE; 
-  Bool_t usePHOS  = kTRUE; 
+  Bool_t useITS   = kTRUE;
+  Bool_t useMAG   = kFALSE; 
+  Bool_t useMUON  = kFALSE; 
+  Bool_t usePHOS  = kFALSE; 
   Bool_t usePIPE  = kTRUE; 
-  Bool_t usePMD   = kTRUE; 
-  Bool_t useRICH  = kTRUE; 
-  Bool_t useSHIL  = kTRUE; 
-  Bool_t useSTART = kTRUE; 
-  Bool_t useTOF   = kTRUE; 
-  Bool_t useTPC   = kTRUE;
-  Bool_t useTRD   = kTRUE; 
+  Bool_t usePMD   = kFALSE; 
+  Bool_t useHMPID = kFALSE; 
+  Bool_t useSHIL  = kFALSE; 
+  Bool_t useT0    = kTRUE; 
+  Bool_t useTOF   = kFALSE; 
+  Bool_t useTPC   = kFALSE;
+  Bool_t useTRD   = kFALSE; 
   Bool_t useZDC   = kFALSE; 
-  Bool_t useEMCAL = kTRUE; 
+  Bool_t useEMCAL = kFALSE; 
   Bool_t useVZERO = kTRUE;
 
   cout << "\t* Creating the detectors ..." << endl;
-  //=================== Alice BODY parameters =============================
+  // ================= Alice BODY parameters =========================
   AliBODY *BODY = new AliBODY("BODY", "Alice envelop");
   
   
-  if (useMAG) {
-    //=================== MAG parameters ============================
-    // Start with Magnet since detector layouts may be depending on
-    // the selected Magnet dimensions 
-    AliMAG *MAG = new AliMAG("MAG", "Magnet");
-  }
-
-  if (useABSO) {
-    //=================== ABSO parameters ============================
-    AliABSO *ABSO = new AliABSOv0("ABSO", "Muon Absorber");
-  }
-
-  if (useDIPO) {
-    //=================== DIPO parameters ============================
-    AliDIPO *DIPO = new AliDIPOv2("DIPO", "Dipole version 2");
-  }
-
-  if (useHALL) {
-    //=================== HALL parameters ============================
-    AliHALL *HALL = new AliHALL("HALL", "Alice Hall");
-  }
-
-
+  if (useMAG)   AliMAG  *MAG  = new AliMAG("MAG", "Magnet");
+  if (useABSO)  AliABSO *ABSO = new AliABSOv3("ABSO", "Muon Absorber");
+  if (useDIPO)  AliDIPO *DIPO = new AliDIPOv3("DIPO", "Dipole version 3");
+  if (useHALL)  AliHALL *HALL = new AliHALLv3("HALL", "Alice Hall");
   if (useFRAME) {
-    //=================== FRAME parameters ============================
     AliFRAMEv2 *FRAME = new AliFRAMEv2("FRAME", "Space Frame");
     switch (geo) {
     case kHoles: FRAME->SetHoles(1); break;
     default:     FRAME->SetHoles(0); break;
     }
   }
-
-  if (useSHIL) {
-    //=================== SHIL parameters ============================
-    AliSHIL *SHIL = new AliSHILv2("SHIL", "Shielding Version 2");
-  }
-
-
-  if (usePIPE) {
-    //=================== PIPE parameters ============================
-    AliPIPE *PIPE = new AliPIPEv0("PIPE", "Beam Pipe");
-  }
-  
-  if (useITS) {
-    //=================== ITS parameters ============================
-    //
-    // As the innermost detector in ALICE, the Inner Tracking System
-    // "impacts" on almost all other detectors. This involves the fact
-    // that the ITS geometry still has several options to be followed
-    // in parallel in order to determine the best set-up which
-    // minimizes the induced background. All the geometries available
-    // to date are described in the following. Read carefully the
-    // comments and use the default version (the only one uncommented)
-    // unless you are making comparisons and you know what you are
-    // doing. In this case just uncomment the ITS geometry you want to
-    // use and run Aliroot.
-    //
-    // Detailed geometries:
-    //
-    //
-    // AliITS *ITS = 
-    //   new AliITSv5symm("ITS", "Updated ITS TDR detailed version "
-    //                   "with symmetric services");
-    // AliITS *ITS  = 
-    //   new AliITSv5asymm("ITS","Updates ITS TDR detailed version "
-    //                            "with asymmetric services");
-    //
-    AliITSvPPRasymmFMD *ITS  = 
-      new AliITSvPPRasymmFMD("ITS","New ITS PPR detailed version "
-                            "with asymmetric services");
-     // don't touch this parameter if you're not an ITS developer
-    ITS->SetMinorVersion(2); 
-    // don't touch this parameter if you're not an ITS developer
-    ITS->SetReadDet(kTRUE);
-    // don't touch this parameter if you're not an ITS developer
-    // ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det");  
-    // detector thickness on layer 1 must be in the range [100,300]
-    ITS->SetThicknessDet1(200.);   
-    // detector thickness on layer 2 must be in the range [100,300]
-    ITS->SetThicknessDet2(200.);   
-    // chip thickness on layer 1 must be in the range [150,300]
-    ITS->SetThicknessChip1(200.);  
-    // chip thickness on layer 2 must be in the range [150,300]
-    ITS->SetThicknessChip2(200.);
-    // 1 --> rails in ; 0 --> rails out
-    ITS->SetRails(0);          
-    // 1 --> water ; 0 --> freon
-    ITS->SetCoolingFluid(1);   
-
-    // Coarse geometries (warning: no hits are produced with these
-    // coarse geometries and they unuseful for reconstruction !):
-    //
-    //
-    // AliITSvPPRcoarseasymm *ITS  = 
-    //   new AliITSvPPRcoarseasymm("ITS","New ITS PPR coarse version "
-    //                             "with asymmetric services");
-    // 1 --> rails in ; 0 --> rails out
-    // ITS->SetRails(0);
-    // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
-    // ITS->SetSupportMaterial(0);      
-    //
-    // AliITS *ITS  = 
-    //  new AliITSvPPRcoarsesymm("ITS","New ITS PPR coarse version "
-    //                           "with symmetric services");
-    // 1 --> rails in ; 0 --> rails out
-    // ITS->SetRails(0);                
-    // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
-    // ITS->SetSupportMaterial(0);      
-    //
-    // Geant3 <-> EUCLID conversion
-    // ============================
-    //
-    // SetEUCLID is a flag to output (=1) or not to output (=0) 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.
-    //
-    ITS->SetEUCLID(0);
-  }
-
-  if (useTPC) {
-    //============================ 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
-    //
-    //
-    //----------------------------------------------------------------
-    //  gROOT->LoadMacro("SetTPCParam.C");
-    //  AliTPCParam *param = SetTPCParam();
-    AliTPC *TPC = new AliTPCv2("TPC", "Default");
-    
-    // All sectors included
-    TPC->SetSecAL(-1);
-    TPC->SetSecAU(-1);
-  }
-
-  if (useTOF) {
-    //=================== TOF parameters ============================
-    AliTOF *TOF = new AliTOFv4T0("TOF", "normal TOF");
-  }
-
-  if (useRICH) {
-    //=================== RICH parameters ===========================
-    AliRICH *RICH = new AliRICHv1("RICH", "normal RICH");
-
-  }
-
-  if (useZDC) {
-    //=================== ZDC parameters ============================
-    AliZDC *ZDC = new AliZDCv2("ZDC", "normal ZDC");
-  }
-
-  if (useTRD) {
-    //=================== TRD parameters ============================
-    AliTRD *TRD = new AliTRDv1("TRD", "TRD slow simulator");
-
-    // Select the gas mixture (0: 97% Xe + 3% isobutane, 1: 90% Xe + 10% CO2)
-    TRD->SetGasMix(1);
-    if (geo == kHoles) {
-      // With hole in front of PHOS
-      TRD->SetPHOShole();
-      // With hole in front of RICH
-      TRD->SetRICHhole();
-    }
-    // Switch on TR
-    AliTRDsim *TRDsim = TRD->CreateTR();
-  }
-
-  if (useFMD) {
-    //=================== FMD parameters ============================
-    AliFMD *FMD = new AliFMDv1("FMD", "normal FMD");
-    AliLog::SetModuleDebugLevel("FMD", 10);
-  }
-
-  if (useMUON) {
-    //=================== MUON parameters ===========================
-    AliMUON *MUON = new AliMUONv1("MUON", "default");
-    MUON->AddGeometryBuilder(new AliMUONSt1GeometryBuilder(MUON));
-    MUON->AddGeometryBuilder(new AliMUONSt2GeometryBuilder(MUON));
-    MUON->AddGeometryBuilder(new AliMUONSlatGeometryBuilder(MUON));
-    MUON->AddGeometryBuilder(new AliMUONTriggerGeometryBuilder(MUON));
-  }
-
-  if (usePHOS) {
-    //=================== PHOS parameters ===========================
-    AliPHOS *PHOS = new AliPHOSv1("PHOS", "IHEP");
-  }
-
-  if (usePMD) {
-    //=================== PMD parameters ============================
-    AliPMD *PMD = new AliPMDv1("PMD", "normal PMD");
-  }
-
-  if (useSTART) {
-    //=================== START parameters ============================
-    AliSTART *START = new AliSTARTv1("START", "START Detector");
-  }
-
-  if (useEMCAL) {
-    //=================== EMCAL parameters ============================
-    AliEMCAL *EMCAL = new AliEMCALv1("EMCAL", "EMCAL_55_25");
-  }
-
-  if (useCRT) {
-    //=================== CRT parameters ============================
-    AliCRT *CRT = new AliCRTv0("CRT", "normal ACORDE");
-  }
-
-  if (useVZERO) {
-    //=================== CRT parameters ============================
-    AliVZERO *VZERO = new AliVZEROv3("VZERO", "normal VZERO");
-  }
+  if (useSHIL)   AliSHIL   *SHIL   = new AliSHILv3("SHIL", "Shielding v3");
+  if (usePIPE)   AliPIPE   *PIPE   = new AliPIPEv3("PIPE", "Beam Pipe");
+  if (useITS)    AliITS    *ITS    = new AliITSv11("ITS","ITS v11");
+  if (useTPC)    AliTPC    *TPC    = new AliTPCv2("TPC", "Default");
+  if (useTOF)    AliTOF    *TOF    = new AliTOFv6T0("TOF", "normal TOF");
+  if (useHMPID)  AliHMPID  *HMPID  = new AliHMPIDv1("HMPID", "normal HMPID");
+  if (useZDC)    AliZDC    *ZDC    = new AliZDCv3("ZDC", "normal ZDC");
+  if (useTRD)    AliTRD    *TRD    = new AliTRDv1("TRD", "TRD slow simulator");
+  if (useFMD)    AliFMD    *FMD    = new AliFMDv1("FMD", "normal FMD");
+  if (useMUON)   AliMUON   *MUON   = new AliMUONv1("MUON", "default");
+  if (usePHOS)   AliPHOS   *PHOS   = new AliPHOSv1("PHOS", "IHEP");
+  if (usePMD)    AliPMD    *PMD    = new AliPMDv1("PMD", "normal PMD");
+  if (useT0)     AliT0     *T0     = new AliT0v1("T0", "T0 Detector");
+  if (useEMCAL)  AliEMCAL  *EMCAL  = new AliEMCALv2("EMCAL", "EMCAL_COMPLETEV1");
+  if (useACORDE) AliACORDE *ACORDE = new AliACORDEv1("ACORDE", "normal ACORDE");
+  if (useVZERO)  AliVZERO  *VZERO  = new AliVZEROv7("VZERO", "normal VZERO");
 }
 
 //____________________________________________________________________
@@ -681,17 +449,38 @@ LookupEG(const Char_t* name)
 
 //____________________________________________________________________  
 AliGenerator* 
-GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)  
+GeneratorFactory(EG_t eg, Rad_t rad)  
 {
   Int_t isw = 3;
   if (rad == kNoGluonRadiation) isw = 0;
   
+  // Possibly load libAliPythia6
+  switch (eg) {
+  case kPythia6:
+  case kPythia6Jets20_24:
+  case kPythia6Jets24_29:
+  case kPythia6Jets29_35:
+  case kPythia6Jets35_42:
+  case kPythia6Jets42_50:
+  case kPythia6Jets50_60:
+  case kPythia6Jets60_72:
+  case kPythia6Jets72_86:
+  case kPythia6Jets86_104:
+  case kPythia6Jets104_125:
+  case kPythia6Jets125_150:
+  case kPythia6Jets150_180:
+    gSystem->Load("liblhapdf");
+    // gSystem->Load("/usr/lib/libpythia");
+    // gSystem->ListLibraries();
+    gSystem->Load("EGPythia6");
+    gSystem->Load("libAliPythia6");
+    break;
+  }
   
   AliGenerator * gGener = 0;
   switch (eg) {
   case test50:
     {
-      comment = comment.Append(":HIJINGparam test 50 particles");
       AliGenHIJINGpara *gener = new AliGenHIJINGpara(50);
       gener->SetMomentumRange(0, 999999.);
       gener->SetPhiRange(0., 360.);
@@ -704,7 +493,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kParam_8000:
     {
-      comment = comment.Append(":HIJINGparam N=8000");
       AliGenHIJINGpara *gener = new AliGenHIJINGpara(86030);
       gener->SetMomentumRange(0, 999999.);
       gener->SetPhiRange(0., 360.);
@@ -717,7 +505,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kParam_4000:
     {
-      comment = comment.Append("HIJINGparam N=4000");
       AliGenHIJINGpara *gener = new AliGenHIJINGpara(43015);
       gener->SetMomentumRange(0, 999999.);
       gener->SetPhiRange(0., 360.);
@@ -730,7 +517,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kParam_2000:
     {
-      comment = comment.Append("HIJINGparam N=2000");
       AliGenHIJINGpara *gener = new AliGenHIJINGpara(21507);
       gener->SetMomentumRange(0, 999999.);
       gener->SetPhiRange(0., 360.);
@@ -743,7 +529,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kParam_fmd:
     {
-      comment = comment.Append("HIJINGparam N=100");
       AliGenHIJINGpara *gener = new AliGenHIJINGpara(500);
       gener->SetMomentumRange(0, 999999.);
       gener->SetPhiRange(0., 360.);
@@ -759,7 +544,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     //
   case kHijing_cent1:
     {
-      comment = comment.Append("HIJING cent1");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -768,7 +552,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kHijing_cent2:
     {
-      comment = comment.Append("HIJING cent2");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 2.);
@@ -780,7 +563,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     //
   case kHijing_per1:
     {
-      comment = comment.Append("HIJING per1");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(5., 8.6);
@@ -789,7 +571,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kHijing_per2:
     {
-      comment = comment.Append("HIJING per2");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(8.6, 11.2);
@@ -798,7 +579,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kHijing_per3:
     {
-      comment = comment.Append("HIJING per3");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(11.2, 13.2);
@@ -807,7 +587,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kHijing_per4:
     {
-      comment = comment.Append("HIJING per4");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(13.2, 15.);
@@ -816,7 +595,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kHijing_per5:
     {
-      comment = comment.Append("HIJING per5");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(15., 100.);
@@ -828,7 +606,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     //
   case kHijing_jj25:
     {
-      comment = comment.Append("HIJING Jet 25 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -845,7 +622,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_jj50:
     {
-      comment = comment.Append("HIJING Jet 50 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -862,7 +638,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_jj75:
     {
-      comment = comment.Append("HIJING Jet 75 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -879,7 +654,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_jj100:
     {
-      comment = comment.Append("HIJING Jet 100 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -896,7 +670,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_jj200:
     {
-      comment = comment.Append("HIJING Jet 200 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -915,7 +688,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     //
   case kHijing_gj25:
     {
-      comment = comment.Append("HIJING Gamma 25 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -932,7 +704,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_gj50:
     {
-      comment = comment.Append("HIJING Gamma 50 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -949,7 +720,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_gj75:
     {
-      comment = comment.Append("HIJING Gamma 75 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -966,7 +736,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_gj100:
     {
-      comment = comment.Append("HIJING Gamma 100 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -983,7 +752,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
 
   case kHijing_gj200:
     {
-      comment = comment.Append("HIJING Gamma 200 GeV");
       AliGenHijing *gener = HijingStandard();
       // impact parameter range
       gener->SetImpactParameterRange(0., 5.);
@@ -999,7 +767,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kHijing_pA:
     {
-      comment = comment.Append("HIJING pA");
 
       AliGenCocktail *gener  = new AliGenCocktail();
 
@@ -1036,7 +803,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6:
     {
-      comment = comment.Append(":Pythia p-p @ 14 TeV");
       AliGenPythia *gener = new AliGenPythia(-1); 
       gener->SetMomentumRange(0,999999);
       gener->SetThetaRange(0., 180.);
@@ -1049,7 +815,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets20_24:
     {
-      comment = comment.Append(":Pythia jets 20-24 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1068,7 +833,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets24_29:
     {
-      comment = comment.Append(":Pythia jets 24-29 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1087,7 +851,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets29_35:
     {
-      comment = comment.Append(":Pythia jets 29-35 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1106,7 +869,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets35_42:
     {
-      comment = comment.Append(":Pythia jets 35-42 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1125,7 +887,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets42_50:
     {
-      comment = comment.Append(":Pythia jets 42-50 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1144,7 +905,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets50_60:
     {
-      comment = comment.Append(":Pythia jets 50-60 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1163,7 +923,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets60_72:
     {
-      comment = comment.Append(":Pythia jets 60-72 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1182,7 +941,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets72_86:
     {
-      comment = comment.Append(":Pythia jets 72-86 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1201,7 +959,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets86_104:
     {
-      comment = comment.Append(":Pythia jets 86-104 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1220,7 +977,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets104_125:
     {
-      comment = comment.Append(":Pythia jets 105-125 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1239,7 +995,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets125_150:
     {
-      comment = comment.Append(":Pythia jets 125-150 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1258,7 +1013,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPythia6Jets150_180:
     {
-      comment = comment.Append(":Pythia jets 150-180 GeV @ 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);//        Centre of mass energy
       gener->SetProcess(kPyJets);//        Process type
@@ -1277,7 +1031,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kD0PbPb5500:
     {
-      comment = comment.Append(" D0 in Pb-Pb at 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(10);
       gener->SetProcess(kPyD0PbPbMNR);
       gener->SetStrucFunc(kCTEQ4L);
@@ -1294,7 +1047,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kCharmSemiElPbPb5500:
     {
-      comment = comment.Append(" Charm in Pb-Pb at 5.5 TeV");
       AliGenPythia * gener = new AliGenPythia(10);
       gener->SetProcess(kPyCharmPbPbMNR);
       gener->SetStrucFunc(kCTEQ4L);
@@ -1310,7 +1062,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kBeautySemiElPbPb5500:
     {
-      comment = comment.Append(" Beauty in Pb-Pb at 5.5 TeV");
       AliGenPythia *gener = new AliGenPythia(10);
       gener->SetProcess(kPyBeautyPbPbMNR);
       gener->SetStrucFunc(kCTEQ4L);
@@ -1326,7 +1077,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kCocktailTRD:
     {
-      comment = comment.Append(" Cocktail for TRD at 5.5 TeV");
       AliGenCocktail *gener  = new AliGenCocktail();
 
       AliGenParam *jpsi = new AliGenParam(10,
@@ -1372,7 +1122,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPyJJ:
     {
-      comment = comment.Append(" Jet-jet at 5.5 TeV");
       AliGenPythia *gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);
       gener->SetProcess(kPyJets);
@@ -1386,7 +1135,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kPyGJ:
     {
-      comment = comment.Append(" Gamma-jet at 5.5 TeV");
       AliGenPythia *gener = new AliGenPythia(-1);
       gener->SetEnergyCMS(5500.);
       gener->SetProcess(kPyDirectGamma);
@@ -1401,7 +1149,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailCent1:
     {
-      comment = comment.Append(" Muon Cocktail Cent1");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1416,7 +1163,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailPer1:
     {
-      comment = comment.Append(" Muon Cocktail Per1");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1431,7 +1177,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailPer4:
     {
-      comment = comment.Append(" Muon Cocktail Per4");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1446,7 +1191,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailCent1HighPt:
     {
-      comment = comment.Append(" Muon Cocktail HighPt Cent1");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1461,7 +1205,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailPer1HighPt :
     {
-      comment = comment.Append(" Muon Cocktail HighPt Per1");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1476,7 +1219,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailPer4HighPt:
     {
-      comment = comment.Append(" Muon Cocktail HighPt Per4");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1491,7 +1233,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailCent1Single:
     {
-      comment = comment.Append(" Muon Cocktail Single Cent1");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1506,7 +1247,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailPer1Single :
     {
-      comment = comment.Append(" Muon Cocktail Single Per1");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1521,7 +1261,6 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
     break;
   case kMuonCocktailPer4Single:
     {
-      comment = comment.Append(" Muon Cocktail Single Per4");
       AliGenMUONCocktail * gener = new AliGenMUONCocktail();
       gener->SetPtRange(1.0,100.);       // Transverse momentum range   
       gener->SetPhiRange(0.,360.);    // Azimuthal angle range  
@@ -1534,6 +1273,57 @@ GeneratorFactory(EG_t eg, Rad_t rad, TString& comment)
       gGener=gener;
     }
     break;
+  case kFMD1Flat: 
+    {
+      AliGenBox* gener = new AliGenBox(2000);
+      gener->SetPart(kPiPlus);
+      gener->SetMomentumRange(3,4);
+      gener->SetPhiRange(0, 360);
+      gener->SetThetaRange(0.77, 3.08);
+      gGener = gener;
+    }
+    break;
+  case kFMD2Flat: 
+    {
+      AliGenBox* gener = new AliGenBox(100);
+      gener->SetPart(kPiPlus);
+      gener->SetMomentumRange(3,4);
+      gener->SetPhiRange(0, 360);
+      gener->SetThetaRange(2.95, 20.42);
+      gGener = gener;
+    }
+    break;
+  case kFMD3Flat: 
+    {
+      AliGenBox* gener = new AliGenBox(2000);
+      gener->SetPart(kPiPlus);
+      gener->SetMomentumRange(3,4);
+      gener->SetPhiRange(0, 360);
+      gener->SetThetaRange(155.97, 176.73);
+      gGener = gener;
+    }
+    break;
+  case kFMDFlat:
+    {
+      AliGenCocktail* gener = new AliGenCocktail();
+      gener->SetMomentumRange(3,4);
+      gener->SetPhiRange(0, 360);
+      AliGenBox* gener3 = new AliGenBox(2000);
+      gener3->SetThetaRange(155.97, 176.73);
+      gener3->SetPart(kPiPlus);
+      gener->AddGenerator(gener3, "FMD3", .33);
+      AliGenBox* gener2 = new AliGenBox(2000);
+      gener2->SetThetaRange(2.95, 20.42);
+      gener2->SetPart(kPiPlus);
+      gener->AddGenerator(gener2, "FMD2", .33);
+      AliGenBox* gener1 = new AliGenBox(2000);
+      gener1->SetThetaRange(0.77, 3.08);
+      gener1->SetPart(kPiPlus);
+      gener->AddGenerator(gener1, "FMD1", .34);
+      gGener = gener;
+    }
+    break;
+    
   default: break;
   }
   return gGener;