void proofTreeFRA() {
  gROOT->Macro("$VMCWORKDIR/gconfig/rootlogon.C");
  
  TProof* proof = TProof::Open("");

  TChain *chain = new TChain("cbmsim");
  chain->Add(TString::Format("%s/Gem_3Stations_15GeV_n1000_digi.root", gSystem->WorkingDirectory()));
  chain->Add(TString::Format("%s/Gem_3Stations_15GeV_n1100_digi.root", gSystem->WorkingDirectory()));
  chain->Add(TString::Format("%s/Gem_3Stations_15GeV_n1200_digi.root", gSystem->WorkingDirectory()));
  chain->Add(TString::Format("%s/Gem_3Stations_15GeV_n1300_digi.root", gSystem->WorkingDirectory()));
  chain->Add(TString::Format("%s/Gem_3Stations_15GeV_n1400_digi.root", gSystem->WorkingDirectory()));
  
  TString fout = TString::Format("%s/Gem_3Stations_15GeV_n6000_hitsSelectorCOMBI.root", gSystem->WorkingDirectory());
  proof->AddInput(new TNamed("PROOF_OUTPUTFILE", fout.Data()));
  
  chain->SetProof();
  
  proof->ClearPackages();
  proof->UploadPackage("libPndRoot.par");
  proof->EnablePackage("libPndRoot");

  Int_t nofChainEntries = chain->GetEntries();
  cout << "the chain seems to have " << nofChainEntries << " entries" << endl;

  TString sel = "treeFairRunAna.C+";
  
  proof->AddInput(chain);
  
  Printf("\nrunProof: running \"treeFairRunAnaSel\"\n");
  
  proof->Process(sel.Data(), nofChainEntries);
}