//-----------------------------------------------------------------------------
//  STNTUPLE validation script: reads STNTUPLE file and runs all the available
//  analysis modules on it. In the end produces histogram file with the
//  validation histograms
//-----------------------------------------------------------------------------
TStnAna*       x;
TPesAnaModule* m_pes;

int val_pes(const char* InputFile, Int_t PrintLevel = 0, Int_t NEvents = 10) {
//-----------------------------------------------------------------------------
// make sure all the initializations are done
//-----------------------------------------------------------------------------
  TChain* chain = new TChain("STNTUPLE");
//-----------------------------------------------------------------------------
//  define input file
//-----------------------------------------------------------------------------
  chain->Add(InputFile);
  x = new TStnAna(chain);

  m_pes = (TPesAnaModule*) x->AddModule("TPesAnaModule");
  m_pes->SetPrintLevel(PrintLevel);

  x->Run(NEvents);
  //  x->SaveHist("./ar0261c3.0001phys.val_hist.4.11.1.root");
}