macros/TestNewIO.C

   1 Int_t TestNewIO(Int_t n = 5,Char_t SlowOrFast='s')
   2 {
   3    Int_t rc=0;
   4
   5    AliLoader::SetDebug(kTRUE);//set it to kTRUE for debug print-out
   6    gAlice->SetDebug(100);
   7    /**********************************************/
   8    /************ G E N E R A T I O N *************/
   9    /**********************************************/
  10
  11    gROOT->LoadMacro("$(ALICE_ROOT)/macros/grun.C");
  12    grun(n);
  13
  14
  15    /**********************************************/
  16    /******************* T P C ********************/
  17    /**********************************************/
  18    //The following part is just core of AliTPCtest.C
  19
  20    gROOT->LoadMacro("$(ALICE_ROOT)/TPC/AliTPCHits2SDigits.C");
  21    if (rc=AliTPCHits2SDigits(n)) return rc;
  22
  23    gROOT->LoadMacro("$(ALICE_ROOT)/TPC/AliTPCSDigits2Digits.C");
  24    if (rc=AliTPCSDigits2Digits(n)) return rc;
  25
  26    gROOT->LoadMacro("$(ALICE_ROOT)/TPC/AliTPCFindClusters.C");
  27    if (rc=AliTPCFindClusters(n)) return rc;
  28
  29    gROOT->LoadMacro("$(ALICE_ROOT)/TPC/AliTPCFindTracks.C");
  30    if (rc=AliTPCFindTracks(n)) return rc;
  31
  32    /**********************************************/
  33    /******************* I T S ********************/
  34    /**********************************************/
  35    //The following part is just core of AliITStestV2.C
  36    if (SlowOrFast=='f') {
  37       cerr<<"Fast AliITSRecPoint(s) !\n";
  38       gROOT->LoadMacro("$(ALICE_ROOT)/ITS/AliITSHits2FastRecPoints.C");
  39       AliITSHits2FastRecPoints();
  40    } else {
  41       cerr<<"Slow AliITSRecPoint(s) !\n";
  42       gROOT->LoadMacro("$(ALICE_ROOT)/ITS/AliITSHits2SDigits.C");
  43       AliITSHits2SDigits();
  44       gROOT->LoadMacro("$(ALICE_ROOT)/ITS/AliITSSDigits2Digits.C");
  45       AliITSSDigits2Digits();
  46       gROOT->LoadMacro("$(ALICE_ROOT)/ITS/AliITSDigits2RecPoints.C");
  47       AliITSDigits2RecPoints();
  48    }
  49    gROOT->LoadMacro("$(ALICE_ROOT)/ITS/AliITSFindClustersV2.C");
  50    if (rc=AliITSFindClustersV2(SlowOrFast)) return rc;
  51
  52    gROOT->LoadMacro("$(ALICE_ROOT)/ITS/AliITSFindTracksV2.C");
  53    if (rc=AliITSFindTracksV2()) return rc;
  54
  55
  56    /**********************************************/
  57    /****************** P H O S *******************/
  58    /**********************************************/
  59
  60    if (gAlice)
  61     {
  62       delete gAlice->GetRunLoader();
  63       delete gAlice;//if everything was OK here it is already NULL
  64       gAlice = 0x0;
  65     }
  66    AliRunLoader* rl =AliRunLoader::Open("galice.root","EVENTFOLDER");
  67    AliPHOSReconstructioner r("EVENTFOLDER");
  68    r.ExecuteTask("deb");
  69    delete rl;
  70
  71    gROOT->LoadMacro("$(ALICE_ROOT)/TPC/AliTPCComparison.C");
  72    if (rc=AliTPCComparison()) return rc;
  73
  74    gROOT->LoadMacro("$(ALICE_ROOT)/ITS/AliITSComparisonV2.C");
  75    if (rc=AliITSComparisonV2()) return rc;
  76
  77
  78
  79    ::Info("NewIO test","Everything seems to be OK");
  80    ::Info("NewIO test","You can try now display.C and TPC/AliTPCDisplayDigits3Dnew.C");
  81 }