void unpack_kratta_merger_test()
{
  // ----  Load libraries   --------------------------------------------
  gROOT->LoadMacro("$VMCWORKDIR/gconfig/basiclibs.C");
  basiclibs();
  gSystem->Load("libGeoBase");                            
  gSystem->Load("libParBase");
  gSystem->Load("libBase");
  gSystem->Load("libMbs");
  gSystem->Load("libMbsAPI");
  gSystem->Load("libTATOFEvent");
  gSystem->Load("libTCAMACEvent");
  gSystem->Load("libTCHIEvent");
  gSystem->Load("libTLANDEvent");
  gSystem->Load("libTKRATEvent");    
  gSystem->Load("libTRootEvent");
  gSystem->Load("libTMbsInfo");
  gSystem->Load("libTCHIGridCsI");
  gSystem->Load("libMBSUnpack");
  gSystem->Load("libMerger");
  gSystem->Load("libTMBALLEvent");
  gSystem->Load("libAnaCHI");
  // -------------------------------------------------------------------


  ///Load libs for kratta analysis
  gSystem->Load("libTKratAnaStep1");
  gSystem->Load("libTKratAnaStep2");
  gSystem->Load("libKratMktreedst");
  gSystem->Load("libTKRATEventParam");

  gSystem->Load("libTKratMerger");
  gSystem->Load("libTKratDstReader");
  gSystem->Load("libTKratDstAna");  
  gSystem->Load("libTKratDstVisualisator");   
  gSystem->Load("libTKratDstParamAna");   
  gSystem->Load("libTKratTaskTemplate");   
  // -------------------------------------------------------------------
  // Style setup (can be moved to rootlogon)
  gStyle->SetPalette(1);

  // -------------------------------------------------------------------
  TString outFile     = "analysis_results_0918.root";

  FairRunAna *fRun= new FairRunAna();
  fRun->SetOutputFile(outFile);

  TString InFiles     ="runlist-local.dat" ;
  //TString InFiles     ="runlist_zr.dat" ;
  //TString InFilesDst  ="runlist_dst-local.dat" ;

  TString PathToKrattaDsts ="/lustre/fopi/skupny/2013-02_kratta_dst/indir/";
  
  // ------ Declare tasks ----------------------------------------------
  //MBSUnpackOld *MBSunpack= new MBSUnpackOld("MBS unpack", InFiles);
  
  MBSUnpack *MBSunpack= new MBSUnpack("MBS unpack", InFiles);
  
  LANDUnpack            *LANDunpack   = new LANDUnpack("LAND unpack");
  CHIUnpack             *CHIunpack    = new CHIUnpack("Chimera unpack");
  MBUnpack              *MBunpack     = new MBUnpack("MicroBall unpack");
  CAMACUnpack           *CAMACunpack  = new CAMACUnpack("CAMAC unpack");
  ATOFUnpack            *ATOFunpack   = new ATOFUnpack("ATOF unpack");
  //KRATUnpack            *KRATunpack   = new KRATUnpack("KRATTA unpack");
  Merger                *AsyMerger    = new Merger("Asy Merger");
  //AnaCHI                *anaCHI       = new AnaCHI("Analyze CHIMERA DATA");
  //TKratAnaStep1       *KRATanaStep1 = new TKratAnaStep1();
  //TKratAnaStep2       *KRATanaStep2 = new TKratAnaStep2();

  //TKratDstReader        *pTKratDstReader        = new TKratDstReader("TKratDstReader", InFilesDst, 2 );
  //TKratDstAna           *pTKratDstAna           = new TKratDstAna("TKratDstReader", 2 );
  //TKratDstVisualisator  *pTKratDstVisualisator  = new TKratDstVisualisator("TKratDstVisualisator", 1 );
  //TKratDstParamAna      *pTKratDstParamAna      = new TKratDstParamAna("TKratTaskTemplate", 1 );

  TKratMerger           *pTKratMerger           = new TKratMerger("TKratMerger", InFiles, PathToKrattaDsts );
  //TKratTaskTemplate     *pTKratTaskTemplate     = new TKratTaskTemplate("TKratTaskTemplate", 1 );

  // -------------------------------------------------------------------
  //KRATunpack->SetDebugLevel(0);


  // ------ Add tasks to the scheduler manager -------------------------

  ///Lvl 0
  
  fRun->AddTask(MBSunpack);
  fRun->AddTask(LANDunpack);
  fRun->AddTask(CHIunpack);
  fRun->AddTask(MBunpack);
  fRun->AddTask(CAMACunpack);
  fRun->AddTask(ATOFunpack);
  //  fRun->AddTask(KRATunpack);
  fRun->AddTask(AsyMerger);
  //  fRun->AddTask(anaCHI);

  //fRun->AddTask( pTKratDstReader );
  //fRun->AddTask( pTKratDstParamAna );
  //fRun->AddTask( pTKratTaskTemplate );
  //fRun->AddTask( pTKratDstVisualisator );
  fRun->AddTask( pTKratMerger );
  //fRun->AddTask( pTKratDstAna );
  
  // -------------------------------------------------------------------
  ///Lvl 1
  //fRun->AddTask(KRATanaStep1);

  ///Lvl 2
  //fRun->AddTask(KRATanaStep2);

  ///Lvl 3
  //pTKratDstVisualisator->SetEventsBetweenUpdatingToStore(50);
  //pTKratDstVisualisator->SetModuleToAnalyse(0);
  
  pTKratMerger->PrintLoadedDstFiles();
  // ------ Initialize  ------------------------------------------------
  fRun->Init();
  pTKratMerger->PrintLoadedDstFiles();
  

  // -------------------------------------------------------------------
  //Long64_t eventss = pTKratDstReader->GetNumberOfEventsInInputFiles();
  //cout << "Events in files = " << eventss << endl;
  cout << "Press enter to start..."  << flush;
  getchar();

  //pTKratDstReader->SetVerboseLevel(2);


  // ------ Run --------------------------------------------------------
  //fRun->Run(0, eventss);
  //fRun->Run(0, 3*193728 );
  fRun->RunOnLmdFiles(); ///193728

  cout << "Done" << endl;
}