]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - STEER/AliTagCreator.cxx
PropagateToDCA in case of track and vertex (M.Ivanov)
[u/mrichter/AliRoot.git] / STEER / AliTagCreator.cxx
index 9112448171ffd447aa95d050dd376f5f3aa032ed..21d395d4e796d1f38e109f50747111e1ddf9e44f 100644 (file)
 //-----------------------------------------------------------------
 
 //ROOT
-#include <TObject.h>
-#include <Riostream.h>
-#include <TSystem.h>
-#include <TChain.h>
 #include <TFile.h>
 #include <TString.h>
-#include <THashTable.h>
+#include <TTree.h>
+#include <TSystem.h>
+#include <TChain.h>
+#include <TLorentzVector.h>
 
 //ROOT-AliEn
 #include <TGrid.h>
-//#include <TAlienCollection.h>
 #include <TGridResult.h>
-#include <TFileMerger.h>
-#include <TMap.h>
-#include <TXMLParser.h>
-#include <TThread.h>
-#include <TTreePlayer.h>
-#include <TProof.h>
 
 //AliRoot
 #include "AliRunTag.h"
 #include "AliEventTag.h"
 #include "AliESD.h"
 #include "AliESDVertex.h"
-#include "AliPID.h"
-#include "AliESDpid.h"
 #include "AliLog.h"
 
 
@@ -59,63 +49,11 @@ ClassImp(AliTagCreator)
 AliTagCreator::AliTagCreator() //local mode
 {
   //==============Default constructor for a AliTagCreator==================
-  fUser = "";
-  fPasswd = "";  
+  fgridpath = "";
   fSE = "";   
-  fHost = "";
-  fPort = 0; 
-  fresult = 0;
-}
-
-//______________________________________________________________________________
-AliTagCreator::AliTagCreator(const char *host, Int_t port, const char *username)
-{
-  //==============Default constructor for a AliTagCreator==================
-  fresult = 0;
-  fHost = host;
-  fUser = username;
-  fPort = port;
-
-  TString grid = "alien://";
-  grid += fHost;
-  grid += ":";
-  grid += port;
-  
-  //connect to the grid
-  TGrid::Connect(grid.Data(),fUser.Data());
-  if(!gGrid)
-    {
-      AliError("Connection failed!!!");
-      return;
-    }
-}
-
-
-//______________________________________________________________________________
-AliTagCreator::AliTagCreator(const char *host, Int_t port, const char *username, const char *passwd)
-{
-  //==============Default constructor for a AliTagCreator==================
-  fresult = 0;
-  fHost = host;
-  fUser = username;
-  fPasswd = passwd;
-  fPort = port;
-
-  TString grid = "alien://";
-  grid += fHost;
-  grid += ":";
-  grid += port;
-  
-  //connect to the grid
-  TGrid::Connect(grid.Data(),fUser.Data(),fPasswd.Data());
-   if(!gGrid)
-    {
-      AliError("Connection failed!!!");
-      return;
-    }
+  fStorage = 0; 
 }
 
-
 //______________________________________________________________________________
 AliTagCreator::~AliTagCreator()
 {
@@ -123,52 +61,50 @@ AliTagCreator::~AliTagCreator()
 }
 
 //______________________________________________________________________________
-void AliTagCreator::SetSE(const char *se)
-{
-  fSE = se;
-}
-
-//______________________________________________________________________________
-Bool_t AliTagCreator::ConnectToGrid(const char *host, Int_t port, const char *username)
+void AliTagCreator::SetStorage(Int_t storage)
 {
-  fHost = host;
-  fUser = username;
-  fPort = port;
-
-  TString grid = "alien://";
-  grid += fHost;
-  grid += ":";
-  grid += port;
-  
-  //connect to the grid
-  TGrid::Connect(grid.Data(),fUser.Data());
-  if(!gGrid)
+  // Sets correctly the storage: 0 for local, 1 for GRID
+  fStorage = storage;
+  if(fStorage == 0)
+    AliInfo(Form("Tags will be stored locally...."));
+  if(fStorage == 1)
+    AliInfo(Form("Tags will be stored in the grid...."));
+  if((fStorage != 0)&&(fStorage != 1))
     {
-      AliError("Connection failed!!!");
-      return kFALSE;
-    } //connect to the grid
-
-  return kTRUE;
+      AliInfo(Form("Storage was not properly set!!!"));
+      abort();
+    }  
 }
 
+
 //______________________________________________________________________________
