void runMomresReco_batch(TString digifile, 
			 bool doCorrection=false, 
			 TString corrFile="LaserTestVertical.reco.root") //laser fit reco file
{
  // ========================================================================
  // Verbosity level (0=quiet, 1=event level, 2=track level, 3=debug)
  Int_t iVerbose = 0;

  // Input file
  TString inDigiFile = digifile;
  TString inSimFile = inDigiFile;
  inSimFile.ReplaceAll("raw.root", "mc.root");
  // Parameter file
  TString parFile = inDigiFile;
  parFile.ReplaceAll("raw.root", "param.root");

  // Output file
  TString outFile = inDigiFile;
  outFile.ReplaceAll("raw.root", "reco.root");
  

  // Number of events to process
  Int_t nEvents = 0;
 
  // ----  Load libraries   -------------------------------------------------
  TString sysFile = gSystem->Getenv("VMCWORKDIR");
  // ------------------------------------------------------------------------
  // In general, the following parts need not be touched
  // ========================================================================

  // -----   Timer   --------------------------------------------------------
  TStopwatch timer;
  timer.Start();
  // ------------------------------------------------------------------------

  // -----   Digitization run   -------------------------------------------
  FairRunAna *fRun= new FairRunAna();
  fRun->SetInputFile(inDigiFile);
 cout<<"Set Input File: "<<inDigiFile<<endl;
  fRun->AddFriend(inSimFile);
  cout<<"Set Friend MC File: "<<inSimFile<<endl;
  fRun->SetOutputFile(outFile);
  cout<<"Set Output File: "<<outFile<<endl;
  FairGeane *Geane = new FairGeane();
  fRun->AddTask(Geane);
  // ------------------------------------------------------------------------

  // -----  Parameter database   --------------------------------------------
  TString allDigiFile = sysFile+"/tpc/parfiles/tpc.par";

  FairRuntimeDb* rtdb = fRun->GetRuntimeDb();
  FairParRootFileIo* parInput1 = new FairParRootFileIo();
  parInput1->open(parFile.Data());
	
  FairParAsciiFileIo* parIo1 = new FairParAsciiFileIo();
  parIo1->open(allDigiFile.Data(),"in");
        
  rtdb->setFirstInput(parInput1);
  rtdb->setSecondInput(parIo1);
  PndGeoHandling* geoH = PndGeoHandling::Instance();

  bool SimpleClustering=true;

  // ------- RECO procedure ------------------------------------------------
  
  TpcClusterFinderTask* tpcCF = new TpcClusterFinderTask();
  //tpcCF->SetDigiPersistence(); // keep reference to digis in clusters
  tpcCF->SetPersistence(); // keep Clusters
  tpcCF->timeslice(5); //in samples
  tpcCF->SetSingleDigiClusterAmpCut(0.);
  tpcCF->SetClusterAmpCut(0.); // cut on mean digi amplitude
  tpcCF->SetErrorPars(600.,300.);
  tpcCF->SetSimpleClustering(); // use TpcClusterFinderSimple
  fRun->AddTask(tpcCF);

  TpcLaserCorrectionTask* lcorr = new TpcLaserCorrectionTask();
  lcorr->SetClusterBranchName("TpcCluster");
  lcorr->SetLaserRecoFile(corrFile);
  lcorr->SetSplineBranchName("TpcLaserSplineFits");
  if(doCorrection)
    fRun->AddTask(lcorr);
  

  //find TpcRiemannTracks in the TPC alone
  TpcRiemannTrackingTask* tpcSPR = new TpcRiemannTrackingTask();
  tpcSPR->SetPersistence();
  tpcSPR->SetClusterBranchName("TpcCluster");
  //tpcSPR->SetVerbose(1);
  fRun->AddTask(tpcSPR);

  //build GFTracks from TpcRiemannTracks
  TpcTrackInitTask* trackInit=new TpcTrackInitTask();
  trackInit->SetPersistence();
  trackInit->SetClusterBranchName("TpcCluster");
  //trackInit->SetVerbose(1);
  trackInit->SetMCPid(); // use ideal particle identification
  //trackInit->SetPDG(211);
  //trackInit->useGeane(); // uses RKTrackrep and GeaneTrackrep
  trackInit->SetSmoothing(true);
  fRun->AddTask(trackInit);

  TpcIdealTrackingTask* tpcIPR = new TpcIdealTrackingTask();
  //tpcIPR->useGeane(true);
  tpcIPR->useDistSorting(true);
  tpcIPR->SetPersistence();
  tpcIPR->SetSmoothing(true);
  //fRun->AddTask(tpcIPR);
  

  KalmanTask* kalman =new KalmanTask();
  kalman->SetPersistence();
  kalman->SetNumIterations(3); // number of fitting iterations (back and forth)
  fRun->AddTask(kalman);

  TpcResidualTask* Res = new TpcResidualTask();
  Res->SetPersistence();
  //Res->SetNumberOfTrackReps(2);
  //SLres->SetClusterBranchName("TpcCluster_cut");
  //fRun->AddTask(Res);
 
  // -----   Intialise and run   --------------------------------------------
  
  fRun->Init();
  TpcDigiPar* tpcpar = FairRun::Instance()->GetRuntimeDb()->getContainer("TpcDigiPar");
  TpcDigiMapper::getInstance()->init(tpcpar);
  GFFieldManager::getInstance()->init(new PndFieldAdaptor(fRun->GetField()));
  fRun->Run(0, 0);

  rtdb->saveOutput();
  rtdb->print();

  // ------------------------------------------------------------------------

  // -----   Finish   -------------------------------------------------------

  timer.Stop();
  Double_t rtime = timer.RealTime();
  Double_t ctime = timer.CpuTime();
  cout << endl << endl;
  cout << "Macro finished succesfully." << endl;
  cout << "Output file is "    << outFile << endl;
  cout << "Parameter file is " << parFile << endl;
  cout << "Real time " << rtime << " s, CPU time " << ctime << " s" << endl;
  cout << endl;

  TpcDigiMapper::getInstance()->destruct();
  // ------------------------------------------------------------------------


}