PWGJE/AliAnalysisTaskPartonDisc.cxx

   1 /*************************************************************************
   2 * Copyright(c) 1998-2008, ALICE Experiment at CERN, All rights reserved. *
   3 *                                                                        *
   4 * Author: The ALICE Off-line Project.                                    *
   5 * Contributors are mentioned in the code where appropriate.              *
   6 *                                                                        *
   7 * Permission to use, copy, modify and distribute this software and its   *
   8 * documentation strictly for non-commercial purposes is hereby granted   *
   9 * without fee, provided that the above copyright notice appears in all   *
  10 * copies and that both the copyright notice and this permission notice   *
  11 * appear in the supporting documentation. The authors make no claims     *
  12 * about the suitability of this software for any purpose. It is          *
  13 * provided "as is" without express or implied warranty.                  *
  14 **************************************************************************/
  15
  16 ////////////////////////////////////////////////////////
  17 //                                                    //
  18 // Analysis task for parton discrimination studies    //
  19 //                                                    //
  20 // Author:                                            //
  21 // Hermes Leon Vargas  (hleon@ikf.uni-frankfurt.de)   //
  22 //                                                    //
  23 ////////////////////////////////////////////////////////
  24
  25 #include "TROOT.h"
  26 #include "TDirectory.h"
  27 #include "TKey.h"
  28 #include "TList.h"
  29 #include "TSystem.h"
  30 #include "TChain.h"
  31 #include "TTree.h"
  32 #include "TFile.h"
  33 #include "TString.h"
  34 #include "TH1F.h"
  35 #include "TH1I.h"
  36 #include "TH2F.h"
  37 #include "TH2I.h"
  38 #include "TH3F.h"
  39 #include "TProfile.h"
  40 #include "TCanvas.h"
  41 #include "AliAnalysisTask.h"
  42 #include "AliAnalysisManager.h"
  43 #include "AliAODHandler.h"
  44 #include "AliVEvent.h"
  45 #include "AliAODEvent.h"
  46 #include "AliAODInputHandler.h"
  47 #include "AliVParticle.h"
  48 #include "AliAODMCParticle.h"
  49 #include "AliGenEventHeader.h"
  50 #include "AliGenPythiaEventHeader.h"
  51 #include "AliGenDPMjetEventHeader.h"
  52 #include "AliAODMCHeader.h"
  53 #include "AliMCEventHandler.h"
  54 #include "AliMCEvent.h"
  55 #include <algorithm>
  56 #include "AliLog.h"
  57 #include "AliAODVertex.h"
  58 #include "AliAODHeader.h"
  59 #include "AliESDtrack.h"
  60 #include "AliAnalysisHelperJetTasks.h"
  61 #include "AliAnalysisTaskPartonDisc.h"
  62 #include "AliAODVZERO.h"
  63 #include "TRandom3.h"
  64 #include "TDatime.h"
  65
  66 // Analysis task for parton discrimination
  67
  68 ClassImp(AliAnalysisTaskPartonDisc)
  69
  70 Double_t *AliAnalysisTaskPartonDisc::fgContainer = 0x0;
  71
  72 //________________________________________________________________________
  73 AliAnalysisTaskPartonDisc::AliAnalysisTaskPartonDisc()
  74   : AliAnalysisTaskSE(), fAOD(0), fUseAODMC(kFALSE), fPhojetMC(kFALSE), fBranchMC("jetsMC"), fBranchRec("jetsREC"), fBranchSecRec(""), fSqrts(0),  fNtX(0), fJetRadius(0.), fFlavorRadius(0.), fFilterBit(0xFF), fOutputList(0), fJetPt(0), fJetPtSec(0), fJetPtMC(0), fJetEta(0), fJetEtaSec(0), fJetPhi(0), fJetPhiSec(0), fJetEtaMC(0), fJetPhiMC(0), fPtAODMC(0), fPtAOD(0), fEtaAODMC(0), fPhiAODMC(0), fEtaAOD(0), fPhiAOD(0), fFlavor(0), fNJetsMC(0), fNJetsRD(0), fNJetsRDSeco(0), fJetsMultPtMC(0), fJetsMultPtRD(0), fNChTrRD(0), fProfNChTrRD(0), fFracQQ(0), fFracGQ(0), fFracGG(0), fFracOutGoingQQ(0), fFracOutGoingGQ(0), fFracOutGoingGG(0), fh1Xsec(0), fh1Trials(0), fMpdg(0), fProcessJetPt(0), fFlavorLead(0), fProcessLeadJetPt(0), fPDGMothLPart(0), fFlavProc(0), fAvgTrials(1), fUseAODJetInput(kFALSE), fMinTrackPtInNTX(0), fMaxTrackPtInNTX(0), fSCMRD(0), fMinpTVal(0), fZVertex(0), fh1Events(0), fUseOnlyMC(kFALSE), fCheckMCStatus(kTRUE), fEvtCount(0), fNAccJetsMC(0), fNAccJetsRD(0), fNAccJetsRDSeco(0), fEnablePrints(kFALSE), fRecJetPtInclusive(0), fMCJetPtInclusive(0), fRecJetPtLeading(0), fMCJetPtLeading(0), fSecRecJetPtInclusive(0), fSecRecJetPtLeading(0), fHasPerpCone(kTRUE), fEtaPerpCoord(0), fPhiPerpCoord(0), fPtPerpCoord(0), fJetEvent(kFALSE), fPerpCone(0), fNChTrMCPerp(0), fNChTrRecPerp(0), fSCMMCPerp(0), fSCMRecPerp(0), fIsHIevent(kFALSE), fCurrentJetMinPtNT90(0), fBckgSbsJet(0), fCurrentJetMinPtNT90Recalc(0), fNChTrCorrMCQuark(0), fNChTrCorrMCGluon(0), fNChTrCorrMCPerp(0), fIsPossibleToSubstBckg(kTRUE), fNChTrRecECorr(0), fNChTrRecPerpECorr(0), fRefMult(0), fCurrentJetCharge(0), fRefMultWOJet(0), fVZEROMult(0), fMultWOJetVZero(0), fVZero(0), fRefMultFullV0(0), fRefMultV0Corr(0), fFullV0V0Corr(0), fNTXV0MultPt(0), fNTXCBMultPt(0), fMinpTValUE(2.0), fRefMultFullV0UJ(0), fRefMultV0CorrUJ(0), fFullV0V0CorrUJ(0), fMultWOJetVZeroUJ(0), fRefMultWOJetUJ(0), fMaxpTValUE(2.0), fRefAODTrackCount(0), fRefAODTrackCountUJ(0), fTrackCountWOJet(0), fTrackCountWOJetUJ(0), fTrackCountWOJetUJMC(0), fFullV0V0CorrUJMC(0), fMinpTValMC(2.0), fIncExcR(0.0), fForceNotTR(kFALSE), fNotExtDiJEx(kFALSE), fMinTrackPtInNTXRecalc(0), fMaxTrackPtInNTXRecalc(0), fPtDistInJetConeRaw(0), fPtDistInPerpConeRaw(0), fPtInPerpCon(0), fMinTrackPtInNTXR(0), fMaxTrackPtInNTXR(0), fEventCent(0), fJetEtaAll(0), fJetEtaOnlyTPCcut(0), fNChTrRecECorrPPMult(0), fNChTrRecPerpECorrPPMult(0), fForceSkipSJ(kFALSE), fJetPtCentPbPbRaw(0), fJetPtCentPbPbCorr(0), fJetAcceptance(0.5), fIncreasingExcl(kFALSE), fTotTracksCone(0), fTotTracksInCone(0), fTTrackRandomRejection(0), fJTrackRandomRejection(0), fMinPtInGlobMult(0)
  75 {
  76   // Constructor
  77
  78   for(Int_t a=0; a<16;a++)
  79     {
  80       fJetFlags[a]=kTRUE;
  81       if(a<12)
  82         {
  83           fNChTr[a]=0;
  84           fHistPtParton[a]=0;
  85           fSCM[a]=0;
  86           if(a<8)
  87             {
  88               fNChTrRDMult[a]=0;
  89               fNAccJetsRDMult[a]=0;
  90               fTotalJetCharge[a]=0;
  91               fSCMRDMult[a]=0;
  92               fNChTrRDMultMC[a]=0;
  93               fSCMRDMultMC[a]=0;
  94               fNChTrRDMultSE[a]=0;
  95               fNAccJetsRDMultSE[a]=0;
  96               fTotalJetChargeSE[a]=0;
  97               fSCMRDMultSE[a]=0;
  98               fNChTrRDMultOJ[a]=0;
  99               fSCMRDMultOJ[a]=0;
 100               fNChTrRDMultSEOJ[a]=0;
 101               fSCMRDMultSEOJ[a]=0;
 102               fNChTrRDMultOJMC[a]=0;
 103               fSCMRDMultOJMC[a]=0;
 104               fNChTrRDMultSEOJMC[a]=0;
 105               fSCMRDMultSEOJMC[a]=0;
 106               fNChTrRecPerpMultSEOJ[a]=0;
 107               fJEtaMCMultOJ[a]=0;
 108               fJEtaMCMultSEOJ[a]=0;
 109               fJEtaRDMultOJ[a]=0;
 110               fJEtaRDMultSEOJ[a]=0;
 111               fJetPtMCMultOJ[a]=0;
 112               fJetPtMCMultSEOJ[a]=0;
 113               fJetPtRDMultOJ[a]=0;
 114               fJetPtRDMultSEOJ[a]=0;
 115               fEntriesQuark[a]=0;
 116               fEntriesGluon[a]=0;
 117             }
 118           if(a<6)
 119             {
 120               fProcessPDG[a]=0;
 121               fFragPion[a]=0;
 122               fFragKaon[a]=0;
 123               fFragProton[a]=0;
 124               fFragChargedR4[a]=0;
 125               fFragChargedR3[a]=0;
 126               fFragChargedR2[a]=0;
 127               fHistContainerR4[a]=0;
 128               fHistContainerR3[a]=0;
 129               fHistContainerR2[a]=0;
 130               if(a<3)
 131                 {
 132                   fJetEtaJetPt[a]=0;
 133                   if(a<2)
 134                     {
 135                       fFragCandidates[a]=0;
 136                       fMinTrackPtInNTXh[a]=0;
 137                       fMaxTrackPtInNTXh[a]=0;
 138                     }
 139                 }
 140             }
 141         }
 142     }
 143 }
 144 //________________________________________________________________________
 145 AliAnalysisTaskPartonDisc::AliAnalysisTaskPartonDisc(const char *name)
 146   : AliAnalysisTaskSE(name), fAOD(0), fUseAODMC(kFALSE), fPhojetMC(kFALSE), fBranchMC("jetsMC"), fBranchRec("jetsREC"), fBranchSecRec(""), fSqrts(0),  fNtX(0), fJetRadius(0.), fFlavorRadius(0.), fFilterBit(0xFF), fOutputList(0), fJetPt(0), fJetPtSec(0), fJetPtMC(0), fJetEta(0), fJetEtaSec(0), fJetPhi(0), fJetPhiSec(0), fJetEtaMC(0), fJetPhiMC(0), fPtAODMC(0), fPtAOD(0), fEtaAODMC(0), fPhiAODMC(0), fEtaAOD(0), fPhiAOD(0), fFlavor(0), fNJetsMC(0), fNJetsRD(0), fNJetsRDSeco(0), fJetsMultPtMC(0), fJetsMultPtRD(0), fNChTrRD(0), fProfNChTrRD(0), fFracQQ(0), fFracGQ(0), fFracGG(0), fFracOutGoingQQ(0), fFracOutGoingGQ(0), fFracOutGoingGG(0), fh1Xsec(0), fh1Trials(0), fMpdg(0), fProcessJetPt(0), fFlavorLead(0), fProcessLeadJetPt(0), fPDGMothLPart(0), fFlavProc(0), fAvgTrials(1), fUseAODJetInput(kFALSE), fMinTrackPtInNTX(0), fMaxTrackPtInNTX(0), fSCMRD(0), fMinpTVal(0), fZVertex(0), fh1Events(0), fUseOnlyMC(kFALSE), fCheckMCStatus(kTRUE), fEvtCount(0), fNAccJetsMC(0), fNAccJetsRD(0), fNAccJetsRDSeco(0), fEnablePrints(kFALSE), fRecJetPtInclusive(0), fMCJetPtInclusive(0), fRecJetPtLeading(0), fMCJetPtLeading(0), fSecRecJetPtInclusive(0), fSecRecJetPtLeading(0), fHasPerpCone(kTRUE), fEtaPerpCoord(0), fPhiPerpCoord(0), fPtPerpCoord(0), fJetEvent(kFALSE), fPerpCone(0), fNChTrMCPerp(0), fNChTrRecPerp(0), fSCMMCPerp(0), fSCMRecPerp(0), fIsHIevent(kFALSE), fCurrentJetMinPtNT90(0), fBckgSbsJet(0), fCurrentJetMinPtNT90Recalc(0), fNChTrCorrMCQuark(0), fNChTrCorrMCGluon(0), fNChTrCorrMCPerp(0), fIsPossibleToSubstBckg(kTRUE), fNChTrRecECorr(0), fNChTrRecPerpECorr(0), fRefMult(0), fCurrentJetCharge(0), fRefMultWOJet(0), fVZEROMult(0), fMultWOJetVZero(0), fVZero(0), fRefMultFullV0(0), fRefMultV0Corr(0), fFullV0V0Corr(0), fNTXV0MultPt(0), fNTXCBMultPt(0), fMinpTValUE(2.0), fRefMultFullV0UJ(0), fRefMultV0CorrUJ(0), fFullV0V0CorrUJ(0), fMultWOJetVZeroUJ(0), fRefMultWOJetUJ(0), fMaxpTValUE(2.0), fRefAODTrackCount(0), fRefAODTrackCountUJ(0), fTrackCountWOJet(0), fTrackCountWOJetUJ(0), fTrackCountWOJetUJMC(0), fFullV0V0CorrUJMC(0), fMinpTValMC(2.0), fIncExcR(0.0), fForceNotTR(kFALSE), fNotExtDiJEx(kFALSE), fMinTrackPtInNTXRecalc(0), fMaxTrackPtInNTXRecalc(0), fPtDistInJetConeRaw(0), fPtDistInPerpConeRaw(0), fPtInPerpCon(0), fMinTrackPtInNTXR(0), fMaxTrackPtInNTXR(0), fEventCent(0), fJetEtaAll(0), fJetEtaOnlyTPCcut(0), fNChTrRecECorrPPMult(0), fNChTrRecPerpECorrPPMult(0), fForceSkipSJ(kFALSE), fJetPtCentPbPbRaw(0), fJetPtCentPbPbCorr(0), fJetAcceptance(0.5), fIncreasingExcl(kFALSE), fTotTracksCone(0), fTotTracksInCone(0), fTTrackRandomRejection(0), fJTrackRandomRejection(0), fMinPtInGlobMult(0)
 147 {
 148
 149   // Constructor
 150
 151   for(Int_t a=0; a<16;a++)
 152     {
 153       fJetFlags[a]=kTRUE;
 154       if(a<12)
 155         {
 156           fNChTr[a]=0;
 157           fHistPtParton[a]=0;
 158           fSCM[a]=0;
 159           if(a<8)
 160             {
 161               fNChTrRDMult[a]=0;
 162               fNAccJetsRDMult[a]=0;
 163               fTotalJetCharge[a]=0;
 164               fSCMRDMult[a]=0;
 165               fNChTrRDMultMC[a]=0;
 166               fSCMRDMultMC[a]=0;
 167               fNChTrRDMultSE[a]=0;
 168               fNAccJetsRDMultSE[a]=0;
 169               fTotalJetChargeSE[a]=0;
 170               fSCMRDMultSE[a]=0;
 171               fNChTrRDMultOJ[a]=0;
 172               fSCMRDMultOJ[a]=0;
 173               fNChTrRDMultSEOJ[a]=0;
 174               fSCMRDMultSEOJ[a]=0;
 175               fNChTrRDMultOJMC[a]=0;
 176               fSCMRDMultOJMC[a]=0;
 177               fNChTrRDMultSEOJMC[a]=0;
 178               fSCMRDMultSEOJMC[a]=0;
 179               fNChTrRecPerpMultSEOJ[a]=0;
 180               fJEtaMCMultOJ[a]=0;
 181               fJEtaMCMultSEOJ[a]=0;
 182               fJEtaRDMultOJ[a]=0;
 183               fJEtaRDMultSEOJ[a]=0;
 184               fJetPtMCMultOJ[a]=0;
 185               fJetPtMCMultSEOJ[a]=0;
 186               fJetPtRDMultOJ[a]=0;
 187               fJetPtRDMultSEOJ[a]=0;
 188               fEntriesQuark[a]=0;
 189               fEntriesGluon[a]=0;
 190             }
 191           if(a<6)
 192             {
 193               fProcessPDG[a]=0;
 194               fFragPion[a]=0;
 195               fFragKaon[a]=0;
 196               fFragProton[a]=0;
 197               fFragChargedR4[a]=0;
 198               fFragChargedR3[a]=0;
 199               fFragChargedR2[a]=0;
 200               fHistContainerR4[a]=0;
 201               fHistContainerR3[a]=0;
 202               fHistContainerR2[a]=0;
 203               if(a<3)
 204                 {
 205                   fJetEtaJetPt[a]=0;
 206                   if(a<2)
 207                     {
 208                       fFragCandidates[a]=0;
 209                       fMinTrackPtInNTXh[a]=0;
 210                       fMaxTrackPtInNTXh[a]=0;
 211                     }
 212                 }
 213             }
 214         }
 215     }
 216
 217   // Define input and output slots here
 218   // Input slot #0 works with a TChain
 219   DefineInput(0, TChain::Class());
 220   // Output slot #0 id reserved by the base class for AOD
 221   // Output slot #1 writes into a TH1 container
 222   DefineOutput(1, TList::Class());
 223 }
 224 //________________________________________________________________________
 225 Bool_t AliAnalysisTaskPartonDisc::UserNotify()
 226 {
 227   //
 228   // read the cross sections
 229   // and number of trials from pyxsec.root
 230   // from AliAnalysisTaskJetSpectrum2
 231   //
 232
 233   TTree *tree = AliAnalysisManager::GetAnalysisManager()->GetTree();
 234   Float_t xsection = 0;
 235   Float_t ftrials  = 1;
 236   Int_t nevents = 0;
 237
 238   fAvgTrials = 1;
 239   if(tree)
 240     {
 241       TFile *curfile = tree->GetCurrentFile();
 242       if (!curfile)
 243         {
 244           Error("Notify","No current file");
 245           return kFALSE;
 246         }
 247       if(!fh1Xsec||!fh1Trials)
 248         {
 249           Printf("%s%d No Histogram fh1Xsec",(char*)__FILE__,__LINE__);
 250           return kFALSE;
 251         }
 252       AliAnalysisHelperJetTasks::PythiaInfoFromFile(curfile->GetName(),xsection,ftrials);
 253       fh1Xsec->Fill("<#sigma>",xsection);
 254       // construct a poor man average trials (per event!?)
 255       Float_t nEntries = (Float_t)tree->GetTree()->GetEntries();
 256       if(ftrials>=nEntries && nEntries>0.)fAvgTrials = ftrials/nEntries;
 257       // number of events read out to create the AOD
 258       NumberOfReadEventsAOD(curfile->GetName(),nevents);
 259       fh1Events->Fill("#sum{nevents}",nevents); //  filled once per file
 260     }
 261   return kTRUE;
 262
 263 }
 264 //________________________________________________________________________
 265 void AliAnalysisTaskPartonDisc::UserCreateOutputObjects()
 266 {
 267   // Create histograms
 268   // Called once
 269
 270   fOutputList = new TList();
 271   fOutputList->SetOwner(kTRUE);
 272
 273   fJetPt = new TH1F("fJetPt", "p_{T} distribution of reco jets", 60, 0., 300.);
 274   fJetPt->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 275   fJetPt->GetYaxis()->SetTitle("dN/dp_{T} (c/GeV)");
 276   fJetPt->Sumw2();
 277   fOutputList->Add(fJetPt);
 278
 279   fJetPtSec = new TH1F("fJetPtSec", "p_{T} distribution of reco jets, seconday rec branch", 60, 0., 300.);
 280   fJetPtSec->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 281   fJetPtSec->GetYaxis()->SetTitle("dN/dp_{T} (c/GeV)");
 282   fJetPtSec->Sumw2();
 283   fOutputList->Add(fJetPtSec);
 284
 285   fJetPtMC = new TH1F("fJetPtMC", "p_{T} distribution of mc jets", 60, 0., 300.);
 286   fJetPtMC->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 287   fJetPtMC->GetYaxis()->SetTitle("dN/dp_{T} (c/GeV)");
 288   fJetPtMC->Sumw2();
 289   fOutputList->Add(fJetPtMC);
 290
 291   fJetEta = new TH2F("fJetEta", "Eta distribution of reconstructed jets", 50, -1.5, 1.5, 50, -1.5, 1.5);
 292   fJetEta->GetXaxis()->SetTitle("#eta");
 293   fJetEta->GetYaxis()->SetTitle("#eta");
 294   fJetEta->Sumw2();
 295   fOutputList->Add(fJetEta);
 296
 297   fJetEtaSec = new TH2F("fJetEtaSec", "Eta distribution of reconstructed jets, secondary branch", 50, -1.5, 1.5, 50, -1.5, 1.5);
 298   fJetEtaSec->GetXaxis()->SetTitle("#eta");
 299   fJetEtaSec->GetYaxis()->SetTitle("#eta");
 300   fJetEtaSec->Sumw2();
 301   fOutputList->Add(fJetEtaSec);
 302
 303   fJetPhi = new TH2F("fJetPhi", "Phi distribution of reconstructed jets", 50, 0., TMath::TwoPi(), 50, 0., TMath::TwoPi());
 304   fJetPhi->GetXaxis()->SetTitle("#phi");
 305   fJetPhi->GetYaxis()->SetTitle("#phi");
 306   fJetPhi->Sumw2();
 307   fOutputList->Add(fJetPhi);
 308
 309   fJetPhiSec = new TH2F("fJetPhiSec", "Phi distribution of reconstructed jets, secondary branch", 50, 0., TMath::TwoPi(), 50, 0., TMath::TwoPi());
 310   fJetPhiSec->GetXaxis()->SetTitle("#phi");
 311   fJetPhiSec->GetYaxis()->SetTitle("#phi");
 312   fJetPhiSec->Sumw2();
 313   fOutputList->Add(fJetPhiSec);
 314
 315   fJetEtaMC = new TH2F("fJetEtaMC", "Eta distribution of MC jets", 50, -1.5, 1.5, 50, -1.5, 1.5);
 316   fJetEtaMC->GetXaxis()->SetTitle("#eta");
 317   fJetEtaMC->GetYaxis()->SetTitle("#eta");
 318   fJetEtaMC->Sumw2();
 319   fOutputList->Add(fJetEtaMC);
 320
 321   fJetPhiMC = new TH2F("fJetPhiMC", "Phi distribution of MC jets", 50, 0., TMath::TwoPi(), 50, 0., TMath::TwoPi());
 322   fJetPhiMC->GetXaxis()->SetTitle("#phi");
 323   fJetPhiMC->GetYaxis()->SetTitle("#phi");
 324   fJetPhiMC->Sumw2();
 325   fOutputList->Add(fJetPhiMC);
 326
 327   fPtAODMC = new TH2F("fPtAODMC", "p_{T} distribution of mc tracks", 200, 0., 100., 200, 0., 100.);
 328   fPtAODMC->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 329   fPtAODMC->GetYaxis()->SetTitle("p_{T} (GeV/c)");
 330   fPtAODMC->Sumw2();
 331   fOutputList->Add(fPtAODMC);
 332
 333   fPtAOD = new TH2F("fPtAOD", "p_{T} distribution of aod tracks", 200, 0., 100., 200, 0., 100.);
 334   fPtAOD->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 335   fPtAOD->GetYaxis()->SetTitle("p_{T} (GeV/c)");
 336   fPtAOD->Sumw2();
 337   fOutputList->Add(fPtAOD);
 338
 339   fEtaAODMC = new TH2F("fEtaAODMC", "Eta distribution of MC aod tracks", 50, -1.5, 1.5, 50, -1.5, 1.5);
 340   fEtaAODMC->GetXaxis()->SetTitle("#eta");
 341   fEtaAODMC->GetYaxis()->SetTitle("#eta");
 342   fEtaAODMC->Sumw2();
 343   fOutputList->Add(fEtaAODMC);
 344
 345   fPhiAODMC = new TH2F("fPhiAODMC", "Phi distribution of MC aod tracks", 50, 0., TMath::TwoPi(), 50, 0., TMath::TwoPi());
 346   fPhiAODMC->GetXaxis()->SetTitle("#phi");
 347   fPhiAODMC->GetYaxis()->SetTitle("#phi");
 348   fPhiAODMC->Sumw2();
 349   fOutputList->Add(fPhiAODMC);
 350
 351   fEtaAOD = new TH2F("fEtaAOD", "Eta distribution of aod tracks", 50, -1.5, 1.5, 50, -1.5, 1.5);
 352   fEtaAOD->GetXaxis()->SetTitle("#eta");
 353   fEtaAOD->GetYaxis()->SetTitle("#eta");
 354   fEtaAOD->Sumw2();
 355   fOutputList->Add(fEtaAOD);
 356
 357   fPhiAOD = new TH2F("fPhiAOD", "Phi distribution of aod tracks", 50, 0.,TMath::TwoPi(), 50, 0.,TMath::TwoPi());
 358   fPhiAOD->GetXaxis()->SetTitle("#phi");
 359   fPhiAOD->GetYaxis()->SetTitle("#phi");
 360   fPhiAOD->Sumw2();
 361   fOutputList->Add(fPhiAOD);
 362
 363   fFlavor = new TH2F("fFlavor", "Flavor distribution of jets", 27, -5.5, 21.5, 60, 0., 300.);
 364   fFlavor->GetXaxis()->SetTitle("PDG code");
 365   fFlavor->GetYaxis()->SetTitle("p_{T}^{JET}");
 366   fFlavor->Sumw2();
 367   fOutputList->Add(fFlavor);
 368
 369   fNJetsMC = new TH2F("fNJetsMC", "Number of simulated jets per event, as a function of p_T", 101, -0.5, 100.5, 101, -0.5, 100.5);
 370   fNJetsMC->GetXaxis()->SetTitle("Number of jets");
 371   fNJetsMC->GetYaxis()->SetTitle("Number of jets");
 372   fNJetsMC->Sumw2();
 373   fOutputList->Add(fNJetsMC);
 374
 375   fNJetsRD = new TH2F("fNJetsRD", "Number of jets per event in real data", 101, -0.5, 100.5, 101, -0.5, 100.5);
 376   fNJetsRD->GetXaxis()->SetTitle("Number of jets");
 377   fNJetsRD->GetYaxis()->SetTitle("Number of jets");
 378   fNJetsRD->Sumw2();
 379   fOutputList->Add(fNJetsRD);
 380
 381   fNJetsRDSeco = new TH2F("fNJetsRDSeco", "Number of jets per event in real data, secondary branch", 101, -0.5, 100.5, 101, -0.5, 100.5);
 382   fNJetsRDSeco->GetXaxis()->SetTitle("Number of jets");
 383   fNJetsRDSeco->GetYaxis()->SetTitle("Number of jets");
 384   fNJetsRDSeco->Sumw2();
 385   fOutputList->Add(fNJetsRDSeco);
 386
 387   fJetsMultPtMC = new TH2F("fJetsMultPtMC", "Jet multiplicity associated to jet pT, as a function of p_T MC", 60, 0., 300., 7, -0.5, 6.5);
 388   fJetsMultPtMC->GetXaxis()->SetTitle("p_{T}^{JET}");
 389   fJetsMultPtMC->GetYaxis()->SetTitle("Number of jets");
 390   fJetsMultPtMC->Sumw2();
 391   fOutputList->Add(fJetsMultPtMC);
 392
 393   fJetsMultPtRD = new TH2F("fJetsMultPtRD", "Jet multiplicity associated to jet pT, as a function of p_T Reco Data",60, 0., 300., 7, -0.5, 6.5);
 394   fJetsMultPtRD->GetXaxis()->SetTitle("p_{T}^{JET}");
 395   fJetsMultPtRD->GetYaxis()->SetTitle("Number of jets");
 396   fJetsMultPtRD->Sumw2();
 397   fOutputList->Add(fJetsMultPtRD);
 398
 399   fNChTrRD = new TH2F("fNChTrRD","Number of tracks to recover transverse energy, jet_{p_{T}}",101,-0.5,100.5, 60, 0., 300.);
 400   fNChTrRD->GetXaxis()->SetTitle("NTracks");
 401   fNChTrRD->GetYaxis()->SetTitle("p_{T}^{JET}");
 402   fNChTrRD->Sumw2();
 403   fOutputList->Add(fNChTrRD);
 404
 405   fProfNChTrRD = new TProfile("fProfNChTrRD","Number of tracks to recover transverse energy, jet_{p_{T}}", 50, 0, 250);
 406   fProfNChTrRD->GetXaxis()->SetTitle("p_{T}^{JET}");
 407   fProfNChTrRD->GetYaxis()->SetTitle("NTracks");
 408   fProfNChTrRD->Sumw2();
 409   fOutputList->Add(fProfNChTrRD);
 410
 411   fFracQQ = new TH1F("fFracQQ","QQ",1000,0.,0.5);
 412   fFracQQ->GetXaxis()->SetTitle("x_{T}");
 413   fFracQQ->GetYaxis()->SetTitle("Entries");
 414   fFracQQ->Sumw2();
 415   fOutputList->Add(fFracQQ);
 416
 417   fFracGQ = new TH1F("fFracGQ","GQ",1000,0.,0.5);
 418   fFracGQ->GetXaxis()->SetTitle("x_{T}");
 419   fFracGQ->GetYaxis()->SetTitle("Entries");
 420   fFracGQ->Sumw2();
 421   fOutputList->Add(fFracGQ);
 422
 423   fFracGG = new TH1F("fFracGG","GG",1000,0.,0.5);
 424   fFracGG->GetXaxis()->SetTitle("x_{T}");
 425   fFracGG->GetYaxis()->SetTitle("Entries");
 426   fFracGG->Sumw2();
 427   fOutputList->Add(fFracGG);
 428
 429   fFracOutGoingQQ = new TH1F("fFracOutGoingQQ","QQ",1000,0.,0.5);
 430   fFracOutGoingQQ->GetXaxis()->SetTitle("x_{T}");
 431   fFracOutGoingQQ->GetYaxis()->SetTitle("Entries");
 432   fFracOutGoingQQ->Sumw2();
 433   fOutputList->Add(fFracOutGoingQQ);
 434
 435   fFracOutGoingGQ = new TH1F("fFracOutGoingGQ","GQ",1000,0.,0.5);
 436   fFracOutGoingGQ->GetXaxis()->SetTitle("x_{T}");
 437   fFracOutGoingGQ->GetYaxis()->SetTitle("Entries");
 438   fFracOutGoingGQ->Sumw2();
 439   fOutputList->Add(fFracOutGoingGQ);
 440
 441   fFracOutGoingGG = new TH1F("fFracOutGoingGG","GG",1000,0.,0.5);
 442   fFracOutGoingGG->GetXaxis()->SetTitle("x_{T}");
 443   fFracOutGoingGG->GetYaxis()->SetTitle("Entries");
 444   fFracOutGoingGG->Sumw2();
 445   fOutputList->Add(fFracOutGoingGG);
 446
 447   fh1Xsec =  new TProfile("h1Xsec","xsec from pyxsec.root",1,0,1);
 448   fh1Xsec->SetXTitle("<#sigma>");
 449   fh1Xsec->Sumw2();
 450   fOutputList->Add(fh1Xsec);
 451
 452   fh1Trials = new TH1F("h1Trials","trials from pyxsec.root",1,0,1);
 453   fh1Trials->SetXTitle("#sum{ntrials}");
 454   fh1Trials->Sumw2();
 455   fOutputList->Add(fh1Trials);
 456
 457   fProcessJetPt = new TH2F("fProcessJetPt","Pythia process number, jet_{p_{T}}",70, 0.5, 70.5, 60, 0., 300.);
 458   fProcessJetPt->GetXaxis()->SetTitle("Pythia process");
 459   fProcessJetPt->GetYaxis()->SetTitle("p_{T}^{JET}");
 460   fProcessJetPt->Sumw2();
 461   fOutputList->Add(fProcessJetPt);
 462
 463   fFlavorLead = new TH2F("fFlavorLead", "Flavor distribution of leading jets", 27, -5.5, 21.5, 60, 0., 300.);
 464   fFlavorLead->GetXaxis()->SetTitle("PDG code");
 465   fFlavorLead->GetYaxis()->SetTitle("p_{T}^{JET}");
 466   fFlavorLead->Sumw2();
 467   fOutputList->Add(fFlavorLead);
 468
 469   fProcessLeadJetPt = new TH2F("fProcessLeadJetPt","Pythia process number for leading, jet_{p_{T}}",70, 0.5, 70.5, 60, 0., 300.);
 470   fProcessLeadJetPt->GetXaxis()->SetTitle("Pythia process");
 471   fProcessLeadJetPt->GetYaxis()->SetTitle("p_{T}^{JET}");
 472   fProcessLeadJetPt->Sumw2();
 473   fOutputList->Add(fProcessLeadJetPt);
 474
 475   fPDGMothLPart = new TH3F("fPDGMothLPart","Mother of leading parton, leading parton, jet p_{T}", 27, -5.5, 21.5, 27, -5.5, 21.5, 60, 0., 300.);
 476   fPDGMothLPart->GetXaxis()->SetTitle("Mother of leading parton");
 477   fPDGMothLPart->GetYaxis()->SetTitle("Leading parton");
 478   fPDGMothLPart->GetZaxis()->SetTitle("p_{T}^{JET}");
 479   fPDGMothLPart->Sumw2();
 480   fOutputList->Add(fPDGMothLPart);
 481
 482   fFlavProc = new TH2F("fFlavProc","Flavor, Flavor status code", 27, -5.5, 21.5, 101, -0.5, 100.5);
 483   fFlavProc->GetXaxis()->SetTitle("Jet flavor");
 484   fFlavProc->GetYaxis()->SetTitle("Parton status code");
 485   fFlavProc->Sumw2();
 486   fOutputList->Add(fFlavProc);
 487
 488   fSCMRD = new TH2F("fSCMRD","Second Central Moment, jet_{p_{T}}",200,0.,0.2, 60, 0., 300.);
 489   fSCMRD->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 490   fSCMRD->GetYaxis()->SetTitle("p_{T}^{JET}");
 491   fSCMRD->Sumw2();
 492   fOutputList->Add(fSCMRD);
 493
 494   fZVertex = new TH2F("fZVertex","Z vertex position, Z vertex position}",40,-20.,20., 40, -20., 20.);
 495   fZVertex->GetXaxis()->SetTitle("Vertex z");
 496   fZVertex->GetYaxis()->SetTitle("Vertex z");
 497   fZVertex->Sumw2();
 498   fOutputList->Add(fZVertex);
 499
 500   fh1Events = new TH1F("fh1Events","nevents from PWG4_JetTasksOutput.root",1,0,1);
 501   fh1Events->SetXTitle("#sum{nevents}");
 502   fh1Events->Sumw2();
 503   fOutputList->Add(fh1Events);
 504
 505   fNAccJetsMC = new TH2F("fNAccJetsMC", "Number accepted simulated jets per event", 101, -0.5, 100.5, 101, -0.5, 100.5);
 506   fNAccJetsMC->GetXaxis()->SetTitle("Number of jets");
 507   fNAccJetsMC->GetYaxis()->SetTitle("Number of jets");
 508   fNAccJetsMC->Sumw2();
 509   fOutputList->Add(fNAccJetsMC);
 510
 511   fNAccJetsRD = new TH2F("fNAccJetsRD", "Number of accepted jets per event in real data", 101, -0.5, 100.5, 101, -0.5, 100.5);
 512   fNAccJetsRD->GetXaxis()->SetTitle("Number of jets");
 513   fNAccJetsRD->GetYaxis()->SetTitle("Number of jets");
 514   fNAccJetsRD->Sumw2();
 515   fOutputList->Add(fNAccJetsRD);
 516
 517   fNAccJetsRDSeco = new TH2F("fNAccJetsRDSeco", "Number of accepted jets per event in real data, secondary branch", 101, -0.5, 100.5, 101, -0.5, 100.5);
 518   fNAccJetsRDSeco->GetXaxis()->SetTitle("Number of jets");
 519   fNAccJetsRDSeco->GetYaxis()->SetTitle("Number of jets");
 520   fNAccJetsRDSeco->Sumw2();
 521   fOutputList->Add(fNAccJetsRDSeco);
 522
 523   fRecJetPtInclusive = new TH1F("fRecJetPtInclusive", "p_{T} distribution of inclusive reco jets", 60, 0., 300.);
 524   fRecJetPtInclusive->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 525   fRecJetPtInclusive->GetYaxis()->SetTitle("d#sigma (mb)");
 526   fRecJetPtInclusive->Sumw2();
 527   fOutputList->Add(fRecJetPtInclusive);
 528
 529   fMCJetPtInclusive = new TH1F("fMCJetPtInclusive", "p_{T} distribution of inclusive MC jets", 60, 0., 300.);
 530   fMCJetPtInclusive->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 531   fMCJetPtInclusive->GetYaxis()->SetTitle("d#sigma (mb)");
 532   fMCJetPtInclusive->Sumw2();
 533   fOutputList->Add(fMCJetPtInclusive);
 534
 535   fRecJetPtLeading = new TH1F("fRecJetPtLeading", "p_{T} distribution of leading reco jets", 60, 0., 300.);
 536   fRecJetPtLeading->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 537   fRecJetPtLeading->GetYaxis()->SetTitle("d#sigma (mb)");
 538   fRecJetPtLeading->Sumw2();
 539   fOutputList->Add(fRecJetPtLeading);
 540
 541   fMCJetPtLeading = new TH1F("fMCJetPtLeading", "p_{T} distribution of leading MC jets", 60, 0., 300.);
 542   fMCJetPtLeading->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 543   fMCJetPtLeading->GetYaxis()->SetTitle("d#sigma (mb)");
 544   fMCJetPtLeading->Sumw2();
 545   fOutputList->Add(fMCJetPtLeading);
 546
 547   fSecRecJetPtInclusive = new TH1F("fSecRecJetPtInclusive", "p_{T} distribution of inclusive reco jets (2nd branch)", 60, 0., 300.);
 548   fSecRecJetPtInclusive->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 549   fSecRecJetPtInclusive->GetYaxis()->SetTitle("d#sigma (mb)");
 550   fSecRecJetPtInclusive->Sumw2();
 551   fOutputList->Add(fSecRecJetPtInclusive);
 552
 553   fSecRecJetPtLeading = new TH1F("fSecRecJetPtLeading", "p_{T} distribution of leading reco jets (2nd branch)", 60, 0., 300.);
 554   fSecRecJetPtLeading->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 555   fSecRecJetPtLeading->GetYaxis()->SetTitle("d#sigma (mb)");
 556   fSecRecJetPtLeading->Sumw2();
 557   fOutputList->Add(fSecRecJetPtLeading);
 558
 559   fNChTrMCPerp = new TH2F("fNChTrMCPerp","Number of tracks to recover transverse energy of perp. cone, jet_{p_{T} MC}",101,-0.5,100.5, 60, 0., 300.);
 560   fNChTrMCPerp->GetXaxis()->SetTitle("NTracks Perp");
 561   fNChTrMCPerp->GetYaxis()->SetTitle("p_{T}^{MC JET}");
 562   fNChTrMCPerp->Sumw2();
 563   fOutputList->Add(fNChTrMCPerp);
 564
 565   fNChTrRecPerp = new TH2F("fNChTrRecPerp","Number of tracks to recover transverse energy of perp. cone, jet_{p_{T} Rec}",101,-0.5,100.5, 60, 0., 300.);
 566   fNChTrRecPerp->GetXaxis()->SetTitle("NTracks Perp");
 567   fNChTrRecPerp->GetYaxis()->SetTitle("p_{T}^{RECO JET}");
 568   fNChTrRecPerp->Sumw2();
 569   fOutputList->Add(fNChTrRecPerp);
 570
 571   fSCMMCPerp = new TH2F("fSCMMCPerp","Second Central Moment of perp. cone, jet_{p_{T} MC}",200,0.,0.2, 60, 0., 300.);
 572   fSCMMCPerp->GetXaxis()->SetTitle("<#delta R_{c}^{2}> Perp");
 573   fSCMMCPerp->GetYaxis()->SetTitle("p_{T}^{JET}");
 574   fSCMMCPerp->Sumw2();
 575   fOutputList->Add(fSCMMCPerp);
 576
 577   fSCMRecPerp = new TH2F("fSCMRecPerp","Second Central Moment of perp. cone, jet_{p_{T} Reco}",200,0.,0.2, 60, 0., 300.);
 578   fSCMRecPerp->GetXaxis()->SetTitle("<#delta R_{c}^{2}> Perp");
 579   fSCMRecPerp->GetYaxis()->SetTitle("p_{T}^{JET}");
 580   fSCMRecPerp->Sumw2();
 581   fOutputList->Add(fSCMRecPerp);
 582
 583   fNChTrCorrMCQuark = new TH2F("fNChTrCorrMCQuark","Number of tracks to recover corrected transverse energy, MC quarks",101,-0.5,100.5, 60, 0., 300.);
 584   fNChTrCorrMCQuark->GetXaxis()->SetTitle("NTracks");
 585   fNChTrCorrMCQuark->GetYaxis()->SetTitle("p_{T}^{MC Corr. JET}");
 586   fNChTrCorrMCQuark->Sumw2();
 587   fOutputList->Add(fNChTrCorrMCQuark);
 588
 589   fNChTrCorrMCGluon = new TH2F("fNChTrCorrMCGluon","Number of tracks to recover corrected transverse energy, MC gluons",101,-0.5,100.5, 60, 0., 300.);
 590   fNChTrCorrMCGluon->GetXaxis()->SetTitle("NTracks");
 591   fNChTrCorrMCGluon->GetYaxis()->SetTitle("p_{T}^{MC Corr. JET}");
 592   fNChTrCorrMCGluon->Sumw2();
 593   fOutputList->Add(fNChTrCorrMCGluon);
 594
 595   fNChTrCorrMCPerp = new TH2F("fNChTrCorrMCPerp","Number of tracks to recover perp. cone. after corrected jet pT",101,-0.5,100.5, 60, 0., 300.);
 596   fNChTrCorrMCPerp->GetXaxis()->SetTitle("NTracks");
 597   fNChTrCorrMCPerp->GetYaxis()->SetTitle("p_{T}^{MC Corr. JET}");
 598   fNChTrCorrMCPerp->Sumw2();
 599   fOutputList->Add(fNChTrCorrMCPerp);
 600
 601   // 9 selection bins: (nuevo)
 602   // 1st. Proton collisions                  fill 1  Bin1 [0.5,1.5)
 603   // 2nd. PbPb collisions, Bin  0-10         fill 2  Bin2 [1.5,2.5)
 604   // 3rd. PbPb collisions, Bin 10-20         fill 3  Bin3 [2.5,3.5)
 605   // 4rd. PbPb collisions, Bin 20-30         fill 4  Bin4 [3.5,4.5)
 606   // 5th. PbPb collisions, Bin 30-40         fill 5  Bin5 [4.5,5.5)
 607   // 6th. PbPb collisions, Bin 40-50         fill 6  Bin6 [5.5,6.5)
 608   // 7th. PbPb collisions, Bin 50-60         fill 7  Bin7 [6.5,7.5)
 609   // 8th. PbPb collisions, Bin 60-70         fill 8  Bin8 [7.5,8.5)
 610   // 9th. PbPb collisions, Bin 70-80         fill 9  Bin9 [8.5,9.5)
 611   // 10th. PbPb collisions, Bin 80-100.1    fill 10  Bin10 [9.5,10.5)
 612
 613   fNChTrRecECorr = new TH3F("fNChTrRecECorr","NTX in ener. corr. jet , corr. jet pT, centrality",101,-0.5,100.5, 60, 0., 300.,10,0.5,10.5);
 614   fNChTrRecECorr->GetXaxis()->SetTitle("NTracks");
 615   fNChTrRecECorr->GetYaxis()->SetTitle("p_{T}^{JET}");
 616   fNChTrRecECorr->GetZaxis()->SetTitle("Selection Bin");
 617   fNChTrRecECorr->Sumw2();
 618   fOutputList->Add(fNChTrRecECorr);
 619
 620   fNChTrRecPerpECorr = new TH3F("fNChTrRecPerpECorr","Tracks above min in perp.cone , corr. jet pT, centrality",101,-0.5,100.5, 60, 0., 300.,10,0.5,10.5);
 621   fNChTrRecPerpECorr->GetXaxis()->SetTitle("NTracks");
 622   fNChTrRecPerpECorr->GetYaxis()->SetTitle("p_{T}^{JET}");
 623   fNChTrRecPerpECorr->GetZaxis()->SetTitle("Selection Bin");
 624   fNChTrRecPerpECorr->Sumw2();
 625   fOutputList->Add(fNChTrRecPerpECorr);
 626
 627   fRefMult = new TH1F("fRefMult", "Reference multiplicity in the AOD", 301, -0.5, 300.5);
 628   fRefMult->GetXaxis()->SetTitle("Reference multiplicity");
 629   fRefMult->Sumw2();
 630   fOutputList->Add(fRefMult);
 631
 632   fRefMultWOJet = new TH2F("fRefMultWOJet", "Reference multiplicity in the AOD, multiplicity without jets", 301, -0.5, 300.5, 301, -0.5, 300.5);
 633   fRefMultWOJet->GetXaxis()->SetTitle("Reference multiplicity");
 634   fRefMultWOJet->GetYaxis()->SetTitle("Multiplicity without jets");
 635   fRefMultWOJet->Sumw2();
 636   fOutputList->Add(fRefMultWOJet);
 637
 638   fVZEROMult = new TH2F("fVZEROMult", "Multiplicity V0A and V0C", 501, -0.5, 500.5, 501, -0.5, 500.5);
 639   fVZEROMult->GetXaxis()->SetTitle("Multiplicity V0A");
 640   fVZEROMult->GetYaxis()->SetTitle("Multiplicity V0C");
 641   fVZEROMult->Sumw2();
 642   fOutputList->Add(fVZEROMult);
 643
 644   fMultWOJetVZero = new TH2F("fMultWOJetVZero", "Multiplicity without jets and VZERO mult.",301, -0.5, 300.5, 1001, -0.5, 1000.5);
 645   fMultWOJetVZero->GetXaxis()->SetTitle("Multiplicity without jets TPC");
 646   fMultWOJetVZero->GetYaxis()->SetTitle("Multiplicity full V0");
 647   fMultWOJetVZero->Sumw2();
 648   fOutputList->Add(fMultWOJetVZero);
 649
 650   fRefMultFullV0 = new TH2F("fRefMultFullV0", "Reference multiplicity in the AOD, multiplicity from full V0",301, -0.5, 300.5, 1001, -0.5, 1000.5);
 651   fRefMultFullV0->GetXaxis()->SetTitle("Reference multiplicity in AOD");
 652   fRefMultFullV0->GetYaxis()->SetTitle("Multiplicity full V0");
 653   fRefMultFullV0->Sumw2();
 654   fOutputList->Add(fRefMultFullV0);
 655
 656   fRefMultV0Corr = new TH2F("fRefMultV0Corr", "Reference multiplicity in the AOD, multiplicity from corrected V0",301, -0.5, 300.5, 1001, -0.5, 1000.5);
 657   fRefMultV0Corr->GetXaxis()->SetTitle("Reference multiplicity in AOD");
 658   fRefMultV0Corr->GetYaxis()->SetTitle("Multiplicity V0 no jets");
 659   fRefMultV0Corr->Sumw2();
 660   fOutputList->Add(fRefMultV0Corr);
 661
 662   fFullV0V0Corr = new TH2F("fFullV0V0Corr", "Multiplicity from full V0, multiplicity from corrected V0",1001, -0.5, 1000.5, 1001, -0.5, 1000.5);
 663   fFullV0V0Corr->GetXaxis()->SetTitle("Multiplicity from full V0");
 664   fFullV0V0Corr->GetYaxis()->SetTitle("Multiplicity V0 no jets");
 665   fFullV0V0Corr->Sumw2();
 666   fOutputList->Add(fFullV0V0Corr);
 667
 668   fNTXV0MultPt = new TH3F("fNTXV0MultPt", "NTX, Multiplicity from corrected V0, jet pT",101,-0.5,100.5, 1001, -0.5, 1000.5, 60, 0., 300.);
 669   fNTXV0MultPt->GetXaxis()->SetTitle("NTracks");
 670   fNTXV0MultPt->GetYaxis()->SetTitle("Multiplicity V0 no jets");
 671   fNTXV0MultPt->GetZaxis()->SetTitle("p_{T}^{JET}");
 672   fNTXV0MultPt->Sumw2();
 673   fOutputList->Add(fNTXV0MultPt);
 674
 675   fNTXCBMultPt = new TH3F("fNTXCBMultPt", "NTX, Multiplicity from corrected Central Barrel, jet pT",101,-0.5,100.5, 301, -0.5, 300.5, 60, 0., 300.);
 676   fNTXCBMultPt->GetXaxis()->SetTitle("NTracks");
 677   fNTXCBMultPt->GetYaxis()->SetTitle("Multiplicity corrected Central Barrel");
 678   fNTXCBMultPt->GetZaxis()->SetTitle("p_{T}^{JET}");
 679   fNTXCBMultPt->Sumw2();
 680   fOutputList->Add(fNTXCBMultPt);
 681
 682   fRefMultFullV0UJ = new TH2F("fRefMultFullV0UJ", "Reference multiplicity in the AOD, multiplicity from full V0, 1 jet event",301, -0.5, 300.5, 1001, -0.5, 1000.5);
 683   fRefMultFullV0UJ->GetXaxis()->SetTitle("Reference multiplicity in AOD");
 684   fRefMultFullV0UJ->GetYaxis()->SetTitle("Multiplicity full V0");
 685   fRefMultFullV0UJ->Sumw2();
 686   fOutputList->Add(fRefMultFullV0UJ);
 687
 688   fRefMultV0CorrUJ = new TH2F("fRefMultV0CorrUJ", "Reference multiplicity in the AOD, multiplicity from corrected V0, 1 jet event",301, -0.5, 300.5, 1001, -0.5, 1000.5);
 689   fRefMultV0CorrUJ->GetXaxis()->SetTitle("Reference multiplicity in AOD");
 690   fRefMultV0CorrUJ->GetYaxis()->SetTitle("Multiplicity V0 no jets");
 691   fRefMultV0CorrUJ->Sumw2();
 692   fOutputList->Add(fRefMultV0CorrUJ);
 693
 694   fFullV0V0CorrUJ = new TH2F("fFullV0V0CorrUJ", "Multiplicity from full V0, multiplicity from corrected V0, 1 jet event",1001, -0.5, 1000.5, 1001, -0.5, 1000.5);
 695   fFullV0V0CorrUJ->GetXaxis()->SetTitle("Multiplicity from full V0");
 696   fFullV0V0CorrUJ->GetYaxis()->SetTitle("Multiplicity V0 no jets");
 697   fFullV0V0CorrUJ->Sumw2();
 698   fOutputList->Add(fFullV0V0CorrUJ);
 699
 700   fMultWOJetVZeroUJ = new TH2F("fMultWOJetVZeroUJ", "Multiplicity without jets and VZERO mult., 1 jet event",301, -0.5, 300.5, 1001, -0.5, 1000.5);
 701   fMultWOJetVZeroUJ->GetXaxis()->SetTitle("Multiplicity without jets TPC");
 702   fMultWOJetVZeroUJ->GetYaxis()->SetTitle("Multiplicity full V0");
 703   fMultWOJetVZeroUJ->Sumw2();
 704   fOutputList->Add(fMultWOJetVZeroUJ);
 705
 706   fRefMultWOJetUJ = new TH2F("fRefMultWOJetUJ", "Reference multiplicity in the AOD, multiplicity without jets, 1 jet event", 301, -0.5, 300.5, 301, -0.5, 300.5);
 707   fRefMultWOJetUJ->GetXaxis()->SetTitle("Reference multiplicity");
 708   fRefMultWOJetUJ->GetYaxis()->SetTitle("Multiplicity without jets");
 709   fRefMultWOJetUJ->Sumw2();
 710   fOutputList->Add(fRefMultWOJetUJ);
 711
 712   fRefAODTrackCount = new TH2F("fRefAODTrackCount", "Reference multiplicity in the AOD, my own referece mult.", 301, -0.5, 300.5, 301, -0.5, 300.5);
 713   fRefAODTrackCount->GetXaxis()->SetTitle("AOD Reference multiplicity");
 714   fRefAODTrackCount->GetYaxis()->SetTitle("My Reference multiplicity");
 715   fRefAODTrackCount->Sumw2();
 716   fOutputList->Add(fRefAODTrackCount);
 717
 718   fRefAODTrackCountUJ = new TH2F("fRefAODTrackCountUJ", "Reference multiplicity in the AOD, my own referece mult., 1 jet event", 301, -0.5, 300.5, 301, -0.5, 300.5);
 719   fRefAODTrackCountUJ->GetXaxis()->SetTitle("AOD Reference multiplicity");
 720   fRefAODTrackCountUJ->GetYaxis()->SetTitle("My Reference multiplicity");
 721   fRefAODTrackCountUJ->Sumw2();
 722   fOutputList->Add(fRefAODTrackCountUJ);
 723
 724   fTrackCountWOJet = new TH2F("fTrackCountWOJet", "My own total referece mult., soft mult", 151, -0.5, 150.5, 151, -0.5, 150.5);
 725   fTrackCountWOJet->GetXaxis()->SetTitle("Total TPC multiplicity");
 726   fTrackCountWOJet->GetYaxis()->SetTitle("Soft TPC multiplicity");
 727   fTrackCountWOJet->Sumw2();
 728   fOutputList->Add(fTrackCountWOJet);
 729
 730   fTrackCountWOJetUJ = new TH2F("fTrackCountWOJetUJ", "My own total referece mult., soft mult, 1 jet", 151, -0.5, 150.5, 151, -0.5, 150.5);
 731   fTrackCountWOJetUJ->GetXaxis()->SetTitle("Total TPC multiplicity");
 732   fTrackCountWOJetUJ->GetYaxis()->SetTitle("Soft TPC multiplicity");
 733   fTrackCountWOJetUJ->Sumw2();
 734   fOutputList->Add(fTrackCountWOJetUJ);
 735
 736   fTrackCountWOJetUJMC = new TH2F("fTrackCountWOJetUJMC", "My own total referece mult., soft mult, 1 jet, MC!", 151, -0.5, 150.5, 151, -0.5, 150.5);
 737   fTrackCountWOJetUJMC->GetXaxis()->SetTitle("Total TPC (eta) multiplicity");
 738   fTrackCountWOJetUJMC->GetYaxis()->SetTitle("Soft TPC (eta) multiplicity");
 739   fTrackCountWOJetUJMC->Sumw2();
 740   fOutputList->Add(fTrackCountWOJetUJMC);
 741
 742   fFullV0V0CorrUJMC = new TH2F("fFullV0V0CorrUJMC", "Multiplicity from full V0, multiplicity from corrected V0, 1 jet event, MC!",1001, -0.5, 1000.5, 1001, -0.5, 1000.5);
 743   fFullV0V0CorrUJMC->GetXaxis()->SetTitle("Multiplicity from full V0 (acceptance)");
 744   fFullV0V0CorrUJMC->GetYaxis()->SetTitle("Multiplicity V0(acceptance) no jets");
 745   fFullV0V0CorrUJMC->Sumw2();
 746   fOutputList->Add(fFullV0V0CorrUJMC);
 747
 748   fMinTrackPtInNTXRecalc = new TH3F("fMinTrackPtInNTXRecalc", "Minimum track pT for the jets after pT correction, raw jet pT", 200, 0., 100., 60, 0., 300.,10,0.5,10.5);
 749   fMinTrackPtInNTXRecalc->GetXaxis()->SetTitle("p_{T}^{TRACK} (GeV/c)");
 750   fMinTrackPtInNTXRecalc->GetYaxis()->SetTitle("p_{T}^{JET} (GeV/c)");
 751   fMinTrackPtInNTXRecalc->GetZaxis()->SetTitle("Selection Bin");  // 9 selections bins as fNChTrRecECorr
 752   fMinTrackPtInNTXRecalc->Sumw2();
 753   fOutputList->Add(fMinTrackPtInNTXRecalc);
 754
 755   fMaxTrackPtInNTXRecalc = new TH2F("fMaxTrackPtInNTXRecalc", "Maximum track pT for the jets after pT correction, raw jet pT", 200, 0., 100., 60, 0., 300.);
 756   fMaxTrackPtInNTXRecalc->GetXaxis()->SetTitle("p_{T}^{TRACK} (GeV/c)");
 757   fMaxTrackPtInNTXRecalc->GetYaxis()->SetTitle("p_{T}^{JET} (GeV/c)");
 758   fMaxTrackPtInNTXRecalc->Sumw2();
 759   fOutputList->Add(fMaxTrackPtInNTXRecalc);
 760
 761   fPtDistInJetConeRaw = new TH3F("fPtDistInJetConeRaw","pT of tracks in cone, raw jet pT bin, centrality", 200, 0., 100., 8, 0.5, 8.5, 10, 0.5, 10.5);
 762   fPtDistInJetConeRaw->GetXaxis()->SetTitle("p_{T}^{TRACK} (GeV/c)");
 763   fPtDistInJetConeRaw->GetYaxis()->SetTitle("p_{T}^{JET} Bin");
 764   fPtDistInJetConeRaw->GetZaxis()->SetTitle("Centrality Bin");
 765   fPtDistInJetConeRaw->Sumw2();
 766   fOutputList->Add(fPtDistInJetConeRaw);
 767
 768   fPtDistInPerpConeRaw = new TH3F("fPtDistInPerpConeRaw","pT of tracks in cone, raw jet pT bin, centrality", 200, 0., 100., 8, 0.5, 8.5, 10, 0.5, 10.5);
 769   fPtDistInPerpConeRaw->GetXaxis()->SetTitle("p_{T}^{TRACK} (GeV/c)");
 770   fPtDistInPerpConeRaw->GetYaxis()->SetTitle("p_{T}^{JET} Bin");
 771   fPtDistInPerpConeRaw->GetZaxis()->SetTitle("Centrality Bin");
 772   fPtDistInPerpConeRaw->Sumw2();
 773   fOutputList->Add(fPtDistInPerpConeRaw);
 774
 775   fPtInPerpCon = new TH3F("fPtInPerpCon","Summed pT of perpendicular cone, raw jet pT bin, centrality", 200, 0., 100., 8, 0.5, 8.5, 10, 0.5, 10.5);
 776   fPtInPerpCon->GetXaxis()->SetTitle("p_{T}^{PERP.CONE} (GeV/c)");
 777   fPtInPerpCon->GetYaxis()->SetTitle("p_{T}^{JET} Bin");
 778   fPtInPerpCon->GetZaxis()->SetTitle("Centrality Bin");
 779   fPtInPerpCon->Sumw2();
 780   fOutputList->Add(fPtInPerpCon);
 781
 782   fJetEtaAll = new TH1F("fJetEtaAll", "Eta distribution of reconstructed jets, no cuts", 50, -1.5, 1.5);
 783   fJetEtaAll->GetXaxis()->SetTitle("#eta");
 784   fJetEtaAll->GetYaxis()->SetTitle("entries");
 785   fJetEtaAll->Sumw2();
 786   fOutputList->Add(fJetEtaAll);
 787
 788   fJetEtaOnlyTPCcut = new TH1F("fJetEtaOnlyTPCcut", "Eta distribution of reconstructed jets, only tpc acceptance cut", 50, -1.5, 1.5);
 789   fJetEtaOnlyTPCcut->GetXaxis()->SetTitle("#eta");
 790   fJetEtaOnlyTPCcut->GetYaxis()->SetTitle("entries");
 791   fJetEtaOnlyTPCcut->Sumw2();
 792   fOutputList->Add(fJetEtaOnlyTPCcut);
 793
 794   // 9 multiplicity bins
 795   // 1st.     <5    TPC tracks       fill 1  Bin1 [0.5,1.5)
 796   // 2nd. >= 5  <10 TPC tracks       fill 2  Bin2 [1.5,2.5)
 797   // 3rd. >= 10 <15 TPC tracks       fill 3  Bin3 [2.5,3.5)
 798   // 4rd. >= 15 <20 TPC tracks       fill 4  Bin4 [3.5,4.5)
 799   // 5th. >= 20 <30 TPC tracks       fill 5  Bin5 [4.5,5.5)
 800   // 6th. >= 30 <40 TPC tracks       fill 6  Bin6 [5.5,6.5)
 801   // 7th. >= 40 <50 TPC tracks       fill 7  Bin7 [6.5,7.5)
 802   // 8th.    >50    TPC tracks       fill 8  Bin8 [7.5,8.5)
 803
 804   fNChTrRecECorrPPMult = new TH3F("fNChTrRecECorrPPMult","NTX in ener. corr. jet , corr. jet pT, pp mult.",101,-0.5,100.5, 60, 0., 300.,8,0.5,8.5);
 805   fNChTrRecECorrPPMult->GetXaxis()->SetTitle("NTracks_Corrected");
 806   fNChTrRecECorrPPMult->GetYaxis()->SetTitle("p_{T}^{JET}");
 807   fNChTrRecECorrPPMult->GetZaxis()->SetTitle("Multiplicity Bin");
 808   fNChTrRecECorrPPMult->Sumw2();
 809   fOutputList->Add(fNChTrRecECorrPPMult);
 810
 811   fNChTrRecPerpECorrPPMult = new TH3F("fNChTrRecPerpECorrPPMult","Tracks above min in perp.cone , corr. jet pT, centrality",101,-0.5,100.5, 60, 0., 300.,8,0.5,8.5);
 812   fNChTrRecPerpECorrPPMult->GetXaxis()->SetTitle("NTracks_Corrected");
 813   fNChTrRecPerpECorrPPMult->GetYaxis()->SetTitle("p_{T}^{JET}");
 814   fNChTrRecPerpECorrPPMult->GetZaxis()->SetTitle("Multiplicity Bin");
 815   fNChTrRecPerpECorrPPMult->Sumw2();
 816   fOutputList->Add(fNChTrRecPerpECorrPPMult);
 817
 818   fJetPtCentPbPbRaw = new TH2F("fJetPtCentPbPbRaw", "raw p_{T} distribution of reco jets", 60, 0., 300.,10,0.5,10.5);
 819   fJetPtCentPbPbRaw->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 820   fJetPtCentPbPbRaw->GetYaxis()->SetTitle("Selection Bin");
 821   fJetPtCentPbPbRaw->Sumw2();
 822   fOutputList->Add(fJetPtCentPbPbRaw);
 823
 824   fJetPtCentPbPbCorr = new TH2F("fJetPtCentPbPbCorr", "Corrected p_{T} distribution of reco jets", 60, 0., 300.,10,0.5,10.5);
 825   fJetPtCentPbPbCorr->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 826   fJetPtCentPbPbCorr->GetYaxis()->SetTitle("Selection Bin");
 827   fJetPtCentPbPbCorr->Sumw2();
 828   fOutputList->Add(fJetPtCentPbPbCorr);
 829
 830   fTotTracksCone = new TH3F("fTotTracksCone","Total number of tracks in the cone, raw jet pT bin, centrality", 200, 0.5, 200.5, 8, 0.5, 8.5, 10, 0.5, 10.5);
 831   fTotTracksCone->GetXaxis()->SetTitle("NTracks");
 832   fTotTracksCone->GetYaxis()->SetTitle("p_{T}^{JET} Bin");
 833   fTotTracksCone->GetZaxis()->SetTitle("Centrality Bin");
 834   fTotTracksCone->Sumw2();
 835   fOutputList->Add(fTotTracksCone);
 836
 837   for(Int_t ipt=0;ipt<12;ipt++)
 838     {
 839       fNChTr[ipt] = new TH2F(Form("fNChTr[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}}",101,-0.5,100.5, 60, 0., 300.);
 840       fNChTr[ipt]->GetXaxis()->SetTitle("NTracks");
 841       fNChTr[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 842       fNChTr[ipt]->Sumw2();
 843       fOutputList->Add(fNChTr[ipt]);
 844
 845       fHistPtParton[ipt] = new TH1F(Form("fHistPtParton[%i]",ipt),"pT distribution of jets",50,0.,250.);
 846       fHistPtParton[ipt]->GetXaxis()->SetTitle("p_{T}^{JET}");
 847       fHistPtParton[ipt]->GetYaxis()->SetTitle("Entries");
 848       fHistPtParton[ipt]->Sumw2();
 849       fOutputList->Add(fHistPtParton[ipt]);
 850
 851       fSCM[ipt] = new TH2F(Form("fSCM[%i]",ipt),"Second Central Moment, jet_{p_{T}}",200,0.,0.2, 60, 0., 300.);
 852       fSCM[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 853       fSCM[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 854       fSCM[ipt]->Sumw2();
 855       fOutputList->Add(fSCM[ipt]);
 856
 857       if(ipt<8)
 858         {
 859           fNChTrRDMult[ipt] = new TH2F(Form("fNChTrRDMult[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}}",101,-0.5,100.5, 60, 0., 300.);
 860           fNChTrRDMult[ipt]->GetXaxis()->SetTitle("NTracks");
 861           fNChTrRDMult[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 862           fNChTrRDMult[ipt]->Sumw2();
 863           fOutputList->Add(fNChTrRDMult[ipt]);
 864
 865           fNAccJetsRDMult[ipt] = new TH1F(Form("fNAccJetsRDMult[%i]",ipt),"Number of accepted jets per event in real data", 101, -0.5, 100.5);
 866           fNAccJetsRDMult[ipt]->GetXaxis()->SetTitle("Number of jets");
 867           fNAccJetsRDMult[ipt]->Sumw2();
 868           fOutputList->Add(fNAccJetsRDMult[ipt]);
 869
 870           fTotalJetCharge[ipt] = new TH1F(Form("fTotalJetCharge[%i]",ipt),"Charge in the jet", 41, -20.5, 20.5);
 871           fTotalJetCharge[ipt]->GetXaxis()->SetTitle("Charge in jet");
 872           fTotalJetCharge[ipt]->Sumw2();
 873           fOutputList->Add(fTotalJetCharge[ipt]);
 874
 875           fSCMRDMult[ipt] = new TH2F(Form("fSCMRDMult[%i]",ipt),"Second Central Moment, jet_{p_{T}}",200,0.,0.2, 60, 0., 300.);
 876           fSCMRDMult[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 877           fSCMRDMult[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 878           fSCMRDMult[ipt]->Sumw2();
 879           fOutputList->Add(fSCMRDMult[ipt]);
 880
 881           fNChTrRDMultMC[ipt] = new TH2F(Form("fNChTrRDMultMC[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}}",101,-0.5,100.5, 60, 0., 300.);
 882           fNChTrRDMultMC[ipt]->GetXaxis()->SetTitle("NTracks");
 883           fNChTrRDMultMC[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 884           fNChTrRDMultMC[ipt]->Sumw2();
 885           fOutputList->Add(fNChTrRDMultMC[ipt]);
 886
 887           fSCMRDMultMC[ipt] = new TH2F(Form("fSCMRDMultMC[%i]",ipt),"Second Central Moment, jet_{p_{T}}",200,0.,0.2, 60, 0., 300.);
 888           fSCMRDMultMC[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 889           fSCMRDMultMC[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 890           fSCMRDMultMC[ipt]->Sumw2();
 891           fOutputList->Add(fSCMRDMultMC[ipt]);
 892
 893           //Second multiplicity estimator, removing jets and an area
 894           fNChTrRDMultSE[ipt] = new TH2F(Form("fNChTrRDMultSE[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}}",101,-0.5,100.5, 60, 0., 300.);
 895           fNChTrRDMultSE[ipt]->GetXaxis()->SetTitle("NTracks");
 896           fNChTrRDMultSE[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 897           fNChTrRDMultSE[ipt]->Sumw2();
 898           fOutputList->Add(fNChTrRDMultSE[ipt]);
 899
 900           fNAccJetsRDMultSE[ipt] = new TH1F(Form("fNAccJetsRDMultSE[%i]",ipt),"Number of accepted jets per event in real data", 101, -0.5, 100.5);
 901           fNAccJetsRDMultSE[ipt]->GetXaxis()->SetTitle("Number of jets");
 902           fNAccJetsRDMultSE[ipt]->Sumw2();
 903           fOutputList->Add(fNAccJetsRDMultSE[ipt]);
 904
 905           fTotalJetChargeSE[ipt] = new TH1F(Form("fTotalJetChargeSE[%i]",ipt),"Charge in the jet", 41, -20.5, 20.5);
 906           fTotalJetChargeSE[ipt]->GetXaxis()->SetTitle("Charge in jet");
 907           fTotalJetChargeSE[ipt]->Sumw2();
 908           fOutputList->Add(fTotalJetChargeSE[ipt]);
 909
 910           fSCMRDMultSE[ipt] = new TH2F(Form("fSCMRDMultSE[%i]",ipt),"Second Central Moment, jet_{p_{T}}",200,0.,0.2, 60, 0., 300.);
 911           fSCMRDMultSE[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 912           fSCMRDMultSE[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 913           fSCMRDMultSE[ipt]->Sumw2();
 914           fOutputList->Add(fSCMRDMultSE[ipt]);
 915
 916           fNChTrRDMultOJ[ipt] = new TH2F(Form("fNChTrRDMultOJ[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}, 1 jet}",101,-0.5,100.5, 60, 0., 300.);
 917           fNChTrRDMultOJ[ipt]->GetXaxis()->SetTitle("NTracks");
 918           fNChTrRDMultOJ[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 919           fNChTrRDMultOJ[ipt]->Sumw2();
 920           fOutputList->Add(fNChTrRDMultOJ[ipt]);
 921
 922           fSCMRDMultOJ[ipt] = new TH2F(Form("fSCMRDMultOJ[%i]",ipt),"Second Central Moment, jet_{p_{T}}, 1 jet",200,0.,0.2, 60, 0., 300.);
 923           fSCMRDMultOJ[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 924           fSCMRDMultOJ[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 925           fSCMRDMultOJ[ipt]->Sumw2();
 926           fOutputList->Add(fSCMRDMultOJ[ipt]);
 927
 928           fNChTrRDMultSEOJ[ipt] = new TH2F(Form("fNChTrRDMultSEOJ[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}}, 1 jet",101,-0.5,100.5, 60, 0., 300.);
 929           fNChTrRDMultSEOJ[ipt]->GetXaxis()->SetTitle("NTracks");
 930           fNChTrRDMultSEOJ[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 931           fNChTrRDMultSEOJ[ipt]->Sumw2();
 932           fOutputList->Add(fNChTrRDMultSEOJ[ipt]);
 933
 934           fSCMRDMultSEOJ[ipt] = new TH2F(Form("fSCMRDMultSEOJ[%i]",ipt),"Second Central Moment, jet_{p_{T}}, 1 jet",200,0.,0.2, 60, 0., 300.);
 935           fSCMRDMultSEOJ[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 936           fSCMRDMultSEOJ[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 937           fSCMRDMultSEOJ[ipt]->Sumw2();
 938           fOutputList->Add(fSCMRDMultSEOJ[ipt]);
 939
 940           fNChTrRDMultOJMC[ipt] = new TH2F(Form("fNChTrRDMultOJMC[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}, 1 jet, MC}",101,-0.5,100.5, 60, 0., 300.);
 941           fNChTrRDMultOJMC[ipt]->GetXaxis()->SetTitle("NTracks");
 942           fNChTrRDMultOJMC[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 943           fNChTrRDMultOJMC[ipt]->Sumw2();
 944           fOutputList->Add(fNChTrRDMultOJMC[ipt]);
 945
 946           fSCMRDMultOJMC[ipt] = new TH2F(Form("fSCMRDMultOJMC[%i]",ipt),"Second Central Moment, jet_{p_{T}}, 1 jet, MC",200,0.,0.2, 60, 0., 300.);
 947           fSCMRDMultOJMC[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 948           fSCMRDMultOJMC[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 949           fSCMRDMultOJMC[ipt]->Sumw2();
 950           fOutputList->Add(fSCMRDMultOJMC[ipt]);
 951
 952           fNChTrRDMultSEOJMC[ipt] = new TH2F(Form("fNChTrRDMultSEOJMC[%i]",ipt),"Number of tracks to recover transverse energy, jet_{p_{T}}, 1 jet, MC",101,-0.5,100.5, 60, 0., 300.);
 953           fNChTrRDMultSEOJMC[ipt]->GetXaxis()->SetTitle("NTracks");
 954           fNChTrRDMultSEOJMC[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 955           fNChTrRDMultSEOJMC[ipt]->Sumw2();
 956           fOutputList->Add(fNChTrRDMultSEOJMC[ipt]);
 957
 958           fSCMRDMultSEOJMC[ipt] = new TH2F(Form("fSCMRDMultSEOJMC[%i]",ipt),"Second Central Moment, jet_{p_{T}}, 1 jet, MC",200,0.,0.2, 60, 0., 300.);
 959           fSCMRDMultSEOJMC[ipt]->GetXaxis()->SetTitle("<#delta R_{c}^{2}>");
 960           fSCMRDMultSEOJMC[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 961           fSCMRDMultSEOJMC[ipt]->Sumw2();
 962           fOutputList->Add(fSCMRDMultSEOJMC[ipt]);
 963
 964           fNChTrRecPerpMultSEOJ[ipt] = new TH2F(Form("fNChTrRecPerpMultSEOJ[%i]",ipt),"Number of tracks above the min pT used in NTX_Raw, jet_{p_{T}}, 1 jet",101,-0.5,100.5, 60, 0., 300.);
 965           fNChTrRecPerpMultSEOJ[ipt]->GetXaxis()->SetTitle("NTracks_{Exc.}");
 966           fNChTrRecPerpMultSEOJ[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
 967           fNChTrRecPerpMultSEOJ[ipt]->Sumw2();
 968           fOutputList->Add(fNChTrRecPerpMultSEOJ[ipt]);
 969
 970           fJEtaMCMultOJ[ipt] = new TH1F(Form("fJEtaMCMultOJ[%i]",ipt), "Eta distribution of MC jets, V0-like mult. bins, 1 jet", 50, -1.5, 1.5);
 971           fJEtaMCMultOJ[ipt]->GetXaxis()->SetTitle("#eta");
 972           fJEtaMCMultOJ[ipt]->GetYaxis()->SetTitle("entries");
 973           fJEtaMCMultOJ[ipt]->Sumw2();
 974           fOutputList->Add(fJEtaMCMultOJ[ipt]);
 975
 976           fJEtaMCMultSEOJ[ipt] = new TH1F(Form("fJEtaMCMultSEOJ[%i]",ipt), "Eta distribution of MC jets, TPC-like mult. bins, 1 jet", 50, -1.5, 1.5);
 977           fJEtaMCMultSEOJ[ipt]->GetXaxis()->SetTitle("#eta");
 978           fJEtaMCMultSEOJ[ipt]->GetYaxis()->SetTitle("entries");
 979           fJEtaMCMultSEOJ[ipt]->Sumw2();
 980           fOutputList->Add(fJEtaMCMultSEOJ[ipt]);
 981
 982           fJEtaRDMultOJ[ipt] = new TH1F(Form("fJEtaRDMultOJ[%i]",ipt), "Eta distribution of reco jets, V0 mult. bins, 1 jet", 50, -1.5, 1.5);
 983           fJEtaRDMultOJ[ipt]->GetXaxis()->SetTitle("#eta");
 984           fJEtaRDMultOJ[ipt]->GetYaxis()->SetTitle("entries");
 985           fJEtaRDMultOJ[ipt]->Sumw2();
 986           fOutputList->Add(fJEtaRDMultOJ[ipt]);
 987
 988           fJEtaRDMultSEOJ[ipt] = new TH1F(Form("fJEtaRDMultSEOJ[%i]",ipt), "Eta distribution of reco jets, TPC mult. bins, 1 jet", 50, -1.5, 1.5);
 989           fJEtaRDMultSEOJ[ipt]->GetXaxis()->SetTitle("#eta");
 990           fJEtaRDMultSEOJ[ipt]->GetYaxis()->SetTitle("entries");
 991           fJEtaRDMultSEOJ[ipt]->Sumw2();
 992           fOutputList->Add(fJEtaRDMultSEOJ[ipt]);
 993
 994           fJetPtMCMultOJ[ipt] = new TH1F(Form("fJetPtMCMultOJ[%i]",ipt), "pT distribution of MC jets, V0-like mult. bins, 1 jet", 60, 0., 300.);
 995           fJetPtMCMultOJ[ipt]->GetXaxis()->SetTitle("p_{T} (GeV/c)");
 996           fJetPtMCMultOJ[ipt]->GetYaxis()->SetTitle("entries");
 997           fJetPtMCMultOJ[ipt]->Sumw2();
 998           fOutputList->Add(fJetPtMCMultOJ[ipt]);
 999
1000           fJetPtMCMultSEOJ[ipt] = new TH1F(Form("fJetPtMCMultSEOJ[%i]",ipt), "pT distribution of MC jets, TPC-like mult. bins, 1 jet", 60, 0., 300.);
1001           fJetPtMCMultSEOJ[ipt]->GetXaxis()->SetTitle("p_{T} (GeV/c)");
1002           fJetPtMCMultSEOJ[ipt]->GetYaxis()->SetTitle("entries");
1003           fJetPtMCMultSEOJ[ipt]->Sumw2();
1004           fOutputList->Add(fJetPtMCMultSEOJ[ipt]);
1005
1006           fJetPtRDMultOJ[ipt] = new TH1F(Form("fJetPtRDMultOJ[%i]",ipt), "pT distribution of reco jets, V0 mult. bins, 1 jet", 60, 0., 300.);
1007           fJetPtRDMultOJ[ipt]->GetXaxis()->SetTitle("p_{T} (GeV/c)");
1008           fJetPtRDMultOJ[ipt]->GetYaxis()->SetTitle("entries");
1009           fJetPtRDMultOJ[ipt]->Sumw2();
1010           fOutputList->Add(fJetPtRDMultOJ[ipt]);
1011
1012           fJetPtRDMultSEOJ[ipt] = new TH1F(Form("fJetPtRDMultSEOJ[%i]",ipt), "pT distribution of reco jets, TPC mult. bins, 1 jet", 60, 0., 300.);
1013           fJetPtRDMultSEOJ[ipt]->GetXaxis()->SetTitle("p_{T} (GeV/c)");
1014           fJetPtRDMultSEOJ[ipt]->GetYaxis()->SetTitle("entries");
1015           fJetPtRDMultSEOJ[ipt]->Sumw2();
1016           fOutputList->Add(fJetPtRDMultSEOJ[ipt]);
1017
1018           fEntriesQuark[ipt] = new TH2F(Form("fEntriesQuark[%i]",ipt),"NTX of quarks in multiplicity bins, 1 jet, MC",101,-0.5,100.5, 60, 0., 300.);
1019           fEntriesQuark[ipt]->GetXaxis()->SetTitle("NTracks");
1020           fEntriesQuark[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
1021           fEntriesQuark[ipt]->Sumw2();
1022           fOutputList->Add(fEntriesQuark[ipt]);
1023
1024           fEntriesGluon[ipt] = new TH2F(Form("fEntriesGluon[%i]",ipt),"NTX of gluons in multiplicity bins, 1 jet, MC",101,-0.5,100.5, 60, 0., 300.);
1025           fEntriesGluon[ipt]->GetXaxis()->SetTitle("NTracks");
1026           fEntriesGluon[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
1027           fEntriesGluon[ipt]->Sumw2();
1028           fOutputList->Add(fEntriesGluon[ipt]);
1029         } // end if <8
1030
1031       if(ipt<6)  // only entries for reconstructed || simulated jets
1032         {
1033           fProcessPDG[ipt] = new TH2I(Form("fProcessPDG[%i]",ipt),"Pythia process and jet p_T", 60, 0., 300., 70, 0.5, 70.5);
1034           fProcessPDG[ipt]->GetXaxis()->SetTitle("p_{T}^{JET}");
1035           fProcessPDG[ipt]->GetYaxis()->SetTitle("Pythia process code");
1036           fProcessPDG[ipt]->Sumw2();
1037           fOutputList->Add(fProcessPDG[ipt]);
1038
1039           fFragPion[ipt] = new TH2F(Form("fFragPion[%i]",ipt),"Fragmentation in pions",35,0.,8.,50,0.,250.);
1040           fFragPion[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1041           fFragPion[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1042           fFragPion[ipt]->Sumw2();
1043           fOutputList->Add(fFragPion[ipt]);
1044
1045           fFragKaon[ipt] = new TH2F(Form("fFragKaon[%i]",ipt),"Fragmentation in kaons",35,0.,8.,50,0.,250.);
1046           fFragKaon[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1047           fFragKaon[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1048           fFragKaon[ipt]->Sumw2();
1049           fOutputList->Add(fFragKaon[ipt]);
1050
1051           fFragProton[ipt] = new TH2F(Form("fFragProton[%i]",ipt),"Fragmentation in protons",35,0.,8.,50,0.,250.);
1052           fFragProton[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1053           fFragProton[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1054           fFragProton[ipt]->Sumw2();
1055           fOutputList->Add(fFragProton[ipt]);
1056
1057           fFragChargedR4[ipt] = new TH2F(Form("fFragChargedR4[%i]",ipt),"Fragmentation in charged particles",35,0.,8.,50,0.,250.);
1058           fFragChargedR4[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1059           fFragChargedR4[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1060           fFragChargedR4[ipt]->Sumw2();
1061           fOutputList->Add(fFragChargedR4[ipt]);
1062
1063           fFragChargedR3[ipt] = new TH2F(Form("fFragChargedR3[%i]",ipt),"Fragmentation in charged particles",35,0.,8.,50,0.,250.);
1064           fFragChargedR3[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1065           fFragChargedR3[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1066           fFragChargedR3[ipt]->Sumw2();
1067           fOutputList->Add(fFragChargedR3[ipt]);
1068
1069           fFragChargedR2[ipt] = new TH2F(Form("fFragChargedR2[%i]",ipt),"Fragmentation in charged particles",35,0.,8.,50,0.,250.);
1070           fFragChargedR2[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1071           fFragChargedR2[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1072           fFragChargedR2[ipt]->Sumw2();
1073           fOutputList->Add(fFragChargedR2[ipt]);
1074
1075           // do not add the temporary containers
1076           fHistContainerR4[ipt] = new TH2F(Form("fHistContainerR4[%i]",ipt),"Temporary fragmentation in charged particles",35,0.,8.,50,0.,250.);
1077           fHistContainerR4[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1078           fHistContainerR4[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1079           fHistContainerR4[ipt]->Sumw2();
1080
1081           fHistContainerR3[ipt] = new TH2F(Form("fHistContainerR3[%i]",ipt),"Temporary fragmentation in charged particles",35,0.,8.,50,0.,250.);
1082           fHistContainerR3[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1083           fHistContainerR3[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1084           fHistContainerR3[ipt]->Sumw2();
1085
1086           fHistContainerR2[ipt] = new TH2F(Form("fHistContainerR2[%i]",ipt),"Temporary fragmentation in charged particles",35,0.,8.,50,0.,250.);
1087           fHistContainerR2[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1088           fHistContainerR2[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1089           fHistContainerR2[ipt]->Sumw2();
1090
1091           if(ipt<3)
1092             {
1093               fJetEtaJetPt[ipt] = new TH1F(Form("fJetEtaJetPt[%i]",ipt), "Eta distribution of reconstructed jets, all cut, with pT upper boundary", 50, -1.5, 1.5);
1094               fJetEtaJetPt[ipt]->GetXaxis()->SetTitle("#eta");
1095               fJetEtaJetPt[ipt]->GetYaxis()->SetTitle("entries");
1096               fJetEtaJetPt[ipt]->Sumw2();
1097               fOutputList->Add(fJetEtaJetPt[ipt]);
1098
1099               if(ipt<2)
1100                 {
1101                   fFragCandidates[ipt] = new TH2F(Form("fFragCandidates[%i]",ipt),"Parton identified candidates",35,0.,8.,50,0.,250.);
1102                   fFragCandidates[ipt]->GetXaxis()->SetTitle("#xi=ln[Jet_{E_{T}}/H_{p_{T}}]");
1103                   fFragCandidates[ipt]->GetYaxis()->SetTitle("Jet_{E_{T}}");
1104                   fFragCandidates[ipt]->Sumw2();
1105                   fOutputList->Add(fFragCandidates[ipt]);
1106
1107                   fMinTrackPtInNTXh[ipt] = new TH3F(Form("fMinTrackPtInNTXh[%i]",ipt), "Minimum track pT for the jets", 200, 0., 100., 60, 0., 300.,10,0.5,10.5);
1108                   fMinTrackPtInNTXh[ipt]->GetXaxis()->SetTitle("p_{T}^{TRACK}");
1109                   fMinTrackPtInNTXh[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
1110                   fMinTrackPtInNTXh[ipt]->GetZaxis()->SetTitle("Selection Bin"); //9 selection bins as fNChTrRecECorr
1111                   fMinTrackPtInNTXh[ipt]->Sumw2();
1112                   fOutputList->Add(fMinTrackPtInNTXh[ipt]);
1113
1114                   fMaxTrackPtInNTXh[ipt] = new TH2F(Form("fMaxTrackPtInNTXh[%i]",ipt), "Maximum track pT for the jets", 200, 0., 100., 60, 0., 300.);
1115                   fMaxTrackPtInNTXh[ipt]->GetXaxis()->SetTitle("p_{T}^{TRACK}");
1116                   fMaxTrackPtInNTXh[ipt]->GetYaxis()->SetTitle("p_{T}^{JET}");
1117                   fMaxTrackPtInNTXh[ipt]->Sumw2();
1118                   fOutputList->Add(fMaxTrackPtInNTXh[ipt]);
1119                 } // index < 2
1120             } // index < 3
1121         } // index < 6
1122     } // index < 12
1123
1124   fPerpCone = new AliAODJet();
1125   fBckgSbsJet = new Double_t[3];
1126
1127   PostData(1, fOutputList); // Post data for ALL output slots >0 here, to get at least an empty histogram
1128 }
1129
1130 //________________________________________________________________________
1131 void AliAnalysisTaskPartonDisc::UserExec(Option_t *)
1132 {
1133   // Main loop
1134   // Called for each event
1135
1136   //  fAOD
1137   if(fUseAODJetInput)
1138     {
1139       fAOD = dynamic_cast<AliAODEvent*>(InputEvent());
1140       if(!fAOD)
1141         {
1142           Printf("%s:%d AODEvent not found in Input Manager %d",(char*)__FILE__,__LINE__,fUseAODJetInput);
1143           return;
1144         }
1145       // fetch the header
1146     }
1147   else
1148     {
1149       //  assume that the AOD is in the general output...
1150       fAOD  = AODEvent();
1151       if(!fAOD)
1152         {
1153           Printf("%s:%d AODEvent not found in the Output",(char*)__FILE__,__LINE__);
1154           return;
1155         }
1156     }
1157
1158   // fin de test para fAOD
1159
1160   if(!fInputEvent)
1161     {
1162       Error("UserExec","No event found!");
1163       return;
1164     }
1165
1166   AliAODHandler *aodHandler = (AliAODHandler*) ((AliAnalysisManager::GetAnalysisManager())->GetInputEventHandler());
1167   if(!aodHandler)
1168     {
1169       AliError("No AOD Handler!");
1170       return;
1171     }
1172
1173   fEventCent=900; //dummy val for debugging
1174
1175   if(fIsHIevent)
1176     {
1177       AliAODHeader *aodHeader = fAOD->GetHeader();
1178       fEventCent = aodHeader->GetCentrality();
1179     }
1180
1181   // Random number generator seeded per event
1182   TDatime dt;
1183   UInt_t curtime = dt.Get();
1184   UInt_t procid = gSystem->GetPid();
1185   UInt_t seed = curtime-procid;
1186   gRandom->SetSeed(seed);
1187
1188   // Jet eta exclusion
1189   if(fIncreasingExcl)
1190     fJetAcceptance = 0.5 - fIncExcR; // if the increase is 0.1 -> only jets within |eta|<0.4
1191
1192   // First test of reference multiplicity
1193   Int_t refMultiplicity = fAOD->GetHeader()->GetRefMultiplicity();
1194   fRefMult->Fill(refMultiplicity);
1195
1196   // Multiplicity from V0 (V0A+V0C)
1197   fVZero = fAOD->GetVZEROData();
1198   Float_t multV0A = 0.0;
1199   Float_t multV0C = 0.0;
1200   Float_t multFullV0 = 0.0;
1201   if(fVZero)
1202     {
1203       multV0A = fVZero->GetMTotV0A();
1204       multV0C = fVZero->GetMTotV0C();
1205       multFullV0 = multV0A+multV0C;
1206     }
1207   fVZEROMult->Fill(multV0A,multV0C);
1208
1209   fEvtCount++;
1210   Double_t jfr = fJetRadius;   // radius used during jet finding
1211   Int_t ntx = fNtX;   // NTX value
1212   const Int_t maxJetNum=6; // maximum number of generated jets to process
1213   AliAODJet genJets[6];  // containers for the
1214   AliAODJet recJets[6];  // correlation gen-reco
1215   Int_t nGenJets=0;
1216   Int_t nRecJets=0;
1217   Int_t genJetsFlavor[6]={0};    // flavor of the generated jets
1218   Int_t evtype = 0; //pythia event type
1219   // Variables para la variable de estructura
1220   Double_t deltaPhiPt = 0.0;
1221   Double_t deltaEtaPt = 0.0;
1222   Double_t deltaPhiSqPt = 0.0;
1223   Double_t deltaEtaSqPt = 0.0;
1224   Double_t totalTrackPt = 0.0;
1225   Double_t firstMomDeltPhi = 0.0;
1226   Double_t firstMomDeltEta = 0.0;
1227   Double_t secondMomDeltPhi = 0.0;
1228   Double_t secondMomDeltEta = 0.0;
1229   Double_t secondCentralPhi = 0.0;
1230   Double_t secondCentralEta = 0.0;
1231   Double_t secondCentralR = 0.0;
1232
1233   // Variables para la variable de estructura
1234   // del cono perpendicular
1235   Double_t deltaPhiPtPerp = 0.0;
1236   Double_t deltaEtaPtPerp = 0.0;
1237   Double_t deltaPhiSqPtPerp = 0.0;
1238   Double_t deltaEtaSqPtPerp = 0.0;
1239   Double_t totalTrackPtPerp = 0.0;
1240   Double_t firstMomDeltPhiPerp = 0.0;
1241   Double_t firstMomDeltEtaPerp = 0.0;
1242   Double_t secondMomDeltPhiPerp = 0.0;
1243   Double_t secondMomDeltEtaPerp = 0.0;
1244   Double_t secondCentralPhiPerp = 0.0;
1245   Double_t secondCentralEtaPerp = 0.0;
1246   Double_t secondCentralRPerp = 0.0;
1247
1248   Double_t perpendicularPt;
1249   Float_t px,py,pz,en; // jet 4-vector à la UA1
1250   Float_t pTbs, etabs, phibs; // energy corrected jet properties
1251
1252   // Process the MC info from the AOD
1253   if(fUseAODMC)
1254     {
1255       // Get the MC array
1256       TClonesArray *mcarray = dynamic_cast<TClonesArray*>(fAOD->FindListObject(AliAODMCParticle::StdBranchName()));
1257       if(!mcarray)
1258         {
1259           AliError("ERROR:No MC info in the AOD input");
1260           return;
1261         }
1262
1263       AliMCEvent* mcEvent = MCEvent();
1264       if(mcEvent)
1265         {
1266           if(!fPhojetMC) // if it is pythia
1267             evtype = GetMCEventType(mcEvent);
1268           // From pythia 6.2 manual pp 414
1269           // QCD Hard Processes
1270           // 11 f_{i}+f_{j} -> f_{i}+f_{j} com77, ben84, eic84, chi90
1271           // 12 f_{i}+barf_{i} -> f_{k}+barf_{k}
1272           // 13 f_{i}+barf_{i} -> g+g
1273           // 28 f_{i}+g -> f_{i}+g
1274           // 53 g+g -> f_{k}+barf_{k}
1275           // 68 g+g -> g+g
1276           if(fPhojetMC) // if it is phojet
1277             evtype = GetPhojetEventType(mcEvent);
1278         }
1279       if(!mcEvent) // if a pure AOD event
1280         {
1281           AliDebug(2,Form("%s:%d No MCEvent \n",(char*)__FILE__,__LINE__));
1282           AliDebug(2,Form("Trying to get the MC header \n"));
1283           AliAODMCHeader *genEvH = static_cast<AliAODMCHeader*>(fAOD->FindListObject("mcHeader"));
1284           if(!genEvH)
1285             {
1286               AliDebug(2,Form(" %s:%d No Pythia header!",(char*)__FILE__,__LINE__));
1287               evtype = 0;
1288             }
1289           if(genEvH)
1290             evtype = genEvH->GetEventType();
1291         }
1292       // Get the branch with the MC jets
1293       TClonesArray *aodMCJets = dynamic_cast<TClonesArray*>(fAOD->FindListObject(fBranchMC.Data()));
1294       if(!aodMCJets)
1295         {
1296           AliDebug(2,Form("%s:%d no MC Jet array with name %s in AOD",(char*)__FILE__,__LINE__,fBranchMC.Data()));
1297           return;
1298         }
1299       AliDebug(2,Form("There are %d MC jets in this event\n", aodMCJets->GetEntries()));
1300       Int_t mcjets =  aodMCJets->GetEntries();
1301       fNJetsMC->Fill(mcjets,mcjets); // number of jets FROM the branch, filled per event, this gives the event normalization...
1302       HasOverlapedCones(aodMCJets); // Procedure for tagging usable jets
1303                                     // Up 16 jets are flagged
1304
1305       // Loop over AODMC physical primary charged particles
1306       // for the complete event
1307       Int_t tracksMC = mcarray->GetEntriesFast();
1308       AliDebug(2,Form("There are %i tracks in the mcarray",tracksMC));
1309       Double_t aodMCTrackEta = 0.0;
1310       perpendicularPt = 0.0;
1311       px=0.0;
1312       py=0.0;
1313       pz=0.0;
1314       en=0.0;
1315       pTbs=0.0;
1316       etabs=0.0;
1317       phibs=0.0;
1318       fBckgSbsJet[0]=0.0;
1319       fBckgSbsJet[1]=0.0;
1320       fBckgSbsJet[2]=0.0;
1321       Int_t softRefMcNoJets = 0;
1322       Int_t myTotalMultiplicityMc = 0;
1323       Int_t v0LikeTotalMcMult = 0;
1324       Double_t randomNum = 0.;
1325       for(Int_t aodMCTrack = 0; aodMCTrack < tracksMC; aodMCTrack++ )
1326         {
1327           AliAODMCParticle *mctrackf = (AliAODMCParticle*) mcarray->At(aodMCTrack);
1328           if(!mctrackf) continue;
1329           if(!mctrackf->IsPhysicalPrimary()) continue;
1330           if(mctrackf->Charge()==0||mctrackf->Charge()==-99) continue;
1331           randomNum = gRandom->Rndm();
1332           if(randomNum<fTTrackRandomRejection) continue; //rechaza fTTrackRandomRejection
1333
1334           //Lo del V0, voy a contar particulas primarias cargadas
1335           if(mctrackf->Pt()>fMinpTValMC) // cut off en MC para MIPs
1336             {
1337               //V0A
1338               if(((mctrackf->Eta())>(2.8))&&((mctrackf->Eta())<(5.1)))
1339                 v0LikeTotalMcMult++;
1340               //V0C
1341               if(((mctrackf->Eta())>(-3.7))&&((mctrackf->Eta())<(-1.7)))
1342                 v0LikeTotalMcMult++;
1343             }
1344           //Fin de lo del V0
1345           aodMCTrackEta = TMath::Abs(mctrackf->Eta());
1346           if(aodMCTrackEta>0.9) continue;
1347           fPtAODMC->Fill(mctrackf->Pt(),mctrackf->Pt());
1348           fEtaAODMC->Fill(mctrackf->Eta(),mctrackf->Eta());
1349           fPhiAODMC->Fill(mctrackf->Phi(),mctrackf->Phi());
1350           if(fJetEvent) // if has an accepted jet, calculate the perpendicular cone
1351             {
1352               if(HasPerpendicularCone()) // If there is a perpendicular cone available
1353                 {
1354                   if(mctrackf->Pt()>fMinpTVal)
1355                     {
1356                     if(GetDeltaR(fEtaPerpCoord,fPhiPerpCoord,mctrackf->Eta(),mctrackf->Phi())<fJetRadius)
1357                       perpendicularPt = perpendicularPt + mctrackf->Pt();
1358                     }
1359                 }
1360             } // end IF jet event
1361           if(mctrackf->Pt()>fMinPtInGlobMult) // Min pT used in multiplicity estimation
1362             {
1363               myTotalMultiplicityMc++; // total multiplicity TPC like
1364               if(mctrackf->Pt()<fMinpTValUE) continue; // pT cut  fMinpTValUE
1365               if(mctrackf->Pt()>fMaxpTValUE) continue; // pT cut  fMaxpTValUE
1366               if(!IsTrackInsideExcludedArea(mctrackf->Eta(), mctrackf->Phi(), aodMCJets))
1367                 softRefMcNoJets++;
1368             }
1369         } // end loop over particles
1370
1371       Int_t correctedV0LikeMult= v0LikeTotalMcMult-GetV0LikeExcludedMultMC(aodMCJets,mcarray);
1372
1373       //estimadores
1374       if(mcjets==1) // correlation for only monojet events
1375         {
1376           fFullV0V0CorrUJMC->Fill(v0LikeTotalMcMult,correctedV0LikeMult);
1377           fTrackCountWOJetUJMC->Fill(myTotalMultiplicityMc,softRefMcNoJets);
1378         }
1379
1380       if(fJetEvent) // if has an accepted jet, calculate the perpendicular cone
1381         {
1382           if(HasPerpendicularCone()) // If there is a perpendicular cone available
1383             {
1384               px = perpendicularPt*TMath::Cos(fPhiPerpCoord);
1385               py = perpendicularPt*TMath::Sin(fPhiPerpCoord);
1386               pz = perpendicularPt/TMath::Tan(2.0*TMath::ATan(TMath::Exp(-fEtaPerpCoord)));
1387               en = TMath::Sqrt(px*px + py*py + pz*pz);
1388               fPerpCone->SetPxPyPzE(px, py, pz, en);
1389             }
1390           if(!HasPerpendicularCone())
1391             AliDebug(2,"No perpendicular cone!!!");
1392         }
1393
1394
1395       fh1Trials->Fill("#sum{ntrials}",fAvgTrials);
1396
1397       Int_t flavor = 0;     // flavor of the jet
1398       Int_t nTracksPerc;    // ntx for the original jet
1399       Int_t nTracksPercBckgSubst;  // ntx for the energy corrected jet
1400       Double_t jetPt=0;
1401       Int_t pdgOfMCt;
1402       Float_t trackxi;
1403       Double_t jetXt;
1404       Double_t jetPts[7]={0};  // to store the pt of the jets
1405       Int_t mcJetCounter=0;    // counter of MC jets
1406       Int_t nTracksAboveThresholdPerp=0;  // n tracks of the perpendicular cone
1407       Int_t nTrUpThrPerpBckSubs=0;  // n tracks of the perpendicular cone, after the minimum pT recalculation
1408       fIsPossibleToSubstBckg = kTRUE; // Initialize before the loop
1409       if(fJetEvent) // si tiene jets validos
1410         {
1411           if(!HasPerpendicularCone()) // pero no encontro un cono perpendicular libre
1412             fIsPossibleToSubstBckg = kFALSE; // if not perpendicular cone, set to kFALSE, so no perpendicular calculations available
1413         }
1414       // Loop to fill a pT spectrum of the mc jets
1415       Int_t imcj=0; // index for montecarlo jets to correlate
1416       for (Int_t indxmc = 0; indxmc < mcjets; indxmc++)
1417         {
1418           AliAODJet *mcjet = dynamic_cast<AliAODJet*>(aodMCJets->At(indxmc));
1419           if (!mcjet)
1420             {
1421               AliDebug(2,Form("ERROR: Could not receive jet %d\n", indxmc));
1422               continue;
1423             }
1424
1425           ///////////////////////////////////////////////////////////////////////////////
1426           ///// Part for Chritians plot of inclusive and leading jets comp at 2.76 TeV //
1427           if(!IsInsideAcceptance(mcjet))  // old condition
1428             continue;
1429           if(indxmc==0) // leading jet
1430             fMCJetPtLeading->Fill(mcjet->Pt());
1431           fMCJetPtInclusive->Fill(mcjet->Pt()); // all
1432           ///// End of Christians Plot MC
1433           ///////////////////////////////////////////////////////////////////////////////
1434
1435           if(indxmc>15)
1436             continue;
1437
1438           if(!fJetFlags[indxmc]) // If the jet is flaged kFALSE, not usable
1439             continue;
1440
1441           //Initialize variables for this jet
1442           //adiciones para la variable de estructura
1443           nTracksPerc = 0;
1444           nTracksPercBckgSubst = 0;
1445           fMinTrackPtInNTX=200.0;  //Initialize for each jet, overflown
1446           fMaxTrackPtInNTX=200.0;  //Initialize for each jet, overflown
1447           fMinTrackPtInNTXR=200.0;  //Initialize for each jet, overflown
1448           fMaxTrackPtInNTXR=200.0;  //Initialize for each jet, overflown
1449           deltaPhiPt = 0.0;
1450           deltaEtaPt = 0.0;
1451           deltaPhiSqPt = 0.0;
1452           deltaEtaSqPt = 0.0;
1453           totalTrackPt = 0.0;
1454           firstMomDeltPhi = 0.0;
1455           firstMomDeltEta = 0.0;
1456           secondMomDeltPhi = 0.0;
1457           secondMomDeltEta = 0.0;
1458           secondCentralPhi = 0.0;
1459           secondCentralEta = 0.0;
1460           secondCentralR = 0.0;
1461
1462           if(imcj<maxJetNum)
1463             genJets[imcj]= *mcjet;
1464           if(mcJetCounter<maxJetNum)
1465             jetPts[mcJetCounter]=mcjet->Pt();
1466           mcJetCounter++;  // number of jets in the acceptance
1467           jetPt = mcjet->Pt();
1468           flavor =  GetJetFlavour(mcjet,tracksMC,mcarray);
1469           if(imcj<maxJetNum)
1470             genJetsFlavor[imcj] = flavor;
1471           fJetPtMC->Fill(mcjet->Pt());
1472           fJetEtaMC->Fill(mcjet->Eta(),mcjet->Eta());
1473           fJetPhiMC->Fill(mcjet->Phi(),mcjet->Phi());
1474           fFlavor->Fill(flavor,jetPt);
1475           AliDebug(4,Form("Sabor del jet con pt=%f es :%d \n",jetPt,flavor));
1476           nTracksPerc = GetNumberOfMcChargedTracks(ntx,mcjet,tracksMC,mcarray,jfr); // este fija el min track pT, si es posible substraer el bckg
1477           if(fIsPossibleToSubstBckg&&!IsEqualRel(fCurrentJetMinPtNT90, 7000.)) //calculating only if there is a perpendicular cone available //IsEqualRel(jetpT, 0.0) //fCurrentJetMinPtNT90!=7000.
1478             {                                                     //and only if the method worked
1479               AliDebug(4,Form("For this jet and I have a perpendicular cone available"));
1480               // Aqui lo que debo contar es el numero de tracks arriba del min pT del jet correspondiente
1481               // que es fCurrentJetMinPtNT90
1482               nTracksAboveThresholdPerp = GetNMcChargedTracksAboveThreshold(fPerpCone,tracksMC,mcarray,jfr);
1483             }
1484           // Corrected jet (pT)
1485           if(fIsPossibleToSubstBckg)   // for the current jet
1486             {
1487               pTbs= mcjet->Pt()-fPerpCone->Pt();
1488               etabs= mcjet->Eta();
1489               phibs= mcjet->Phi();
1490               fBckgSbsJet[0]=pTbs; //pT
1491               fBckgSbsJet[1]=etabs; //eta
1492               fBckgSbsJet[2]=phibs; //phi
1493               // Now re-calculate nt90 for the energy corrected jet
1494               nTracksPercBckgSubst = GetRecalcNTXMc(ntx,mcjet,tracksMC,mcarray,jfr);
1495               // Now re-calculate the perpendicular cone NT90 background
1496               if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.)) //calculating for the current jet, if the previos method worked //!IsEqualRel(fCurrentJetMinPtNT90, 7000.) //fCurrentJetMinPtNT90Recalc!=7000.
1497                 {
1498                   // Aqui lo que debo contar es el numero de tracks arriba del min pT del jet correspondiente
1499                   // despues de la correccion de energia del jet
1500                   nTrUpThrPerpBckSubs = GetRecalcNMcChTrUpThr(fPerpCone,tracksMC,mcarray,jfr);
1501                 }
1502             }
1503
1504           //check cross sections incoming partons
1505           jetXt= 2*jetPt/fSqrts;
1506           if(evtype==11||evtype==12||evtype==13) //QQ
1507             fFracQQ->Fill(jetXt);
1508           if(evtype==28) //GQ
1509             fFracGQ->Fill(jetXt);
1510           if(evtype==53||evtype==68) //GG
1511             fFracGG->Fill(jetXt);
1512
1513           //check cross sections outgoing partons
1514           if(evtype==11||evtype==12||evtype==53) //QQ
1515             fFracOutGoingQQ->Fill(jetXt);
1516           if(evtype==28) //GQ
1517             fFracOutGoingGQ->Fill(jetXt);
1518           if(evtype==13||evtype==68) //GG
1519             fFracOutGoingGG->Fill(jetXt);
1520
1521           fProcessJetPt->Fill(evtype,jetPt);  // pythia process, filled for each jet in acceptance
1522
1523           //Fill jet flavor as a function of pT and the pythia process but only leading jet
1524           if(imcj==0)  //leading jet
1525             {
1526               fFlavorLead->Fill(flavor,jetPt);
1527               fProcessLeadJetPt->Fill(evtype,jetPt);
1528             }
1529           AliDebug(4,Form("Before the check of comparison"));
1530           // To check tracks related to this MC jet
1531           // RefTracks check
1532           Bool_t rTrkFlagMC = kFALSE;
1533           Int_t trkinmcjet = mcjet->GetRefTracks()->GetEntriesFast();
1534           if(trkinmcjet!=0&&!fForceNotTR)
1535             rTrkFlagMC = kTRUE;
1536           AliDebug(4,Form("Number of tracks in RefTracks MC jet:%i \n",trkinmcjet));
1537           if(rTrkFlagMC)  // If there are tracks refs available
1538             {
1539               AliDebug(4,Form("Checking composition in MC with track refs"));
1540               for(Int_t aodMCT = 0; aodMCT < trkinmcjet; aodMCT++ )
1541                 {
1542                   pdgOfMCt=0;
1543                   trackxi=0;
1544                   AliAODMCParticle *mctrack = (AliAODMCParticle*) mcjet->GetRefTracks()->At(aodMCT);
1545                   if(!mctrack) continue;
1546                   if(!mctrack->IsPhysicalPrimary()) continue;
1547                   if(mctrack->Charge()==0||mctrack->Charge()==-99) continue;
1548                   if(mctrack->Pt()<fMinpTVal) continue; // MC no cut in the case of track reference, should be in, NO, cut anyhow to be safe
1549                   randomNum = gRandom->Rndm();
1550                   if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection
1551                   deltaPhiPt += DeltaPhiMC(mcjet, mctrack)*mctrack->Pt();
1552                   deltaEtaPt += DeltaEtaMC(mcjet, mctrack)*mctrack->Pt();
1553                   deltaPhiSqPt += DeltaPhiSqMC(mcjet, mctrack)*mctrack->Pt();
1554                   deltaEtaSqPt += DeltaEtaSqMC(mcjet, mctrack)*mctrack->Pt();
1555                   totalTrackPt += mctrack->Pt();
1556
1557                   pdgOfMCt=abs(mctrack->GetPdgCode());
1558                   if(!IsEqualRel(mctrack->Pt(), 0.0)) //!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.) // mctrack->Pt()!=0
1559                     trackxi= log(jetPt/mctrack->Pt());
1560                   switch(abs(flavor))
1561                     {
1562                     case 1:
1563                       if(pdgOfMCt==321)
1564                         fFragKaon[0]->Fill(trackxi,jetPt);
1565                       if(pdgOfMCt==211)
1566                         fFragPion[0]->Fill(trackxi,jetPt);
1567                       if(pdgOfMCt==2212)
1568                         fFragProton[0]->Fill(trackxi,jetPt);
1569                       break;
1570                     case 2:
1571                       if(pdgOfMCt==321)
1572                         fFragKaon[1]->Fill(trackxi,jetPt);
1573                       if(pdgOfMCt==211)
1574                         fFragPion[1]->Fill(trackxi,jetPt);
1575                       if(pdgOfMCt==2212)
1576                         fFragProton[1]->Fill(trackxi,jetPt);
1577                       break;
1578                     case 3:
1579                       if(pdgOfMCt==321)
1580                         fFragKaon[2]->Fill(trackxi,jetPt);
1581                       if(pdgOfMCt==211)
1582                         fFragPion[2]->Fill(trackxi,jetPt);
1583                       if(pdgOfMCt==2212)
1584                         fFragProton[2]->Fill(trackxi,jetPt);
1585                       break;
1586                     case 4:
1587                       if(pdgOfMCt==321)
1588                         fFragKaon[3]->Fill(trackxi,jetPt);
1589                       if(pdgOfMCt==211)
1590                         fFragPion[3]->Fill(trackxi,jetPt);
1591                       if(pdgOfMCt==2212)
1592                         fFragProton[3]->Fill(trackxi,jetPt);
1593                       break;
1594                     case 5:
1595                       if(pdgOfMCt==321)
1596                         fFragKaon[4]->Fill(trackxi,jetPt);
1597                       if(pdgOfMCt==211)
1598                         fFragPion[4]->Fill(trackxi,jetPt);
1599                       if(pdgOfMCt==2212)
1600                         fFragProton[4]->Fill(trackxi,jetPt);
1601                       break;
1602                     case 21:
1603                       if(pdgOfMCt==321)
1604                         fFragKaon[5]->Fill(trackxi,jetPt);
1605                       if(pdgOfMCt==211)
1606                         fFragPion[5]->Fill(trackxi,jetPt);
1607                       if(pdgOfMCt==2212)
1608                         fFragProton[5]->Fill(trackxi,jetPt);
1609                       break;
1610                     default:
1611                       break;
1612                     } // end switch flavor
1613                 }// end loop over AODMC particles of trackrefs
1614               if(!IsEqualRel(totalTrackPt, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) //totalTrackPt!=0.0
1615                 {
1616                   firstMomDeltPhi = deltaPhiPt/totalTrackPt;
1617                   firstMomDeltEta = deltaEtaPt/totalTrackPt;
1618                   secondMomDeltPhi = deltaPhiSqPt/totalTrackPt;
1619                   secondMomDeltEta = deltaEtaSqPt/totalTrackPt;
1620                   secondCentralPhi = secondMomDeltPhi - firstMomDeltPhi*firstMomDeltPhi;
1621                   secondCentralEta = secondMomDeltEta - firstMomDeltEta*firstMomDeltEta;
1622                   secondCentralR = secondCentralPhi + secondCentralEta;
1623                 } // end if totalTrackPt!=0.0
1624               if(IsEqualRel(totalTrackPt, 0.0))  //totalTrackPt==0.0
1625                 secondCentralR = 10.0; //overflow
1626             }// end version with ref tracks (flag check)
1627
1628           if(!rTrkFlagMC)  // No ref tracks available
1629             {
1630               AliDebug(4,Form("Checking composition in MC without track refs"));
1631               for(Int_t aodMCT = 0; aodMCT < tracksMC; aodMCT++ )
1632                 {
1633                   pdgOfMCt=0;
1634                   trackxi=0;
1635                   AliAODMCParticle *mctrack = (AliAODMCParticle*) mcarray->At(aodMCT);
1636                   if(!mctrack) continue;
1637                   if(!mctrack->IsPhysicalPrimary()) continue;
1638                   if(mctrack->Charge()==0||mctrack->Charge()==-99) continue;
1639                   if(!IsMCTrackInsideThisJet(mctrack, mcjet, jfr)) continue;
1640                   if(mctrack->Pt()<fMinpTVal) continue; // MC: HERE PT CUT, NO TRACK REF
1641                   randomNum = gRandom->Rndm();
1642                   if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection
1643                   deltaPhiPt += DeltaPhiMC(mcjet, mctrack)*mctrack->Pt();
1644                   deltaEtaPt += DeltaEtaMC(mcjet, mctrack)*mctrack->Pt();
1645                   deltaPhiSqPt += DeltaPhiSqMC(mcjet, mctrack)*mctrack->Pt();
1646                   deltaEtaSqPt += DeltaEtaSqMC(mcjet, mctrack)*mctrack->Pt();
1647                   totalTrackPt += mctrack->Pt();
1648
1649                   pdgOfMCt=abs(mctrack->GetPdgCode());
1650                   if(!IsEqualRel(mctrack->Pt(), 0.0)) //!IsEqualRel(mctrack->Pt(), 0.0) // mctrack->Pt()!=0
1651                     trackxi= log(jetPt/mctrack->Pt());
1652                   switch(flavor)
1653                     {
1654                     case 1:
1655                       if(pdgOfMCt==321)
1656                         fFragKaon[0]->Fill(trackxi,jetPt);
1657                       if(pdgOfMCt==211)
1658                         fFragPion[0]->Fill(trackxi,jetPt);
1659                       if(pdgOfMCt==2212)
1660                         fFragProton[0]->Fill(trackxi,jetPt);
1661                       break;
1662                     case 2:
1663                       if(pdgOfMCt==321)
1664                         fFragKaon[1]->Fill(trackxi,jetPt);
1665                       if(pdgOfMCt==211)
1666                         fFragPion[1]->Fill(trackxi,jetPt);
1667                       if(pdgOfMCt==2212)
1668                         fFragProton[1]->Fill(trackxi,jetPt);
1669                       break;
1670                     case 3:
1671                       if(pdgOfMCt==321)
1672                         fFragKaon[2]->Fill(trackxi,jetPt);
1673                       if(pdgOfMCt==211)
1674                         fFragPion[2]->Fill(trackxi,jetPt);
1675                       if(pdgOfMCt==2212)
1676                         fFragProton[2]->Fill(trackxi,jetPt);
1677                       break;
1678                     case 4:
1679                       if(pdgOfMCt==321)
1680                         fFragKaon[3]->Fill(trackxi,jetPt);
1681                       if(pdgOfMCt==211)
1682                         fFragPion[3]->Fill(trackxi,jetPt);
1683                       if(pdgOfMCt==2212)
1684                         fFragProton[3]->Fill(trackxi,jetPt);
1685                       break;
1686                     case 5:
1687                       if(pdgOfMCt==321)
1688                         fFragKaon[4]->Fill(trackxi,jetPt);
1689                       if(pdgOfMCt==211)
1690                         fFragPion[4]->Fill(trackxi,jetPt);
1691                       if(pdgOfMCt==2212)
1692                         fFragProton[4]->Fill(trackxi,jetPt);
1693                       break;
1694                     case 21:
1695                       if(pdgOfMCt==321)
1696                         fFragKaon[5]->Fill(trackxi,jetPt);
1697                       if(pdgOfMCt==211)
1698                         fFragPion[5]->Fill(trackxi,jetPt);
1699                       if(pdgOfMCt==2212)
1700                     fFragProton[5]->Fill(trackxi,jetPt);
1701                       break;
1702                     default:
1703                       break;
1704                     } // end switch flavor
1705                 }// end loop over AODMC particles
1706               if(!IsEqualRel(totalTrackPt, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) // totalTrackPt!=0.0
1707                 {
1708                   firstMomDeltPhi = deltaPhiPt/totalTrackPt;
1709                   firstMomDeltEta = deltaEtaPt/totalTrackPt;
1710                   secondMomDeltPhi = deltaPhiSqPt/totalTrackPt;
1711                   secondMomDeltEta = deltaEtaSqPt/totalTrackPt;
1712                   secondCentralPhi = secondMomDeltPhi - firstMomDeltPhi*firstMomDeltPhi;
1713                   secondCentralEta = secondMomDeltEta - firstMomDeltEta*firstMomDeltEta;
1714                   secondCentralR = secondCentralPhi + secondCentralEta;
1715                 } // end if totalTrackPt!=0.0
1716               if(IsEqualRel(totalTrackPt, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) //totalTrackPt==0.0
1717                 secondCentralR = 10.0; //overflow
1718             } //End old version (no ref tracks)
1719
1720           if(fIsPossibleToSubstBckg)
1721             {
1722               // To make sure, re-initialize
1723               deltaPhiPtPerp = 0.0;
1724               deltaEtaPtPerp = 0.0;
1725               deltaPhiSqPtPerp = 0.0;
1726               deltaEtaSqPtPerp = 0.0;
1727               totalTrackPtPerp = 0.0;
1728               firstMomDeltPhiPerp = 0.0;
1729               firstMomDeltEtaPerp = 0.0;
1730               secondMomDeltPhiPerp = 0.0;
1731               secondMomDeltEtaPerp = 0.0;
1732               secondCentralPhiPerp = 0.0;
1733               secondCentralEtaPerp = 0.0;
1734               secondCentralRPerp = 0.0;
1735
1736               AliDebug(4,Form("Checking SCM in MC for the perpendicular cone"));
1737               for(Int_t aodMCperp = 0; aodMCperp < tracksMC; aodMCperp++ )
1738                 {
1739                   AliAODMCParticle *mctrackperp = (AliAODMCParticle*) mcarray->At(aodMCperp);
1740                   if(!mctrackperp) continue;
1741                   if(!mctrackperp->IsPhysicalPrimary()) continue;
1742                   if(mctrackperp->Charge()==0||mctrackperp->Charge()==-99) continue;
1743                   if(!IsMCTrackInsideThisJet(mctrackperp, fPerpCone, jfr)) continue;
1744                   if(mctrackperp->Pt()<fMinpTVal) continue; // MC: HERE PT CUT
1745                   randomNum = gRandom->Rndm();
1746                   if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection
1747                   deltaPhiPtPerp += DeltaPhiMC(fPerpCone, mctrackperp)*mctrackperp->Pt();
1748                   deltaEtaPtPerp += DeltaEtaMC(fPerpCone, mctrackperp)*mctrackperp->Pt();
1749                   deltaPhiSqPtPerp += DeltaPhiSqMC(fPerpCone, mctrackperp)*mctrackperp->Pt();
1750                   deltaEtaSqPtPerp += DeltaEtaSqMC(fPerpCone, mctrackperp)*mctrackperp->Pt();
1751                   totalTrackPtPerp += mctrackperp->Pt();
1752                 }// end loop over AODMC particles
1753               if(!IsEqualRel(totalTrackPtPerp, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) // totalTrackPtPerp!=0.0
1754                 {
1755                   firstMomDeltPhiPerp = deltaPhiPtPerp/totalTrackPtPerp;
1756                   firstMomDeltEtaPerp = deltaEtaPtPerp/totalTrackPtPerp;
1757                   secondMomDeltPhiPerp = deltaPhiSqPtPerp/totalTrackPtPerp;
1758                   secondMomDeltEtaPerp = deltaEtaSqPtPerp/totalTrackPtPerp;
1759                   secondCentralPhiPerp = secondMomDeltPhiPerp - firstMomDeltPhiPerp*firstMomDeltPhiPerp;
1760                   secondCentralEtaPerp = secondMomDeltEtaPerp - firstMomDeltEtaPerp*firstMomDeltEtaPerp;
1761                   secondCentralRPerp = secondCentralPhiPerp + secondCentralEtaPerp;
1762                 } // end if totalTrackPt!=0.0
1763               if(IsEqualRel(totalTrackPtPerp, 0.0)) //!IsEqualRel(totalTrackPtPerp, 0.0) //totalTrackPtPerp==0.0
1764                 secondCentralRPerp = 10.0; //overflow
1765             }
1766           ///// end of adding the SCM for the perpendicular cone
1767
1768           if(mcjets==1) // if only one jet in the whole event, and inside acceptance
1769             {
1770               // reference multiplicity stuff in pp, also filled in PbPb, but does not matter.
1771               // set to: V0 like corrected multiplicity: correctedV0LikeMult
1772               if(correctedV0LikeMult<25)
1773                 {
1774                   fNChTrRDMultOJMC[0]->Fill(nTracksPerc,jetPt);
1775                   fSCMRDMultOJMC[0]->Fill(secondCentralR,jetPt);
1776                   fJEtaMCMultOJ[0]->Fill(mcjet->Eta());
1777                   fJetPtMCMultOJ[0]->Fill(mcjet->Pt());
1778                 }
1779               if(correctedV0LikeMult>=25&&correctedV0LikeMult<50)
1780                 {
1781                   fNChTrRDMultOJMC[1]->Fill(nTracksPerc,jetPt);
1782                   fSCMRDMultOJMC[1]->Fill(secondCentralR,jetPt);
1783                   fJEtaMCMultOJ[1]->Fill(mcjet->Eta());
1784                   fJetPtMCMultOJ[1]->Fill(mcjet->Pt());
1785                 }
1786               if(correctedV0LikeMult>=50&&correctedV0LikeMult<90)
1787                 {
1788                   fNChTrRDMultOJMC[2]->Fill(nTracksPerc,jetPt);
1789                   fSCMRDMultOJMC[2]->Fill(secondCentralR,jetPt);
1790                   fJEtaMCMultOJ[2]->Fill(mcjet->Eta());
1791                   fJetPtMCMultOJ[2]->Fill(mcjet->Pt());
1792                 }
1793               if(correctedV0LikeMult>=90&&correctedV0LikeMult<120)
1794                 {
1795                   fNChTrRDMultOJMC[3]->Fill(nTracksPerc,jetPt);
1796                   fSCMRDMultOJMC[3]->Fill(secondCentralR,jetPt);
1797                   fJEtaMCMultOJ[3]->Fill(mcjet->Eta());
1798                   fJetPtMCMultOJ[3]->Fill(mcjet->Pt());
1799                 }
1800               if(correctedV0LikeMult>=120&&correctedV0LikeMult<150)
1801                 {
1802                   fNChTrRDMultOJMC[4]->Fill(nTracksPerc,jetPt);
1803                   fSCMRDMultOJMC[4]->Fill(secondCentralR,jetPt);
1804                   fJEtaMCMultOJ[4]->Fill(mcjet->Eta());
1805                   fJetPtMCMultOJ[4]->Fill(mcjet->Pt());
1806                 }
1807               if(correctedV0LikeMult>=150&&correctedV0LikeMult<200)
1808                 {
1809                   fNChTrRDMultOJMC[5]->Fill(nTracksPerc,jetPt);
1810                   fSCMRDMultOJMC[5]->Fill(secondCentralR,jetPt);
1811                   fJEtaMCMultOJ[5]->Fill(mcjet->Eta());
1812                   fJetPtMCMultOJ[5]->Fill(mcjet->Pt());
1813                 }
1814               if(correctedV0LikeMult>=200&&correctedV0LikeMult<300)
1815                 {
1816                   fNChTrRDMultOJMC[6]->Fill(nTracksPerc,jetPt);
1817                   fSCMRDMultOJMC[6]->Fill(secondCentralR,jetPt);
1818                   fJEtaMCMultOJ[6]->Fill(mcjet->Eta());
1819                   fJetPtMCMultOJ[6]->Fill(mcjet->Pt());
1820                 }
1821               if(correctedV0LikeMult>=300)
1822                 {
1823                   fNChTrRDMultOJMC[7]->Fill(nTracksPerc,jetPt);
1824                   fSCMRDMultOJMC[7]->Fill(secondCentralR,jetPt);
1825                   fJEtaMCMultOJ[7]->Fill(mcjet->Eta());
1826                   fJetPtMCMultOJ[7]->Fill(mcjet->Pt());
1827                 }
1828               //Results for inclusive jets
1829               // 2nd. Reference: set to: TPC tracks minus jet, minus dijet area
1830               if(softRefMcNoJets<5)
1831                 {
1832                   fNChTrRDMultSEOJMC[0]->Fill(nTracksPerc,jetPt);
1833                   fSCMRDMultSEOJMC[0]->Fill(secondCentralR,jetPt);
1834                   fJEtaMCMultSEOJ[0]->Fill(mcjet->Eta());
1835                   fJetPtMCMultSEOJ[0]->Fill(mcjet->Pt());
1836                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1837                     fEntriesQuark[0]->Fill(nTracksPerc,jetPt);
1838                   if(abs(flavor)==21) //if gluon jet
1839                     fEntriesGluon[0]->Fill(nTracksPerc,jetPt);
1840                 }
1841               if(softRefMcNoJets>=5&&softRefMcNoJets<10)
1842                 {
1843                   fNChTrRDMultSEOJMC[1]->Fill(nTracksPerc,jetPt);
1844                   fSCMRDMultSEOJMC[1]->Fill(secondCentralR,jetPt);
1845                   fJEtaMCMultSEOJ[1]->Fill(mcjet->Eta());
1846                   fJetPtMCMultSEOJ[1]->Fill(mcjet->Pt());
1847                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1848                     fEntriesQuark[1]->Fill(nTracksPerc,jetPt);
1849                   if(abs(flavor)==21) //if gluon jet
1850                     fEntriesGluon[1]->Fill(nTracksPerc,jetPt);
1851                 }
1852               if(softRefMcNoJets>=10&&softRefMcNoJets<15)
1853                 {
1854                   fNChTrRDMultSEOJMC[2]->Fill(nTracksPerc,jetPt);
1855                   fSCMRDMultSEOJMC[2]->Fill(secondCentralR,jetPt);
1856                   fJEtaMCMultSEOJ[2]->Fill(mcjet->Eta());
1857                   fJetPtMCMultSEOJ[2]->Fill(mcjet->Pt());
1858                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1859                     fEntriesQuark[2]->Fill(nTracksPerc,jetPt);
1860                   if(abs(flavor)==21) //if gluon jet
1861                     fEntriesGluon[2]->Fill(nTracksPerc,jetPt);
1862                 }
1863               if(softRefMcNoJets>=15&&softRefMcNoJets<20)
1864                 {
1865                   fNChTrRDMultSEOJMC[3]->Fill(nTracksPerc,jetPt);
1866                   fSCMRDMultSEOJMC[3]->Fill(secondCentralR,jetPt);
1867                   fJEtaMCMultSEOJ[3]->Fill(mcjet->Eta());
1868                   fJetPtMCMultSEOJ[3]->Fill(mcjet->Pt());
1869                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1870                     fEntriesQuark[3]->Fill(nTracksPerc,jetPt);
1871                   if(abs(flavor)==21) //if gluon jet
1872                     fEntriesGluon[3]->Fill(nTracksPerc,jetPt);
1873                 }
1874               if(softRefMcNoJets>=20&&softRefMcNoJets<30)
1875                 {
1876                   fNChTrRDMultSEOJMC[4]->Fill(nTracksPerc,jetPt);
1877                   fSCMRDMultSEOJMC[4]->Fill(secondCentralR,jetPt);
1878                   fJEtaMCMultSEOJ[4]->Fill(mcjet->Eta());
1879                   fJetPtMCMultSEOJ[4]->Fill(mcjet->Pt());
1880                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1881                     fEntriesQuark[4]->Fill(nTracksPerc,jetPt);
1882                   if(abs(flavor)==21) //if gluon jet
1883                     fEntriesGluon[4]->Fill(nTracksPerc,jetPt);
1884                 }
1885               if(softRefMcNoJets>=30&&softRefMcNoJets<40)
1886                 {
1887                   fNChTrRDMultSEOJMC[5]->Fill(nTracksPerc,jetPt);
1888                   fSCMRDMultSEOJMC[5]->Fill(secondCentralR,jetPt);
1889                   fJEtaMCMultSEOJ[5]->Fill(mcjet->Eta());
1890                   fJetPtMCMultSEOJ[5]->Fill(mcjet->Pt());
1891                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1892                     fEntriesQuark[5]->Fill(nTracksPerc,jetPt);
1893                   if(abs(flavor)==21) //if gluon jet
1894                     fEntriesGluon[5]->Fill(nTracksPerc,jetPt);
1895                 }
1896               if(softRefMcNoJets>=40&&softRefMcNoJets<50)
1897                 {
1898                   fNChTrRDMultSEOJMC[6]->Fill(nTracksPerc,jetPt);
1899                   fSCMRDMultSEOJMC[6]->Fill(secondCentralR,jetPt);
1900                   fJEtaMCMultSEOJ[6]->Fill(mcjet->Eta());
1901                   fJetPtMCMultSEOJ[6]->Fill(mcjet->Pt());
1902                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1903                     fEntriesQuark[6]->Fill(nTracksPerc,jetPt);
1904                   if(abs(flavor)==21) //if gluon jet
1905                     fEntriesGluon[6]->Fill(nTracksPerc,jetPt);
1906                 }
1907               if(softRefMcNoJets>=50)
1908                 {
1909                   fNChTrRDMultSEOJMC[7]->Fill(nTracksPerc,jetPt);
1910                   fSCMRDMultSEOJMC[7]->Fill(secondCentralR,jetPt);
1911                   fJEtaMCMultSEOJ[7]->Fill(mcjet->Eta());
1912                   fJetPtMCMultSEOJ[7]->Fill(mcjet->Pt());
1913                   if(abs(flavor)==1||abs(flavor)==2||abs(flavor)==3||abs(flavor)==4||abs(flavor)==5) //if quark jet
1914                     fEntriesQuark[7]->Fill(nTracksPerc,jetPt);
1915                   if(abs(flavor)==21) //if gluon jet
1916                     fEntriesGluon[7]->Fill(nTracksPerc,jetPt);
1917                 }
1918             }
1919           //End results for inclusive jets,starts parton by parton
1920
1921           switch(abs(flavor))
1922             {
1923             case 1:
1924               fNChTr[0]->Fill(nTracksPerc,jetPt);
1925               fProcessPDG[0]->Fill(jetPt,evtype);
1926               fHistPtParton[0]->Fill(jetPt);
1927               fSCM[0]->Fill(secondCentralR,jetPt);
1928               fMinTrackPtInNTXh[0]->Fill(fMinTrackPtInNTX,jetPt,1); // 0 for pp MC
1929               fMaxTrackPtInNTXh[0]->Fill(fMaxTrackPtInNTX,jetPt); // 0 for MC
1930               if(fIsPossibleToSubstBckg)
1931                 {
1932                   fNChTrCorrMCQuark->Fill(nTracksPercBckgSubst,pTbs);
1933                   fSCMMCPerp->Fill(secondCentralR,jetPt);
1934                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.)) //!IsEqualRel(mctrack->Pt(), 0.0) // fCurrentJetMinPtNT90!=7000.
1935                     fNChTrMCPerp->Fill(nTracksAboveThresholdPerp,jetPt);
1936                   if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.)) // !IsEqualRel(fCurrentJetMinPtNT90, 7000.) // fCurrentJetMinPtNT90Recalc!=7000.
1937                     fNChTrCorrMCPerp->Fill(nTrUpThrPerpBckSubs,pTbs);
1938                 }
1939               break;
1940             case 2:
1941               fNChTr[1]->Fill(nTracksPerc,jetPt);
1942               fProcessPDG[1]->Fill(jetPt,evtype);
1943               fHistPtParton[1]->Fill(jetPt);
1944               fSCM[1]->Fill(secondCentralR,jetPt);
1945               fMinTrackPtInNTXh[0]->Fill(fMinTrackPtInNTX,jetPt,1); // 0 for pp MC
1946               fMaxTrackPtInNTXh[0]->Fill(fMaxTrackPtInNTX,jetPt); // 0 for MC
1947               if(fIsPossibleToSubstBckg)
1948                 {
1949                   fNChTrCorrMCQuark->Fill(nTracksPercBckgSubst,pTbs);
1950                   fSCMMCPerp->Fill(secondCentralR,jetPt);
1951                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
1952                     fNChTrMCPerp->Fill(nTracksAboveThresholdPerp,jetPt);
1953                   if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
1954                     fNChTrCorrMCPerp->Fill(nTrUpThrPerpBckSubs,pTbs);
1955                 }
1956               break;
1957             case 3:
1958               fNChTr[2]->Fill(nTracksPerc,jetPt);
1959               fProcessPDG[2]->Fill(jetPt,evtype);
1960               fHistPtParton[2]->Fill(jetPt);
1961               fSCM[2]->Fill(secondCentralR,jetPt);
1962               fMinTrackPtInNTXh[0]->Fill(fMinTrackPtInNTX,jetPt,1); // 0 for pp MC
1963               fMaxTrackPtInNTXh[0]->Fill(fMaxTrackPtInNTX,jetPt); // 0 for MC
1964               if(fIsPossibleToSubstBckg)
1965                 {
1966                   fNChTrCorrMCQuark->Fill(nTracksPercBckgSubst,pTbs);
1967                   fSCMMCPerp->Fill(secondCentralR,jetPt);
1968                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
1969                     fNChTrMCPerp->Fill(nTracksAboveThresholdPerp,jetPt);
1970                   if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
1971                     fNChTrCorrMCPerp->Fill(nTrUpThrPerpBckSubs,pTbs);
1972                 }
1973               break;
1974             case 4:
1975               fNChTr[3]->Fill(nTracksPerc,jetPt);
1976               fProcessPDG[3]->Fill(jetPt,evtype);
1977               fHistPtParton[3]->Fill(jetPt);
1978               fSCM[3]->Fill(secondCentralR,jetPt);
1979               fMinTrackPtInNTXh[0]->Fill(fMinTrackPtInNTX,jetPt,1); // 0 for pp MC
1980               fMaxTrackPtInNTXh[0]->Fill(fMaxTrackPtInNTX,jetPt); // 0 for MC
1981               if(fIsPossibleToSubstBckg)
1982                 {
1983                   fNChTrCorrMCQuark->Fill(nTracksPercBckgSubst,pTbs);
1984                   fSCMMCPerp->Fill(secondCentralR,jetPt);
1985                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
1986                     fNChTrMCPerp->Fill(nTracksAboveThresholdPerp,jetPt);
1987                   if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
1988                     fNChTrCorrMCPerp->Fill(nTrUpThrPerpBckSubs,pTbs);
1989                 }
1990               break;
1991             case 5:
1992               fNChTr[4]->Fill(nTracksPerc,jetPt);
1993               fProcessPDG[4]->Fill(jetPt,evtype);
1994               fHistPtParton[4]->Fill(jetPt);
1995               fSCM[4]->Fill(secondCentralR,jetPt);
1996               fMinTrackPtInNTXh[0]->Fill(fMinTrackPtInNTX,jetPt,1); // 0 for pp MC
1997               fMaxTrackPtInNTXh[0]->Fill(fMaxTrackPtInNTX,jetPt); // 0 for MC
1998               if(fIsPossibleToSubstBckg)
1999                 {
2000                   fNChTrCorrMCQuark->Fill(nTracksPercBckgSubst,pTbs);
2001                   fSCMMCPerp->Fill(secondCentralR,jetPt);
2002                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2003                     fNChTrMCPerp->Fill(nTracksAboveThresholdPerp,jetPt);
2004                   if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
2005                     fNChTrCorrMCPerp->Fill(nTrUpThrPerpBckSubs,pTbs);
2006                 }
2007               break;
2008             case 21:
2009               fNChTr[5]->Fill(nTracksPerc,jetPt);
2010               fProcessPDG[5]->Fill(jetPt,evtype);
2011               fHistPtParton[5]->Fill(jetPt);
2012               fSCM[5]->Fill(secondCentralR,jetPt);
2013               fMinTrackPtInNTXh[0]->Fill(fMinTrackPtInNTX,jetPt,1); // 0 for pp MC
2014               fMaxTrackPtInNTXh[0]->Fill(fMaxTrackPtInNTX,jetPt); // 0 for MC
2015               if(fIsPossibleToSubstBckg)
2016                 {
2017                   fNChTrCorrMCGluon->Fill(nTracksPercBckgSubst,pTbs);
2018                   fSCMMCPerp->Fill(secondCentralR,jetPt);
2019                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2020                     fNChTrMCPerp->Fill(nTracksAboveThresholdPerp,jetPt);
2021                   if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
2022                     fNChTrCorrMCPerp->Fill(nTrUpThrPerpBckSubs,pTbs);
2023                 }
2024               break;
2025             default:
2026               break;
2027             }
2028           AliDebug(4,Form("Sabor del jet numero:%d es: %d y se necesitaron %d tracks \n",indxmc,flavor,nTracksPerc));
2029           imcj++;
2030         } // MC jets for cycle
2031       nGenJets=imcj;
2032       for(Int_t u=0 ; u<mcJetCounter  ;u++)
2033         {
2034           if(u<7)
2035             fJetsMultPtMC->Fill(jetPts[u],mcJetCounter);
2036         }
2037       // if(fEnablePrints)
2038       //  {
2039       //   if(mcJetCounter>=3)
2040       //    printf("%i Jets inside acceptance at event number:%i \n",mcJetCounter,fEvtCount-1);
2041       //  }
2042       fNAccJetsMC->Fill(mcJetCounter,mcJetCounter);
2043     } // end if MC info in AOD
2044
2045   if(!fUseOnlyMC)
2046     {
2047       // Primero que todo, debe de ir la seleccion de eventos reconstruidos:
2048       // 1. Que tenga un vertice reconstruido dentro de 10 cm.
2049       // Vertex info for reconstructed events
2050       AliAODVertex *pvx = fAOD->GetPrimaryVertex();
2051       if(!pvx)
2052         {
2053           AliError("No primary vertex!");
2054           return;
2055         }
2056       if(TMath::Abs(pvx->GetZ())>10.) // if the event vertex is larger than 10 cm, reject
2057         return;
2058       fZVertex->Fill(pvx->GetZ(),pvx->GetZ()); // vertex, provide number of accepted events as entries for reco jets
2059
2060       ///////////////////////////////////////
2061       // SECONDARY RECO BRANCH STUFF       //
2062       // Get the secondary branch with the reconstructed jets
2063       if(fBranchSecRec!="")
2064         {
2065           AliDebug(4,Form("fBranchSecRec was not default \n"));
2066           TClonesArray *aodSecRecJets = dynamic_cast<TClonesArray*>(fAOD->FindListObject(fBranchSecRec.Data()));
2067           if(!aodSecRecJets)
2068             {
2069               AliError(Form("%s:%d no reconstructed Secondary Jet array with name %s in AOD",(char*)__FILE__,__LINE__,fBranchSecRec.Data()));
2070               return;  //stop the analysis
2071             }
2072           AliDebug(4,Form("There are %d reconstructed jets from the secondary branch in this event \n", aodSecRecJets->GetEntries()));
2073           Int_t recojetsSEC =  aodSecRecJets->GetEntries();
2074           fNJetsRDSeco->Fill(recojetsSEC,recojetsSEC);  // number of jets in the secondary branch
2075
2076           HasOverlapedCones(aodSecRecJets); // Procedure for tagging usable jets
2077                                             // Up 16 jets are flagged
2078
2079           AliDebug(4,"Antes de realizar el loop jets reconstruidos del segundo branch \n");
2080           Int_t secondjetacccounter = 0;
2081           for (Int_t IDXS = 0; IDXS < recojetsSEC; IDXS++)
2082             {
2083               AliDebug(4,Form("Number of current jet:%i \n",IDXS));
2084               AliAODJet *rjetsec = dynamic_cast<AliAODJet*>(aodSecRecJets->At(IDXS));
2085               if (!rjetsec)
2086                 {
2087                   AliDebug(2,Form("ERROR: Could not receive jet %d from the second branch\n", IDXS));
2088                   continue;
2089                 }
2090
2091               ///////////////////////////////////////////////////////////////////////////////
2092               ///// Part for Chritians plot of inclusive and leading jets comp at 2.76 TeV //
2093               if(!IsInsideAcceptance(rjetsec))  // old condition
2094                 continue;
2095               if(IDXS==0) // leading jet
2096                 fSecRecJetPtLeading->Fill(rjetsec->Pt());
2097               fSecRecJetPtInclusive->Fill(rjetsec->Pt()); // all
2098               ///// End of Christians Plot reco 2nd branch
2099               ///////////////////////////////////////////////////////////////////////////////
2100
2101               if(IDXS>15)
2102                 continue;
2103
2104               if(!fJetFlags[IDXS]) // If the jet is flaged kFALSE, not usable
2105                 continue;
2106
2107               fJetPtSec->Fill(rjetsec->Pt());
2108               fJetEtaSec->Fill(rjetsec->Eta(),rjetsec->Eta());
2109               fJetPhiSec->Fill(rjetsec->Phi(),rjetsec->Phi());
2110               secondjetacccounter++;
2111             }
2112           fNAccJetsRDSeco->Fill(secondjetacccounter,secondjetacccounter);
2113         }
2114       // END OF SECONDARY BRANCH STUFF     //
2115       ///////////////////////////////////////
2116
2117       // Get the branch with the reconstructed jets
2118       TClonesArray *aodRecJets = dynamic_cast<TClonesArray*>(fAOD->FindListObject(fBranchRec.Data()));
2119       if(!aodRecJets)
2120         {
2121           AliError(Form("%s:%d no reconstructed Jet array with name %s in AOD",(char*)__FILE__,__LINE__,fBranchRec.Data()));
2122           return;
2123         }
2124
2125       AliDebug(4,Form("There are %d reconstructed jets in this event\n", aodRecJets->GetEntries()));
2126       Int_t recojets =  aodRecJets->GetEntries();
2127       fNJetsRD->Fill(recojets,recojets); // numero de jets directamente del branch
2128
2129       HasOverlapedCones(aodRecJets); // Procedure for tagging usable jets
2130                                     // Up 16 jets are flagged
2131
2132       AliDebug(4,"Antes de realizar el loop sobre AOD tracks \n");
2133       // Loop over AOD tracks
2134       Int_t tracksAOD = fAOD->GetNumberOfTracks();
2135       AliDebug(4,Form("Numero de tracks en el AOD:%d \n",tracksAOD));
2136       Double_t aodtracketa = 0.0;
2137       perpendicularPt = 0.0;
2138       px=0.0;
2139       py=0.0;
2140       pz=0.0;
2141       en=0.0;
2142       pTbs=0.0;
2143       etabs=0.0;
2144       phibs=0.0;
2145       fBckgSbsJet[0]=0.0;
2146       fBckgSbsJet[1]=0.0;
2147       fBckgSbsJet[2]=0.0;
2148       Int_t refNJMult = 0;
2149       Int_t myTotalMultRef = 0;
2150       Int_t myTotalSoftMultRef = 0;
2151       for(Int_t aodT = 0; aodT < tracksAOD; aodT++ )
2152         {
2153           AliAODTrack *aodtrack = fAOD->GetTrack(aodT);
2154           if(!aodtrack) continue;
2155           aodtracketa = TMath::Abs(aodtrack->Eta());
2156           if(aodtracketa>0.9) continue;
2157           if(!aodtrack->TestFilterBit(fFilterBit)) continue; //track filter selection
2158           fEtaAOD->Fill(aodtrack->Eta(),aodtrack->Eta());
2159           fPhiAOD->Fill(aodtrack->Phi(),aodtrack->Phi());
2160           fPtAOD->Fill(aodtrack->Pt(),aodtrack->Pt());
2161           if(fJetEvent) // if has an accepted jet, calculate the perpendicular cone
2162             {
2163               if(HasPerpendicularCone()) // If there is a perpendicular cone available
2164                 {
2165                   if(aodtrack->Pt()>fMinpTVal)
2166                     {
2167                       if(GetDeltaR(fEtaPerpCoord,fPhiPerpCoord,aodtrack->Eta(),aodtrack->Phi())<fJetRadius)
2168                         perpendicularPt = perpendicularPt + aodtrack->Pt();
2169                     }
2170                 }
2171             } // end if jet event
2172           //Total TPC multiplicity of primaries
2173           if(aodtrack->Pt()>fMinPtInGlobMult) // Min pT used in multiplicity estimation
2174             {
2175               myTotalMultRef++;
2176               if(aodtrack->Pt()<fMinpTValUE) continue; // pT cut  fMinpTValUE
2177               if(aodtrack->Pt()>fMaxpTValUE) continue; // pT cut  fMaxpTValUE
2178               myTotalSoftMultRef++;
2179               if(!IsTrackInsideExcludedArea(aodtrack->Eta(), aodtrack->Phi(), aodRecJets))
2180                 refNJMult++;
2181             }
2182         } // end track loop over the event...
2183
2184       fRefMultWOJet->Fill(refMultiplicity,refNJMult);
2185       fMultWOJetVZero->Fill(refNJMult,multFullV0);
2186       Double_t v0CorrMult = multFullV0 - GetV0ExcludedMultiplicity(aodRecJets);
2187       fRefMultFullV0->Fill(refMultiplicity,multFullV0);
2188       fRefMultV0Corr->Fill(refMultiplicity,v0CorrMult);
2189       fFullV0V0Corr->Fill(multFullV0,v0CorrMult);
2190       fRefAODTrackCount->Fill(refMultiplicity,myTotalMultRef);
2191       fTrackCountWOJet->Fill(myTotalMultRef,refNJMult);
2192
2193       if(recojets==1) // correlation for only monojet events
2194         {
2195           fRefMultFullV0UJ->Fill(refMultiplicity,multFullV0);
2196           fRefMultV0CorrUJ->Fill(refMultiplicity,v0CorrMult);
2197           fFullV0V0CorrUJ->Fill(multFullV0,v0CorrMult);
2198           fMultWOJetVZeroUJ->Fill(refNJMult,multFullV0);
2199           fRefMultWOJetUJ->Fill(refMultiplicity,refNJMult);
2200           fRefAODTrackCountUJ->Fill(refMultiplicity,myTotalMultRef);
2201           fTrackCountWOJetUJ->Fill(myTotalMultRef,refNJMult);
2202         }
2203
2204       if(fJetEvent) // if has an accepted jet, calculate the perpendicular cone
2205         {
2206           if(HasPerpendicularCone()) // If there is a perpendicular cone available
2207             {
2208               px = perpendicularPt*TMath::Cos(fPhiPerpCoord);
2209               py = perpendicularPt*TMath::Sin(fPhiPerpCoord);
2210               pz = perpendicularPt/TMath::Tan(2.0*TMath::ATan(TMath::Exp(-fEtaPerpCoord)));
2211               en = TMath::Sqrt(px*px + py*py + pz*pz);
2212               fPerpCone->SetPxPyPzE(px, py, pz, en);
2213             }
2214         }
2215
2216       // Loop to fill a pT spectrum of the reco jets
2217       Int_t irecj=0; // index for reconstructed jets to correlate
2218       Int_t nrectracks[6]={0};
2219       Double_t ptrecjet[6]={0};
2220       Double_t scmr[6]={0};
2221       Double_t aodtrackxi=0;
2222       Int_t ntxreco;
2223       Int_t nTRecAboveThresholdPerp=0;
2224       Int_t ntxrecoRecalc;
2225       Int_t nTRecAboveThresholdPerpRecalc=0;
2226
2227       for(Int_t i=0; i<6; i++) // Reset per event
2228         {
2229           fHistContainerR4[i]->Reset();
2230           fHistContainerR3[i]->Reset();
2231           fHistContainerR2[i]->Reset();
2232         }
2233
2234       Double_t jetPtsR[7]={0};  // to store the pt of the jets
2235       Int_t rJetCounter=0;    // counter of accepted reco jets
2236       fIsPossibleToSubstBckg = kTRUE; // Initialize before the loop
2237       if(fJetEvent) // si tiene jets validos
2238         {
2239           if(!HasPerpendicularCone()) // pero no encontro un cono perpendicular libre
2240             fIsPossibleToSubstBckg = kFALSE; // if not perpendicular cone, set to kFALSE, so no perpendicular calculations available
2241         }
2242
2243       AliDebug(4,"Antes de realizar el loop jets reconstruidos \n");
2244       for (Int_t indxrec = 0; indxrec < recojets; indxrec++)
2245         {
2246           AliDebug(4,Form("Number of current jet:%i \n",indxrec));
2247           ntxreco = 0;
2248           ntxrecoRecalc = 0;
2249           fMinTrackPtInNTX=200.0;  //Initialize for each jet, overflown
2250           fMaxTrackPtInNTX=200.0;  //Initialize for each jet, overflown
2251           fMinTrackPtInNTXR=200.0;  //Initialize for each jet, overflown
2252           fMaxTrackPtInNTXR=200.0;  //Initialize for each jet, overflown
2253           deltaPhiPt = 0.0;
2254           deltaEtaPt = 0.0;
2255           deltaPhiSqPt = 0.0;
2256           deltaEtaSqPt = 0.0;
2257           totalTrackPt = 0.0;
2258           firstMomDeltPhi = 0.0;
2259           firstMomDeltEta = 0.0;
2260           secondMomDeltPhi = 0.0;
2261           secondMomDeltEta = 0.0;
2262           secondCentralPhi = 0.0;
2263           secondCentralEta = 0.0;
2264           secondCentralR = 0.0;
2265           fTotTracksInCone=0; // Underflown at initialization per jet
2266
2267           AliAODJet *rjet = dynamic_cast<AliAODJet*>(aodRecJets->At(indxrec));
2268           if (!rjet)
2269             {
2270               AliDebug(2,Form("ERROR: Could not receive jet %d\n", indxrec));
2271               continue;
2272             }
2273           fJetEtaAll->Fill(rjet->Eta());// all jets
2274
2275           ///////////////////////////////////////////////////////////////////////////////
2276           ///// Part for Chritians plot of inclusive and leading jets comp at 2.76 TeV //
2277           if(!IsInsideAcceptance(rjet))  // old condition
2278             continue;
2279           if(indxrec==0) // leading jet
2280             fRecJetPtLeading->Fill(rjet->Pt());
2281           fRecJetPtInclusive->Fill(rjet->Pt()); // all
2282           fJetEtaOnlyTPCcut->Fill(rjet->Eta());// only eta acceptance cut for TPC
2283           ///// End of Christians Plot reco
2284           ///////////////////////////////////////////////////////////////////////////////
2285
2286           if(indxrec>15)
2287             continue;
2288
2289           if(!fJetFlags[indxrec]) // If the jet is flaged kFALSE, not usable
2290             continue;
2291
2292           AliDebug(4,Form("Jet #%i is in the acceptance \n",indxrec));
2293           if(rJetCounter<7)
2294             jetPtsR[rJetCounter]=rjet->Pt();
2295           rJetCounter++;
2296           fJetPt->Fill(rjet->Pt());
2297           fJetEta->Fill(rjet->Eta(),rjet->Eta());
2298           fJetPhi->Fill(rjet->Phi(),rjet->Phi());
2299
2300           if(rjet->Pt()>10.)
2301             fJetEtaJetPt[0]->Fill(rjet->Eta());
2302           if(rjet->Pt()>30.)
2303             fJetEtaJetPt[1]->Fill(rjet->Eta());
2304           if(rjet->Pt()>50.)
2305             fJetEtaJetPt[2]->Fill(rjet->Eta());
2306
2307           // Reco RefTracks check
2308           Bool_t rTrkFlagRec = kFALSE;
2309           Int_t trkinrecjet = rjet->GetRefTracks()->GetEntriesFast();
2310           if(trkinrecjet!=0&&!fForceNotTR)
2311             rTrkFlagRec = kTRUE;
2312           AliDebug(4,Form("Number of tracks in RefTracks reco jet:%i \n",trkinrecjet));
2313           if(rTrkFlagRec)
2314             {
2315               // Check the properties of the tracks in this jet with track refs
2316               AliDebug(4,Form("Checking composition in Reco jets with track refs"));
2317               for(Int_t aodT = 0; aodT <trkinrecjet; aodT++ )
2318                 {
2319                   aodtrackxi=0;
2320                   AliAODTrack *aodtrack = dynamic_cast<AliAODTrack*>(rjet->GetRefTracks()->At(aodT));
2321                   if(!aodtrack)
2322                     {
2323                       AliError("Error, no AOD Track!");
2324                       continue;
2325                     }
2326                   if(!aodtrack->TestFilterBit(fFilterBit))
2327                     {
2328                       //                      printf("Rejecting track from track refs due to wrong filterbit! \n");
2329                       continue; //track filter selection
2330                     }
2331                   deltaPhiPt += DeltaPhiTrack(rjet, aodtrack)*aodtrack->Pt();
2332                   deltaEtaPt += DeltaEtaTrack(rjet, aodtrack)*aodtrack->Pt();
2333                   deltaPhiSqPt += DeltaPhiSqTrack(rjet, aodtrack)*aodtrack->Pt();
2334                   deltaEtaSqPt += DeltaEtaSqTrack(rjet, aodtrack)*aodtrack->Pt();
2335                   totalTrackPt += aodtrack->Pt();
2336                   fTotTracksInCone++; // Counting tracks
2337                   if(!IsEqualRel(aodtrack->Pt(), 0.0)) //!IsEqualRel(totalTrackPtPerp, 0.0) //aodtrack->Pt()!=0
2338                     aodtrackxi= log(rjet->Pt()/aodtrack->Pt());
2339                   if(irecj<maxJetNum)
2340                     {
2341                       fHistContainerR4[irecj]->Fill(aodtrackxi,rjet->Pt());
2342                       if(!IsTrackInsideThisJet(aodtrack, rjet, 0.3)) continue;
2343                       fHistContainerR3[irecj]->Fill(aodtrackxi,rjet->Pt());
2344                       if(!IsTrackInsideThisJet(aodtrack, rjet, 0.2)) continue;
2345                       fHistContainerR2[irecj]->Fill(aodtrackxi,rjet->Pt());
2346                     }
2347                 } //end loop over track references
2348               if(!IsEqualRel(totalTrackPt, 0.0)) //!IsEqualRel(totalTrackPt, 0.0)  // totalTrackPt!=0.0
2349                 {
2350                   firstMomDeltPhi = deltaPhiPt/totalTrackPt;
2351                   firstMomDeltEta = deltaEtaPt/totalTrackPt;
2352                   secondMomDeltPhi = deltaPhiSqPt/totalTrackPt;
2353                   secondMomDeltEta = deltaEtaSqPt/totalTrackPt;
2354                   secondCentralPhi = secondMomDeltPhi - firstMomDeltPhi*firstMomDeltPhi;
2355                   secondCentralEta = secondMomDeltEta - firstMomDeltEta*firstMomDeltEta;
2356                   secondCentralR = secondCentralPhi + secondCentralEta;
2357                 } // end if totalTrackPt!=0.0
2358               if(IsEqualRel(totalTrackPt, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) // totalTrackPt==0.0
2359                 secondCentralR = 10.0; //overflow value
2360             } // end if there are track references
2361
2362           if(!rTrkFlagRec)
2363             {
2364               // Check properties of the tracks in this jet without track refs
2365               AliDebug(4,Form("Checking composition in Reco jets without track refs"));
2366               for(Int_t aodT = 0; aodT < tracksAOD; aodT++ )
2367                 {
2368                   AliAODTrack *aodtrack = fAOD->GetTrack(aodT);
2369                   if(!aodtrack) continue;
2370                   if(!IsTrackInsideThisJet(aodtrack, rjet, jfr)) continue;
2371                   if(!aodtrack->TestFilterBit(fFilterBit)) continue; //track filter selection
2372                   if(aodtrack->Pt()<fMinpTVal) continue; //DATA: PT CUT
2373                   deltaPhiPt += DeltaPhiTrack(rjet, aodtrack)*aodtrack->Pt();
2374                   deltaEtaPt += DeltaEtaTrack(rjet, aodtrack)*aodtrack->Pt();
2375                   deltaPhiSqPt += DeltaPhiSqTrack(rjet, aodtrack)*aodtrack->Pt();
2376                   deltaEtaSqPt += DeltaEtaSqTrack(rjet, aodtrack)*aodtrack->Pt();
2377                   totalTrackPt += aodtrack->Pt();
2378                   fTotTracksInCone++; // Counting tracks
2379                   if(!IsEqualRel(aodtrack->Pt(), 0.0)) //!IsEqualRel(totalTrackPt, 0.0) //aodtrack->Pt()!=0
2380                     aodtrackxi= log(rjet->Pt()/aodtrack->Pt());
2381                   if(irecj<maxJetNum)
2382                     {
2383                       fHistContainerR4[irecj]->Fill(aodtrackxi,rjet->Pt());
2384                       if(!IsTrackInsideThisJet(aodtrack, rjet, 0.3)) continue;
2385                       fHistContainerR3[irecj]->Fill(aodtrackxi,rjet->Pt());
2386                       if(!IsTrackInsideThisJet(aodtrack, rjet, 0.2)) continue;
2387                       fHistContainerR2[irecj]->Fill(aodtrackxi,rjet->Pt());
2388                     }
2389                 } // end loop over tracks
2390               if(!IsEqualRel(totalTrackPt, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) //totalTrackPt!=0.0
2391                 {
2392                   firstMomDeltPhi = deltaPhiPt/totalTrackPt;
2393                   firstMomDeltEta = deltaEtaPt/totalTrackPt;
2394                   secondMomDeltPhi = deltaPhiSqPt/totalTrackPt;
2395                   secondMomDeltEta = deltaEtaSqPt/totalTrackPt;
2396                   secondCentralPhi = secondMomDeltPhi - firstMomDeltPhi*firstMomDeltPhi;
2397                   secondCentralEta = secondMomDeltEta - firstMomDeltEta*firstMomDeltEta;
2398                   secondCentralR = secondCentralPhi + secondCentralEta;
2399                 } // end if totalTrackPt!=0.0
2400               if(IsEqualRel(totalTrackPt, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) // totalTrackPt==0.0
2401                 secondCentralR = 10.0; //overflow value
2402             } // end of no track references
2403           //Esto es lo anterior, toma al jet como es, y calcula NT90
2404           ntxreco=GetNumberOfChargedTracks(ntx,rjet, tracksAOD, fAOD, jfr); // this call fixes the minimum pT track
2405           //Y aqui calcula cuantos tracks se necesitan arriba del threshold establecido en la linea anterior
2406           //esto debe ser para cada jet. Lo unico que se calcula una sola vez es el cono perpendicular
2407           if(fIsPossibleToSubstBckg&&!IsEqualRel(fCurrentJetMinPtNT90, 7000.)) //and only if the method worked
2408             nTRecAboveThresholdPerp = GetNRecChargedTracksAboveThreshold(fPerpCone,tracksAOD, fAOD,jfr); //here one changes NTX
2409
2410           // correct the jet pT
2411           if(fIsPossibleToSubstBckg) // If there is a perpendicular cone available, substract backg and fill the new jet pT
2412             {
2413               pTbs= rjet->Pt()-fPerpCone->Pt();
2414               etabs= rjet->Eta();
2415               phibs= rjet->Phi();
2416               fBckgSbsJet[0]=pTbs; //pT
2417               fBckgSbsJet[1]=etabs; //eta
2418               fBckgSbsJet[2]=phibs; //phi
2419               // Now re-calculate nt90 for the energy corrected jet
2420               ntxrecoRecalc = GetRecalcNTXRec(ntx,rjet, tracksAOD, fAOD, jfr); //This call saves the new min pT
2421               // Now re-calculate the perpendicular cone NT90 background
2422               if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.)) //calculating for the current jet, if the previous method worked
2423                 nTRecAboveThresholdPerpRecalc = GetRecalcNRecChTrUpThr(fPerpCone,tracksAOD, fAOD,jfr);
2424             }
2425
2426           // SCM perpendicular cone
2427           if(fIsPossibleToSubstBckg)
2428             {
2429               // To make sure, re-initialize
2430               deltaPhiPtPerp = 0.0;
2431               deltaEtaPtPerp = 0.0;
2432               deltaPhiSqPtPerp = 0.0;
2433               deltaEtaSqPtPerp = 0.0;
2434               totalTrackPtPerp = 0.0;
2435               firstMomDeltPhiPerp = 0.0;
2436               firstMomDeltEtaPerp = 0.0;
2437               secondMomDeltPhiPerp = 0.0;
2438               secondMomDeltEtaPerp = 0.0;
2439               secondCentralPhiPerp = 0.0;
2440               secondCentralEtaPerp = 0.0;
2441               secondCentralRPerp = 0.0;
2442               AliDebug(4,Form("Checking SCM of perpendicular cone in Reco jets"));
2443               for(Int_t aodTperp = 0; aodTperp < tracksAOD; aodTperp++ )
2444                 { //fPerpCone
2445                   AliAODTrack *aodtrackperprec = fAOD->GetTrack(aodTperp);
2446                   if(!aodtrackperprec) continue;
2447                   if(!IsTrackInsideThisJet(aodtrackperprec, fPerpCone, jfr)) continue;
2448                   if(!aodtrackperprec->TestFilterBit(fFilterBit)) continue; //track filter selection
2449                   if(aodtrackperprec->Pt()<fMinpTVal) continue; //DATA: PT CUT
2450                   deltaPhiPtPerp += DeltaPhiTrack(fPerpCone, aodtrackperprec)*aodtrackperprec->Pt();
2451                   deltaEtaPtPerp += DeltaEtaTrack(fPerpCone, aodtrackperprec)*aodtrackperprec->Pt();
2452                   deltaPhiSqPtPerp += DeltaPhiSqTrack(fPerpCone, aodtrackperprec)*aodtrackperprec->Pt();
2453                   deltaEtaSqPtPerp += DeltaEtaSqTrack(fPerpCone, aodtrackperprec)*aodtrackperprec->Pt();
2454                   totalTrackPtPerp += aodtrackperprec->Pt();
2455                 } // end loop over tracks
2456               if(!IsEqualRel(totalTrackPtPerp, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) // totalTrackPtPerp!=0.0
2457                 {
2458                   firstMomDeltPhiPerp = deltaPhiPtPerp/totalTrackPtPerp;
2459                   firstMomDeltEtaPerp = deltaEtaPtPerp/totalTrackPtPerp;
2460                   secondMomDeltPhiPerp = deltaPhiSqPtPerp/totalTrackPtPerp;
2461                   secondMomDeltEtaPerp = deltaEtaSqPtPerp/totalTrackPtPerp;
2462                   secondCentralPhiPerp = secondMomDeltPhiPerp - firstMomDeltPhiPerp*firstMomDeltPhiPerp;
2463                   secondCentralEtaPerp = secondMomDeltEtaPerp - firstMomDeltEtaPerp*firstMomDeltEtaPerp;
2464                   secondCentralRPerp = secondCentralPhiPerp + secondCentralEtaPerp;
2465                 } // end if totalTrackPt!=0.0
2466               if(IsEqualRel(totalTrackPtPerp, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) // totalTrackPtPerp==0.0
2467                 secondCentralRPerp = 10.0; //overflow
2468             }
2469
2470           ///// end of adding the SCM for the perpendicular cone
2471
2472           if(irecj<maxJetNum)
2473             {
2474               recJets[irecj]= *rjet;
2475               nrectracks[irecj] = ntxreco;
2476               ptrecjet[irecj] = rjet->Pt();
2477               scmr[irecj] = secondCentralR;
2478               AliDebug(4,Form("Para el jet reco num: %d se necesitaron %d tracks \n",irecj,nrectracks[irecj]));
2479             }
2480           AliDebug(4,"Before filling the histograms for this jet \n");
2481           fNChTrRD->Fill(ntxreco,rjet->Pt());
2482           fSCMRD->Fill(secondCentralR,rjet->Pt());
2483           fProfNChTrRD->Fill(rjet->Pt(),ntxreco);
2484
2485           fNTXV0MultPt->Fill(ntxreco,v0CorrMult,rjet->Pt());
2486           fNTXCBMultPt->Fill(ntxreco,refNJMult,rjet->Pt());
2487
2488           //refNJMult
2489           // reference multiplicity stuff in pp, also filled in PbPb, but does not matter.
2490           // set to: V0 corrected multiplicity: v0CorrMult
2491           if(v0CorrMult<25)
2492             {
2493               fNChTrRDMult[0]->Fill(ntxreco,rjet->Pt());
2494               fSCMRDMult[0]->Fill(secondCentralR,rjet->Pt());
2495               fTotalJetCharge[0]->Fill(fCurrentJetCharge);
2496               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2497                 {
2498                   fNChTrRDMultOJ[0]->Fill(ntxreco,rjet->Pt());
2499                   fSCMRDMultOJ[0]->Fill(secondCentralR,rjet->Pt());
2500                   fJEtaRDMultOJ[0]->Fill(rjet->Eta());
2501                   fJetPtRDMultOJ[0]->Fill(rjet->Pt());
2502                 }
2503             }
2504           if(v0CorrMult>=25&&v0CorrMult<50)
2505             {
2506               fNChTrRDMult[1]->Fill(ntxreco,rjet->Pt());
2507               fSCMRDMult[1]->Fill(secondCentralR,rjet->Pt());
2508               fTotalJetCharge[1]->Fill(fCurrentJetCharge);
2509               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2510                 {
2511                   fNChTrRDMultOJ[1]->Fill(ntxreco,rjet->Pt());
2512                   fSCMRDMultOJ[1]->Fill(secondCentralR,rjet->Pt());
2513                   fJEtaRDMultOJ[1]->Fill(rjet->Eta());
2514                   fJetPtRDMultOJ[1]->Fill(rjet->Pt());
2515                 }
2516             }
2517           if(v0CorrMult>=50&&v0CorrMult<90)
2518             {
2519               fNChTrRDMult[2]->Fill(ntxreco,rjet->Pt());
2520               fSCMRDMult[2]->Fill(secondCentralR,rjet->Pt());
2521               fTotalJetCharge[2]->Fill(fCurrentJetCharge);
2522               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2523                 {
2524                   fNChTrRDMultOJ[2]->Fill(ntxreco,rjet->Pt());
2525                   fSCMRDMultOJ[2]->Fill(secondCentralR,rjet->Pt());
2526                   fJEtaRDMultOJ[2]->Fill(rjet->Eta());
2527                   fJetPtRDMultOJ[2]->Fill(rjet->Pt());
2528                 }
2529             }
2530           if(v0CorrMult>=90&&v0CorrMult<120)
2531             {
2532               fNChTrRDMult[3]->Fill(ntxreco,rjet->Pt());
2533               fSCMRDMult[3]->Fill(secondCentralR,rjet->Pt());
2534               fTotalJetCharge[3]->Fill(fCurrentJetCharge);
2535               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2536                 {
2537                   fNChTrRDMultOJ[3]->Fill(ntxreco,rjet->Pt());
2538                   fSCMRDMultOJ[3]->Fill(secondCentralR,rjet->Pt());
2539                   fJEtaRDMultOJ[3]->Fill(rjet->Eta());
2540                   fJetPtRDMultOJ[3]->Fill(rjet->Pt());
2541                 }
2542             }
2543           if(v0CorrMult>=120&&v0CorrMult<150)
2544             {
2545               fNChTrRDMult[4]->Fill(ntxreco,rjet->Pt());
2546               fSCMRDMult[4]->Fill(secondCentralR,rjet->Pt());
2547               fTotalJetCharge[4]->Fill(fCurrentJetCharge);
2548               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2549                 {
2550                   fNChTrRDMultOJ[4]->Fill(ntxreco,rjet->Pt());
2551                   fSCMRDMultOJ[4]->Fill(secondCentralR,rjet->Pt());
2552                   fJEtaRDMultOJ[4]->Fill(rjet->Eta());
2553                   fJetPtRDMultOJ[4]->Fill(rjet->Pt());
2554                 }
2555             }
2556           if(v0CorrMult>=150&&v0CorrMult<200)
2557             {
2558               fNChTrRDMult[5]->Fill(ntxreco,rjet->Pt());
2559               fSCMRDMult[5]->Fill(secondCentralR,rjet->Pt());
2560               fTotalJetCharge[5]->Fill(fCurrentJetCharge);
2561               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2562                 {
2563                   fNChTrRDMultOJ[5]->Fill(ntxreco,rjet->Pt());
2564                   fSCMRDMultOJ[5]->Fill(secondCentralR,rjet->Pt());
2565                   fJEtaRDMultOJ[5]->Fill(rjet->Eta());
2566                   fJetPtRDMultOJ[5]->Fill(rjet->Pt());
2567                 }
2568             }
2569           if(v0CorrMult>=200&&v0CorrMult<300)
2570             {
2571               fNChTrRDMult[6]->Fill(ntxreco,rjet->Pt());
2572               fSCMRDMult[6]->Fill(secondCentralR,rjet->Pt());
2573               fTotalJetCharge[6]->Fill(fCurrentJetCharge);
2574               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2575                 {
2576                   fNChTrRDMultOJ[6]->Fill(ntxreco,rjet->Pt());
2577                   fSCMRDMultOJ[6]->Fill(secondCentralR,rjet->Pt());
2578                   fJEtaRDMultOJ[6]->Fill(rjet->Eta());
2579                   fJetPtRDMultOJ[6]->Fill(rjet->Pt());
2580                 }
2581             }
2582           if(v0CorrMult>=300)
2583             {
2584               fNChTrRDMult[7]->Fill(ntxreco,rjet->Pt());
2585               fSCMRDMult[7]->Fill(secondCentralR,rjet->Pt());
2586               fTotalJetCharge[7]->Fill(fCurrentJetCharge);
2587               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2588                 {
2589                   fNChTrRDMultOJ[7]->Fill(ntxreco,rjet->Pt());
2590                   fSCMRDMultOJ[7]->Fill(secondCentralR,rjet->Pt());
2591                   fJEtaRDMultOJ[7]->Fill(rjet->Eta());
2592                   fJetPtRDMultOJ[7]->Fill(rjet->Pt());
2593                 }
2594             }
2595
2596           // 2nd. Reference: set to: TPC tracks minus jet, minus dijet area
2597           if(refNJMult<5) //&&refNJMult>1
2598             {
2599               fNChTrRDMultSE[0]->Fill(ntxreco,rjet->Pt());
2600               fSCMRDMultSE[0]->Fill(secondCentralR,rjet->Pt());
2601               fTotalJetChargeSE[0]->Fill(fCurrentJetCharge);
2602               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2603                 {
2604                   fNChTrRDMultSEOJ[0]->Fill(ntxreco,rjet->Pt());
2605                   fSCMRDMultSEOJ[0]->Fill(secondCentralR,rjet->Pt());
2606                   fJEtaRDMultSEOJ[0]->Fill(rjet->Eta());
2607                   fJetPtRDMultSEOJ[0]->Fill(rjet->Pt());
2608                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2609                     fNChTrRecPerpMultSEOJ[0]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2610                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2611                     {
2612                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,1); //filling mult bin
2613                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,1); //filling mult bin
2614                     }
2615                 }
2616             }
2617           if(refNJMult>=5&&refNJMult<10)
2618             {
2619               fNChTrRDMultSE[1]->Fill(ntxreco,rjet->Pt());
2620               fSCMRDMultSE[1]->Fill(secondCentralR,rjet->Pt());
2621               fTotalJetChargeSE[1]->Fill(fCurrentJetCharge);
2622               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2623                 {
2624                   fNChTrRDMultSEOJ[1]->Fill(ntxreco,rjet->Pt());
2625                   fSCMRDMultSEOJ[1]->Fill(secondCentralR,rjet->Pt());
2626                   fJEtaRDMultSEOJ[1]->Fill(rjet->Eta());
2627                   fJetPtRDMultSEOJ[1]->Fill(rjet->Pt());
2628                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2629                     fNChTrRecPerpMultSEOJ[1]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2630                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2631                     {
2632                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,2); //filling mult bin
2633                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,2); //filling mult bin
2634                     }
2635                 }
2636             }
2637           if(refNJMult>=10&&refNJMult<15)
2638             {
2639               fNChTrRDMultSE[2]->Fill(ntxreco,rjet->Pt());
2640               fSCMRDMultSE[2]->Fill(secondCentralR,rjet->Pt());
2641               fTotalJetChargeSE[2]->Fill(fCurrentJetCharge);
2642               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2643                 {
2644                   fNChTrRDMultSEOJ[2]->Fill(ntxreco,rjet->Pt());
2645                   fSCMRDMultSEOJ[2]->Fill(secondCentralR,rjet->Pt());
2646                   fJEtaRDMultSEOJ[2]->Fill(rjet->Eta());
2647                   fJetPtRDMultSEOJ[2]->Fill(rjet->Pt());
2648                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2649                     fNChTrRecPerpMultSEOJ[2]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2650                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2651                     {
2652                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,3); //filling mult bin
2653                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,3); //filling mult bin
2654                     }
2655                 }
2656             }
2657           if(refNJMult>=15&&refNJMult<20)
2658             {
2659               fNChTrRDMultSE[3]->Fill(ntxreco,rjet->Pt());
2660               fSCMRDMultSE[3]->Fill(secondCentralR,rjet->Pt());
2661               fTotalJetChargeSE[3]->Fill(fCurrentJetCharge);
2662               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2663                 {
2664                   fNChTrRDMultSEOJ[3]->Fill(ntxreco,rjet->Pt());
2665                   fSCMRDMultSEOJ[3]->Fill(secondCentralR,rjet->Pt());
2666                   fJEtaRDMultSEOJ[3]->Fill(rjet->Eta());
2667                   fJetPtRDMultSEOJ[3]->Fill(rjet->Pt());
2668                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2669                     fNChTrRecPerpMultSEOJ[3]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2670                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2671                     {
2672                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,4); //filling mult bin
2673                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,4); //filling mult bin
2674                     }
2675                 }
2676             }
2677           if(refNJMult>=20&&refNJMult<30)
2678             {
2679               fNChTrRDMultSE[4]->Fill(ntxreco,rjet->Pt());
2680               fSCMRDMultSE[4]->Fill(secondCentralR,rjet->Pt());
2681               fTotalJetChargeSE[4]->Fill(fCurrentJetCharge);
2682               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2683                 {
2684                   fNChTrRDMultSEOJ[4]->Fill(ntxreco,rjet->Pt());
2685                   fSCMRDMultSEOJ[4]->Fill(secondCentralR,rjet->Pt());
2686                   fJEtaRDMultSEOJ[4]->Fill(rjet->Eta());
2687                   fJetPtRDMultSEOJ[4]->Fill(rjet->Pt());
2688                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2689                     fNChTrRecPerpMultSEOJ[4]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2690                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2691                     {
2692                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,5); //filling mult bin
2693                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,5); //filling mult bin
2694                     }
2695                 }
2696             }
2697           if(refNJMult>=30&&refNJMult<40)
2698             {
2699               fNChTrRDMultSE[5]->Fill(ntxreco,rjet->Pt());
2700               fSCMRDMultSE[5]->Fill(secondCentralR,rjet->Pt());
2701               fTotalJetChargeSE[5]->Fill(fCurrentJetCharge);
2702               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2703                 {
2704                   fNChTrRDMultSEOJ[5]->Fill(ntxreco,rjet->Pt());
2705                   fSCMRDMultSEOJ[5]->Fill(secondCentralR,rjet->Pt());
2706                   fJEtaRDMultSEOJ[5]->Fill(rjet->Eta());
2707                   fJetPtRDMultSEOJ[5]->Fill(rjet->Pt());
2708                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2709                     fNChTrRecPerpMultSEOJ[5]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2710                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2711                     {
2712                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,6); //filling mult bin
2713                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,6); //filling mult bin
2714                     }
2715                 }
2716             }
2717           if(refNJMult>=40&&refNJMult<50)
2718             {
2719               fNChTrRDMultSE[6]->Fill(ntxreco,rjet->Pt());
2720               fSCMRDMultSE[6]->Fill(secondCentralR,rjet->Pt());
2721               fTotalJetChargeSE[6]->Fill(fCurrentJetCharge);
2722               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2723                 {
2724                   fNChTrRDMultSEOJ[6]->Fill(ntxreco,rjet->Pt());
2725                   fSCMRDMultSEOJ[6]->Fill(secondCentralR,rjet->Pt());
2726                   fJEtaRDMultSEOJ[6]->Fill(rjet->Eta());
2727                   fJetPtRDMultSEOJ[6]->Fill(rjet->Pt());
2728                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2729                     fNChTrRecPerpMultSEOJ[6]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2730                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2731                     {
2732                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,7); //filling mult bin
2733                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,7); //filling mult bin
2734                     }
2735                 }
2736             }
2737           if(refNJMult>=50)
2738             {
2739               fNChTrRDMultSE[7]->Fill(ntxreco,rjet->Pt());
2740               fSCMRDMultSE[7]->Fill(secondCentralR,rjet->Pt());
2741               fTotalJetChargeSE[7]->Fill(fCurrentJetCharge);
2742               if(recojets==1) // if only one jet in the whole event, and inside acceptance
2743                 {
2744                   fNChTrRDMultSEOJ[7]->Fill(ntxreco,rjet->Pt());
2745                   fSCMRDMultSEOJ[7]->Fill(secondCentralR,rjet->Pt());
2746                   fJEtaRDMultSEOJ[7]->Fill(rjet->Eta());
2747                   fJetPtRDMultSEOJ[7]->Fill(rjet->Pt());
2748                   if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2749                     fNChTrRecPerpMultSEOJ[7]->Fill(nTRecAboveThresholdPerp,rjet->Pt());
2750                   if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2751                     {
2752                       fNChTrRecECorrPPMult->Fill(ntxrecoRecalc,pTbs,8); //filling mult bin
2753                       fNChTrRecPerpECorrPPMult->Fill(nTRecAboveThresholdPerpRecalc,pTbs,8); //filling mult bin
2754                     }
2755                 }
2756             }
2757
2758           if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
2759             {
2760               if(!IsEqualRel(fCurrentJetMinPtNT90, 7000.))
2761                 fNChTrRecPerp->Fill(nTRecAboveThresholdPerp,rjet->Pt());  // these are my previous histos
2762               fSCMRecPerp->Fill(secondCentralRPerp,rjet->Pt());  // this are my previous histos
2763               if(!fIsHIevent) //if is a proton proton event
2764                 {
2765                   fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,1); //filling proton bin
2766                   if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
2767                     {
2768                       fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,1); //filling proton bin
2769                       if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
2770                         {
2771                           fPtInPerpCon->Fill(fPerpCone->Pt(),1,1);
2772                           fTotTracksCone->Fill(fTotTracksInCone,1,1);
2773                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 1);
2774                         }
2775                       if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
2776                         {
2777                           fPtInPerpCon->Fill(fPerpCone->Pt(),2,1);
2778                           fTotTracksCone->Fill(fTotTracksInCone,2,1);
2779                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 2);
2780                         }
2781                       if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
2782                         {
2783                           fPtInPerpCon->Fill(fPerpCone->Pt(),3,1);
2784                           fTotTracksCone->Fill(fTotTracksInCone,3,1);
2785                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 3);
2786                         }
2787                       if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
2788                         {
2789                           fPtInPerpCon->Fill(fPerpCone->Pt(),4,1);
2790                           fTotTracksCone->Fill(fTotTracksInCone,4,1);
2791                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 4);
2792                         }
2793                       if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
2794                         {
2795                           fPtInPerpCon->Fill(fPerpCone->Pt(),5,1);
2796                           fTotTracksCone->Fill(fTotTracksInCone,5,1);
2797                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 5);
2798                         }
2799                       if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
2800                         {
2801                           fPtInPerpCon->Fill(fPerpCone->Pt(),6,1);
2802                           fTotTracksCone->Fill(fTotTracksInCone,6,1);
2803                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 6);
2804                         }
2805                       if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
2806                         {
2807                           fPtInPerpCon->Fill(fPerpCone->Pt(),7,1);
2808                           fTotTracksCone->Fill(fTotTracksInCone,7,1);
2809                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 7);
2810                         }
2811                       if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
2812                         {
2813                           fPtInPerpCon->Fill(fPerpCone->Pt(),8,1);
2814                           fTotTracksCone->Fill(fTotTracksInCone,8,1);
2815                           FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 1, 8);
2816                         }
2817                     }
2818                 }
2819               if(fIsHIevent) //if is a PbPb event
2820                 {
2821                   if(fEventCent>=0&&fEventCent<10.)
2822                     {
2823                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,2); //filling first centrality bin
2824                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),2);
2825                       fJetPtCentPbPbCorr->Fill(pTbs,2);
2826                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
2827                         {
2828                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,2); //filling first centrality bin
2829                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),2);
2830                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),2);
2831                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
2832                             {
2833                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,2);
2834                               fTotTracksCone->Fill(fTotTracksInCone,1,2);
2835                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 1);
2836                             }
2837                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
2838                             {
2839                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,2);
2840                               fTotTracksCone->Fill(fTotTracksInCone,2,2);
2841                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 2);
2842                             }
2843                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
2844                             {
2845                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,2);
2846                               fTotTracksCone->Fill(fTotTracksInCone,3,2);
2847                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 3);
2848                             }
2849                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
2850                             {
2851                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,2);
2852                               fTotTracksCone->Fill(fTotTracksInCone,4,2);
2853                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 4);
2854                             }
2855                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
2856                             {
2857                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,2);
2858                               fTotTracksCone->Fill(fTotTracksInCone,5,2);
2859                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 5);
2860                             }
2861                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
2862                             {
2863                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,2);
2864                               fTotTracksCone->Fill(fTotTracksInCone,6,2);
2865                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 6);
2866                             }
2867                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
2868                             {
2869                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,2);
2870                               fTotTracksCone->Fill(fTotTracksInCone,7,2);
2871                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 7);
2872                             }
2873                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
2874                             {
2875                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,2);
2876                               fTotTracksCone->Fill(fTotTracksInCone,8,2);
2877                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 2, 8);
2878                             }
2879                         }
2880                     }
2881                   if(fEventCent>=10&&fEventCent<20.)
2882                     {
2883                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,3); //filling second centrality bin
2884                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),3);
2885                       fJetPtCentPbPbCorr->Fill(pTbs,3);
2886                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
2887                         {
2888                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,3); //filling second centrality bin
2889                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),3);
2890                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),3);
2891                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
2892                             {
2893                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,3);
2894                               fTotTracksCone->Fill(fTotTracksInCone,1,3);
2895                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 1);
2896                             }
2897                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
2898                             {
2899                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,3);
2900                               fTotTracksCone->Fill(fTotTracksInCone,2,3);
2901                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 2);
2902                             }
2903                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
2904                             {
2905                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,3);
2906                               fTotTracksCone->Fill(fTotTracksInCone,3,3);
2907                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 3);
2908                             }
2909                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
2910                             {
2911                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,3);
2912                               fTotTracksCone->Fill(fTotTracksInCone,4,3);
2913                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 4);
2914                             }
2915                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
2916                             {
2917                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,3);
2918                               fTotTracksCone->Fill(fTotTracksInCone,5,3);
2919                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 5);
2920                             }
2921                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
2922                             {
2923                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,3);
2924                               fTotTracksCone->Fill(fTotTracksInCone,6,3);
2925                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 6);
2926                             }
2927                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
2928                             {
2929                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,3);
2930                               fTotTracksCone->Fill(fTotTracksInCone,7,3);
2931                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 7);
2932                             }
2933                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
2934                             {
2935                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,3);
2936                               fTotTracksCone->Fill(fTotTracksInCone,8,3);
2937                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 3, 8);
2938                             }
2939                         }
2940                     }
2941                   if(fEventCent>=20&&fEventCent<30.)
2942                     {
2943                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,4); //filling third centrality bin
2944                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),4);
2945                       fJetPtCentPbPbCorr->Fill(pTbs,4);
2946                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
2947                         {
2948                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,4); //filling third centrality bin
2949                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),4);
2950                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),4);
2951                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
2952                             {
2953                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,4);
2954                               fTotTracksCone->Fill(fTotTracksInCone,1,4);
2955                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 1);
2956                             }
2957                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
2958                             {
2959                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,4);
2960                               fTotTracksCone->Fill(fTotTracksInCone,2,4);
2961                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 2);
2962                             }
2963                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
2964                             {
2965                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,4);
2966                               fTotTracksCone->Fill(fTotTracksInCone,3,4);
2967                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 3);
2968                             }
2969                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
2970                             {
2971                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,4);
2972                               fTotTracksCone->Fill(fTotTracksInCone,4,4);
2973                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 4);
2974                             }
2975                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
2976                             {
2977                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,4);
2978                               fTotTracksCone->Fill(fTotTracksInCone,5,4);
2979                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 5);
2980                             }
2981                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
2982                             {
2983                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,4);
2984                               fTotTracksCone->Fill(fTotTracksInCone,6,4);
2985                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 6);
2986                             }
2987                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
2988                             {
2989                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,4);
2990                               fTotTracksCone->Fill(fTotTracksInCone,7,4);
2991                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 7);
2992                             }
2993                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
2994                             {
2995                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,4);
2996                               fTotTracksCone->Fill(fTotTracksInCone,8,4);
2997                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 4, 8);
2998                             }
2999                         }
3000                     }
3001                   if(fEventCent>=30&&fEventCent<40.)
3002                     {
3003                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,5); //filling fourth centrality bin
3004                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),5);
3005                       fJetPtCentPbPbCorr->Fill(pTbs,5);
3006                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
3007                         {
3008                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,5); //filling fourth centrality bin
3009                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),5);
3010                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),5);
3011                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
3012                             {
3013                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,5);
3014                               fTotTracksCone->Fill(fTotTracksInCone,1,5);
3015                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 1);
3016                             }
3017                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
3018                             {
3019                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,5);
3020                               fTotTracksCone->Fill(fTotTracksInCone,2,5);
3021                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 2);
3022                             }
3023                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
3024                             {
3025                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,5);
3026                               fTotTracksCone->Fill(fTotTracksInCone,3,5);
3027                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 3);
3028                             }
3029                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
3030                             {
3031                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,5);
3032                               fTotTracksCone->Fill(fTotTracksInCone,4,5);
3033                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 4);
3034                             }
3035                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
3036                             {
3037                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,5);
3038                               fTotTracksCone->Fill(fTotTracksInCone,5,5);
3039                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 5);
3040                             }
3041                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
3042                             {
3043                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,5);
3044                               fTotTracksCone->Fill(fTotTracksInCone,6,5);
3045                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 6);
3046                             }
3047                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
3048                             {
3049                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,5);
3050                               fTotTracksCone->Fill(fTotTracksInCone,7,5);
3051                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 7);
3052                             }
3053                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
3054                             {
3055                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,5);
3056                               fTotTracksCone->Fill(fTotTracksInCone,8,5);
3057                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 5, 8);
3058                             }
3059                         }
3060                     }
3061                   if(fEventCent>=40&&fEventCent<50.)
3062                     {
3063                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,6); //filling fourth centrality bin
3064                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),6);
3065                       fJetPtCentPbPbCorr->Fill(pTbs,6);
3066                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
3067                         {
3068                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,6); //filling fourth centrality bin
3069                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),6);
3070                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),6);
3071                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
3072                             {
3073                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,6);
3074                               fTotTracksCone->Fill(fTotTracksInCone,1,6);
3075                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 1);
3076                             }
3077                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
3078                             {
3079                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,6);
3080                               fTotTracksCone->Fill(fTotTracksInCone,2,6);
3081                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 2);
3082                             }
3083                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
3084                             {
3085                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,6);
3086                               fTotTracksCone->Fill(fTotTracksInCone,3,6);
3087                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 3);
3088                             }
3089                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
3090                             {
3091                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,6);
3092                               fTotTracksCone->Fill(fTotTracksInCone,4,6);
3093                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 4);
3094                             }
3095                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
3096                             {
3097                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,6);
3098                               fTotTracksCone->Fill(fTotTracksInCone,5,6);
3099                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 5);
3100                             }
3101                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
3102                             {
3103                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,6);
3104                               fTotTracksCone->Fill(fTotTracksInCone,6,6);
3105                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 6);
3106                             }
3107                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
3108                             {
3109                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,6);
3110                               fTotTracksCone->Fill(fTotTracksInCone,7,6);
3111                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 7);
3112                             }
3113                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
3114                             {
3115                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,6);
3116                               fTotTracksCone->Fill(fTotTracksInCone,8,6);
3117                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 6, 8);
3118                             }
3119                         }
3120                     }
3121                   if(fEventCent>=50&&fEventCent<60.)
3122                     {
3123                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,7); //filling fourth centrality bin
3124                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),7);
3125                       fJetPtCentPbPbCorr->Fill(pTbs,7);
3126                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
3127                         {
3128                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,7); //filling fourth centrality bin
3129                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),7);
3130                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),7);
3131                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
3132                             {
3133                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,7);
3134                               fTotTracksCone->Fill(fTotTracksInCone,1,7);
3135                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 1);
3136                             }
3137                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
3138                             {
3139                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,7);
3140                               fTotTracksCone->Fill(fTotTracksInCone,2,7);
3141                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 2);
3142                             }
3143                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
3144                             {
3145                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,7);
3146                               fTotTracksCone->Fill(fTotTracksInCone,3,7);
3147                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 3);
3148                             }
3149                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
3150                             {
3151                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,7);
3152                               fTotTracksCone->Fill(fTotTracksInCone,4,7);
3153                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 4);
3154                             }
3155                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
3156                             {
3157                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,7);
3158                               fTotTracksCone->Fill(fTotTracksInCone,5,7);
3159                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 5);
3160                             }
3161                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
3162                             {
3163                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,7);
3164                               fTotTracksCone->Fill(fTotTracksInCone,6,7);
3165                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 6);
3166                             }
3167                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
3168                             {
3169                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,7);
3170                               fTotTracksCone->Fill(fTotTracksInCone,7,7);
3171                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 7);
3172                             }
3173                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
3174                             {
3175                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,7);
3176                               fTotTracksCone->Fill(fTotTracksInCone,8,7);
3177                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 7, 8);
3178                             }
3179                         }
3180                     }
3181                   if(fEventCent>=60&&fEventCent<70.)
3182                     {
3183                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,8); //filling fourth centrality bin
3184                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),8);
3185                       fJetPtCentPbPbCorr->Fill(pTbs,8);
3186                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
3187                         {
3188                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,8); //filling fourth centrality bin
3189                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),8);
3190                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),8);
3191                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
3192                             {
3193                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,8);
3194                               fTotTracksCone->Fill(fTotTracksInCone,1,8);
3195                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 1);
3196                             }
3197                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
3198                             {
3199                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,8);
3200                               fTotTracksCone->Fill(fTotTracksInCone,2,8);
3201                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 2);
3202                             }
3203                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
3204                             {
3205                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,8);
3206                               fTotTracksCone->Fill(fTotTracksInCone,3,8);
3207                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 3);
3208                             }
3209                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
3210                             {
3211                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,8);
3212                               fTotTracksCone->Fill(fTotTracksInCone,4,8);
3213                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 4);
3214                             }
3215                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
3216                             {
3217                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,8);
3218                               fTotTracksCone->Fill(fTotTracksInCone,5,8);
3219                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 5);
3220                             }
3221                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
3222                             {
3223                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,8);
3224                               fTotTracksCone->Fill(fTotTracksInCone,6,8);
3225                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 6);
3226                             }
3227                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
3228                             {
3229                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,8);
3230                               fTotTracksCone->Fill(fTotTracksInCone,7,8);
3231                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 7);
3232                             }
3233                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
3234                             {
3235                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,8);
3236                               fTotTracksCone->Fill(fTotTracksInCone,8,8);
3237                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 8, 8);
3238                             }
3239                         }
3240                     }
3241                   if(fEventCent>=70&&fEventCent<80.)
3242                     {
3243                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,9); //filling fourth centrality bin
3244                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),9);
3245                       fJetPtCentPbPbCorr->Fill(pTbs,9);
3246                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
3247                         {
3248                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,9); //filling fourth centrality bin
3249                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),9);
3250                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),9);
3251                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
3252                             {
3253                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,9);
3254                               fTotTracksCone->Fill(fTotTracksInCone,1,9);
3255                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 1);
3256                             }
3257                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
3258                             {
3259                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,9);
3260                               fTotTracksCone->Fill(fTotTracksInCone,2,9);
3261                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 2);
3262                             }
3263                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
3264                             {
3265                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,9);
3266                               fTotTracksCone->Fill(fTotTracksInCone,3,9);
3267                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 3);
3268                             }
3269                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
3270                             {
3271                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,9);
3272                               fTotTracksCone->Fill(fTotTracksInCone,4,9);
3273                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 4);
3274                             }
3275                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
3276                             {
3277                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,9);
3278                               fTotTracksCone->Fill(fTotTracksInCone,5,9);
3279                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 5);
3280                             }
3281                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
3282                             {
3283                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,9);
3284                               fTotTracksCone->Fill(fTotTracksInCone,6,9);
3285                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 6);
3286                             }
3287                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
3288                             {
3289                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,9);
3290                               fTotTracksCone->Fill(fTotTracksInCone,7,9);
3291                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 7);
3292                             }
3293                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
3294                             {
3295                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,9);
3296                               fTotTracksCone->Fill(fTotTracksInCone,8,9);
3297                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 9, 8);
3298                             }
3299                         }
3300                     }
3301                   if(fEventCent>=80&&fEventCent<100.)
3302                     {
3303                       fNChTrRecECorr->Fill(ntxrecoRecalc,pTbs,10); //filling sixth centrality bin
3304                       fJetPtCentPbPbRaw->Fill(rjet->Pt(),10);
3305                       fJetPtCentPbPbCorr->Fill(pTbs,10);
3306                       if(!IsEqualRel(fCurrentJetMinPtNT90Recalc, 7000.))
3307                         {
3308                           fNChTrRecPerpECorr->Fill(nTRecAboveThresholdPerpRecalc,pTbs,10); //filling sixth centrality bin
3309                           fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),10);
3310                           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),10);
3311                           if((rjet->Pt()>10.)&&(rjet->Pt()<20.))
3312                             {
3313                               fPtInPerpCon->Fill(fPerpCone->Pt(),1,10);
3314                               fTotTracksCone->Fill(fTotTracksInCone,1,10);
3315                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 1);
3316                             }
3317                           if((rjet->Pt()>20.)&&(rjet->Pt()<30.))
3318                             {
3319                               fPtInPerpCon->Fill(fPerpCone->Pt(),2,10);
3320                               fTotTracksCone->Fill(fTotTracksInCone,2,10);
3321                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 2);
3322                             }
3323                           if((rjet->Pt()>30.)&&(rjet->Pt()<40.))
3324                             {
3325                               fPtInPerpCon->Fill(fPerpCone->Pt(),3,10);
3326                               fTotTracksCone->Fill(fTotTracksInCone,3,10);
3327                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 3);
3328                             }
3329                           if((rjet->Pt()>40.)&&(rjet->Pt()<50.))
3330                             {
3331                               fPtInPerpCon->Fill(fPerpCone->Pt(),4,10);
3332                               fTotTracksCone->Fill(fTotTracksInCone,4,10);
3333                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 4);
3334                             }
3335                           if((rjet->Pt()>50.)&&(rjet->Pt()<60.))
3336                             {
3337                               fPtInPerpCon->Fill(fPerpCone->Pt(),5,10);
3338                               fTotTracksCone->Fill(fTotTracksInCone,5,10);
3339                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 5);
3340                             }
3341                           if((rjet->Pt()>60.)&&(rjet->Pt()<70.))
3342                             {
3343                               fPtInPerpCon->Fill(fPerpCone->Pt(),6,10);
3344                               fTotTracksCone->Fill(fTotTracksInCone,6,10);
3345                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 6);
3346                             }
3347                           if((rjet->Pt()>70.)&&(rjet->Pt()<80.))
3348                             {
3349                               fPtInPerpCon->Fill(fPerpCone->Pt(),7,10);
3350                               fTotTracksCone->Fill(fTotTracksInCone,7,10);
3351                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 7);
3352                             }
3353                           if((rjet->Pt()>80.)&&(rjet->Pt()<90.))
3354                             {
3355                               fPtInPerpCon->Fill(fPerpCone->Pt(),8,10);
3356                               fTotTracksCone->Fill(fTotTracksInCone,8,10);
3357                               FillPerpConeHisto(fPtDistInPerpConeRaw, tracksAOD, fAOD, 10, 8);
3358                             }
3359                         }
3360                     }
3361                 }
3362             }
3363
3364           AliDebug(4,"Before filling the histograms for this jet of min and max pT in NTX \n");
3365           AliDebug(4,Form("Min:%f, Max:%f \n",fMinTrackPtInNTX,fMaxTrackPtInNTX));
3366           fMinTrackPtInNTXh[1]->Fill(fMinTrackPtInNTX,rjet->Pt(),1); // for rec pp or inclusive PbPb
3367           fJetPtCentPbPbRaw->Fill(rjet->Pt(),1); // for rec pp or inclusive PbPb
3368           fJetPtCentPbPbCorr->Fill(pTbs,1); // for rec pp or inclusive PbPb
3369           fMaxTrackPtInNTXh[1]->Fill(fMaxTrackPtInNTX,rjet->Pt());
3370           if(fIsPossibleToSubstBckg) // if it was possible to calculate a perpendicular cone
3371             {
3372               fMinTrackPtInNTXRecalc->Fill(fMinTrackPtInNTXR,rjet->Pt(),1); // for rec pp or inclusive PbPb
3373               fMaxTrackPtInNTXRecalc->Fill(fMaxTrackPtInNTXR,rjet->Pt());
3374             }
3375           AliDebug(4,"After filling the histograms for this jet of min and max pT in NTX \n");
3376           for(Int_t v=0 ; v<rJetCounter; v++)
3377             {
3378               if(v<7)
3379                 fJetsMultPtRD->Fill(jetPtsR[v],rJetCounter);
3380             }
3381           irecj++;
3382         } //reco jets
3383       nRecJets=irecj;
3384       fNAccJetsRD->Fill(rJetCounter,rJetCounter);
3385       // reference multiplicity stuff in pp, also filled in PbPb, but does not matter.
3386       if(v0CorrMult<25)
3387         fNAccJetsRDMult[0]->Fill(rJetCounter);
3388       if(v0CorrMult>=25&&v0CorrMult<50)
3389         fNAccJetsRDMult[1]->Fill(rJetCounter);
3390       if(v0CorrMult>=50&&v0CorrMult<90)
3391         fNAccJetsRDMult[2]->Fill(rJetCounter);
3392       if(v0CorrMult>=90&&v0CorrMult<120)
3393         fNAccJetsRDMult[3]->Fill(rJetCounter);
3394       if(v0CorrMult>=120&&v0CorrMult<150)
3395         fNAccJetsRDMult[4]->Fill(rJetCounter);
3396       if(v0CorrMult>=150&&v0CorrMult<200)
3397         fNAccJetsRDMult[5]->Fill(rJetCounter);
3398       if(v0CorrMult>=200&&v0CorrMult<300)
3399         fNAccJetsRDMult[6]->Fill(rJetCounter);
3400       if(v0CorrMult>=300)
3401         fNAccJetsRDMult[7]->Fill(rJetCounter);
3402
3403       // reference multiplicity from tracks in TPC minus jet related tracks
3404       if(refNJMult<5) // &&refNJMult>1
3405         fNAccJetsRDMultSE[0]->Fill(rJetCounter);
3406       if(refNJMult>=5&&refNJMult<10)
3407         fNAccJetsRDMultSE[1]->Fill(rJetCounter);
3408       if(refNJMult>=10&&refNJMult<15)
3409         fNAccJetsRDMultSE[2]->Fill(rJetCounter);
3410       if(refNJMult>=15&&refNJMult<20)
3411         fNAccJetsRDMultSE[3]->Fill(rJetCounter);
3412       if(refNJMult>=20&&refNJMult<30)
3413         fNAccJetsRDMultSE[4]->Fill(rJetCounter);
3414       if(refNJMult>=30&&refNJMult<40)
3415         fNAccJetsRDMultSE[5]->Fill(rJetCounter);
3416       if(refNJMult>=40&&refNJMult<50)
3417         fNAccJetsRDMultSE[6]->Fill(rJetCounter);
3418       if(refNJMult>=50)
3419         fNAccJetsRDMultSE[7]->Fill(rJetCounter);
3420
3421       AliDebug(4,"Checking if this data contains MC, in order to relate the jets \n");
3422       if(fUseAODMC)
3423         {
3424           AliDebug(4,"Relating MC jets with reconstructed jets");
3425           // Relate the jets
3426           Int_t fCJDebug = 0; //debug level for getclosest jet
3427           nGenJets = TMath::Min(nGenJets,maxJetNum);
3428           nRecJets = TMath::Min(nRecJets,maxJetNum);
3429           Int_t iGenIndex[maxJetNum];    // Index of the generated jet for i-th rec -1 if none
3430           Int_t iRecIndex[maxJetNum];    // Index of the reco jet for i-th gen -1 if none
3431           for(int i = 0;i<maxJetNum;++i)
3432             {
3433               iGenIndex[i] = iRecIndex[i] = -1;
3434             }
3435
3436           AliAnalysisHelperJetTasks::GetClosestJets(genJets,nGenJets,recJets,nRecJets,
3437                                                     iGenIndex,iRecIndex,fCJDebug);
3438           if(fCJDebug > 10)
3439             AliDebug(4,Form("%s:%d",(char*)__FILE__,__LINE__));
3440           if(fCJDebug > 3)
3441             {
3442               for(int i = 0;i<maxJetNum;++i)
3443                 {
3444                   if(iGenIndex[i]>=0)
3445                     {
3446                       AliDebug(4,Form("iGenFound: %d -> %d",i,iGenIndex[i]));
3447                       //  para el i-esimo jet reconstruido corresponde el jet iGenIndex[i]
3448                       AliDebug(4,Form("El jet reconstruido numero %d tiene sabor %d",i, genJetsFlavor[iGenIndex[i]]));
3449                     }
3450                   if(iRecIndex[i]>=0)
3451                     {
3452                       AliDebug(4,Form("iRecFound: %d -> %d",i,iRecIndex[i]));
3453                       //  para el i-esimo jet generado corresponde el jet iRecIndex[i]
3454                     }
3455                 }
3456             }
3457           AliDebug(4,"Helper part finished");
3458
3459           // Llenar los histogramas para los jets reconstruidos
3460
3461           Int_t crf = 0;      // current reco jet flavor
3462           Int_t crt = 0;      // current reco jet tracks
3463           Double_t crpt = 0;  // current jet pt
3464           Double_t cscm = 0.0;// current second central moment
3465
3466           for(Int_t ixr=0; ixr<maxJetNum; ixr++)
3467             {
3468               AliDebug(4,Form("Processing jet number:%i",ixr));
3469               if(iGenIndex[ixr]>=0)
3470                 {
3471                   crf = genJetsFlavor[iGenIndex[ixr]]; //para el reco jet con indice ixr
3472                   crt = nrectracks[ixr];  // se necesitaron este numero de tracks
3473                   crpt = ptrecjet[ixr];
3474                   cscm = scmr[ixr];
3475
3476                   //Fill candidates histos
3477                   if(crt>=7) //gluon candidate
3478                     fFragCandidates[0]->Add(fHistContainerR4[ixr]);
3479                   if(crt<=4) //quark candidate
3480                     fFragCandidates[1]->Add(fHistContainerR4[ixr]);
3481
3482                   switch(abs(crf))
3483                     {
3484                     case 1:
3485                       fNChTr[6]->Fill(crt,crpt);
3486                       fHistPtParton[6]->Fill(crpt);
3487                       fSCM[6]->Fill(cscm,crpt);
3488                       fFragChargedR4[0]->Add(fHistContainerR4[ixr]);
3489                       fFragChargedR3[0]->Add(fHistContainerR3[ixr]);
3490                       fFragChargedR2[0]->Add(fHistContainerR2[ixr]);
3491                       break;
3492                     case 2:
3493                       fNChTr[7]->Fill(crt,crpt);
3494                       fHistPtParton[7]->Fill(crpt);
3495                       fSCM[7]->Fill(cscm,crpt);
3496                       fFragChargedR4[1]->Add(fHistContainerR4[ixr]);
3497                       fFragChargedR3[1]->Add(fHistContainerR3[ixr]);
3498                       fFragChargedR2[1]->Add(fHistContainerR2[ixr]);
3499                       break;
3500                     case 3:
3501                       fNChTr[8]->Fill(crt,crpt);
3502                       fHistPtParton[8]->Fill(crpt);
3503                       fSCM[8]->Fill(cscm,crpt);
3504                       fFragChargedR4[2]->Add(fHistContainerR4[ixr]);
3505                       fFragChargedR3[2]->Add(fHistContainerR3[ixr]);
3506                       fFragChargedR2[2]->Add(fHistContainerR2[ixr]);
3507                       break;
3508                     case 4:
3509                       fNChTr[9]->Fill(crt,crpt);
3510                       fHistPtParton[9]->Fill(crpt);
3511                       fSCM[9]->Fill(cscm,crpt);
3512                       fFragChargedR4[3]->Add(fHistContainerR4[ixr]);
3513                       fFragChargedR3[3]->Add(fHistContainerR3[ixr]);
3514                       fFragChargedR2[3]->Add(fHistContainerR2[ixr]);
3515                       break;
3516                     case 5:
3517                       fNChTr[10]->Fill(crt,crpt);
3518                       fHistPtParton[10]->Fill(crpt);
3519                       fSCM[10]->Fill(cscm,crpt);
3520                       fFragChargedR4[4]->Add(fHistContainerR4[ixr]);
3521                       fFragChargedR3[4]->Add(fHistContainerR3[ixr]);
3522                       fFragChargedR2[4]->Add(fHistContainerR2[ixr]);
3523                       break;
3524                     case 21:
3525                       fNChTr[11]->Fill(crt,crpt);
3526                       fHistPtParton[11]->Fill(crpt);
3527                       fSCM[11]->Fill(cscm,crpt);
3528                       fFragChargedR4[5]->Add(fHistContainerR4[ixr]);
3529                       fFragChargedR3[5]->Add(fHistContainerR3[ixr]);
3530                       fFragChargedR2[5]->Add(fHistContainerR2[ixr]);
3531                       break;
3532                     default:
3533                       break;
3534                     }  // end switch
3535                   AliDebug(4,Form("Sabor del reco jet con pt:%f y numero:%d es: %d y se necesitaron %d tracks \n",crpt,ixr,crf,crt));
3536                 } // end index condition
3537             }  // end for cycle correlation gen-reco flavor
3538         } // end if MC info
3539     } // end of only MC info in the AOD, no reco jets
3540   PostData(1, fOutputList);
3541 }
3542
3543 //________________________________________________________________________
3544 void AliAnalysisTaskPartonDisc::Terminate(const Option_t *)
3545 {
3546   // Draw result to the screen
3547   // Called once at the end of the query
3548 }
3549 //________________________________________________________________________
3550 Int_t AliAnalysisTaskPartonDisc::GetMCEventType(AliMCEvent *mcEvent)
3551 {
3552   //
3553   // Get the event type from the pythia headers
3554   //
3555
3556   Int_t processNumber = 0;
3557   AliGenEventHeader* genHeader = mcEvent->GenEventHeader();
3558   AliGenPythiaEventHeader* pythiaGenHeader = dynamic_cast<AliGenPythiaEventHeader*>(genHeader);
3559
3560   if(!pythiaGenHeader)
3561     {
3562       AliDebug(4,Form(" %s:%d No Pythia header!",(char*)__FILE__,__LINE__));
3563       return 0;
3564     }
3565
3566   processNumber = pythiaGenHeader->ProcessType();
3567
3568   return processNumber;
3569 }
3570 //________________________________________________________________________
3571 Int_t AliAnalysisTaskPartonDisc::GetPhojetEventType(AliMCEvent *mcEvent)
3572 {
3573   //
3574   // Get the event type from the phojet header
3575   //
3576
3577   Int_t processNumber = 0;
3578   AliGenEventHeader* genHeader = mcEvent->GenEventHeader();
3579   AliGenDPMjetEventHeader* phojetGenHeader = dynamic_cast<AliGenDPMjetEventHeader*>(genHeader);
3580
3581   if(!phojetGenHeader)
3582     {
3583       AliDebug(4,Form(" %s:%d No Phojet header!",(char*)__FILE__,__LINE__));
3584       return 0;
3585     }
3586
3587   processNumber = phojetGenHeader->ProcessType();
3588
3589   return processNumber;
3590 }
3591 //________________________________________________________________________
3592 Bool_t AliAnalysisTaskPartonDisc::IsInsideAcceptance(AliAODJet *jet)
3593 {
3594   //
3595   // Check if the jet is inside abs(eta)<=fJetAcceptance
3596   //
3597
3598   Double_t jeteta = jet->Eta();
3599   if(TMath::Abs(jeteta)<=fJetAcceptance)
3600     return kTRUE;
3601   else
3602     return kFALSE;
3603
3604 }
3605 //________________________________________________________________________
3606 Int_t AliAnalysisTaskPartonDisc::GetJetFlavour(AliAODJet *jet, Int_t ntracks, TClonesArray *mcarray)
3607 {
3608   //
3609   // Get the jet flavour, using the definition:
3610   // The flavour will be that of the parton with the highest energy
3611   // within an angular distance <= 0.3
3612   // This method also keeps track of the mother of the parton giving the flavor
3613   //
3614
3615   Int_t flavour = 0;
3616   Int_t pdgCode;
3617   Int_t aPDGcode;
3618   Double_t currentEnergy = 0;
3619   Double_t maxEnergy = 0;
3620   Double_t jeteta = jet->Eta();
3621   Double_t jetphi = jet->Phi();
3622   Double_t tracketa = 0;
3623   Double_t trackphi = 0;
3624   Double_t flavrad = fFlavorRadius;   //radius used for flavor
3625   Int_t indexM = 0;
3626   UInt_t status=0; //status code of leading parton
3627   fMpdg=0; // Initialize before each selection
3628   AliAODMCParticle *moftrack=0;
3629       for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
3630         {
3631           AliAODMCParticle *mctrack = (AliAODMCParticle*) mcarray->At(iTracks);
3632           if(!mctrack) continue;
3633           pdgCode = mctrack->GetPdgCode();
3634           aPDGcode = abs(pdgCode);
3635           if(aPDGcode==1||aPDGcode==2||aPDGcode==3||aPDGcode==4||aPDGcode==5||aPDGcode==6||aPDGcode==9||aPDGcode==21)
3636             {
3637               tracketa = mctrack->Eta();
3638               trackphi = mctrack->Phi();
3639               if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=flavrad)
3640                 {
3641                   currentEnergy = mctrack->E();
3642                   if(currentEnergy>maxEnergy)
3643                     {
3644                       maxEnergy = currentEnergy;
3645                       flavour = pdgCode;
3646                       indexM = mctrack->GetMother();
3647                       if(fCheckMCStatus) // default is true
3648                         status =  mctrack->GetStatus();
3649                       //                      fFlavProc->Fill(flavour,status);
3650                       //testing
3651                       if(indexM<=0)
3652                         fMpdg = 0; // Unknown
3653                       else
3654                         {
3655                           moftrack = (AliAODMCParticle*) mcarray->At(indexM);
3656                           fMpdg = moftrack->GetPdgCode();
3657                         }
3658                     }
3659                 }
3660             }
3661         }
3662
3663       // //Restriction to pythia string fragmentation
3664       // if(!fPhojetMC)  //if pythia
3665       //        {
3666       //          if(fMpdg!=0) // if not from the string
3667       //            flavour=0;
3668       //        }
3669
3670       //  PDG code of the mother of the leading parton, leading parton, jet pT
3671       fPDGMothLPart->Fill(fMpdg,flavour,jet->Pt());
3672       fFlavProc->Fill(flavour,status);
3673
3674   return flavour;
3675 }
3676 //________________________________________________________________________
3677 Double_t AliAnalysisTaskPartonDisc::GetDeltaR(Double_t eta1, Double_t phi1,Double_t eta2, Double_t phi2)
3678 {
3679   //
3680   // Return R between the two jets or particles
3681   //
3682
3683   Double_t deltaphi = TMath::Abs(phi2-phi1);
3684   if (deltaphi > TMath::Pi())
3685     deltaphi = 2.0 * TMath::Pi() - deltaphi;
3686
3687
3688   Double_t deltaR = sqrt((eta2-eta1)*(eta2-eta1)+deltaphi*deltaphi);
3689   return deltaR;
3690
3691 }
3692 //________________________________________________________________________
3693 Int_t AliAnalysisTaskPartonDisc::GetNumberOfMcChargedTracks(Int_t percentage,AliAODJet *jet, Int_t ntracks, TClonesArray *mcarray, Double_t jr)
3694 {
3695   //
3696   // Calculate the number of charged particles necessary to
3697   // add the given percentage of the jet energy (transverse energy)
3698   // for the MC case
3699
3700   Int_t numberOfChargedTracks = 0;
3701   Int_t currentNumber = 0;
3702   Double_t jeteta = jet->Eta();
3703   Double_t jetphi = jet->Phi();
3704   Double_t jetpT = jet->Pt();
3705   Double_t tracketa = 0;
3706   Double_t trackphi = 0;
3707   Int_t arraysize = 1000;
3708   Bool_t rfTrkFlag  = kFALSE;
3709   fCurrentJetCharge=0;
3710
3711   AliDebug(4,Form("Eta of the jet:%f ",jeteta));
3712   if(IsEqualRel(jetpT, 0.0)) //IsEqualRel(jetpT, 0.0) // jetpT==0
3713     return 0;
3714
3715   // RefTracks
3716   Int_t trkinjet = jet->GetRefTracks()->GetEntriesFast();
3717   if(trkinjet!=0)
3718     rfTrkFlag = kTRUE;
3719   AliDebug(4,Form("Number of tracks in this mc jet by RefTracks:%i \n",trkinjet));
3720
3721   AllocateStaticContainer(arraysize);
3722   InitializeStaticContainer(arraysize);
3723
3724   Double_t randomNum = 0.;
3725
3726   if(!rfTrkFlag)  // if not track ref, check track by track
3727     {
3728       AliDebug(4,Form("Empty Track Refs (mc)!"));
3729       for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
3730         {
3731           AliAODMCParticle *mctrack = (AliAODMCParticle*) mcarray->At(iTracks);
3732           if(!mctrack) continue;
3733           tracketa = mctrack->Eta();
3734           trackphi = mctrack->Phi();
3735           if(mctrack->Pt()<fMinpTVal) continue; // pT cut, not using track refs
3736           if(mctrack->IsPhysicalPrimary())
3737             {
3738               if(mctrack->Charge()!=0&&mctrack->Charge()!=-99)
3739                 {
3740                   if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
3741                     {
3742                       randomNum = gRandom->Rndm();
3743                       if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection dentro del cono
3744                       currentNumber++;
3745                       fCurrentJetCharge=fCurrentJetCharge+mctrack->Charge(); //add the charge of this track
3746                       fgContainer[currentNumber-1] = mctrack->Pt();  // save the current pt in the container
3747                     } // end if inside jet
3748                 } // end charged
3749             } // end physical primary
3750         }   // end for tracks
3751     } // end rfTrkFlag
3752
3753   if(rfTrkFlag)  // if track ref, use them
3754     {
3755       AliDebug(4,Form("Using Track Refs (mc)!"));
3756       for(Int_t ixt=0; ixt<trkinjet;ixt++)
3757         {
3758           AliAODMCParticle *vtrack = dynamic_cast<AliAODMCParticle*>(jet->GetRefTracks()->At(ixt));
3759           if(!vtrack) continue;
3760           if(vtrack->Charge()!=0&&vtrack->Charge()!=-99)
3761             {
3762               randomNum = gRandom->Rndm();
3763               if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection dentro del cono
3764               currentNumber++;
3765               fCurrentJetCharge=fCurrentJetCharge+vtrack->Charge(); //add the charge of this track
3766               fgContainer[currentNumber-1] = vtrack->Pt();  // save the current pt in the container
3767             }
3768         } // end trk in jet
3769     } // end if trk ref
3770
3771   // sort the contents of the container
3772   SortArray(fgContainer,arraysize);
3773   // loop over the contents and count how many tracks are necessary to recover the percentage of the energy
3774   numberOfChargedTracks = TracksForPercentage(fgContainer, arraysize, percentage, jetpT);
3775   AliDebug(4,Form("Number of tracks was:%i, returning",numberOfChargedTracks));
3776   return numberOfChargedTracks;
3777
3778 }
3779 //________________________________________________________________________
3780 Int_t AliAnalysisTaskPartonDisc::GetNumberOfChargedTracks(Int_t percentage,AliAODJet *jet, Int_t ntracks, AliAODEvent *aode, Double_t jr)
3781 {
3782   //
3783   // Calculate the number of charged particles necessary to
3784   // add the given percentage of the jet energy (transverse energy)
3785   // for the AOD track case
3786
3787   Int_t numberOfChargedTracks = 0;
3788   Int_t currentNumber = 0;
3789   Double_t jeteta = jet->Eta();
3790   Double_t jetphi = jet->Phi();
3791   Double_t jetpT = jet->Pt();
3792   Double_t tracketa = 0;
3793   Double_t trackphi = 0;
3794   Int_t arraysize = 1000;
3795   Bool_t rfTrkFlag  = kFALSE;
3796   fCurrentJetCharge=0;
3797
3798   if(IsEqualRel(jetpT, 0.0)) // IsEqualRel(jetpT, 0.0) // jetpT==0
3799     return 0;
3800
3801   // RefTracks
3802   Int_t trkinjet = jet->GetRefTracks()->GetEntriesFast();
3803   if(trkinjet!=0&&!fForceNotTR)
3804     rfTrkFlag = kTRUE;
3805   AliDebug(4,Form("Number of tracks in this reco jet by RefTracks:%i \n",trkinjet));
3806
3807   AllocateStaticContainer(arraysize);
3808   InitializeStaticContainer(arraysize);
3809   if(!rfTrkFlag)  // if not track ref, check track by track
3810     {
3811       AliDebug(4,Form("Empty Track Refs (reco)!"));
3812       for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
3813         {
3814           AliAODTrack *aodtrack = aode->GetTrack(iTracks);
3815           if(!aodtrack) continue;
3816           tracketa = aodtrack->Eta();
3817           trackphi = aodtrack->Phi();
3818           if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
3819             {
3820               if(!aodtrack->TestFilterBit(fFilterBit)) continue; //track filter selection
3821               if(aodtrack->Pt()<fMinpTVal) continue; // pT cut, not using track refs
3822               currentNumber++;
3823               fCurrentJetCharge=fCurrentJetCharge+aodtrack->Charge();
3824               fgContainer[currentNumber-1] = aodtrack->Pt();  // save the current pt in the container
3825
3826               ////////start centrality dependent pT spec ////////
3827               if(!fIsHIevent) //if is a proton proton event
3828                 {
3829                   if((jet->Pt()>10.)&&(jet->Pt()<20.))
3830                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,1);
3831                   if((jet->Pt()>20.)&&(jet->Pt()<30.))
3832                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,1);
3833                   if((jet->Pt()>30.)&&(jet->Pt()<40.))
3834                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,1);
3835                   if((jet->Pt()>40.)&&(jet->Pt()<50.))
3836                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,1);
3837                   if((jet->Pt()>50.)&&(jet->Pt()<60.))
3838                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,1);
3839                   if((jet->Pt()>60.)&&(jet->Pt()<70.))
3840                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,1);
3841                   if((jet->Pt()>70.)&&(jet->Pt()<80.))
3842                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,1);
3843                   if((jet->Pt()>80.)&&(jet->Pt()<90.))
3844                     fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,1);
3845                 } // end of pp event
3846               if(fIsHIevent) //if is a PbPb event
3847                 {
3848                   if(fEventCent>=0&&fEventCent<10.)
3849                     {
3850                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3851                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,2);
3852                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3853                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,2);
3854                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3855                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,2);
3856                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3857                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,2);
3858                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3859                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,2);
3860                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3861                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,2);
3862                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3863                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,2);
3864                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3865                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,2);
3866                     } // end of 0-10
3867                   if(fEventCent>=10&&fEventCent<20.)
3868                     {
3869                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3870                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,3);
3871                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3872                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,3);
3873                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3874                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,3);
3875                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3876                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,3);
3877                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3878                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,3);
3879                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3880                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,3);
3881                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3882                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,3);
3883                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3884                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,3);
3885                     } // end of 10-20
3886                   if(fEventCent>=20&&fEventCent<30.)
3887                     {
3888                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3889                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,4);
3890                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3891                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,4);
3892                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3893                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,4);
3894                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3895                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,4);
3896                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3897                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,4);
3898                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3899                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,4);
3900                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3901                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,4);
3902                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3903                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,4);
3904                     } // end of 20-30
3905                   if(fEventCent>=30&&fEventCent<40.)
3906                     {
3907                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3908                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,5);
3909                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3910                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,5);
3911                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3912                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,5);
3913                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3914                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,5);
3915                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3916                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,5);
3917                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3918                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,5);
3919                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3920                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,5);
3921                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3922                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,5);
3923                     } // end of 30-40
3924                   if(fEventCent>=40&&fEventCent<50.)
3925                     {
3926                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3927                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,6);
3928                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3929                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,6);
3930                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3931                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,6);
3932                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3933                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,6);
3934                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3935                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,6);
3936                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3937                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,6);
3938                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3939                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,6);
3940                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3941                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,6);
3942                     }  // end of 40-50
3943                   if(fEventCent>=50&&fEventCent<60.)
3944                     {
3945                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3946                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,7);
3947                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3948                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,7);
3949                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3950                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,7);
3951                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3952                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,7);
3953                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3954                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,7);
3955                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3956                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,7);
3957                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3958                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,7);
3959                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3960                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,7);
3961                     }  // end of 50-60
3962                   if(fEventCent>=60&&fEventCent<70.)
3963                     {
3964                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3965                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,8);
3966                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3967                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,8);
3968                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3969                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,8);
3970                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3971                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,8);
3972                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3973                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,8);
3974                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3975                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,8);
3976                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3977                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,8);
3978                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3979                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,8);
3980                     }  // end of 60-70
3981                   if(fEventCent>=70&&fEventCent<80.)
3982                     {
3983                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
3984                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,9);
3985                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
3986                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,9);
3987                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
3988                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,9);
3989                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
3990                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,9);
3991                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
3992                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,9);
3993                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
3994                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,9);
3995                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
3996                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,9);
3997                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
3998                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,9);
3999                     }  // end of 70-80
4000                   if(fEventCent>=80&&fEventCent<100.)
4001                     {
4002                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4003                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),1,10);
4004                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4005                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),2,10);
4006                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4007                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),3,10);
4008                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4009                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),4,10);
4010                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4011                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),5,10);
4012                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4013                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),6,10);
4014                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4015                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),7,10);
4016                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4017                         fPtDistInJetConeRaw->Fill(aodtrack->Pt(),8,10);
4018                     }  // end of 80-100
4019                 }  //end of PbPb event
4020               ////////end centrality dependent pT spec/////
4021             } // end if inside jet
4022         } // end for tracks
4023     } // end of no track ref
4024
4025   if(rfTrkFlag)  // if track ref, use them
4026     {
4027       AliDebug(4,Form("Using Track Refs (reco)!"));
4028       for(Int_t ixt=0; ixt<trkinjet;ixt++)
4029         {
4030           AliVParticle *vtrack = dynamic_cast<AliVParticle*>(jet->GetRefTracks()->At(ixt));
4031           if(!vtrack) continue;
4032           // No further checks, all cuts should be in in the track refs
4033           if(vtrack->Charge()!=0&&vtrack->Charge()!=-99)
4034             {
4035               currentNumber++;
4036               fCurrentJetCharge=fCurrentJetCharge+vtrack->Charge();
4037               fgContainer[currentNumber-1] = vtrack->Pt();  // save the current pt in the container
4038
4039               ////////start centrality dependent pT spec ////////
4040               if(!fIsHIevent) //if is a proton proton event
4041                 {
4042                   if((jet->Pt()>10.)&&(jet->Pt()<20.))
4043                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,1);
4044                   if((jet->Pt()>20.)&&(jet->Pt()<30.))
4045                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,1);
4046                   if((jet->Pt()>30.)&&(jet->Pt()<40.))
4047                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,1);
4048                   if((jet->Pt()>40.)&&(jet->Pt()<50.))
4049                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,1);
4050                   if((jet->Pt()>50.)&&(jet->Pt()<60.))
4051                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,1);
4052                   if((jet->Pt()>60.)&&(jet->Pt()<70.))
4053                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,1);
4054                   if((jet->Pt()>70.)&&(jet->Pt()<80.))
4055                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,1);
4056                   if((jet->Pt()>80.)&&(jet->Pt()<90.))
4057                     fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,1);
4058                 } // end of pp event
4059               if(fIsHIevent) //if is a PbPb event
4060                 {
4061                   if(fEventCent>=0&&fEventCent<10.)
4062                     {
4063                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4064                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,2);
4065                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4066                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,2);
4067                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4068                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,2);
4069                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4070                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,2);
4071                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4072                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,2);
4073                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4074                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,2);
4075                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4076                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,2);
4077                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4078                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,2);
4079                     } // end of 0-10
4080                   if(fEventCent>=10&&fEventCent<20.)
4081                     {
4082                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4083                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,3);
4084                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4085                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,3);
4086                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4087                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,3);
4088                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4089                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,3);
4090                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4091                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,3);
4092                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4093                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,3);
4094                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4095                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,3);
4096                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4097                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,3);
4098                     } // end of 10-20
4099                   if(fEventCent>=20&&fEventCent<30.)
4100                     {
4101                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4102                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,4);
4103                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4104                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,4);
4105                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4106                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,4);
4107                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4108                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,4);
4109                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4110                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,4);
4111                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4112                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,4);
4113                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4114                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,4);
4115                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4116                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,4);
4117                     } // end of 20-30
4118                   if(fEventCent>=30&&fEventCent<40.)
4119                     {
4120                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4121                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,5);
4122                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4123                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,5);
4124                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4125                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,5);
4126                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4127                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,5);
4128                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4129                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,5);
4130                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4131                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,5);
4132                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4133                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,5);
4134                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4135                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,5);
4136                     } // end of 30-40
4137                   if(fEventCent>=40&&fEventCent<50.)
4138                     {
4139                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4140                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,6);
4141                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4142                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,6);
4143                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4144                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,6);
4145                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4146                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,6);
4147                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4148                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,6);
4149                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4150                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,6);
4151                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4152                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,6);
4153                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4154                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,6);
4155                     }  // end of 40-50
4156                   if(fEventCent>=50&&fEventCent<60.)
4157                     {
4158                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4159                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,7);
4160                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4161                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,7);
4162                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4163                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,7);
4164                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4165                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,7);
4166                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4167                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,7);
4168                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4169                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,7);
4170                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4171                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,7);
4172                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4173                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,7);
4174                     }  // end of 50-60
4175                   if(fEventCent>=60&&fEventCent<70.)
4176                     {
4177                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4178                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,8);
4179                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4180                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,8);
4181                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4182                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,8);
4183                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4184                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,8);
4185                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4186                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,8);
4187                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4188                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,8);
4189                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4190                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,8);
4191                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4192                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,8);
4193                     }  // end of 60-70
4194                   if(fEventCent>=70&&fEventCent<80.)
4195                     {
4196                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4197                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,9);
4198                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4199                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,9);
4200                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4201                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,9);
4202                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4203                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,9);
4204                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4205                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,9);
4206                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4207                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,9);
4208                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4209                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,9);
4210                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4211                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,9);
4212                     }  // end of 70-80
4213                   if(fEventCent>=80&&fEventCent<100.)
4214                     {
4215                       if((jet->Pt()>10.)&&(jet->Pt()<20.))
4216                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),1,10);
4217                       if((jet->Pt()>20.)&&(jet->Pt()<30.))
4218                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),2,10);
4219                       if((jet->Pt()>30.)&&(jet->Pt()<40.))
4220                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),3,10);
4221                       if((jet->Pt()>40.)&&(jet->Pt()<50.))
4222                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),4,10);
4223                       if((jet->Pt()>50.)&&(jet->Pt()<60.))
4224                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),5,10);
4225                       if((jet->Pt()>60.)&&(jet->Pt()<70.))
4226                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),6,10);
4227                       if((jet->Pt()>70.)&&(jet->Pt()<80.))
4228                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),7,10);
4229                       if((jet->Pt()>80.)&&(jet->Pt()<90.))
4230                         fPtDistInJetConeRaw->Fill(vtrack->Pt(),8,10);
4231                     }  // end of 80-100
4232                 }  //end of PbPb event
4233               ////////end centrality dependent pT spec/////
4234             }
4235         } // end trk in jet
4236     } // end if trk ref
4237
4238
4239   // sort the contents of the container
4240   SortArray(fgContainer,arraysize);
4241   // loop over the contents and count how many tracks are necessary to recover the percetage of the energy
4242   numberOfChargedTracks = TracksForPercentage(fgContainer, arraysize, percentage, jetpT);
4243   return numberOfChargedTracks;
4244 }
4245 //________________________________________________________________________
4246 void AliAnalysisTaskPartonDisc::AllocateStaticContainer(Int_t size)
4247 {
4248   //
4249   // Allocate the static container with the given dimensions
4250   //
4251
4252   if(fgContainer)
4253     return;
4254   fgContainer = new Double_t[size];
4255
4256 }
4257 //________________________________________________________________________
4258 void AliAnalysisTaskPartonDisc::InitializeStaticContainer(Int_t size)
4259 {
4260   //
4261   // Initialize the static container with the given dimensions
4262   //
4263
4264   memset(fgContainer,0,size*sizeof(Double_t));
4265
4266 }
4267 //________________________________________________________________________
4268 void AliAnalysisTaskPartonDisc::SortArray(Double_t *pointer, Int_t arraySize)
4269 {
4270   //
4271   // Sort the contents of the array
4272   // From lower to higher value
4273   //
4274
4275   std::sort(pointer,pointer+arraySize);
4276
4277 }
4278 //________________________________________________________________________
4279 Int_t AliAnalysisTaskPartonDisc::TracksForPercentage(Double_t *array, Int_t arraysize, Int_t percentage, Double_t jetenergy)
4280 {
4281   //
4282   // Loop over the contents and count how many tracks are necessary to recover
4283   // the given percentage of the energy.
4284   // If all tracks did not sum the required fraction, it returns 500
4285   //
4286
4287   AliDebug(4,Form("Calculating the number of tracks for a jet with energy:%f \n",jetenergy));
4288   Double_t ptsum = 0;
4289   Double_t threshold = jetenergy*percentage/100;
4290   Int_t tracknummer=0;
4291   fCurrentJetMinPtNT90 = 7000.; //dummy value for debugging
4292   for(Int_t inverse=arraysize; inverse>0; inverse--)
4293     {
4294       ptsum= ptsum + array[inverse-1];
4295       if(inverse==arraysize) //if the highest value
4296         fMaxTrackPtInNTX=array[inverse-1]; //saving the highest pT track value
4297       tracknummer++;
4298       fMinTrackPtInNTX=array[inverse-1]; // this is the current lowest pT track used
4299       if(fIsPossibleToSubstBckg) //Store the value if it was possible to find a perpendicular cone
4300         fCurrentJetMinPtNT90=array[inverse-1];
4301       if(ptsum>=threshold)  // the threshold was reached
4302         break;
4303       if((inverse==1)&&(ptsum<threshold)) //if it was not possible to reach the threshold
4304         {
4305           tracknummer = 500; //dummy value for debugging
4306           fCurrentJetMinPtNT90 = 7000.; //dummy value for debugging
4307         }
4308     }
4309
4310   AliDebug(4,"Done calculating the number of tracks, returning to main code \n");
4311   return tracknummer;
4312
4313 }
4314 //________________________________________________________________________
4315 Bool_t AliAnalysisTaskPartonDisc::IsMCTrackInsideThisJet(AliAODMCParticle *MCParticle, AliAODJet *Jet, Double_t jr)
4316 {
4317   //
4318   // Return kTrue if the mc track is inside the area covered by the cone of the jet
4319   //
4320
4321   Double_t etapart = MCParticle->Eta();
4322   Double_t phipart = MCParticle->Phi();
4323   Double_t etajet = Jet->Eta();
4324   Double_t phijet = Jet->Phi();
4325   Double_t deltaeta = etajet-etapart;
4326   Double_t deltaphi = TMath::Abs(phijet-phipart);
4327   if (deltaphi > TMath::Pi())
4328     deltaphi = 2.0 * TMath::Pi() - deltaphi;
4329
4330   Double_t deltar = sqrt(deltaeta*deltaeta+deltaphi*deltaphi);
4331   if(deltar<=jr)
4332     return kTRUE;
4333   else
4334     return kFALSE;
4335
4336 }
4337 //________________________________________________________________________
4338 Bool_t AliAnalysisTaskPartonDisc::IsTrackInsideThisJet(AliAODTrack *aodT, AliAODJet *Jet, Double_t jr)
4339 {
4340   //
4341   // Return kTrue if the track is inside the area covered by the cone of the jet
4342   //
4343
4344   Double_t etapart = aodT->Eta();
4345   Double_t phipart = aodT->Phi();
4346   Double_t etajet = Jet->Eta();
4347   Double_t phijet = Jet->Phi();
4348   Double_t deltaeta = etajet-etapart;
4349   Double_t deltaphi = TMath::Abs(phijet-phipart);
4350   if (deltaphi > TMath::Pi())
4351     deltaphi = 2.0 * TMath::Pi() - deltaphi;
4352
4353   Double_t deltar = sqrt(deltaeta*deltaeta+deltaphi*deltaphi);
4354   if(deltar<=jr)
4355     return kTRUE;
4356   else
4357     return kFALSE;
4358
4359 }
4360 //________________________________________________________________________
4361 Bool_t AliAnalysisTaskPartonDisc::VertexInJet(AliAODVertex *pvtx, AliAODVertex *vtx, AliAODJet *jet, Double_t jr)
4362 {
4363   //
4364   // Return kTRUE if the cone covers the vector
4365   // from the primary vertex to this vertex
4366   //
4367
4368   Double_t pvx =  pvtx->GetX(); //primary vertex x
4369   Double_t pvy =  pvtx->GetY(); //primary vertex y
4370   Double_t pvz =  pvtx->GetZ(); //primary vertex z
4371
4372   Double_t vx =  vtx->GetX(); // vertex x
4373   Double_t vy =  vtx->GetY(); // vertex y
4374   Double_t vz =  vtx->GetZ(); // vertex z
4375
4376   if(IsEqualRel(pvx, vx) && IsEqualRel(pvy, vy) && IsEqualRel(pvz, vz)) //!IsEqualRel(totalTrackPt, 0.0) // pvx==vx && pvy==vy && pvz==vz
4377     return kFALSE;
4378
4379   Double_t thetaval = GetThetaAngle(vx-pvx,vy-pvy,vz-pvz);
4380   Double_t etaval = GetEtaValue(thetaval);
4381   Double_t phival = GetPhiAngle(vx-pvx,vy-pvy);
4382
4383   Double_t etajet = jet->Eta();
4384   Double_t phijet = jet->Phi();
4385
4386   if(GetDeltaR(etajet,phijet,etaval,phival)<=jr)
4387     return kTRUE;
4388
4389   return kFALSE;
4390 }
4391 //________________________________________________________________________
4392 Double_t AliAnalysisTaskPartonDisc::GetEtaValue(Double_t theta) const
4393 {
4394   //
4395   // Get the eta value
4396   //
4397
4398   Double_t eta = -TMath::Log(theta/2);
4399   return eta;
4400
4401 }
4402 //________________________________________________________________________
4403 Double_t AliAnalysisTaskPartonDisc::GetThetaAngle(Double_t xval, Double_t yval, Double_t zval)
4404 {
4405   //
4406   // Get the theta angle related to these coordinates
4407   //
4408
4409   if(IsEqualRel(zval, 0.0)) //!IsEqualRel(totalTrackPt, 0.0) // zval==0
4410     return TMath::PiOver2();
4411
4412   Double_t theta = 0;
4413   Double_t erre = TMath::Sqrt(xval*xval+yval*yval+zval*zval);
4414
4415   if(zval>0)
4416     theta = TMath::ACos(zval/erre);
4417
4418   if(zval<0)
4419     theta = TMath::Pi() - TMath::ACos(TMath::Abs(zval)/erre);
4420
4421   if(IsEqualRel(theta, 0.0)) // theta==0
4422     AliError("ERROR in GetThetaAngle!");
4423
4424   return theta;
4425
4426 }
4427 //________________________________________________________________________
4428 Double_t AliAnalysisTaskPartonDisc::GetPhiAngle(Double_t xval, Double_t yval)
4429 {
4430   //
4431   // Get the phi angle related to these coordinates
4432   //
4433
4434   if(IsEqualRel(xval, 0.0)) //IsEqualRel(zval, 0.0) // xval==0
4435     {
4436       if(yval>0)
4437         return TMath::PiOver2();
4438       if(yval<0)
4439         return (3/2*TMath::Pi());
4440     }
4441   Double_t phi = 0;
4442
4443   if(xval>0)
4444     {
4445       if(yval>0)
4446         phi = TMath::ATan(yval/xval);
4447       if(yval<0)
4448         phi = 2*TMath::Pi()- TMath::ATan(TMath::Abs(yval)/xval);
4449     }
4450   if(xval<0)
4451     {
4452       if(yval>0)
4453         phi = TMath::Pi() - TMath::ATan(yval/TMath::Abs(xval));
4454       if(yval<0)
4455         phi = TMath::Pi() + TMath::ATan(TMath::Abs(yval/xval));
4456     }
4457
4458   return phi;
4459 }
4460 //________________________________________________________________________
4461 Double_t AliAnalysisTaskPartonDisc::DeltaPhiMC(AliAODJet *jet, AliAODMCParticle *particle)
4462 {
4463   //
4464   // Get delta-phi MC jet-track
4465   //
4466
4467   Double_t deltaphi = jet->Phi()-particle->Phi();
4468   if (deltaphi > TMath::Pi())
4469     deltaphi = 2.0 * TMath::Pi() - deltaphi;
4470   if (deltaphi < -TMath::Pi())
4471     deltaphi =  -deltaphi- 2.0 * TMath::Pi();
4472
4473   return deltaphi;
4474
4475 }
4476 //________________________________________________________________________
4477 Double_t AliAnalysisTaskPartonDisc::DeltaEtaMC(AliAODJet *jet, AliAODMCParticle *particle)
4478 {
4479   //
4480   // Get delta-eta MC jet-track
4481   //
4482
4483   Double_t deltaetaMC = jet->Eta() - particle->Eta();
4484   return deltaetaMC;
4485 }
4486 //________________________________________________________________________
4487 Double_t AliAnalysisTaskPartonDisc::DeltaPhiSqMC(AliAODJet *jet, AliAODMCParticle *particle)
4488 {
4489   //
4490   // Get delta-phi^2 MC jet-track
4491   //
4492
4493   Double_t deltaphi = DeltaPhiMC(jet,particle);
4494   Double_t deltaphiSqMC = deltaphi*deltaphi;
4495   return deltaphiSqMC;
4496 }
4497 //________________________________________________________________________
4498 Double_t AliAnalysisTaskPartonDisc::DeltaEtaSqMC(AliAODJet *jet, AliAODMCParticle *particle)
4499 {
4500   //
4501   // Get delta-eta^2 MC jet-track
4502   //
4503
4504   Double_t deltaeta = DeltaEtaMC(jet,particle);
4505   Double_t deltaetaSqMC = deltaeta*deltaeta;
4506   return deltaetaSqMC;
4507 }
4508 //________________________________________________________________________
4509 Double_t AliAnalysisTaskPartonDisc::DeltaPhiTrack(AliAODJet *jet, AliAODTrack *track)
4510 {
4511   //
4512   // Get delta-phi Track jet-track
4513   //
4514
4515   // Double_t deltaphiTrack = jet->Phi() - track->Phi();
4516   // return deltaphiTrack;
4517
4518   Double_t deltaphi = jet->Phi() - track->Phi();
4519   if (deltaphi > TMath::Pi())
4520     deltaphi = 2.0 * TMath::Pi() - deltaphi;
4521   if (deltaphi < -TMath::Pi())
4522     deltaphi =  -deltaphi- 2.0 * TMath::Pi();
4523
4524   return deltaphi;
4525
4526
4527 }
4528 //________________________________________________________________________
4529 Double_t AliAnalysisTaskPartonDisc::DeltaEtaTrack(AliAODJet *jet, AliAODTrack *track)
4530 {
4531   //
4532   // Get delta-eta Track jet-track
4533   //
4534
4535   Double_t deltaetaTrack = jet->Eta() - track->Eta();
4536   return deltaetaTrack;
4537 }
4538 //________________________________________________________________________
4539 Double_t AliAnalysisTaskPartonDisc::DeltaPhiSqTrack(AliAODJet *jet, AliAODTrack *track)
4540 {
4541   //
4542   // Get delta-phi^2 Track jet-track
4543   //
4544
4545   Double_t deltaphi = DeltaPhiTrack(jet,track);
4546   Double_t deltaphiSqTrack = deltaphi*deltaphi;
4547   return deltaphiSqTrack;
4548 }
4549 //________________________________________________________________________
4550 Double_t AliAnalysisTaskPartonDisc::DeltaEtaSqTrack(AliAODJet *jet, AliAODTrack *track)
4551 {
4552   //
4553   // Get delta-eta^2 Track jet-track
4554   //
4555
4556   Double_t deltaeta = DeltaEtaTrack(jet,track);
4557   Double_t deltaetaSqTrack = deltaeta*deltaeta;
4558   return deltaetaSqTrack;
4559 }
4560 //_________________________________________________________________________
4561 Bool_t AliAnalysisTaskPartonDisc::NumberOfReadEventsAOD(const char* currFile, Int_t &fNEvents)
4562 {
4563   //
4564   // get the number of events read out to create this AOD
4565   // from the njets distribution from UA1
4566   // This is to called in Notify and should provide the path to the AOD/ESD file
4567   // code from AliAnalysisTaskJetSpectrum2
4568
4569   TString file(currFile);
4570   fNEvents = 1;
4571
4572   if(file.Contains("root_archive.zip#"))
4573     {
4574       Ssiz_t pos1 = file.Index("root_archive",12,TString::kExact);
4575       Ssiz_t pos = file.Index("#",1,pos1,TString::kExact);
4576       file.Replace(pos+1,20,"");
4577     }
4578   else
4579     {
4580       // not an archive take the basename....
4581       file.ReplaceAll(gSystem->BaseName(file.Data()),"");
4582     }
4583   Printf("%s",file.Data());
4584
4585   TFile *fnev = TFile::Open(Form("%s%s",file.Data(),"PWG4_JetTasksOutput.root"));
4586   if(!fnev)
4587     {
4588       return kFALSE;
4589     } // no PWG4_JetTasksOutput.root
4590   else
4591     {
4592       TList *list;
4593       gDirectory->GetObject("PWG4_jethist_aodmc_ua104/jethist_aodmc_ua104;1",list);
4594       if(!list)
4595         {
4596           fnev->Close();
4597           return kFALSE;
4598         }
4599       fNEvents = Int_t(((TH1*)list->FindObject("NJetsH"))->GetEntries());
4600       fnev->Close();
4601     }
4602   return kTRUE;
4603 }
4604 //___________________________________________________________________________
4605 void AliAnalysisTaskPartonDisc::HasOverlapedCones(TClonesArray *JetArray)
4606 {
4607   //
4608   // Check if there are jet cones that overlap on the current event
4609   // for UA1 and SISCone, based on the cone axis and the radius.
4610   // There can be maximum 7.85 jet in the phi acceptance, with no overlap in
4611   // the phi direction (2pi/0.8).
4612   // Plus there can be up to two jets in contained in the eta acceptance,
4613   // if they are centered in -0.5 and 0.5 respectively, per phi interval
4614   // In total there can be up to 15.7 jets
4615   // Check up to 16 jets, inside the acceptance,
4616   // set the flags for up to those 8 jets.
4617   //
4618
4619   // Now also check if there is a perpendicular area to the leading jet
4620   // that does not contain a jet, if so, set a flag to kTRUE
4621   // Possibility to remove single track jets if there are track references
4622
4623   fJetEvent=kFALSE;
4624   fHasPerpCone=kTRUE;
4625   fEtaPerpCoord=0.0;
4626   fPhiPerpCoord=0.0;
4627   fPtPerpCoord=0.0;
4628
4629   ResetJetFlags(); // reset the flags
4630
4631   Int_t njets = JetArray->GetEntries();
4632   Int_t maxNjets = 16;
4633   Double_t etaCoordinates[16]={0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0};
4634   Double_t phiCoordinates[16]={0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0};
4635
4636   for (Int_t idxj = 0; idxj < njets; idxj++)
4637     {
4638       if(idxj>15)
4639         continue;  //maximum 16 jets
4640
4641       AliAODJet *currentJet = dynamic_cast<AliAODJet*>(JetArray->At(idxj));
4642       if (!currentJet)
4643         {
4644           AliDebug(2,Form("ERROR: Could not receive jet %d \n", idxj));
4645           continue;
4646         }
4647       // Store the axis coordinates of all sixteen jets
4648       etaCoordinates[idxj]=currentJet->Eta();
4649       phiCoordinates[idxj]=currentJet->Phi();
4650     }  //end of first cycle
4651
4652   // Ahora checar que no tengan overlap
4653   Double_t deltaeta = 0.0;
4654   Double_t deltaphi = 0.0;
4655   Double_t deltar = 0.0;
4656   Int_t currentIdxJet = 0;
4657   Int_t trkinjet = 0;
4658
4659   for (Int_t inxoj = 0; inxoj < maxNjets; inxoj++)
4660     {
4661       // only check up to the number of found jets in the event
4662       if(inxoj==njets)
4663         break;
4664
4665       // Optional RefTracks check for single track jets
4666       if(fForceSkipSJ)
4667         {
4668           AliAODJet *currentJet = dynamic_cast<AliAODJet*>(JetArray->At(inxoj));
4669           if (!currentJet)
4670             {
4671               AliDebug(2,Form("ERROR: Could not receive jet %d \n", inxoj));
4672               continue;
4673             }
4674           trkinjet = currentJet->GetRefTracks()->GetEntriesFast();
4675           if(trkinjet==1) // si tiene 1 solo track se marca como malo
4676             {
4677               fJetFlags[inxoj]=kFALSE;
4678               continue;
4679             }
4680         } // end of skip of single track jets condition
4681
4682       // First check if the current jet has its axis inside acceptance
4683       if(!(TMath::Abs(etaCoordinates[inxoj])<=fJetAcceptance)) //
4684         {
4685           fJetFlags[inxoj]=kFALSE;
4686           continue;
4687         }
4688       currentIdxJet = inxoj;
4689       //Check this jet with the rest of the jets
4690       for (Int_t idx2 = 0; idx2 < maxNjets; idx2++)
4691         {
4692           if(idx2==njets) // just check the number of found jets
4693             break;
4694
4695           if(currentIdxJet==idx2) // if the same jet
4696             continue;
4697           if(!fJetFlags[idx2]) // if the other jet is already not usable
4698             continue;
4699           if(!(TMath::Abs(etaCoordinates[idx2])<=fJetAcceptance)) // if the jet is outside acceptance
4700             continue;
4701           deltaeta = etaCoordinates[currentIdxJet]-etaCoordinates[idx2];
4702           deltaphi = phiCoordinates[currentIdxJet]-phiCoordinates[idx2];
4703           if (deltaphi > TMath::Pi())
4704             deltaphi = 2.0 * TMath::Pi() - deltaphi;
4705           deltar = sqrt(deltaeta*deltaeta+deltaphi*deltaphi);
4706           if(deltar<=2.0*fJetRadius) // if the distance between jet axis is less than 2r with any jet, mark as not usable
4707             {
4708               fJetFlags[currentIdxJet]=kFALSE;
4709               fJetFlags[idx2]=kFALSE; // both jets are not usable
4710               // if(fEnablePrints)
4711               //        {
4712               //          printf("Rejecting jet #:%i because it had overlap with jet #:%i \n",currentIdxJet, idx2);
4713               //          printf("Eta1:%f, Phi1:%f \n", etaCoordinates[currentIdxJet],phiCoordinates[currentIdxJet]);
4714               //          printf("Eta2:%f, Phi2:%f \n", etaCoordinates[idx2],phiCoordinates[idx2]);
4715               //          printf("Current event number:%i \n",fEvtCount-1);
4716               //        }
4717             } // end of actual flagging
4718         } // end of checking the current jet with the rest
4719     } // end of loop over the jets of the branch
4720
4721   // Check if there is at least one accepted jet, so it makes sense to calculate the perpendicular cone
4722   Int_t accJets = 0;
4723   for (Int_t checkjets = 0; checkjets < maxNjets; checkjets++)
4724     {
4725       // only check up to the number of found jets in the event
4726       if(checkjets==njets)
4727         break;
4728       if(fJetFlags[checkjets]) // find the accepted leading jet in acceptance
4729         accJets++;
4730     }
4731   if(accJets>0)
4732     fJetEvent=kTRUE;
4733
4734   // Check for the leading jet on the event
4735   for (Int_t searchlead = 0; searchlead < maxNjets; searchlead++)
4736     {
4737       // only check up to the number of found jets in the event
4738       if(searchlead==njets)
4739         break;
4740       if(fJetFlags[searchlead]) // find the accepted leading jet in acceptance
4741         {
4742           // Phi + pi/2
4743           fPhiPerpCoord = phiCoordinates[searchlead] + 0.5*TMath::Pi();
4744           if(fPhiPerpCoord>2.0*TMath::Pi())
4745             fPhiPerpCoord = fPhiPerpCoord - 2.0*TMath::Pi();
4746           // Same eta
4747           fEtaPerpCoord = etaCoordinates[searchlead];
4748           // Now check if this cone overlaps with any found jet
4749           for (Int_t jets = 0; jets < maxNjets; jets++)
4750             {
4751               // only check up to the number of found jets in the event
4752               if(jets==njets)
4753                 break;
4754               // now check that this jet is not the same as the leading
4755               if(jets==searchlead)
4756                 continue;
4757
4758               deltaphi = phiCoordinates[jets]-fPhiPerpCoord;
4759               if (deltaphi > TMath::Pi())
4760                 deltaphi = 2.0 * TMath::Pi() - deltaphi;
4761               if(deltaphi<=2.0*fJetRadius) // if the distance between cone axis is less than 2r with any jet, mark as not usable
4762                 {
4763                   fHasPerpCone=kFALSE;
4764                 }
4765                 // }
4766             } // loop over accepted jets
4767           break; // done doing stuff with the leading
4768         } // if for the first accepted jet (leading)
4769     }
4770 }
4771 //_______________________________________________________________________
4772 void AliAnalysisTaskPartonDisc::ResetJetFlags()
4773 {
4774   //
4775   // Reset the flags used for tagging jets from the branches
4776   // Use before calling HasOverlapedCones(jetbranch)
4777   //
4778
4779   for(Int_t a=0; a<16;a++)
4780     {
4781       fJetFlags[a]=kTRUE;
4782     }
4783
4784 }
4785 //________________________________________________________________________
4786 Int_t AliAnalysisTaskPartonDisc::GetNMcChargedTracksAboveThreshold(AliAODJet *jet, Int_t ntracks, TClonesArray *mcarray, Double_t jr)
4787 {
4788   // Calculate the number of charged particles above threshold
4789   // inside this jet for the MC case
4790   // the threshold is fCurrentJetMinPtNT90
4791
4792   Int_t numberOfChargedTracks = 0;
4793   Int_t currentNumber = 0;
4794   Double_t jeteta = jet->Eta();
4795   Double_t jetphi = jet->Phi();
4796   Double_t jetpT = jet->Pt();
4797   Double_t tracketa = 0;
4798   Double_t trackphi = 0;
4799
4800   if(IsEqualRel(jetpT, 0.0)) //IsEqualRel(zval, 0.0) //jetpT==0
4801     return 0;
4802
4803   if(IsEqualRel(fCurrentJetMinPtNT90, 7000.)) // fCurrentJetMinPtNT90==7000.
4804     return 1000; //dummy val for debugging
4805
4806   Double_t randomNum = 0.;
4807
4808   for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
4809     {
4810       AliAODMCParticle *mctrack = (AliAODMCParticle*) mcarray->At(iTracks);
4811       if(!mctrack) continue;
4812       tracketa = mctrack->Eta();
4813       trackphi = mctrack->Phi();
4814       if(mctrack->Pt()<fCurrentJetMinPtNT90) continue;
4815       if(mctrack->IsPhysicalPrimary())
4816         {
4817           if(mctrack->Charge()!=0&&mctrack->Charge()!=-99)
4818             {
4819               if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
4820                 {
4821                   randomNum = gRandom->Rndm();
4822                   if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection
4823                   currentNumber++;
4824                 } // end if inside jet
4825             } // end charged
4826         } // end physical primary
4827     }   // end for tracks
4828
4829   numberOfChargedTracks = currentNumber;
4830   AliDebug(4,Form("Number of tracks above threshold MC was:%i, returning",numberOfChargedTracks));
4831   return numberOfChargedTracks;
4832
4833 }
4834 //________________________________________________________________________
4835   Int_t AliAnalysisTaskPartonDisc::GetRecalcNTXMc(Int_t percentage, AliAODJet *originaljet, Int_t ntracks, TClonesArray *mcarray, Double_t jr)
4836 {
4837   //
4838   // Calculate the number of charged particles necessary to
4839   // add the given percentage of the jet energy (transverse energy)
4840   // after background substraction, for the MC case
4841
4842   Int_t numberOfChargedTracks = 0;
4843   Int_t currentNumber = 0;
4844   Double_t jetpT = fBckgSbsJet[0]; //pT
4845   Double_t jeteta = fBckgSbsJet[1]; //eta
4846   Double_t jetphi = fBckgSbsJet[2]; //phi
4847   Double_t tracketa = 0;
4848   Double_t trackphi = 0;
4849   Int_t arraysize = 1000;
4850   Bool_t rfTrkFlag  = kFALSE;
4851
4852   if(IsEqualRel(jetpT, 0.0)) //IsEqualRel(jetpT, 0.0) //jetpT==0
4853     return 0;
4854
4855   // RefTracks
4856   Int_t trkinjet = originaljet->GetRefTracks()->GetEntriesFast();
4857   if(trkinjet!=0)
4858     rfTrkFlag = kTRUE;
4859   AliDebug(4,Form("Number of tracks in this mc jet by RefTracks:%i \n",trkinjet));
4860
4861   AllocateStaticContainer(arraysize);
4862   InitializeStaticContainer(arraysize);
4863
4864   Double_t randomNum = 0.;
4865
4866   if(!rfTrkFlag)  // if not track ref, check track by track
4867     {
4868       AliDebug(4,Form("Empty Track Refs (mc)!"));
4869       for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
4870         {
4871           AliAODMCParticle *mctrack = (AliAODMCParticle*) mcarray->At(iTracks);
4872           if(!mctrack) continue;
4873           tracketa = mctrack->Eta();
4874           trackphi = mctrack->Phi();
4875           if(mctrack->Pt()<fMinpTVal) continue; // pT cut, not using track refs
4876           if(mctrack->IsPhysicalPrimary())
4877             {
4878               if(mctrack->Charge()!=0&&mctrack->Charge()!=-99)
4879                 {
4880                   if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
4881                     {
4882                       randomNum = gRandom->Rndm();
4883                       if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection
4884                       currentNumber++;
4885                       fgContainer[currentNumber-1] = mctrack->Pt();  // save the current pt in the container
4886                     } // end if inside jet
4887                 } // end charged
4888             } // end physical primary
4889         }   // end for tracks
4890     } // end rfTrkFlag
4891
4892   if(rfTrkFlag)  // if track ref, use them
4893     {
4894       AliDebug(4,Form("Using Track Refs (mc)!"));
4895       for(Int_t ixt=0; ixt<trkinjet;ixt++)
4896         {
4897           AliAODMCParticle *vtrack = dynamic_cast<AliAODMCParticle*>(originaljet->GetRefTracks()->At(ixt));
4898           if(!vtrack) continue;
4899           if(vtrack->Charge()!=0&&vtrack->Charge()!=-99)
4900             {
4901               randomNum = gRandom->Rndm();
4902               if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection
4903               currentNumber++;
4904               fgContainer[currentNumber-1] = vtrack->Pt();  // save the current pt in the container
4905             }
4906         } // end trk in jet
4907     } // end if trk ref
4908
4909   // sort the contents of the container
4910   SortArray(fgContainer,arraysize);
4911   // loop over the contents and count how many tracks are necessary to recover the percentage of the energy
4912   numberOfChargedTracks = TracksForPercentageRecalc(fgContainer, arraysize, percentage, jetpT); //este es el que tengo que modificar...
4913   AliDebug(4,Form("Number of tracks was:%i, returning",numberOfChargedTracks));
4914   return numberOfChargedTracks;
4915 }
4916 //________________________________________________________________________
4917 Int_t AliAnalysisTaskPartonDisc::TracksForPercentageRecalc(Double_t *array, Int_t arraysize, Int_t percentage, Double_t jetenergy)
4918 {
4919   //
4920   // Loop over the contents and count how many tracks are necessary to recover
4921   // the given percentage of the energy.
4922   // If all tracks did not sum the required fraction, it returns 500
4923   // this saves the minimum pT used, during the nt90 recalculation
4924   // after jet energy correction
4925
4926   AliDebug(4,Form("Re-calculating the number of tracks for a jet with corrected pT:%f \n",jetenergy));
4927   Double_t ptsum = 0;
4928   Double_t threshold = jetenergy*percentage/100;
4929   Int_t tracknummer=0;
4930   fCurrentJetMinPtNT90Recalc=7000.; //dummy value for debugging
4931   for(Int_t inverse=arraysize; inverse>0; inverse--)
4932     {
4933       ptsum= ptsum + array[inverse-1];
4934       if(inverse==arraysize) //if the highest value
4935         fMaxTrackPtInNTXR=array[inverse-1]; //saving the highest pT track value in the recalculation
4936       tracknummer++;
4937       fMinTrackPtInNTXR=array[inverse-1]; // this is the current lowest pT track used in the recalculation
4938       if(fIsPossibleToSubstBckg) //Store the value for the current jet, during recalculation
4939         fCurrentJetMinPtNT90Recalc=array[inverse-1];
4940       if(ptsum>=threshold)  // the threshold was reached
4941         break;
4942       if((inverse==1)&&(ptsum<threshold)) //if it was not possible to reach the threshold
4943         {
4944           tracknummer = 500;
4945           fCurrentJetMinPtNT90Recalc=7000.; //dummy values for debugging
4946         }
4947     }
4948
4949   AliDebug(4,"Done re-calculating the number of tracks, returning to main code \n");
4950   return tracknummer;
4951
4952 }
4953 //________________________________________________________________________
4954 Int_t AliAnalysisTaskPartonDisc::GetRecalcNMcChTrUpThr(AliAODJet *jet, Int_t ntracks, TClonesArray *mcarray, Double_t jr)
4955 {
4956   // Calculate the number of charged particles above threshold
4957   // inside this jet for the MC case
4958   // the threshold is fCurrentJetMinPtNT90Recalc
4959
4960   Int_t numberOfChargedTracks = 0;
4961   Int_t currentNumber = 0;
4962   Double_t jeteta = jet->Eta();
4963   Double_t jetphi = jet->Phi();
4964   Double_t jetpT = jet->Pt();
4965   Double_t tracketa = 0;
4966   Double_t trackphi = 0;
4967
4968   if(IsEqualRel(jetpT, 0.0)) //IsEqualRel(jetpT, 0.0) //jetpT==0
4969     return 0;
4970
4971   Double_t randomNum = 0.;
4972
4973   for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
4974     {
4975       AliAODMCParticle *mctrack = (AliAODMCParticle*) mcarray->At(iTracks);
4976       if(!mctrack) continue;
4977       tracketa = mctrack->Eta();
4978       trackphi = mctrack->Phi();
4979       if(mctrack->Pt()<fCurrentJetMinPtNT90Recalc) continue;
4980       if(mctrack->IsPhysicalPrimary())
4981         {
4982           if(mctrack->Charge()!=0&&mctrack->Charge()!=-99)
4983             {
4984               if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
4985                 {
4986                   randomNum = gRandom->Rndm();
4987                   if(randomNum<fJTrackRandomRejection) continue; //rechaza fJTrackRandomRejection
4988                   currentNumber++;
4989                 } // end if inside jet
4990             } // end charged
4991         } // end physical primary
4992     }   // end for tracks
4993
4994   numberOfChargedTracks = currentNumber;
4995   AliDebug(4,Form("Recalculated number of tracks above threshold MC was:%i, returning",numberOfChargedTracks));
4996   return numberOfChargedTracks;
4997
4998 }
4999 //________________________________________________________________________
5000 Int_t AliAnalysisTaskPartonDisc::GetNRecChargedTracksAboveThreshold(AliAODJet *jet, Int_t ntracks, AliAODEvent *aode, Double_t jr)
5001 {
5002   //
5003   // Calculate the number of charged particles
5004   // above the threshold set by the NTX calculation
5005   // for the AOD track case, the threshold is fCurrentJetMinPtNT90
5006   // the fCurrentJetMinPtNT90 was set when calling the NTX method before
5007
5008   Int_t numberOfChargedTracks = 0;
5009   Int_t currentNumber = 0;
5010   Double_t jeteta = jet->Eta();
5011   Double_t jetphi = jet->Phi();
5012   Double_t jetpT = jet->Pt();
5013   Double_t tracketa = 0;
5014   Double_t trackphi = 0;
5015
5016   if(IsEqualRel(jetpT, 0.0)) //IsEqualRel(jetpT, 0.0) // jetpT==0
5017       return 0;
5018
5019   for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
5020     {
5021       AliAODTrack *aodtrack = aode->GetTrack(iTracks);
5022       if(!aodtrack) continue;
5023       tracketa = aodtrack->Eta();
5024       trackphi = aodtrack->Phi();
5025       if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
5026         {
5027           if(!aodtrack->TestFilterBit(fFilterBit)) continue; //track filter selection
5028           if(aodtrack->Pt()<fCurrentJetMinPtNT90) continue;
5029           currentNumber++;
5030         } // end if inside jet
5031     } // end for tracks
5032
5033   numberOfChargedTracks = currentNumber;
5034   return numberOfChargedTracks;
5035 }
5036 //________________________________________________________________________
5037 Int_t AliAnalysisTaskPartonDisc::GetRecalcNTXRec(Int_t percentage,AliAODJet *originaljet, Int_t ntracks, AliAODEvent *aode, Double_t jr)
5038 {
5039   //
5040   // Calculate the number of charged particles necessary to
5041   // add the given percentage of the jet energy (transverse energy)
5042   // after pT recalculation, for the AOD track case
5043
5044   Int_t numberOfChargedTracks = 0;
5045   Int_t currentNumber = 0;
5046   Double_t jetpT = fBckgSbsJet[0]; //pT
5047   Double_t jeteta = fBckgSbsJet[1]; //eta
5048   Double_t jetphi = fBckgSbsJet[2]; //phi
5049   Double_t tracketa = 0;
5050   Double_t trackphi = 0;
5051   Int_t arraysize = 1000;
5052   Bool_t rfTrkFlag  = kFALSE;
5053
5054   if(IsEqualRel(jetpT, 0.0)) //IsEqualRel(jetpT, 0.0) //jetpT==0
5055     return 0;
5056
5057   // RefTracks
5058   Int_t trkinjet = originaljet->GetRefTracks()->GetEntriesFast();
5059   if(trkinjet!=0&&!fForceNotTR)
5060     rfTrkFlag = kTRUE;
5061   AliDebug(4,Form("Number of tracks in this reco jet by RefTracks:%i \n",trkinjet));
5062
5063   AllocateStaticContainer(arraysize);
5064   InitializeStaticContainer(arraysize);
5065   if(!rfTrkFlag)  // if not track ref, check track by track
5066     {
5067       AliDebug(4,Form("Empty Track Refs (reco)!"));
5068       for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
5069         {
5070           AliAODTrack *aodtrack = aode->GetTrack(iTracks);
5071           if(!aodtrack) continue;
5072           tracketa = aodtrack->Eta();
5073           trackphi = aodtrack->Phi();
5074           if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
5075             {
5076               if(!aodtrack->TestFilterBit(fFilterBit)) continue; //track filter selection
5077               if(aodtrack->Pt()<fMinpTVal) continue; // pT cut, not using track refs
5078               currentNumber++;
5079               fgContainer[currentNumber-1] = aodtrack->Pt();  // save the current pt in the container
5080             } // end if inside jet
5081         } // end for tracks
5082     } // end of no track ref
5083
5084   if(rfTrkFlag)  // if track ref, use them
5085     {
5086       AliDebug(4,Form("Using Track Refs (reco)!"));
5087       for(Int_t ixt=0; ixt<trkinjet;ixt++)
5088         {
5089           AliVParticle *vtrack = dynamic_cast<AliVParticle*>(originaljet->GetRefTracks()->At(ixt));
5090           if(!vtrack) continue;
5091           // No further checks, all cuts should be in in the track refs
5092           if(vtrack->Charge()!=0&&vtrack->Charge()!=-99)
5093             {
5094               currentNumber++;
5095               fgContainer[currentNumber-1] = vtrack->Pt();  // save the current pt in the container
5096             }
5097         } // end trk in jet
5098     } // end if trk ref
5099
5100
5101   // sort the contents of the container
5102   SortArray(fgContainer,arraysize);
5103   // loop over the contents and count how many tracks are necessary to recover the percetage of the energy
5104   numberOfChargedTracks = TracksForPercentageRecalc(fgContainer, arraysize, percentage, jetpT);
5105   return numberOfChargedTracks;
5106 }
5107 //________________________________________________________________________
5108 Int_t AliAnalysisTaskPartonDisc::GetRecalcNRecChTrUpThr(AliAODJet *jet, Int_t ntracks, AliAODEvent *aode, Double_t jr)
5109 {
5110   //
5111   // Calculate the number of charged particles
5112   // above the threshold set by the NTX calculation
5113   // for the AOD track case, the threshold is fCurrentJetMinPtNT90Recalc
5114   // the fCurrentJetMinPtNT90Recalc was set when calling the NTX method before
5115
5116   Int_t numberOfChargedTracks = 0;
5117   Int_t currentNumber = 0;
5118   Double_t jeteta = jet->Eta();
5119   Double_t jetphi = jet->Phi();
5120   Double_t jetpT = jet->Pt();
5121   Double_t tracketa = 0;
5122   Double_t trackphi = 0;
5123
5124   if(IsEqualRel(jetpT, 0.0)) //IsEqualRel(jetpT, 0.0) // jetpT==0
5125       return 0;
5126
5127   for (Int_t iTracks = 0; iTracks < ntracks; iTracks++)
5128     {
5129       AliAODTrack *aodtrack = aode->GetTrack(iTracks);
5130       if(!aodtrack) continue;
5131       tracketa = aodtrack->Eta();
5132       trackphi = aodtrack->Phi();
5133       if(GetDeltaR(jeteta, jetphi, tracketa, trackphi)<=jr)
5134         {
5135           if(!aodtrack->TestFilterBit(fFilterBit)) continue; //track filter selection
5136           if(aodtrack->Pt()<fCurrentJetMinPtNT90Recalc) continue;
5137           currentNumber++;
5138         } // end if inside jet
5139     } // end for tracks
5140
5141   numberOfChargedTracks = currentNumber;
5142   return numberOfChargedTracks;
5143 }
5144 //________________________________________________________________________
5145 Bool_t AliAnalysisTaskPartonDisc::IsTrackInsideExcludedArea(Double_t tracketa, Double_t trackphi, TClonesArray *recojetsA)
5146 {
5147   //
5148   // Check if these track coordinates are in an excluded area
5149   //
5150
5151   //Primero: checar si esta dentro de cualquier jet, no importa si esta dentro de la
5152   //aceptancia o no(en base al eje), aun podria haber tracks del jet dentro del
5153   //evento.
5154   Int_t numbRecJ =  recojetsA->GetEntries();
5155   Double_t etaCurrJet = 0.0;
5156   Double_t phiCurrJet = 0.0;
5157   Double_t deltaeta = 0.0;
5158   Double_t deltaphi = 0.0;
5159   Double_t deltar = 0.0;
5160   Double_t extendedRadius = fJetRadius+fIncExcR;
5161   Double_t extendedRadiusDiJet = 0.0;
5162   Double_t phiCurrJetExArL = 0.0; // preliminary left boundary of exluded phi of current jet
5163   Double_t phiCurrJetExArR = 0.0; // preliminary right boundary of exluded phi of current jet
5164   Double_t leftBoundary = 0.0;
5165   Double_t rightBoundary = 0.0;
5166
5167   if(fNotExtDiJEx)
5168     extendedRadiusDiJet = fJetRadius;  // old behaviour
5169   if(!fNotExtDiJEx)
5170     extendedRadiusDiJet = fJetRadius+fIncExcR;  // new behaviour
5171
5172   for (Int_t indxrec = 0; indxrec < numbRecJ; indxrec++)
5173     {
5174       AliDebug(4,Form("Number of current jet:%i \n",indxrec));
5175       AliAODJet *rjet = dynamic_cast<AliAODJet*>(recojetsA->At(indxrec));
5176       if (!rjet)
5177         {
5178           AliDebug(2,Form("ERROR: Could not receive jet %d\n", indxrec));
5179           continue;
5180         }
5181       etaCurrJet = rjet->Eta();
5182       phiCurrJet = rjet->Phi();
5183       deltaeta = etaCurrJet-tracketa;
5184       deltaphi = phiCurrJet-trackphi;
5185       if (deltaphi > TMath::Pi())
5186         deltaphi = 2.0 * TMath::Pi() - deltaphi;
5187       deltar = sqrt(deltaeta*deltaeta+deltaphi*deltaphi);
5188       if(deltar<=extendedRadius) // if the track is inside the jet, reject (extended radius)
5189         {
5190           //      printf("Excluding track for being in the extended jet area. Eta:%f, Phi:%f, deltar=%f \n",tracketa,trackphi,deltar);
5191           return kTRUE;
5192         }
5193       // Now check if it is in the expected dijet area for the two hardest jets
5194       if(indxrec==0||indxrec==1) //two hardest jets in the event
5195         {
5196           //left boundary
5197           phiCurrJetExArL= phiCurrJet + TMath::Pi() - extendedRadiusDiJet;
5198           if(phiCurrJetExArL>TMath::TwoPi())
5199             phiCurrJetExArL=phiCurrJetExArL-TMath::TwoPi();
5200           //right boundary
5201           phiCurrJetExArR= phiCurrJet + TMath::Pi() + extendedRadiusDiJet;
5202           if(phiCurrJetExArR>TMath::TwoPi())
5203             phiCurrJetExArR=phiCurrJetExArR-TMath::TwoPi();
5204           // //Assign left and right boundary
5205           leftBoundary=phiCurrJetExArL;
5206           rightBoundary=phiCurrJetExArR;
5207           // now check if inside the excluded area
5208           if(trackphi>=leftBoundary&&trackphi<=rightBoundary)
5209             {
5210               // printf("Excluding track for being in di-jet excluded area!!! \n");
5211               // printf("phi of track:%f, left bound:%f, right bound:%f \n",trackphi,leftBoundary,rightBoundary);
5212               return kTRUE;
5213             }
5214         }
5215     }
5216   // Si sobrevive todos los tests, regresar kFALSE
5217   return kFALSE;
5218 }
5219 //________________________________________________________________________
5220 Double_t AliAnalysisTaskPartonDisc::GetV0ExcludedMultiplicity(TClonesArray *recojets)
5221 {
5222   //
5223   // Calculate the V0 MIP multiplicity that should be excluded due
5224   // to possible jet activity
5225   //
5226
5227   //Check if there is V0 info
5228   if(!fVZero)
5229     {
5230       AliDebug(2,"ERROR: There is not VZERO info in the AOD");
5231       //      printf("No hay objeto fVZero \n");
5232       return 0.0;
5233     }
5234
5235   Int_t numbRecJ =  recojets->GetEntries();
5236   Double_t phiCurrJet = 0.0;
5237   //Check if there are jets
5238   if(numbRecJ==0)
5239     {
5240       AliDebug(2,"ERROR: There are not jets in the event");
5241       return 0.0;
5242     }
5243
5244   //Flags for V0A sectors
5245   Bool_t removeS0cells = kFALSE;
5246   Bool_t removeS1cells = kFALSE;
5247   Bool_t removeS2cells = kFALSE;
5248   Bool_t removeS3cells = kFALSE;
5249   Bool_t removeS4cells = kFALSE;
5250   Bool_t removeS5cells = kFALSE;
5251   Bool_t removeS6cells = kFALSE;
5252   Bool_t removeS7cells = kFALSE;
5253   //Flags for V0C sectors
5254   Bool_t removeS0cellsV0C = kFALSE;
5255   Bool_t removeS1cellsV0C = kFALSE;
5256   Bool_t removeS2cellsV0C = kFALSE;
5257   Bool_t removeS3cellsV0C = kFALSE;
5258   Bool_t removeS4cellsV0C = kFALSE;
5259   Bool_t removeS5cellsV0C = kFALSE;
5260   Bool_t removeS6cellsV0C = kFALSE;
5261   Bool_t removeS7cellsV0C = kFALSE;
5262   //Excedent multiplicity in V0A, V0C and total
5263   Double_t excedentV0A = 0.0;
5264   Double_t excedentV0C = 0.0;
5265   Double_t excedentV0Total = 0.0;
5266   Double_t phiValLow = 0.0;
5267   Double_t phiValUp  = 0.0;
5268   Double_t extendedR = fJetRadius + fIncExcR;
5269
5270   for (Int_t indxrec = 0; indxrec < numbRecJ; indxrec++)
5271     {
5272       // Now check the two hardest jets
5273       if(indxrec==0||indxrec==1) //two hardest jets in the event
5274         {
5275           AliAODJet *rjet = dynamic_cast<AliAODJet*>(recojets->At(indxrec));
5276           if (!rjet)
5277             {
5278               AliDebug(2,Form("ERROR: Could not receive jet %d\n", indxrec));
5279               continue;
5280             }
5281           phiCurrJet = rjet->Phi();
5282
5283           //Get the excluded phi boundaries
5284           Double_t b1 = phiCurrJet  + TMath::Pi() - extendedR;
5285           Double_t b2  = phiCurrJet  + TMath::Pi() + extendedR;
5286           if(b1>TMath::TwoPi())
5287             b1 = b1 - TMath::TwoPi();
5288           if(b2>TMath::TwoPi())
5289             b2 = b2 - TMath::TwoPi();
5290
5291           phiValLow = b1;
5292           phiValUp = b2;
5293
5294           if(phiValLow>TMath::TwoPi()||phiValUp>TMath::TwoPi()||phiValLow<0.||phiValUp<0.)
5295             return 500.0;
5296
5297           // First V0A (EN EVE LA NUMERACION EMPIEZA EN 1...)
5298           // Cells in sector S0 ( 0    to  pi/4): 32,40,48,56
5299           // Cells in sector S1 ( pi/4 to  pi/2): 33,41,49,57
5300           // Cells in sector S2 ( pi/2 to 3pi/4): 34,42,50,58
5301           // Cells in sector S3 (3pi/4 to  pi  ): 35,43,51,59
5302           // Cells in sector S4 ( pi   to 5pi/4): 36,44,52,60
5303           // Cells in sector S5 (5pi/4 to 3pi/2): 37,45,53,61
5304           // Cells in sector S6 (3pi/2 to 7pi/4): 38,46,54,62
5305           // Cells in sector S7 (7pi/4 to 2pi  ): 39,47,55,63
5306
5307           //Check if falls in sector S0
5308           if(phiValLow>=(0.)&&phiValLow<=(1./4.*TMath::Pi()))
5309             removeS0cells = kTRUE;
5310           if(phiValUp>=(0.)&&phiValUp<=(1./4.*TMath::Pi()))
5311             removeS0cells = kTRUE;
5312           //Check if falls in sector S1
5313           if(phiValLow>=(1./4.*TMath::Pi())&&phiValLow<=(1./2.*TMath::Pi()))
5314             removeS1cells = kTRUE;
5315           if(phiValUp>=(1./4.*TMath::Pi())&&phiValUp<=(1./2.*TMath::Pi()))
5316             removeS1cells = kTRUE;
5317           //Check if falls in sector S2
5318           if(phiValLow>=(1./2.*TMath::Pi())&&phiValLow<=(3./4.*TMath::Pi()))
5319             removeS2cells = kTRUE;
5320           if(phiValUp>=(1./2.*TMath::Pi())&&phiValUp<=(3./4.*TMath::Pi()))
5321             removeS2cells = kTRUE;
5322           //Check if falls in sector S3
5323           if(phiValLow>=(3./4.*TMath::Pi())&&phiValLow<=(TMath::Pi()))
5324             removeS3cells = kTRUE;
5325           if(phiValUp>=(3./4.*TMath::Pi())&&phiValUp<=(TMath::Pi()))
5326             removeS3cells = kTRUE;
5327           //Check if falls in sector S4
5328           if(phiValLow>=(TMath::Pi())&&phiValLow<=(5./4.*TMath::Pi()))
5329             removeS4cells = kTRUE;
5330           if(phiValUp>=(TMath::Pi())&&phiValUp<=(5./4.*TMath::Pi()))
5331             removeS4cells = kTRUE;
5332           //Check if falls in sector S5
5333           if(phiValLow>=(5./4.*TMath::Pi())&&phiValLow<=(3./2.*TMath::Pi()))
5334             removeS5cells = kTRUE;
5335           if(phiValUp>=(5./4.*TMath::Pi())&&phiValUp<=(3./2.*TMath::Pi()))
5336             removeS5cells = kTRUE;
5337           //Check if falls in sector S6
5338           if(phiValLow>=(3./2.*TMath::Pi())&&phiValLow<=(7./4.*TMath::Pi()))
5339             removeS6cells = kTRUE;
5340           if(phiValUp>=(3./2.*TMath::Pi())&&phiValUp<=(7./4.*TMath::Pi()))
5341             removeS6cells = kTRUE;
5342           //Check if falls in sector S7
5343           if(phiValLow>=(7./4.*TMath::Pi())&&phiValLow<=(TMath::TwoPi()))
5344             removeS7cells = kTRUE;
5345           if(phiValUp>=(7./4.*TMath::Pi())&&phiValUp<=(TMath::TwoPi()))
5346             removeS7cells = kTRUE;
5347
5348           /////////////////////////////////////////////////////////////////////////////////
5349
5350           // Now V0C (EN EVE LA NUMERACION EMPIEZA EN 1...)
5351           // Cells in sector S0 ( pi/2 to 3pi/4): 0,8,16,24
5352           // Cells in sector S1 (3pi/4 to  pi  ): 1,9,17,25
5353           // Cells in sector S2 ( pi   to 5pi/4): 2,10,18,26
5354           // Cells in sector S3 (5pi/4 to 3pi/2): 3,11,19,27
5355           // Cells in sector S4 (3pi/2 to 7pi/4): 4,12,20,28
5356           // Cells in sector S5 (7pi/4 to 2pi  ): 5,13,21,29
5357           // Cells in sector S6 ( 0    to  pi/4): 6,14,22,30
5358           // Cells in sector S7 ( pi/4 to  pi/2): 7,15,23,31
5359
5360           //Check if falls in sector S0
5361           if(phiValLow>=(1./2.*TMath::Pi())&&phiValLow<=(3./4.*TMath::Pi()))
5362             removeS0cellsV0C = kTRUE;
5363           if(phiValUp>=(1./2.*TMath::Pi())&&phiValUp<=(3./4.*TMath::Pi()))
5364             removeS0cellsV0C = kTRUE;
5365           //Check if falls in sector S1
5366           if(phiValLow>=(3./4.*TMath::Pi())&&phiValLow<=(TMath::Pi()))
5367             removeS1cellsV0C = kTRUE;
5368           if(phiValUp>=(3./4.*TMath::Pi())&&phiValUp<=(TMath::Pi()))
5369             removeS1cellsV0C = kTRUE;
5370           //Check if falls in sector S2
5371           if(phiValLow>=(TMath::Pi())&&phiValLow<=(5./4.*TMath::Pi()))
5372             removeS2cellsV0C = kTRUE;
5373           if(phiValUp>=(TMath::Pi())&&phiValUp<=(5./4.*TMath::Pi()))
5374             removeS2cellsV0C = kTRUE;
5375           //Check if falls in sector S3
5376           if(phiValLow>=(5./4.*TMath::Pi())&&phiValLow<=(3./2.*TMath::Pi()))
5377             removeS3cellsV0C = kTRUE;
5378           if(phiValUp>=(5./4.*TMath::Pi())&&phiValUp<=(3./2.*TMath::Pi()))
5379             removeS3cellsV0C = kTRUE;
5380           //Check if falls in sector S4
5381           if(phiValLow>=(3./2.*TMath::Pi())&&phiValLow<=(7./4.*TMath::Pi()))
5382             removeS4cellsV0C = kTRUE;
5383           if(phiValUp>=(3./2.*TMath::Pi())&&phiValUp<=(7./4.*TMath::Pi()))
5384             removeS4cellsV0C = kTRUE;
5385           //Check if falls in sector S5
5386           if(phiValLow>=(7./4.*TMath::Pi())&&phiValLow<=(TMath::TwoPi()))
5387             removeS5cellsV0C = kTRUE;
5388           if(phiValUp>=(7./4.*TMath::Pi())&&phiValUp<=(TMath::TwoPi()))
5389             removeS5cellsV0C = kTRUE;
5390           //Check if falls in sector S6
5391           if(phiValLow>=(0.)&&phiValLow<=(1./4.*TMath::Pi()))
5392             removeS6cellsV0C = kTRUE;
5393           if(phiValUp>=(0.)&&phiValUp<=(1./4.*TMath::Pi()))
5394             removeS6cellsV0C = kTRUE;
5395           //Check if falls in sector S7
5396           if(phiValLow>=(1./4.*TMath::Pi())&&phiValLow<=(1./2.*TMath::Pi()))
5397             removeS7cellsV0C = kTRUE;
5398           if(phiValUp>=(1./4.*TMath::Pi())&&phiValUp<=(1./2.*TMath::Pi()))
5399             removeS7cellsV0C = kTRUE;
5400
5401           //      printf("phi del jet:%f, philow:%f, phiup:%f \n",phiCurrJet,phiValLow,phiValUp);
5402         } // end if leading jets (2)
5403     } // end jet loop
5404
5405   // printf("_________V0A____________\n");
5406   // printf("Status sector S0:%i \n",removeS0cells);
5407   // printf("Status sector S1:%i \n",removeS1cells);
5408   // printf("Status sector S2:%i \n",removeS2cells);
5409   // printf("Status sector S3:%i \n",removeS3cells);
5410   // printf("Status sector S4:%i \n",removeS4cells);
5411   // printf("Status sector S5:%i \n",removeS5cells);
5412   // printf("Status sector S6:%i \n",removeS6cells);
5413   // printf("Status sector S7:%i \n",removeS7cells);
5414   // printf("_______________________\n");
5415
5416   if(removeS0cells)
5417     excedentV0A = excedentV0A + fVZero->GetMultiplicity(32)+fVZero->GetMultiplicity(40)+fVZero->GetMultiplicity(48)+fVZero->GetMultiplicity(56);
5418   if(removeS1cells)
5419     excedentV0A = excedentV0A + fVZero->GetMultiplicity(33)+fVZero->GetMultiplicity(41)+fVZero->GetMultiplicity(49)+fVZero->GetMultiplicity(57);
5420   if(removeS2cells)
5421     excedentV0A = excedentV0A + fVZero->GetMultiplicity(34)+fVZero->GetMultiplicity(42)+fVZero->GetMultiplicity(50)+fVZero->GetMultiplicity(58);
5422   if(removeS3cells)
5423     excedentV0A = excedentV0A + fVZero->GetMultiplicity(35)+fVZero->GetMultiplicity(43)+fVZero->GetMultiplicity(51)+fVZero->GetMultiplicity(59);
5424   if(removeS4cells)
5425     excedentV0A = excedentV0A + fVZero->GetMultiplicity(36)+fVZero->GetMultiplicity(44)+fVZero->GetMultiplicity(52)+fVZero->GetMultiplicity(60);
5426   if(removeS5cells)
5427     excedentV0A = excedentV0A + fVZero->GetMultiplicity(37)+fVZero->GetMultiplicity(45)+fVZero->GetMultiplicity(53)+fVZero->GetMultiplicity(61);
5428   if(removeS6cells)
5429     excedentV0A = excedentV0A + fVZero->GetMultiplicity(38)+fVZero->GetMultiplicity(46)+fVZero->GetMultiplicity(54)+fVZero->GetMultiplicity(62);
5430   if(removeS7cells)
5431     excedentV0A = excedentV0A + fVZero->GetMultiplicity(39)+fVZero->GetMultiplicity(47)+fVZero->GetMultiplicity(55)+fVZero->GetMultiplicity(63);
5432
5433   // printf("________V0C____________\n");
5434   // printf("Status sector S0:%i \n",removeS0cellsV0C);
5435   // printf("Status sector S1:%i \n",removeS1cellsV0C);
5436   // printf("Status sector S2:%i \n",removeS2cellsV0C);
5437   // printf("Status sector S3:%i \n",removeS3cellsV0C);
5438   // printf("Status sector S4:%i \n",removeS4cellsV0C);
5439   // printf("Status sector S5:%i \n",removeS5cellsV0C);
5440   // printf("Status sector S6:%i \n",removeS6cellsV0C);
5441   // printf("Status sector S7:%i \n",removeS7cellsV0C);
5442   // printf("_______________________\n");
5443
5444   if(removeS0cellsV0C)
5445     excedentV0C = excedentV0C + fVZero->GetMultiplicity(0)+fVZero->GetMultiplicity(8)+fVZero->GetMultiplicity(16)+fVZero->GetMultiplicity(24);
5446   if(removeS1cellsV0C)
5447     excedentV0C = excedentV0C + fVZero->GetMultiplicity(1)+fVZero->GetMultiplicity(9)+fVZero->GetMultiplicity(17)+fVZero->GetMultiplicity(25);
5448   if(removeS2cellsV0C)
5449     excedentV0C = excedentV0C + fVZero->GetMultiplicity(2)+fVZero->GetMultiplicity(10)+fVZero->GetMultiplicity(18)+fVZero->GetMultiplicity(26);
5450   if(removeS3cellsV0C)
5451     excedentV0C = excedentV0C + fVZero->GetMultiplicity(3)+fVZero->GetMultiplicity(11)+fVZero->GetMultiplicity(19)+fVZero->GetMultiplicity(27);
5452   if(removeS4cellsV0C)
5453     excedentV0C = excedentV0C + fVZero->GetMultiplicity(4)+fVZero->GetMultiplicity(12)+fVZero->GetMultiplicity(20)+fVZero->GetMultiplicity(28);
5454   if(removeS5cellsV0C)
5455     excedentV0C = excedentV0C + fVZero->GetMultiplicity(5)+fVZero->GetMultiplicity(13)+fVZero->GetMultiplicity(21)+fVZero->GetMultiplicity(29);
5456   if(removeS6cellsV0C)
5457     excedentV0C = excedentV0C + fVZero->GetMultiplicity(6)+fVZero->GetMultiplicity(14)+fVZero->GetMultiplicity(22)+fVZero->GetMultiplicity(30);
5458   if(removeS7cellsV0C)
5459     excedentV0C = excedentV0C + fVZero->GetMultiplicity(7)+fVZero->GetMultiplicity(15)+fVZero->GetMultiplicity(23)+fVZero->GetMultiplicity(31);
5460
5461   excedentV0Total = excedentV0A+excedentV0C;
5462
5463   //  printf("La multiplicidad total en V0 es:%f, la multiplicidad excedente en V0A es:%f, y en V0C es:%f, la multiplicidad corregida es:%f \n",fVZero->GetMTotV0A()+fVZero->GetMTotV0C(),excedentV0A,excedentV0C,fVZero->GetMTotV0A()+fVZero->GetMTotV0C()-excedentV0Total);
5464
5465   return excedentV0Total;
5466 }
5467 //________________________________________________________________________
5468 Int_t AliAnalysisTaskPartonDisc::GetV0LikeExcludedMultMC(TClonesArray *mcjets, TClonesArray *mcparticles)
5469 {
5470   //
5471   // Calculate the V0 like multiplicity that should be excluded due
5472   // to possible jet activity in MC events
5473   //
5474
5475   Int_t nMcJets =  mcjets->GetEntries();
5476   Int_t tracksMC = mcparticles->GetEntriesFast();
5477   Double_t phiCurrJet = 0.0;
5478   //Check if there are jets
5479   if(nMcJets==0)
5480     {
5481       AliDebug(2,"ERROR: There are no MC jets in the event");
5482       return 0;
5483     }
5484   Int_t excludedMultV0Like = 0;
5485   Double_t trackphi=0.0;
5486   Double_t extendedR = fJetRadius + fIncExcR;
5487   for (Int_t indxMC = 0; indxMC < nMcJets; indxMC++)
5488     {
5489       // Now check the two hardest jets
5490       if(indxMC==0||indxMC==1) //two hardest jets in the event
5491         {
5492           AliAODJet *mcJet = dynamic_cast<AliAODJet*>(mcjets->At(indxMC));
5493           if (!mcJet)
5494             {
5495               AliDebug(2,Form("ERROR: Could not receive jet %d\n", indxMC));
5496               continue;
5497             }
5498           phiCurrJet = mcJet->Phi();
5499           //Get the excluded phi boundaries
5500           Double_t b1 = phiCurrJet  + TMath::Pi() - extendedR;
5501           Double_t b2  = phiCurrJet  + TMath::Pi() + extendedR;
5502           if(b1>TMath::TwoPi())
5503             b1 = b1 - TMath::TwoPi();
5504           if(b2>TMath::TwoPi())
5505             b2 = b2 - TMath::TwoPi();
5506           // now check the charged tracks in the V0 acceptance
5507           for(Int_t aodMCTrack = 0; aodMCTrack < tracksMC; aodMCTrack++ )
5508             {
5509               AliAODMCParticle *mctrackf = (AliAODMCParticle*) mcparticles->At(aodMCTrack);
5510               if(!mctrackf) continue;
5511               if(!mctrackf->IsPhysicalPrimary()) continue;
5512               if(mctrackf->Charge()==0||mctrackf->Charge()==-99) continue;
5513               if(mctrackf->Pt()<fMinpTValMC) continue; // cut off en MC
5514               trackphi = mctrackf->Phi();
5515               if(trackphi>=b1&&trackphi<=b2)
5516                 {
5517                   //V0A
5518                   if(((mctrackf->Eta())>(2.8))&&((mctrackf->Eta())<(5.1)))
5519                     excludedMultV0Like++;
5520                   //V0C
5521                   if(((mctrackf->Eta())>(-3.7))&&((mctrackf->Eta())<(-1.7)))
5522                     excludedMultV0Like++;
5523                 }
5524             }
5525         } // end of 2 hardest jets
5526     } // end jet loop
5527   return excludedMultV0Like;
5528 }
5529 //________________________________________________________________________
5530 void AliAnalysisTaskPartonDisc::FillPerpConeHisto(TH3F *currenthisto, Int_t ntracks, AliAODEvent *aode, Int_t CentralityBin, Int_t pTBin)
5531 {
5532
5533   // Fills the histrogram of the pT distribution in the perpendicular cone
5534
5535   Double_t aodtracketaC = 0.;
5536
5537   for(Int_t aodT = 0; aodT < ntracks; aodT++ )
5538     {
5539       AliAODTrack *aodtrackC = aode->GetTrack(aodT);
5540       if(!aodtrackC) continue;
5541       aodtracketaC = TMath::Abs(aodtrackC->Eta());
5542       if(aodtracketaC>0.9) continue;
5543       if(!aodtrackC->TestFilterBit(fFilterBit)) continue; //track filter selection
5544       if(fJetEvent) // if has an accepted jet, calculate the perpendicular cone
5545         {
5546           if(HasPerpendicularCone()) // If there is a perpendicular cone available
5547             {
5548               if(aodtrackC->Pt()>fMinpTVal)
5549                 {
5550                   if(GetDeltaR(fEtaPerpCoord,fPhiPerpCoord,aodtrackC->Eta(),aodtrackC->Phi())<fJetRadius)
5551                     {
5552                       currenthisto->Fill(aodtrackC->Pt(),pTBin,CentralityBin);
5553                     }
5554                 }
5555             }
5556         } // end if jet event
5557     }
5558 }
5559 //________________________________________________________________________
5560 Bool_t AliAnalysisTaskPartonDisc::IsEqualRel(Double_t vA, Double_t vB)
5561 {
5562   // Comparison of Double_t values
5563
5564   Double_t epsVal = 0.000001;
5565   return TMath::Abs(vA-vB) <= epsVal*TMath::Abs(vA);
5566
5567 }