-Bool_t AliTagCreator::ReadESDCollection(TGridResult *res)
+Bool_t AliTagCreator::ReadESDCollection(TGridResult *fresult)
 {
-  fresult = res;
-  Int_t NEntries = fresult->GetEntries();
+  // Reads the entry of the TGridResult and creates the tags
+  Int_t nEntries = fresult->GetEntries();
 
-  TString gridname = "alien://";
-  TString AlienUrl;
+  TString alienUrl;
   const char *guid;
+  const char *md5;
+  const char *turl;
+  Long64_t size = -1;
+
   Int_t counter = 0;
-  for(Int_t i = 0; i < NEntries; i++)
+  for(Int_t i = 0; i < nEntries; i++)
     {
-      AlienUrl = gridname;
-      AlienUrl += fresult->GetKey(i,"lfn");
+      alienUrl = fresult->GetKey(i,"turl");
       guid = fresult->GetKey(i,"guid");
-      TFile *f = TFile::Open(AlienUrl,"READ");
-      CreateTag(f,guid,counter);
+      if(fresult->GetKey(i,"size"))
+       size = atol (fresult->GetKey(i,"size"));
+      md5 = fresult->GetKey(i,"md5");
+      turl = fresult->GetKey(i,"turl");
+      if(md5 && !strlen(guid))
+       md5 = 0;
+      if(guid && !strlen(guid))
+       guid = 0;
+
+      TFile *f = TFile::Open(alienUrl,"READ");
+      CreateTag(f,guid,md5,turl,size,counter);
       f->Close();
       delete f;         
       counter += 1;
@@ -177,24 +113,134 @@ Bool_t AliTagCreator::ReadESDCollection(TGridResult *res)
   return kTRUE;
 }
 
+//__________________________________________________________________________
+Bool_t AliTagCreator::MergeTags()
+{
+  //Merges the tags and stores the merged tag file 
+  //locally if fStorage=0 or in the grid if fStorage=1
+  AliInfo(Form("Merging tags....."));
+  TChain *fgChain = new TChain("T");
+
+  if(fStorage == 0) {
+    const char * tagPattern = "tag";
+    // Open the working directory
+    void * dirp = gSystem->OpenDirectory(gSystem->pwd());
+    const char * name = 0x0;
+    // Add all files matching *pattern* to the chain
+    while((name = gSystem->GetDirEntry(dirp))) {
+      if (strstr(name,tagPattern))       
+       fgChain->Add(name);  
+    }//directory loop
+    AliInfo(Form("Chained tag files: %d",fgChain->GetEntries()));
+  }//local mode
+
+  else if(fStorage == 1) {
+    TString alienLocation = gGrid->Pwd();
+    alienLocation += fgridpath.Data();
+    alienLocation += "/";
+
+    TGridResult *tagresult = gGrid->Query(alienLocation,"*tag.root","","");
+    Int_t nEntries = tagresult->GetEntries();
+    for(Int_t i = 0; i < nEntries; i++) {
+      TString alienUrl = tagresult->GetKey(i,"turl");
+      fgChain->Add(alienUrl);
+    }//grid result loop      
+    AliInfo(Form("Chained tag files: %d",fgChain->GetEntries()));
+  }//grid mode
+  AliRunTag *tag = new AliRunTag;
+  AliEventTag *evTag = new AliEventTag;
+  fgChain->SetBranchAddress("AliTAG",&tag);
+   
+  //Defining new tag objects
+  AliRunTag *newTag = new AliRunTag();
+  TTree ttag("T","A Tree with event tags");
+  TBranch * btag = ttag.Branch("AliTAG", &newTag);
+  btag->SetCompressionLevel(9);
+  for(Int_t iTagFiles = 0; iTagFiles < fgChain->GetEntries(); iTagFiles++) {
+    fgChain->GetEntry(iTagFiles);
+    newTag->SetRunId(tag->GetRunId());
+    const TClonesArray *tagList = tag->GetEventTags();
+    for(Int_t j = 0; j < tagList->GetEntries(); j++) {
+      evTag = (AliEventTag *) tagList->At(j);
+      newTag->AddEventTag(*evTag);
+    }
+    ttag.Fill();
+    newTag->Clear();
+  }//tag file loop 
+  
+  TString localFileName = "Run"; localFileName += tag->GetRunId(); 
+  localFileName += ".Merged"; localFileName += ".ESD.tag.root";
+     
+  TString alienFileName = "/alien";
+  alienFileName += gGrid->Pwd();
+  alienFileName += fgridpath.Data();
+  alienFileName += "/";
+  alienFileName +=  localFileName;
+  alienFileName += "?se=";
+  alienFileName += fSE.Data();
+
+  TString filename = 0x0;
+  
+  if(fStorage == 0) {
+    filename = localFileName.Data();      
+    AliInfo(Form("Writing merged tags to local file: %s",filename.Data()));
+  } 
+  if(fStorage == 1) {
+    filename = alienFileName.Data();
+    AliInfo(Form("Writing merged tags to grid file: %s",filename.Data()));     
+  }
+  
+  TFile* ftag = TFile::Open(filename, "recreate");
+  ftag->cd();
+  ttag.Write();
+  ftag->Close();
+
+  delete tag;
+  delete evTag;
+  delete newTag;
+
+  return kTRUE;
+}
 
 //_____________________________________________________________________________
-void AliTagCreator::CreateTag(TFile* file, const char *guid, Int_t Counter)
+void AliTagCreator::CreateTag(TFile* file, const char *guid, const char *md5, const char *turl, Long64_t size, Int_t Counter)
 {
+  /////////////
+  //muon code//
+  ////////////
+  Double_t fMUONMASS = 0.105658369;
+  //Variables
+  Double_t fX,fY,fZ ;
+  Double_t fThetaX, fThetaY, fPyz, fChisquare;
+  Double_t fPxRec, fPyRec, fPzRec, fEnergy;
+  Int_t fCharge;
+  TLorentzVector fEPvector;
+
+  Float_t fZVertexCut = 10.0; 
+  Float_t fRhoVertexCut = 2.0; 
+
+  Float_t fLowPtCut = 1.0;
+  Float_t fHighPtCut = 3.0;
+  Float_t fVeryHighPtCut = 10.0;
+  ////////////
+
+  Double_t partFrac[5] = {0.01, 0.01, 0.85, 0.10, 0.05};
+
+  // Creates the tags for all the events in a given ESD file
   Int_t ntrack;
-  Int_t NProtons, NKaons, NPions, NMuons, NElectrons;
-  Int_t Npos, Nneg, Nneutr;
-  Int_t NK0s, Nneutrons, Npi0s, Ngamas;
-  Int_t Nch1GeV, Nch3GeV, Nch10GeV;
-  Int_t Nmu1GeV, Nmu3GeV, Nmu10GeV;
-  Int_t Nel1GeV, Nel3GeV, Nel10GeV;
-  Float_t MaxPt = .0, MeanPt = .0, TotalP = .0;
+  Int_t nProtons, nKaons, nPions, nMuons, nElectrons;
+  Int_t nPos, nNeg, nNeutr;
+  Int_t nK0s, nNeutrons, nPi0s, nGamas;
+  Int_t nCh1GeV, nCh3GeV, nCh10GeV;
+  Int_t nMu1GeV, nMu3GeV, nMu10GeV;
+  Int_t nEl1GeV, nEl3GeV, nEl10GeV;
+  Float_t maxPt = .0, meanPt = .0, totalP = .0;
 
   AliRunTag *tag = new AliRunTag();
-  AliDetectorTag *detTag = new AliDetectorTag();
   AliEventTag *evTag = new AliEventTag();
   TTree ttag("T","A Tree with event tags");
-  TBranch * btag = ttag.Branch("AliTAG", "AliRunTag", &tag);
+  TBranch * btag = ttag.Branch("AliTAG", &tag);
   btag->SetCompressionLevel(9);
   
   AliInfo(Form("Creating the tags......."));   
@@ -207,208 +253,237 @@ void AliTagCreator::CreateTag(TFile* file, const char *guid, Int_t Counter)
   
   tag->SetRunId(esd->GetRunNumber());
   
-  Int_t i_NumberOfEvents = b->GetEntries();
-  for (Int_t i_EventNumber = 0; i_EventNumber < i_NumberOfEvents; i_EventNumber++)
-    {
-      ntrack = 0;
-      Npos = 0;
-      Nneg = 0;
-      Nneutr =0;
-      NK0s = 0;
-      Nneutrons = 0;
-      Npi0s = 0;
-      Ngamas = 0;
-      NProtons = 0;
-      NKaons = 0;
-      NPions = 0;
-      NMuons = 0;
-      NElectrons = 0;    
-      Nch1GeV = 0;
-      Nch3GeV = 0;
-      Nch10GeV = 0;
-      Nmu1GeV = 0;
-      Nmu3GeV = 0;
-      Nmu10GeV = 0;
-      Nel1GeV = 0;
-      Nel3GeV = 0;
-      Nel10GeV = 0;
-      MaxPt = .0;
-      MeanPt = .0;
-      TotalP = .0;
-      
-      b->GetEntry(i_EventNumber);
-      const AliESDVertex * VertexIn = esd->GetVertex();
-      
-      for (Int_t i_TrackNumber = 0; i_TrackNumber < esd->GetNumberOfTracks(); i_TrackNumber++)
-       {
-         AliESDtrack * ESDTrack = esd->GetTrack(i_TrackNumber);
-         UInt_t status = ESDTrack->GetStatus();
-         
-         //select only tracks with ITS refit
-         if ((status&AliESDtrack::kITSrefit)==0) continue;
-         
-         //select only tracks with TPC refit-->remove extremely high Pt tracks
-         if ((status&AliESDtrack::kTPCrefit)==0) continue;
-         
-         //select only tracks with the "combined PID"
-         if ((status&AliESDtrack::kESDpid)==0) continue;
-         Double_t p[3];
-         ESDTrack->GetPxPyPz(p);
-         Double_t P = sqrt(pow(p[0],2) + pow(p[1],2) + pow(p[2],2));
-         Double_t fPt = sqrt(pow(p[0],2) + pow(p[1],2));
-         TotalP += P;
-         MeanPt += fPt;
-         if(fPt > MaxPt)
-           MaxPt = fPt;
-         
-         if(ESDTrack->GetSign() > 0)
-           {
-             Npos++;
-             if(fPt > 1.0)
-               Nch1GeV++;
-             if(fPt > 3.0)
-               Nch3GeV++;
-             if(fPt > 10.0)
-               Nch10GeV++;
-           }
-         if(ESDTrack->GetSign() < 0)
-           {
-             Nneg++;
-             if(fPt > 1.0)
-               Nch1GeV++;
-             if(fPt > 3.0)
-               Nch3GeV++;
-             if(fPt > 10.0)
-               Nch10GeV++;
-           }
-         if(ESDTrack->GetSign() == 0)
-           Nneutr++;
-         
-         //PID
-         Double_t prob[10];
-         ESDTrack->GetESDpid(prob);
-         
-         //K0s
-         if ((prob[8]>prob[7])&&(prob[8]>prob[6])&&(prob[8]>prob[5])&&(prob[8]>prob[4])&&(prob[8]>prob[3])&&(prob[8]>prob[2])&&(prob[8]>prob[1])&&(prob[8]>prob[0]))
-           NK0s++;
-         //neutrons
-         if ((prob[7]>prob[8])&&(prob[7]>prob[6])&&(prob[7]>prob[5])&&(prob[7]>prob[4])&&(prob[7]>prob[3])&&(prob[7]>prob[2])&&(prob[7]>prob[1])&&(prob[7]>prob[0]))
-           Nneutrons++; 
-         //pi0s
-         if ((prob[6]>prob[8])&&(prob[6]>prob[7])&&(prob[6]>prob[5])&&(prob[6]>prob[4])&&(prob[6]>prob[3])&&(prob[6]>prob[2])&&(prob[6]>prob[1])&&(prob[6]>prob[0]))
-           Npi0s++;
-         //gamas
-         if ((prob[5]>prob[8])&&(prob[5]>prob[7])&&(prob[5]>prob[6])&&(prob[5]>prob[4])&&(prob[5]>prob[3])&&(prob[5]>prob[2])&&(prob[5]>prob[1])&&(prob[5]>prob[0]))
-           Ngamas++;
-         //protons
-         if ((prob[4]>prob[8])&&(prob[4]>prob[7])&&(prob[4]>prob[6])&&(prob[4]>prob[5])&&(prob[4]>prob[3])&&(prob[4]>prob[2])&&(prob[4]>prob[1])&&(prob[4]>prob[0]))
-           NProtons++;
-         //kaons
-         if ((prob[3]>prob[8])&&(prob[3]>prob[7])&&(prob[3]>prob[6])&&(prob[3]>prob[5])&&(prob[3]>prob[4])&&(prob[3]>prob[2])&&(prob[3]>prob[1])&&(prob[3]>prob[0]))
-           NKaons++;
-         //pions
-         if ((prob[2]>prob[8])&&(prob[2]>prob[7])&&(prob[2]>prob[6])&&(prob[2]>prob[5])&&(prob[2]>prob[4])&&(prob[2]>prob[3])&&(prob[2]>prob[1])&&(prob[2]>prob[0]))
-           NPions++; 
-         //muons
-         if ((prob[1]>prob[8])&&(prob[1]>prob[7])&&(prob[1]>prob[6])&&(prob[1]>prob[5])&&(prob[1]>prob[4])&&(prob[1]>prob[3])&&(prob[1]>prob[2])&&(prob[1]>prob[0]))
-           {
-             NMuons++;
-             if(fPt > 1.0)
-               Nmu1GeV++;
-             if(fPt > 3.0)
-               Nmu3GeV++;
-             if(fPt > 10.0)
-               Nmu10GeV++;
-           }
-         //electrons
-         if ((prob[0]>prob[8])&&(prob[0]>prob[7])&&(prob[0]>prob[6])&&(prob[0]>prob[5])&&(prob[0]>prob[4])&&(prob[0]>prob[3])&&(prob[0]>prob[2])&&(prob[0]>prob[1]))
-           {
-             NElectrons++;
-             if(fPt > 1.0)
-               Nel1GeV++;
-             if(fPt > 3.0)
-               Nel3GeV++;
-             if(fPt > 10.0)
-               Nel10GeV++;
-           }
-         
-         
-         
-         ntrack++;
-       }//track loop
-      // Fill the event tags 
-      if(ntrack != 0)
-       MeanPt = MeanPt/ntrack;
+  Int_t iNumberOfEvents = b->GetEntries();
+  for (Int_t iEventNumber = 0; iEventNumber < iNumberOfEvents; iEventNumber++) {
+    ntrack = 0;
+    nPos = 0;
+    nNeg = 0;
+    nNeutr =0;
+    nK0s = 0;
+    nNeutrons = 0;
+    nPi0s = 0;
+    nGamas = 0;
+    nProtons = 0;
+    nKaons = 0;
+    nPions = 0;
+    nMuons = 0;
+    nElectrons = 0;      
+    nCh1GeV = 0;
+    nCh3GeV = 0;
+    nCh10GeV = 0;
+    nMu1GeV = 0;
+    nMu3GeV = 0;
+    nMu10GeV = 0;
+    nEl1GeV = 0;
+    nEl3GeV = 0;
+    nEl10GeV = 0;
+    maxPt = .0;
+    meanPt = .0;
+    totalP = .0;
+    
+    b->GetEntry(iEventNumber);
+    const AliESDVertex * vertexIn = esd->GetVertex();
+    
+    for (Int_t iTrackNumber = 0; iTrackNumber < esd->GetNumberOfTracks(); iTrackNumber++) {
+      AliESDtrack * esdTrack = esd->GetTrack(iTrackNumber);
+      UInt_t status = esdTrack->GetStatus();
       
-      evTag->SetEventId(i_EventNumber+1);
-      evTag->SetGUID(guid);
-      evTag->SetVertexX(VertexIn->GetXv());
-      evTag->SetVertexY(VertexIn->GetYv());
-      evTag->SetVertexZ(VertexIn->GetZv());
+      //select only tracks with ITS refit
+      if ((status&AliESDtrack::kITSrefit)==0) continue;
+      //select only tracks with TPC refit
+      if ((status&AliESDtrack::kTPCrefit)==0) continue;
       
-      evTag->SetT0VertexZ(esd->GetT0zVertex());
+      //select only tracks with the "combined PID"
+      if ((status&AliESDtrack::kESDpid)==0) continue;
+      Double_t p[3];
+      esdTrack->GetPxPyPz(p);
+      Double_t momentum = sqrt(pow(p[0],2) + pow(p[1],2) + pow(p[2],2));
+      Double_t fPt = sqrt(pow(p[0],2) + pow(p[1],2));
+      totalP += momentum;
+      meanPt += fPt;
+      if(fPt > maxPt) maxPt = fPt;
       
-      evTag->SetTrigger(esd->GetTrigger());
+      if(esdTrack->GetSign() > 0) {
+       nPos++;
+       if(fPt > fLowPtCut) nCh1GeV++;
+       if(fPt > fHighPtCut) nCh3GeV++;
+       if(fPt > fVeryHighPtCut) nCh10GeV++;
+      }
+      if(esdTrack->GetSign() < 0) {
+       nNeg++;
+       if(fPt > fLowPtCut) nCh1GeV++;
+       if(fPt > fHighPtCut) nCh3GeV++;
+       if(fPt > fVeryHighPtCut) nCh10GeV++;
+      }
+      if(esdTrack->GetSign() == 0) nNeutr++;
       
-      evTag->SetZDCNeutronEnergy(esd->GetZDCNEnergy());
-      evTag->SetZDCProtonEnergy(esd->GetZDCPEnergy());
-      evTag->SetZDCEMEnergy(esd->GetZDCEMEnergy());
-      evTag->SetNumOfParticipants(esd->GetZDCParticipants());
+      //PID
+      Double_t prob[5];
+      esdTrack->GetESDpid(prob);
       
+      Double_t rcc = 0.0;
+      for(Int_t i = 0; i < AliPID::kSPECIES; i++) rcc += prob[i]*partFrac[i];
+      if(rcc == 0.0) continue;
+      //Bayes' formula
+      Double_t w[5];
+      for(Int_t i = 0; i < AliPID::kSPECIES; i++) w[i] = prob[i]*partFrac[i]/rcc;
       
-      evTag->SetNumOfTracks(esd->GetNumberOfTracks());
-      evTag->SetNumOfPosTracks(Npos);
-      evTag->SetNumOfNegTracks(Nneg);
-      evTag->SetNumOfNeutrTracks(Nneutr);
+      //protons
+      if ((w[4]>w[3])&&(w[4]>w[2])&&(w[4]>w[1])&&(w[4]>w[0])) nProtons++;
+      //kaons
+      if ((w[3]>w[4])&&(w[3]>w[2])&&(w[3]>w[1])&&(w[3]>w[0])) nKaons++;
+      //pions
+      if ((w[2]>w[4])&&(w[2]>w[3])&&(w[2]>w[1])&&(w[2]>w[0])) nPions++; 
+      //electrons
+      if ((w[0]>w[4])&&(w[0]>w[3])&&(w[0]>w[2])&&(w[0]>w[1])) {
+       nElectrons++;
+       if(fPt > fLowPtCut) nEl1GeV++;
+       if(fPt > fHighPtCut) nEl3GeV++;
+       if(fPt > fVeryHighPtCut) nEl10GeV++;
+      }          
+      ntrack++;
+    }//esd track loop
+    
+    /////////////
+    //muon code//
+    ////////////
+    Int_t nMuonTracks = esd->GetNumberOfMuonTracks();
+    // loop over all reconstructed tracks (also first track of combination)
+    for (Int_t iTrack = 0; iTrack <  nMuonTracks;  iTrack++) {
+      AliESDMuonTrack* muonTrack = esd->GetMuonTrack(iTrack);
+      if (muonTrack == 0x0) continue;
       
-      evTag->SetNumOfV0s(esd->GetNumberOfV0s());
-      evTag->SetNumOfCascades(esd->GetNumberOfCascades());
-      evTag->SetNumOfKinks(esd->GetNumberOfKinks());
-      evTag->SetNumOfPMDTracks(esd->GetNumberOfPmdTracks());
+      // Coordinates at vertex
+      fZ = muonTrack->GetZ(); 
+      fY = muonTrack->GetBendingCoor();
+      fX = muonTrack->GetNonBendingCoor(); 
       
-      evTag->SetNumOfProtons(NProtons);
-      evTag->SetNumOfKaons(NKaons);
-      evTag->SetNumOfPions(NPions);
-      evTag->SetNumOfMuons(NMuons);
-      evTag->SetNumOfElectrons(NElectrons);
-      evTag->SetNumOfPhotons(Ngamas);
-      evTag->SetNumOfPi0s(Npi0s);
-      evTag->SetNumOfNeutrons(Nneutrons);
-      evTag->SetNumOfKaon0s(NK0s);
+      fThetaX = muonTrack->GetThetaX();
+      fThetaY = muonTrack->GetThetaY();
       
-      evTag->SetNumOfChargedAbove1GeV(Nch1GeV);
-      evTag->SetNumOfChargedAbove3GeV(Nch3GeV);
-      evTag->SetNumOfChargedAbove10GeV(Nch10GeV);
-      evTag->SetNumOfMuonsAbove1GeV(Nmu1GeV);
-      evTag->SetNumOfMuonsAbove3GeV(Nmu3GeV);
-      evTag->SetNumOfMuonsAbove10GeV(Nmu10GeV);
-      evTag->SetNumOfElectronsAbove1GeV(Nel1GeV);
-      evTag->SetNumOfElectronsAbove3GeV(Nel3GeV);
-      evTag->SetNumOfElectronsAbove10GeV(Nel10GeV);
+      fPyz = 1./TMath::Abs(muonTrack->GetInverseBendingMomentum());
+      fPzRec = - fPyz / TMath::Sqrt(1.0 + TMath::Tan(fThetaY)*TMath::Tan(fThetaY));
+      fPxRec = fPzRec * TMath::Tan(fThetaX);
+      fPyRec = fPzRec * TMath::Tan(fThetaY);
+      fCharge = Int_t(TMath::Sign(1.,muonTrack->GetInverseBendingMomentum()));
       
-      evTag->SetNumOfPHOSTracks(esd->GetNumberOfPHOSParticles());
-      evTag->SetNumOfEMCALTracks(esd->GetNumberOfEMCALParticles());
+      //ChiSquare of the track if needed
+      fChisquare = muonTrack->GetChi2()/(2.0 * muonTrack->GetNHit() - 5);
+      fEnergy = TMath::Sqrt(fMUONMASS * fMUONMASS + fPxRec * fPxRec + fPyRec * fPyRec + fPzRec * fPzRec);
+      fEPvector.SetPxPyPzE(fPxRec, fPyRec, fPzRec, fEnergy);
       
-      evTag->SetTotalMomentum(TotalP);
-      evTag->SetMeanPt(MeanPt);
-      evTag->SetMaxPt(MaxPt);
-  
-      tag->AddEventTag(evTag);
-    }
-  lastEvent = i_NumberOfEvents;
+      // total number of muons inside a vertex cut 
+      if((TMath::Abs(fZ)<fZVertexCut) && (TMath::Sqrt(fY*fY+fX*fX)<fRhoVertexCut)) {
+       nMuons++;
+       if(fEPvector.Pt() > fLowPtCut) {
+         nMu1GeV++; 
+         if(fEPvector.Pt() > fHighPtCut) {
+           nMu3GeV++; 
+           if (fEPvector.Pt() > fVeryHighPtCut) {
+             nMu10GeV++;
+           }
+         }
+       }
+      }
+    }//muon track loop
+    
+    // Fill the event tags 
+    if(ntrack != 0)
+      meanPt = meanPt/ntrack;
+    
+    evTag->SetEventId(iEventNumber+1);
+    evTag->SetGUID(guid);
+    evTag->SetMD5(md5);
+    evTag->SetTURL(turl);
+    evTag->SetSize(size);
+    evTag->SetVertexX(vertexIn->GetXv());
+    evTag->SetVertexY(vertexIn->GetYv());
+    evTag->SetVertexZ(vertexIn->GetZv());
+    
+    evTag->SetT0VertexZ(esd->GetT0zVertex());
+    
+    evTag->SetTrigger(esd->GetTrigger());
+    
+    evTag->SetZDCNeutron1Energy(esd->GetZDCN1Energy());
+    evTag->SetZDCProton1Energy(esd->GetZDCP1Energy());
+    evTag->SetZDCEMEnergy(esd->GetZDCEMEnergy());
+    evTag->SetZDCNeutron1Energy(esd->GetZDCN2Energy());
+    evTag->SetZDCProton1Energy(esd->GetZDCP2Energy());
+    evTag->SetNumOfParticipants(esd->GetZDCParticipants());
+    
+    
+    evTag->SetNumOfTracks(esd->GetNumberOfTracks());
+    evTag->SetNumOfPosTracks(nPos);
+    evTag->SetNumOfNegTracks(nNeg);
+    evTag->SetNumOfNeutrTracks(nNeutr);
+    
+    evTag->SetNumOfV0s(esd->GetNumberOfV0s());
+    evTag->SetNumOfCascades(esd->GetNumberOfCascades());
+    evTag->SetNumOfKinks(esd->GetNumberOfKinks());
+    evTag->SetNumOfPMDTracks(esd->GetNumberOfPmdTracks());
+    
+    evTag->SetNumOfProtons(nProtons);
+    evTag->SetNumOfKaons(nKaons);
+    evTag->SetNumOfPions(nPions);
+    evTag->SetNumOfMuons(nMuons);
+    evTag->SetNumOfElectrons(nElectrons);
+    evTag->SetNumOfPhotons(nGamas);
+    evTag->SetNumOfPi0s(nPi0s);
+    evTag->SetNumOfNeutrons(nNeutrons);
+    evTag->SetNumOfKaon0s(nK0s);
+    
+    evTag->SetNumOfChargedAbove1GeV(nCh1GeV);
+    evTag->SetNumOfChargedAbove3GeV(nCh3GeV);
+    evTag->SetNumOfChargedAbove10GeV(nCh10GeV);
+    evTag->SetNumOfMuonsAbove1GeV(nMu1GeV);
+    evTag->SetNumOfMuonsAbove3GeV(nMu3GeV);
+    evTag->SetNumOfMuonsAbove10GeV(nMu10GeV);
+    evTag->SetNumOfElectronsAbove1GeV(nEl1GeV);
+    evTag->SetNumOfElectronsAbove3GeV(nEl3GeV);
+    evTag->SetNumOfElectronsAbove10GeV(nEl10GeV);
+    
+    evTag->SetNumOfPHOSClusters(esd->GetNumberOfPHOSClusters());
+    evTag->SetNumOfEMCALClusters(esd->GetNumberOfEMCALClusters());
+    
+    evTag->SetTotalMomentum(totalP);
+    evTag->SetMeanPt(meanPt);
+    evTag->SetMaxPt(maxPt);
+    
+    tag->AddEventTag(*evTag);
+  }//event loop
+  lastEvent = iNumberOfEvents;
   
   t->Delete("");
-       
+  
   ttag.Fill();
   tag->Clear();
 
-  TString LocalfileName = "Run"; LocalfileName += tag->GetRunId(); 
-  LocalfileName += ".Event"; LocalfileName += firstEvent; LocalfileName += "_"; LocalfileName += lastEvent; LocalfileName += "."; LocalfileName += Counter;
-  LocalfileName += ".ESD.tag.root";
+  TString localFileName = "Run"; localFileName += tag->GetRunId(); 
+  localFileName += ".Event"; localFileName += firstEvent; localFileName += "_"; localFileName += lastEvent; localFileName += "."; localFileName += Counter;
+  localFileName += ".ESD.tag.root";
 
-  cout<<"Writing tags to local file: "<<LocalfileName<<endl;
+  TString alienLocation = "/alien";
+  alienLocation += gGrid->Pwd();
+  alienLocation += fgridpath.Data();
+  alienLocation += "/";
+  alienLocation +=  localFileName;
+  alienLocation += "?se=";
+  alienLocation += fSE.Data();
 
-  TFile* ftag = TFile::Open(LocalfileName, "recreate");
+  TString fileName;
+  
+  if(fStorage == 0)
+    {
+      fileName = localFileName.Data();      
+      AliInfo(Form("Writing tags to local file: %s",fileName.Data()));
+    }
+  if(fStorage == 1)
+    {
+      fileName = alienLocation.Data();
+      AliInfo(Form("Writing tags to grid file: %s",fileName.Data()));
+    }
+
+  TFile* ftag = TFile::Open(fileName, "recreate");
   ftag->cd();
   ttag.Write();
   ftag->Close();
@@ -417,43 +492,6 @@ void AliTagCreator::CreateTag(TFile* file, const char *guid, Int_t Counter)
   delete esd;
 
   delete tag;
-  delete detTag;
   delete evTag;
 }
 
-//_____________________________________________________________________________
-Bool_t AliTagCreator::StoreGridTagFile(const char *localpath, const char *gridpath)
-{
-  gSystem->Load("libThread.so");
-  gSystem->Load("libTreePlayer.so");
-  gSystem->Load("libProof.so");
-  cout<<"Storing tag file to alien's file catalog..."<<endl;
-  TFileMerger merger;
-  const char * pattern = "tag.root";
-  // Open the working directory
-  void * dirp = gSystem->OpenDirectory(localpath);
-  const char * name = 0x0;
-  TString AlienLocation;
-  Char_t LocalLocation[256];
-  // Add all files matching *pattern* to the chain
-  while((name = gSystem->GetDirEntry(dirp)))
-    {
-      if (strstr(name,pattern))
-       {
-         sprintf(LocalLocation,"file:%s/%s",localpath,name);
-         AlienLocation = "/alien";
-         AlienLocation += gGrid->Pwd();
-         AlienLocation += gridpath;
-         AlienLocation += "/";
-         AlienLocation += name;
-         AlienLocation += "?se=";
-         AlienLocation += fSE.Data();
-         merger.Cp(LocalLocation,AlienLocation);
-           
-       }
-    }  
-  gSystem->FreeDirectory(dirp);
-   
-  return kTRUE;
-}