]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - STEER/AliTagCreator.cxx
The CTP (trigger) infor is written into the ESD. The corresponding entries are fTrigg...
[u/mrichter/AliRoot.git] / STEER / AliTagCreator.cxx
index af497cafadda9690bf15ddead1f5018f6998a035..8e87fcbd7908fe414c8bbdb6eba04beea033b09b 100644 (file)
@@ -23,6 +23,9 @@
 #include <TFile.h>
 #include <TString.h>
 #include <TTree.h>
+#include <TSystem.h>
+#include <TChain.h>
+#include <TLorentzVector.h>
 
 //ROOT-AliEn
 #include <TGrid.h>
@@ -47,68 +50,10 @@ AliTagCreator::AliTagCreator() //local mode
 {
   //==============Default constructor for a AliTagCreator==================
   fgridpath = "";
-  fUser = "";
-  fPasswd = "";  
   fSE = "";   
-  fHost = "";
-  fPort = 0; 
   fStorage = 0; 
-  //  fresult = 0;
 }
 
-//______________________________________________________________________________
-AliTagCreator::AliTagCreator(const char *host, Int_t port, const char *username)
-{
-  //==============Default constructor for a AliTagCreator==================
-  fStorage = 0; 
-  //  fresult = 0;
-  fgridpath = "";
-  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==================
-  fStorage = 0; 
-  //  fresult = 0;
-  fgridpath = "";
-  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;
-    }
-}
-
-
 //______________________________________________________________________________
 AliTagCreator::~AliTagCreator()
 {
@@ -131,29 +76,6 @@ void AliTagCreator::SetStorage(Int_t storage)
     }  
 }
 
-//______________________________________________________________________________
-Bool_t AliTagCreator::ConnectToGrid(const char *host, Int_t port, const char *username)
-{
-  // Connects to a given AliEn API service
-  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 kFALSE;
-    } //connect to the grid
-
-  return kTRUE;
-}
 
 //______________________________________________________________________________
 Bool_t AliTagCreator::ReadESDCollection(TGridResult *fresult)
@@ -163,14 +85,26 @@ Bool_t AliTagCreator::ReadESDCollection(TGridResult *fresult)
 
   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++)
     {
       alienUrl = fresult->GetKey(i,"turl");
       guid = fresult->GetKey(i,"guid");
+      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,counter);
+      CreateTag(f,guid,md5,turl,size,counter);
       f->Close();
       delete f;         
       counter += 1;
@@ -179,10 +113,119 @@ Bool_t AliTagCreator::ReadESDCollection(TGridResult *fresult)
   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 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;
@@ -192,12 +235,13 @@ void AliTagCreator::CreateTag(TFile* file, const char *guid, Int_t Counter)
   Int_t nMu1GeV, nMu3GeV, nMu10GeV;
   Int_t nEl1GeV, nEl3GeV, nEl10GeV;
   Float_t maxPt = .0, meanPt = .0, totalP = .0;
+  Int_t fVertexflag;
+  TString fVertexName;
 
   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......."));   
@@ -211,197 +255,212 @@ void AliTagCreator::CreateTag(TFile* file, const char *guid, Int_t Counter)
   tag->SetRunId(esd->GetRunNumber());
   
   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;
+  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;
+    fVertexflag = 1;
+    
+    b->GetEntry(iEventNumber);
+    const AliESDVertex * vertexIn = esd->GetVertex();
+    fVertexName = vertexIn->GetName();
+    if(fVertexName == "default") fVertexflag = 0;
+
+    for (Int_t iTrackNumber = 0; iTrackNumber < esd->GetNumberOfTracks(); iTrackNumber++) {
+      AliESDtrack * esdTrack = esd->GetTrack(iTrackNumber);
+      UInt_t status = esdTrack->GetStatus();
       
-      b->GetEntry(iEventNumber);
-      const AliESDVertex * vertexIn = esd->GetVertex();
+      //select only tracks with ITS refit
+      if ((status&AliESDtrack::kITSrefit)==0) continue;
+      //select only tracks with TPC refit
+      if ((status&AliESDtrack::kTPCrefit)==0) continue;
       
-      for (Int_t iTrackNumber = 0; iTrackNumber < esd->GetNumberOfTracks(); iTrackNumber++)
-       {
-         AliESDtrack * esdTrack = esd->GetTrack(iTrackNumber);
-         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 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;
-         
-         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;
-      
-      evTag->SetEventId(iEventNumber+1);
-      evTag->SetGUID(guid);
-      evTag->SetVertexX(vertexIn->GetXv());
-      evTag->SetVertexY(vertexIn->GetYv());
-      evTag->SetVertexZ(vertexIn->GetZv());
+      //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->SetT0VertexZ(esd->GetT0zVertex());
+      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->SetTrigger(esd->GetTrigger());
+      //PID
+      Double_t prob[5];
+      esdTrack->GetESDpid(prob);
       
-      evTag->SetZDCNeutronEnergy(esd->GetZDCNEnergy());
-      evTag->SetZDCProtonEnergy(esd->GetZDCPEnergy());
-      evTag->SetZDCEMEnergy(esd->GetZDCEMEnergy());
-      evTag->SetNumOfParticipants(esd->GetZDCParticipants());
+      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;
       
+      //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->SetNumOfTracks(esd->GetNumberOfTracks());
-      evTag->SetNumOfPosTracks(nPos);
-      evTag->SetNumOfNegTracks(nNeg);
-      evTag->SetNumOfNeutrTracks(nNeutr);
+      // Coordinates at vertex
+      fZ = muonTrack->GetZ(); 
+      fY = muonTrack->GetBendingCoor();
+      fX = muonTrack->GetNonBendingCoor(); 
       
-      evTag->SetNumOfV0s(esd->GetNumberOfV0s());
-      evTag->SetNumOfCascades(esd->GetNumberOfCascades());
-      evTag->SetNumOfKinks(esd->GetNumberOfKinks());
-      evTag->SetNumOfPMDTracks(esd->GetNumberOfPmdTracks());
+      fThetaX = muonTrack->GetThetaX();
+      fThetaY = muonTrack->GetThetaY();
       
-      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);
+      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->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);
+      //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->SetNumOfPHOSTracks(esd->GetNumberOfPHOSParticles());
-      evTag->SetNumOfEMCALTracks(esd->GetNumberOfEMCALParticles());
-      
-      evTag->SetTotalMomentum(totalP);
-      evTag->SetMeanPt(meanPt);
-      evTag->SetMaxPt(maxPt);
-  
-      tag->AddEventTag(*evTag);
-    }
+      // 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->SetVertexZError(vertexIn->GetZRes());
+    evTag->SetVertexFlag(fVertexflag);
+    
+    evTag->SetT0VertexZ(esd->GetT0zVertex());
+    
+    evTag->SetTrigger(esd->GetTriggerMask());
+    
+    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();
 
@@ -439,7 +498,5 @@ void AliTagCreator::CreateTag(TFile* file, const char *guid, Int_t Counter)
   delete esd;
 
   delete tag;
-  delete detTag;
-  delete evTag;
 }