]> git.uio.no Git - u/mrichter/AliRoot.git/commitdiff
Adding TestSuite
authorschutz <schutz@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 14 Nov 2003 13:25:10 +0000 (13:25 +0000)
committerschutz <schutz@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 14 Nov 2003 13:25:10 +0000 (13:25 +0000)
EMCAL/ConfigTestSuite.C [new file with mode: 0644]
EMCAL/TestSuite.csh [new file with mode: 0755]
EMCAL/grunTestSuite.C [new file with mode: 0644]

diff --git a/EMCAL/ConfigTestSuite.C b/EMCAL/ConfigTestSuite.C
new file mode 100644 (file)
index 0000000..0b9a276
--- /dev/null
@@ -0,0 +1,413 @@
+static Int_t    eventsPerRun = 100;
+enum PprGeo_t 
+{
+    kHoles, kNoHoles
+};
+static PprGeo_t geo = kHoles;
+
+void Config()
+{
+    // 7-DEC-2000 09:00
+    // Switch on Transition Radiation simulation. 6/12/00 18:00
+    // iZDC=1  7/12/00 09:00
+    // ThetaRange is (0., 180.). It was (0.28,179.72) 7/12/00 09:00
+    // Theta range given through pseudorapidity limits 22/6/2001
+
+    // Set Random Number seed
+    // AliLoader::SetDebug(5) ; 
+    gRandom->SetSeed(12345);
+
+
+   // libraries required by geant321
+    gSystem->Load("libgeant321");
+
+    new     TGeant3("C++ Interface to Geant3");
+
+    if (!gSystem->Getenv("CONFIG_FILE"))
+    {
+        cout<<"Config.C: Creating Run Loader ..."<<endl;
+        AliRunLoader* rl = AliRunLoader::Open("galice.root",AliConfig::fgkDefaultEventFolderName,
+                                              "recreate");
+        if (rl == 0x0)
+         {
+           gAlice->Fatal("Config.C","Can not instatiate the Run Loader");
+           return;
+         }
+        rl->SetCompressionLevel(2);
+        rl->SetNumberOfEventsPerFile(1000);
+        gAlice->SetRunLoader(rl);
+    }
+
+    TGeant3 *geant3 = (TGeant3 *) gMC;
+
+    //
+    // Set External decayer
+    TVirtualMCDecayer *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)
+    geant3->SetERAN(5.e-7);
+
+    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
+    if (gSystem->Getenv("CONFIG_NPARTICLES"))
+    {
+        int     nParticles = atoi(gSystem->Getenv("CONFIG_NPARTICLES"));
+    } else
+    {
+        int     nParticles = 10;
+    }
+ //    AliGenCocktail *gener = new AliGenCocktail();
+//     gener->SetPhiRange(220, 320);
+//     // Set pseudorapidity range from -8 to 8.
+//     Float_t thmin = EtaToTheta(0.12);   // theta min. <---> eta max
+//     Float_t thmax = EtaToTheta(-0.12);  // theta max. <---> eta min 
+//     gener->SetThetaRange(thmin,thmax);
+//     gener->SetOrigin(0, 0, 0);  //vertex position
+//     gener->SetSigma(0, 0, 0);   //Sigma in (X,Y,Z) (cm) on IP position
+
+//     AliGenHIJINGpara *hijingparam = new AliGenHIJINGpara(nParticles);
+//     hijingparam->SetMomentumRange(0.2, 999);
+//     gener->AddGenerator(hijingparam,"HIJING PARAM",1);
+
+//     AliGenBox *genbox = new AliGenBox(nParticles);
+//     genbox->SetPart(22);
+//     genbox->SetPtRange(0.3, 10.00);
+//     gener->AddGenerator(genbox,"GENBOX GAMMA for PHOS",1);
+//     gener->Init();
+
+    AliGenBox *gener = new AliGenBox(1);
+    gener->SetMomentumRange(10,11.);
+    gener->SetPhiRange(60.0,180.0);
+    gener->SetEtaRange(-0.7,0.7);
+
+    gener->SetOrigin(0,0,0);        //vertex position
+    gener->SetSigma(0,0,0);         //Sigma in (X,Y,Z) (cm) on IP position
+    gener->SetPart(22);
+    gener->Init();
+    // 
+    // Activate this line if you want the vertex smearing to happen
+    // track by track
+    //
+    //gener->SetVertexSmear(perTrack); 
+    // Field (L3 0.4 T)
+    AliMagFMaps* field = new AliMagFMaps("Maps","Maps", 2, 1., 10., 1);
+    gAlice->SetField(field);    
+
+
+    Int_t   iABSO  =  0;
+    Int_t   iDIPO  =  0;
+    Int_t   iFMD   =  0;
+    Int_t   iFRAME =  0;
+    Int_t   iHALL  =  0;
+    Int_t   iITS   =  0;
+    Int_t   iMAG   =  0;
+    Int_t   iMUON  =  0;
+    Int_t   iPHOS  =  0;
+    Int_t   iPIPE  =  0;
+    Int_t   iPMD   =  0;
+    Int_t   iRICH  =  0;
+    Int_t   iSHIL  =  0;
+    Int_t   iSTART =  0;
+    Int_t   iTOF   =  0;
+    Int_t   iTPC   =  0;
+    Int_t   iTRD   =  0;
+    Int_t   iZDC   =  0;
+    Int_t   iEMCAL =  1;
+    Int_t   iCRT   =  0;
+    Int_t   iVZERO =  0;
+    rl->CdGAFile();
+    //=================== Alice BODY parameters =============================
+    AliBODY *BODY = new AliBODY("BODY", "Alice envelop");
+
+    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 AliABSOv0("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 ============================
+
+        AliFRAMEv2 *FRAME = new AliFRAMEv2("FRAME", "Space Frame");
+       if (geo == kHoles) {
+           FRAME->SetHoles(1);
+       } else {
+           FRAME->SetHoles(0);
+       }
+    }
+
+    if (iSHIL)
+    {
+        //=================== SHIL parameters ============================
+
+        AliSHIL *SHIL = new AliSHILv2("SHIL", "Shielding Version 2");
+    }
+
+
+    if (iPIPE)
+    {
+        //=================== PIPE parameters ============================
+
+        AliPIPE *PIPE = new AliPIPEv0("PIPE", "Beam Pipe");
+    }
+    if(iITS) {
+
+    //=================== 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");
+    //
+       AliITSvPPRasymm *ITS  = new AliITSvPPRasymm("ITS","New ITS PPR detailed version with asymmetric services");
+       ITS->SetMinorVersion(2);                                         // don't touch this parameter if you're not an ITS developer
+       ITS->SetReadDet(kFALSE);                                         // don't touch this parameter if you're not an ITS developer
+    //    ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det");  // don't touch this parameter if you're not an ITS developer
+       ITS->SetThicknessDet1(200.);   // detector thickness on layer 1 must be in the range [100,300]
+       ITS->SetThicknessDet2(200.);   // detector thickness on layer 2 must be in the range [100,300]
+       ITS->SetThicknessChip1(200.);  // chip thickness on layer 1 must be in the range [150,300]
+       ITS->SetThicknessChip2(200.);  // chip thickness on layer 2 must be in the range [150,300]
+       ITS->SetRails(0);            // 1 --> rails in ; 0 --> rails out
+       ITS->SetCoolingFluid(1);   // 1 --> water ; 0 --> freon
+       //
+    //AliITSvPPRsymm *ITS  = new AliITSvPPRsymm("ITS","New ITS PPR detailed version with symmetric services");
+    //ITS->SetMinorVersion(2);                                       // don't touch this parameter if you're not an ITS developer
+    //ITS->SetReadDet(kFALSE);                                       // don't touch this parameter if you're not an ITS developer
+    //ITS->SetWriteDet("$ALICE_ROOT/ITS/ITSgeometry_vPPRsymm2.det"); // don't touch this parameter if you're not an ITS developer
+    //ITS->SetThicknessDet1(200.);   // detector thickness on layer 1 must be in the range [100,300]
+    //ITS->SetThicknessDet2(200.);   // detector thickness on layer 2 must be in the range [100,300]
+    //ITS->SetThicknessChip1(200.);  // chip thickness on layer 1 must be in the range [150,300]
+    //ITS->SetThicknessChip2(200.);  // chip thickness on layer 2 must be in the range [150,300]
+    //ITS->SetRails(0);              // 1 --> rails in ; 0 --> rails out
+    //ITS->SetCoolingFluid(1);       // 1 --> water ; 0 --> freon
+    //
+    //
+    // 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");
+    //ITS->SetRails(0);                // 1 --> rails in ; 0 --> rails out
+    //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
+    //
+    //AliITS *ITS  = new AliITSvPPRcoarsesymm("ITS","New ITS PPR coarse version with symmetric services");
+    //ITS->SetRails(0);                // 1 --> rails in ; 0 --> rails out
+    //ITS->SetSupportMaterial(0);      // 0 --> Copper ; 1 --> Aluminum ; 2 --> Carbon
+    //                      
+    //
+    //
+    // 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 (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
+        //
+        //
+        //-----------------------------------------------------------------------------
+
+        //  gROOT->LoadMacro("SetTPCParam.C");
+        //  AliTPCParam *param = SetTPCParam();
+        AliTPC *TPC = new AliTPCv2("TPC", "Default");
+
+        // All sectors included 
+        TPC->SetSecAU(-1);
+        TPC->SetSecAL(-1);
+    }
+
+
+    if (iTOF) {
+       if (geo == kHoles) {
+        //=================== TOF parameters ============================
+           AliTOF *TOF = new AliTOFv2FHoles("TOF", "TOF with Holes");
+       } else {
+           AliTOF *TOF = new AliTOFv4T0("TOF", "normal TOF");
+       }
+    }
+
+
+    if (iRICH)
+    {
+        //=================== RICH parameters ===========================
+        AliRICH *RICH = new AliRICHv3("RICH", "normal RICH");
+
+    }
+
+
+    if (iZDC)
+    {
+        //=================== ZDC parameters ============================
+
+        AliZDC *ZDC = new AliZDCv2("ZDC", "normal ZDC");
+    }
+
+    if (iTRD)
+    {
+        //=================== 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 (iFMD)
+    {
+        //=================== FMD parameters ============================
+       AliFMD *FMD = new AliFMDv1("FMD", "normal FMD");
+        FMD->SetRingsSi1(256);
+        FMD->SetRingsSi2(128);
+        FMD->SetSectorsSi1(20);
+        FMD->SetSectorsSi2(40);      
+   }
+
+    if (iMUON)
+    {
+        //=================== MUON parameters ===========================
+
+        AliMUON *MUON = new AliMUONv1("MUON", "default");
+    }
+    //=================== PHOS parameters ===========================
+
+    if (iPHOS)
+    {
+        AliPHOS *PHOS = new AliPHOSv1("PHOS", "IHEP");
+    }
+
+
+    if (iPMD)
+    {
+        //=================== PMD parameters ============================
+        AliPMD *PMD = new AliPMDv1("PMD", "normal PMD");
+    }
+
+    if (iSTART)
+    {
+        //=================== START parameters ============================
+        AliSTART *START = new AliSTARTv1("START", "START Detector");
+    }
+
+    if (iEMCAL)
+    {
+        //=================== EMCAL parameters ============================
+        AliEMCAL *EMCAL = new AliEMCALv1("EMCAL", "EMCALArch1a");
+    }
+
+     if (iCRT)
+    {
+        //=================== CRT parameters ============================
+        AliCRT *CRT = new AliCRTv0("CRT", "normal ACORDE");
+    }
+
+     if (iVZERO)
+    {
+        //=================== CRT parameters ============================
+        AliVZERO *VZERO = new AliVZEROv2("VZERO", "normal VZERO");
+    }
+
+}
+
+Float_t EtaToTheta(Float_t arg){
+  return (180./TMath::Pi())*2.*atan(exp(-arg));
+}
diff --git a/EMCAL/TestSuite.csh b/EMCAL/TestSuite.csh
new file mode 100755 (executable)
index 0000000..6861140
--- /dev/null
@@ -0,0 +1,140 @@
+#! /bin/tcsh -f
+#
+# Prepare the environment
+#
+mkdir $HOME/EMCALTestSuite ; cd $HOME/EMCALTestSuite
+cp $ALICE_ROOT/EMCAL/grunTestSuite.C . 
+cp $ALICE_ROOT/EMCAL/ConfigTestSuite.C . 
+#
+#begin data
+set MINHITS=68
+set MAXHITS=72
+set MINSDIGITS=68
+set MAXSDIGITS=72
+set MINDIGITS=47
+set MAXDIGITS=51
+set MINEMCRECPOINTS=1
+set MAXEMCRECPOINTS=2
+set MINCPVRECPOINTS=0
+set MAXCPVRECPOINTS=2
+set MINTRACKSEGMENTS=1
+set MAXTRACKSEGMENTS=2
+set MINRECPARTICLES=1
+set MAXRECPARTICLES=2
+#end data
+#
+echo EMCAL Test Suite run on `date` > TestSuite.log
+echo "=======================================================================" >> TestSuite.log
+echo AliROOT  version `which aliroot` >> TestSuite.log
+echo Root     version `which root` >> TestSuite.log
+echo "=======================================================================" >> TestSuite.log
+#
+# SIMULATION
+#
+echo "    **** SIMULATION **** " >> TestSuite.log
+aliroot -b -q grunTestSuite.C\(100\) >>& TestSuite.log 
+echo '{ '  > tempo.C
+echo " Int_t minhits  = $MINHITS ;"  >> tempo.C 
+echo " Int_t maxhits = $MAXHITS ;"  >> tempo.C 
+echo ' AliEMCALGetter * gime = AliEMCALGetter::Instance("galice.root") ;'  >> tempo.C
+echo ' TH1F * hitmul = new TH1F("hitmul", "EMCAL Test Suite", 100, 0., 200.) ; ' >> tempo.C
+echo ' Int_t max = gime->MaxEvent() ; ' >> tempo.C
+echo ' Int_t evt = 0 ; ' >> tempo.C
+echo ' for ( evt = 0 ; evt < max ; evt++ ) { ' >> tempo.C
+echo '  gime->Event(evt,"H") ; ' >> tempo.C
+echo '  hitmul->Fill(gime->Hits()->GetEntries()) ; ' >> tempo.C
+echo ' } ' >> tempo.C
+echo ' TF1 * gaus = new TF1("gaus", "gaus", 0., 200.) ; ' >> tempo.C 
+echo ' hitmul->Fit(gaus,"", "", 40, 100) ; ' >> tempo.C 
+echo ' if( gaus->GetParameter(1) > maxhits ||  gaus->GetParameter(1) < minhits ) ' >> tempo.C  
+echo '  printf("ERRORSIM 1") ; ' >> tempo.C
+echo ' else ' >> tempo.C
+echo '  printf("ERRORSIM 0") ; ' >> tempo.C
+echo '} '  >> tempo.C
+aliroot -b -q tempo.C >>& TestSuite.log 
+set ERRORSIM = `cat TestSuite.log | grep ERRORSIM | awk '{print $2}'`
+if($ERRORSIM) then
+  echo ERROR
+  uuencode  TestSuite.log  TestSuite.log | mail -s 'EMCAL INSTALLATION ERROR' yves.schutz@cern.ch
+  exit(0)
+endif 
+rm tempo.C 
+#
+# RECONSTRUCTION
+#
+echo "    **** RECONSTRUCTION **** " >> TestSuite.log
+aliroot -b >>& TestSuite.log <<EOF
+ AliEMCALSDigitizer sd("galice.root") ; 
+ sd.ExecuteTask("deb all") ; 
+ AliEMCALDigitizer d("galice.root") ; 
+ d.ExecuteTask("deb all") ; 
+ AliEMCALClusterizerv1 cl("galice.root") ; 
+ cl.ExecuteTask("deb all") ; 
+ AliEMCALTrackSegmentMakerv1 ts("galice.root") ; 
+ ts.ExecuteTask("deb all") ; 
+ AliEMCALPIDv1 pd("galice.root") ; 
+ pd.ExecuteTask("deb all") ; 
+ .q
+EOF
+echo '{ '  > tempo.C
+echo " Int_t minsdig  = $MINSDIGITS ;"  >> tempo.C 
+echo " Int_t maxsdig  = $MAXSDIGITS ;"  >> tempo.C 
+echo " Int_t mindig   = $MINDIGITS ;"  >> tempo.C 
+echo " Int_t maxdig   = $MAXDIGITS ;"  >> tempo.C 
+echo " Int_t minemcrp = $MINEMCRECPOINTS ;"  >> tempo.C 
+echo " Int_t maxemcrp = $MAXEMCRECPOINTS ;"  >> tempo.C 
+echo " Int_t mincpvrp = $MINCPVRECPOINTS ;"  >> tempo.C 
+echo " Int_t maxcpvrp = $MAXCPVRECPOINTS ;"  >> tempo.C 
+echo " Int_t mints    = $MINTRACKSEGMENTS ;"  >> tempo.C 
+echo " Int_t maxts    = $MAXTRACKSEGMENTS ;"  >> tempo.C 
+echo " Int_t minpa    = $MINRECPARTICLES ;"  >> tempo.C 
+echo " Int_t maxpa    = $MAXRECPARTICLES ;"  >> tempo.C 
+echo ' AliEMCALGetter * gime = AliEMCALGetter::Instance("galice.root") ;'  >> tempo.C
+echo ' TH1F * sdigmul = new TH1F("sdigmul", " SDigits EMCAL Test Suite", 100, 0., 200.) ; ' >> tempo.C
+echo ' TH1F * digmul  = new TH1F("digmul", " Digits EMCAL Test Suite", 100, 0., 200.) ; ' >> tempo.C
+echo ' TH1F * emcrpmul= new TH1F("emcrpmul", " EMCRecPoints EMCAL Test Suite", 100, 0., 200.) ; ' >> tempo.C
+echo ' TH1F * cpvrpmul= new TH1F("cpvrpmul", " CPVRecPoints EMCAL Test Suite", 100, 0., 200.) ; ' >> tempo.C
+echo ' TH1F * tsmul   = new TH1F("tsmul", " TrackSegments EMCAL Test Suite", 100, 0., 200.) ; ' >> tempo.C
+echo ' TH1F * pamul   = new TH1F("pamul", " RecParticles EMCAL Test Suite", 100, 0., 200.) ; ' >> tempo.C
+echo ' Int_t max = gime->MaxEvent() ; ' >> tempo.C
+echo ' Int_t evt = 0 ; ' >> tempo.C
+echo ' for ( evt = 0 ; evt < max ; evt++ ) { ' >> tempo.C
+echo '  gime->Event(evt,"SDRTP") ; ' >> tempo.C
+echo '  sdigmul->Fill(gime->SDigits()->GetEntries()) ; ' >> tempo.C
+echo '  digmul->Fill(gime->Digits()->GetEntries()) ; ' >> tempo.C
+echo '  emcrpmul->Fill(gime->EmcRecPoints()->GetEntries()) ; ' >> tempo.C
+echo '  cpvrpmul->Fill(gime->CpvRecPoints()->GetEntries()) ; ' >> tempo.C
+echo '  tsmul->Fill(gime->TrackSegments()->GetEntries()) ; ' >> tempo.C
+echo '  pamul->Fill(gime->RecParticles()->GetEntries()) ; ' >> tempo.C
+echo ' } ' >> tempo.C
+echo ' TF1 * gaus = new TF1("gaus", "gaus", 0., 200.) ; ' >> tempo.C 
+echo ' sdigmul->Fit(gaus, "", "", 40., 100.) ; ' >> tempo.C 
+echo ' sdigmul->Draw() ; ' >> tempo.C 
+echo ' if( gaus->GetParameter(1) > maxsdig ||  gaus->GetParameter(1) < minsdig ) ' >> tempo.C  
+echo '  printf("ERRORREC 1 sdigits\n") ; ' >> tempo.C
+echo ' digmul->Fit(gaus, "", "", 20., 80.) ; ' >> tempo.C 
+echo ' if( gaus->GetParameter(1) > maxdig ||  gaus->GetParameter(1) < mindig ) ' >> tempo.C  
+echo '  printf("ERRORREC 1 digits\n") ; '  >> tempo.C
+echo ' emcrpmul->Fit(gaus, "", "", 0., 4.) ; ' >> tempo.C 
+echo ' if( gaus->GetParameter(1) > maxemcrp ||  gaus->GetParameter(1) < minemcrp ) ' >> tempo.C  
+echo '  printf("ERRORREC 1 emc recpoints\n") ; ' >> tempo.C
+echo ' cpvrpmul->Fit(gaus, "", "", 0., 4.) ; ' >> tempo.C 
+echo ' if( gaus->GetParameter(1) > maxcpvrp ||  gaus->GetParameter(1) < mincpvrp ) ' >> tempo.C  
+echo '  printf("ERRORREC 1 cpv recpoints\n") ; ' >> tempo.C
+echo ' tsmul->Fit(gaus, "", "", 0., 4.) ; ' >> tempo.C 
+echo ' if( gaus->GetParameter(1) > maxts ||  gaus->GetParameter(1) < mints ) ' >> tempo.C  
+echo '  printf("ERRORREC 1 track segments\n") ; ' >> tempo.C
+echo ' pamul->Fit(gaus, "", "", 0., 4. ) ; ' >> tempo.C 
+echo ' if( gaus->GetParameter(1) > maxpa ||  gaus->GetParameter(1) < minpa ) ' >> tempo.C  
+echo '  printf("ERRORREC 1 recparticles\n") ; ' >> tempo.C
+echo '} ' >> tempo.C
+aliroot -b -q tempo.C  >>& TestSuite.log 
+set ERRORREC = `cat TestSuite.log | grep ERRORREC | awk '{print $2}'`
+if($ERRORREC) then
+  echo ERROR
+  uuencode  TestSuite.log  TestSuite.log | mail -s 'EMCAL INSTALLATION ERROR' yves.schutz@cern.ch
+  exit(0)
+endif 
+#rm tempo.C 
+#/cd $HOME
+#rm -fr $HOME/EMCALTestSuite
diff --git a/EMCAL/grunTestSuite.C b/EMCAL/grunTestSuite.C
new file mode 100644 (file)
index 0000000..cb5ee3c
--- /dev/null
@@ -0,0 +1,18 @@
+void grunTestSuite (Int_t nevent=3, const char *config="ConfigTestSuite.C")
+{
+  //
+  // Simple macro to run aliroot in a batch mode
+  //
+  gAlice->Init(config);
+  TStopwatch timer;
+  timer.Start();
+//
+//  If nevent is negative it is assumed that in config the 
+//  global variable eventsPerRun has been set.
+//
+  if (nevent < 0) 
+      nevent = eventsPerRun;
+  gAlice->Run(nevent);
+  timer.Stop();
+  timer.Print();
+}