#include <TCanvas.h>
#include <TTree.h>
#include <TFile.h>
#include <TH1F.h>
#include <TH2F.h>
#include <TH3F.h>
#include <TPDGCode.h>
#include <TDatabasePDG.h>
#include <TClonesArray.h>
#include <TROOT.h>

#include "AliAODMCHeader.h"
#include "AliAODMCParticle.h"

#include "AliAODEvent.h"
#include "AliAODv0.h"
#include "AliAODcascade.h"

#include "AliCentrality.h"

#include "AliPID.h"
#include "AliPIDResponse.h"
#include "AliAODPid.h"

#include "AliInputEventHandler.h"
#include "AliAnalysisManager.h"

#include "AliAnalysisTaskCTauPbPbaod.h"

extern TROOT *gROOT;

ClassImp(AliAnalysisTaskCTauPbPbaod)

static Int_t    nbins=100;  // number of bins
static Double_t lMin=0.0, lMax=100.;
static Double_t pMin=0.0, pMax=10.;
static Double_t yMax=0.5;


//
//  This is a little task for checking the c*tau of the strange particles 
//

AliAnalysisTaskCTauPbPbaod::AliAnalysisTaskCTauPbPbaod(const char *name) :
AliAnalysisTaskSE(name),
fIsMC(kFALSE),
fCMin(0.),
fCMax(90.),
fOutput(0),
fMult(0),
fdEdx(0),
fdEdxPid(0),

fK0sM(0),
fK0sSi(0),
fK0sMC(0),
fK0sAs(0),

fLambdaM(0),
fLambdaSi(0),
fLambdaMC(0),
fLambdaAs(0),

fLambdaBarM(0),
fLambdaBarSi(0),
fLambdaBarMC(0),
fLambdaBarAs(0),

fCPA(0),
fDCA(0),

fLambdaEff(0),
fLambdaPt(0),

fLambdaFromXi(0),
fXiM(0),
fXiSiP(0),

fLambdaBarFromXiBar(0),
fXiBarM(0),
fXiBarSiP(0)
{
  // Constructor. Initialization of pointers
  DefineOutput(1, TList::Class());
}

void AliAnalysisTaskCTauPbPbaod::UserCreateOutputObjects()
{
  fOutput = new TList(); 
  fOutput->SetOwner();


  fMult=new TH1F("fMult","Multiplicity",1100,0.,3300);
  fMult->GetXaxis()->SetTitle("N tracks"); 
  fOutput->Add(fMult);

  fdEdx=new TH2F("fdEdx","dE/dx",50,0.2,3,50,0.,6.);
  fOutput->Add(fdEdx);

  fdEdxPid=new TH2F("fdEdxPid","dE/dx with PID",50,0.2,3,50,0.,6.);
  fOutput->Add(fdEdxPid);

  fK0sM = 
  new TH2F("fK0sM", "Mass for K^{0}_{s}", nbins/2,0.448,0.548,nbins,pMin,pMax);
  fK0sM->GetXaxis()->SetTitle("Mass (GeV/c)"); 
  fOutput->Add(fK0sM);

  fK0sSi = 
  new TH2F("fK0sSi","L_{T} vs p_{T} for K^{0}_{s}, side-band subtracted",
  nbins,pMin,pMax,nbins,lMin,lMax);
  fK0sSi->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fK0sSi->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fK0sSi);

  fK0sMC = 
  new TH2F("fK0sMC","L_{T} vs p_{T} for K^{0}_{s}, from MC stack", 
  nbins,pMin,pMax,nbins,lMin,lMax);
  fK0sMC->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fK0sMC->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fK0sMC);

  fK0sAs = 
  new TH2F("fK0sAs", "L_{T} vs p_{T} for K^{0}_{s}, associated", 
  nbins,pMin,pMax,nbins,lMin,lMax);
  fK0sAs->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fK0sAs->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fK0sAs);

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

  fLambdaM = 
  new TH2F("fLambdaM","Mass for \\Lambda", nbins, 1.065, 1.165,nbins,pMin,pMax);
  fLambdaM->GetXaxis()->SetTitle("Mass (GeV/c)"); 
  fOutput->Add(fLambdaM);

  fLambdaSi = 
  new TH2F("fLambdaSi","L_{T} vs p_{T} for \\Lambda, side-band subtructed",
  nbins,pMin,pMax,nbins,lMin,lMax);
  fLambdaSi->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fLambdaSi->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fLambdaSi);

  fLambdaMC = 
  new TH2F("fLambdaMC","L_{T} vs p_{T} for \\Lambda, from MC stack", 
  nbins,pMin,pMax,nbins,lMin,lMax);
  fLambdaMC->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fLambdaMC->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fLambdaMC);

  fLambdaAs = 
  new TH2F("fLambdaAs","L_{T} vs p_{T} for \\Lambda, associated",
  nbins,pMin,pMax,nbins,lMin,lMax);
  fLambdaAs->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fLambdaAs->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fLambdaAs);


  fLambdaBarM = 
  new TH2F("fLambdaBarM","Mass for anti-\\Lambda", nbins, 1.065, 1.165,nbins,pMin,pMax);
  fLambdaBarM->GetXaxis()->SetTitle("Mass (GeV/c)"); 
  fOutput->Add(fLambdaBarM);

  fLambdaBarSi = 
  new TH2F("fLambdaBarSi","L_{T} vs p_{T} for anti-\\Lambda, side-band subtructed",
  nbins,pMin,pMax,nbins,lMin,lMax);
  fLambdaBarSi->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fLambdaBarSi->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fLambdaBarSi);

  fLambdaBarMC = 
  new TH2F("fLambdaBarMC","L_{T} vs p_{T} for anti-\\Lambda, from MC stack", 
  nbins,pMin,pMax,nbins,lMin,lMax);
  fLambdaBarMC->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fLambdaBarMC->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fLambdaBarMC);

  fLambdaBarAs = 
  new TH2F("fLambdaBarAs","L_{T} vs p_{T} for anti-\\Lambda, associated",
  nbins,pMin,pMax,nbins,lMin,lMax);
  fLambdaBarAs->GetXaxis()->SetTitle("p_{T} (GeV/c)"); 
  fLambdaBarAs->GetYaxis()->SetTitle("L_{T} (cm)"); 
  fOutput->Add(fLambdaBarAs);



  fCPA=new TH1F("fCPA","Cosine of the pointing angle",30,0.9978,1.);
  fOutput->Add(fCPA);
  fDCA=new TH1F("fDCA","DCA between the daughters",30,0.,1.1);
  fOutput->Add(fDCA);

  fLambdaEff=fLambdaAs->ProjectionX();
  fLambdaEff->SetName("fLambdaEff");
  fLambdaEff->SetTitle("Efficiency for #Lambda");
  fOutput->Add(fLambdaEff);

  fLambdaPt=fLambdaAs->ProjectionX();
  fLambdaPt->SetName("fLambdaPt");
  fLambdaPt->SetTitle("Raw #Lambda pT spectrum");
  fOutput->Add(fLambdaPt);

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

  fLambdaFromXi=new TH3F("fLambdaFromXi","L_{T} vs p_{T} vs p_{T} of \\Xi for \\Lambda from \\Xi",
  nbins,pMin,pMax,nbins,lMin,lMax,33,pMin,pMax+2);
  fOutput->Add(fLambdaFromXi);

  fXiM  = 
  new TH2F("fXiM", "\\Xi mass distribution", 50, 1.271, 1.371,12,pMin,pMax+2);
  fOutput->Add(fXiM);

  fXiSiP  = new TH1F("fXiSiP", "Pt for \\Xi, side-band subracted",
  33,pMin,pMax+2);
  fOutput->Add(fXiSiP);


  fLambdaBarFromXiBar=new TH3F("fLambdaBarFromXiBar","L_{T} vs p_{T} vs p_{T} of anti-\\Xi for anti-\\Lambda from anti-\\Xi",
  nbins,pMin,pMax,nbins,lMin,lMax,33,pMin,pMax+2);
  fOutput->Add(fLambdaBarFromXiBar);

  fXiBarM  = 
  new TH2F("fXiBarM", "anti-\\Xi mass distribution", 50, 1.271, 1.371,12,pMin,pMax+2);
  fOutput->Add(fXiBarM);

  fXiBarSiP  = new TH1F("fXiBarSiP", "Pt for anti-\\Xi, side-band subracted",
  33,pMin,pMax+2);
  fOutput->Add(fXiBarSiP);


  PostData(1, fOutput);
}

static Bool_t AcceptTrack(const AliAODTrack *t) {
  if (!t->IsOn(AliAODTrack::kTPCrefit)) return kFALSE;
  //if (t->GetKinkIndex(0)>0) return kFALSE;

  Float_t nCrossedRowsTPC = t->GetTPCClusterInfo(2,1); 
  if (nCrossedRowsTPC < 70) return kFALSE;
  Int_t findable=t->GetTPCNclsF();
  if (findable <= 0) return kFALSE;
  if (nCrossedRowsTPC/findable < 0.8) return kFALSE;

  if (TMath::Abs(t->Eta()) > 0.8) return kFALSE;

  return kTRUE;   
}

static Bool_t AcceptV0(const AliAODv0 *v1, const AliAODEvent *aod) {

  if (v1->GetOnFlyStatus()) return kFALSE;

  if (v1->Pt() < pMin) return kFALSE;

  const AliAODTrack *ntrack1=(AliAODTrack *)v1->GetDaughter(1);
  if (!AcceptTrack(ntrack1)) return kFALSE;

  const AliAODTrack *ptrack1=(AliAODTrack *)v1->GetDaughter(0);
  if (!AcceptTrack(ptrack1)) return kFALSE;

  Float_t xy=v1->DcaNegToPrimVertex();
  if (TMath::Abs(xy)<0.1) return kFALSE;
  xy=v1->DcaPosToPrimVertex();
  if (TMath::Abs(xy)<0.1) return kFALSE;

  Double_t dca=v1->DcaV0Daughters();
  if (dca>1.0) return kFALSE;
  //if (dca>0.7) return kFALSE;
  //if (dca>0.4) return kFALSE;

  Double_t cpa=v1->CosPointingAngle(aod->GetPrimaryVertex());
  if (cpa<0.998) return kFALSE;
  //if (cpa<0.99875) return kFALSE;
  //if (cpa<0.9995) return kFALSE;

  Double_t xyz[3]; v1->GetSecondaryVtx(xyz);
  Double_t r2=xyz[0]*xyz[0] + xyz[1]*xyz[1];
  if (r2<0.9*0.9) return kFALSE;
  if (r2>100*100) return kFALSE;

  return kTRUE;
}

static Bool_t AcceptCascade(const AliAODcascade *cs, const AliAODEvent *aod) {

  if (cs->Pt() < pMin) return kFALSE;

  AliAODVertex *xi = cs->GetDecayVertexXi(); 
  const AliAODTrack *bach=(AliAODTrack *)xi->GetDaughter(0);
  if (!AcceptTrack(bach)) return kFALSE;
   
  Double_t xy=cs->DcaBachToPrimVertex();
  if (TMath::Abs(xy) < 0.03) return kFALSE;

  const AliAODVertex *vtx=aod->GetPrimaryVertex();
  Double_t xv=vtx->GetX(), yv=vtx->GetY(), zv=vtx->GetZ();
  Double_t cpa=cs->CosPointingAngleXi(xv,yv,zv);
  if (cpa<0.999) return kFALSE;

  if (cs->DcaXiDaughters() > 0.3) return kFALSE;

  return kTRUE;
}

static Bool_t AcceptPID(const AliPIDResponse *pidResponse, 
			const AliAODTrack *ptrack, const TClonesArray *stack) {

  const AliAODPid *pid=ptrack->GetDetPid();
  if (!pid) return kTRUE;
  if (pid->GetTPCmomentum() > 1.) return kTRUE;

  if (stack) {
    // MC PID
    Int_t ntrk=stack->GetEntriesFast();
    Int_t plab=TMath::Abs(ptrack->GetLabel());
    if (plab>=0)
      if (plab<ntrk) {
         AliAODMCParticle *pp=(AliAODMCParticle*)stack->UncheckedAt(plab);
         if (pp->Charge() > 0) {
            if (pp->GetPdgCode() == kProton)    return kTRUE;
         } else {
            if (pp->GetPdgCode() == kProtonBar) return kTRUE;
         }
       }
  } else {
    // Real PID
    Double_t nsig=pidResponse->NumberOfSigmasTPC(ptrack,AliPID::kProton);
    if (TMath::Abs(nsig) < 3.) return kTRUE;
  }
  
  return kFALSE; 
}

void AliAnalysisTaskCTauPbPbaod::UserExec(Option_t *)
{

  AliAODEvent *aod=(AliAODEvent *)InputEvent();

  if (!aod) {
    Printf("ERROR: aod not available");
    return;
  }

  // Vertex selection
  const AliAODVertex *vtx=aod->GetPrimaryVertex();
  if (vtx->GetNContributors()<3) return;
  Double_t xv=vtx->GetX(), yv=vtx->GetY(), zv=vtx->GetZ();

  if (TMath::Abs(zv) > 10.) return ;   
 

  // Physics selection
  AliAnalysisManager *mgr= AliAnalysisManager::GetAnalysisManager();
  AliInputEventHandler *hdr=(AliInputEventHandler*)mgr->GetInputEventHandler();
  UInt_t maskIsSelected = hdr->IsEventSelected();
  Bool_t isSelected = (maskIsSelected & AliVEvent::kMB);
  if (!isSelected) return;

  fMult->Fill(-100); //event counter  

  // Centrality selection
  AliCentrality *cent=aod->GetCentrality();
  if (!cent->IsEventInCentralityClass(fCMin,fCMax,"V0M")) return;

  AliPIDResponse *pidResponse = hdr->GetPIDResponse(); 
 


  //+++++++ MC
  TClonesArray *stack = 0x0;
  Double_t mcXv=0., mcYv=0., mcZv=0.;
   
  if (fIsMC) {
     TList *lst = aod->GetList();
     stack = (TClonesArray*)lst->FindObject(AliAODMCParticle::StdBranchName());
     if (!stack) {
        Printf("ERROR: stack not available");
        return;
     }
     AliAODMCHeader *
     mcHdr=(AliAODMCHeader*)lst->FindObject(AliAODMCHeader::StdBranchName());

     mcXv=mcHdr->GetVtxX(); mcYv=mcHdr->GetVtxY(); mcZv=mcHdr->GetVtxZ();

     Int_t ntrk1=stack->GetEntriesFast(), ntrk0=ntrk1;
     while (ntrk1--) {
       AliAODMCParticle *p0=(AliAODMCParticle*)stack->UncheckedAt(ntrk1);
       Int_t code=p0->GetPdgCode();
       if (code != kK0Short)
	 if (code != kLambda0)
	    if (code != kLambda0Bar) continue;

       Int_t plab=p0->GetDaughter(0), nlab=p0->GetDaughter(1);
       if (nlab==plab) continue;
       if (nlab<0) continue;
       if (plab<0) continue;
       if (nlab>=ntrk0) continue;
       if (plab>=ntrk0) continue;
       AliAODMCParticle *part = (AliAODMCParticle *)stack->UncheckedAt(plab);
       if (!part) continue;
       Double_t charge=part->Charge();
       if (charge == 0.) continue;

       Double_t pt=p0->Pt();
       if (pt<pMin) continue;
       if (TMath::Abs(p0->Y())>yMax) continue;
    
       Double_t x=p0->Xv(), y=p0->Yv(), z=p0->Zv();
       Double_t dxmc=mcXv-x, dymc=mcYv-y, dzmc=mcZv-z;
       Double_t l=TMath::Sqrt(dxmc*dxmc + dymc*dymc + dzmc*dzmc);

       if (l > 0.001) continue; // secondary V0

       x=part->Xv(); y=part->Yv();
       dxmc=mcXv-x; dymc=mcYv-y;
       Double_t lt=TMath::Sqrt(dxmc*dxmc + dymc*dymc);

       if (code == kK0Short) {
          fK0sMC->Fill(pt,lt);
       }
       if (code == kLambda0) {
          fLambdaMC->Fill(pt,lt);
       }
       if (code == kLambda0Bar) {
          fLambdaBarMC->Fill(pt,lt);
       }
     }
  }
  //++++++++++


  Int_t ntrk2=aod->GetNumberOfTracks();
  Int_t mult=0;
  for (Int_t i=0; i<ntrk2; i++) {
    AliAODTrack *t=aod->GetTrack(i);
    if (t->IsMuonTrack()) continue;
    if (!t->IsOn(AliAODTrack::kTPCrefit)) continue;

    Double_t xyz[3];
    if (t->GetPosition(xyz)) continue;
    if (TMath::Abs(xyz[0])>3.) continue;
    if (TMath::Abs(xyz[1])>3.) continue;

    Double_t pt=t->Pt(),pz=t->Pz();
    if (TMath::Abs(pz/pt)>0.8) continue;

    mult++;

    const AliAODPid *pid=t->GetDetPid();
    if (!pid) continue;

    Double_t p=pid->GetTPCmomentum();
    Double_t dedx=pid->GetTPCsignal()/47.;
    fdEdx->Fill(p,dedx,1);

    Double_t nsig=pidResponse->NumberOfSigmasTPC(t,AliPID::kProton);
    if (TMath::Abs(nsig) < 3.) fdEdxPid->Fill(p,dedx,1);

  }
  fMult->Fill(mult);


  Int_t nv0 = aod->GetNumberOfV0s();
  while (nv0--) {
      AliAODv0 *v0=aod->GetV0(nv0);

      if (!AcceptV0(v0,aod)) continue;
      
      const AliAODTrack *ntrack=(AliAODTrack *)v0->GetDaughter(1);
      const AliAODTrack *ptrack=(AliAODTrack *)v0->GetDaughter(0);

      Double_t xyz[3]; v0->GetSecondaryVtx(xyz);
      Double_t dxv=xyz[0]-xv, dyv=xyz[1]-yv;
      Double_t lt=TMath::Sqrt(dxv*dxv + dyv*dyv);

      Double_t pt=TMath::Sqrt(v0->Pt2V0());

      Bool_t ctK=kTRUE; if (0.4977*lt/pt > 3*2.68) ctK=kFALSE;
      Bool_t ctL=kTRUE; if (1.1157*lt/pt > 3*7.89) ctL=kFALSE;

      Bool_t isProton   =AcceptPID(pidResponse, ptrack, stack);
      Bool_t isProtonBar=AcceptPID(pidResponse, ntrack, stack);

      //+++++++ MC
      if (stack) {
         Int_t ntrk=stack->GetEntriesFast();

         Int_t nlab=TMath::Abs(ntrack->GetLabel());
         if (nlab<0) goto noas;      
         if (nlab>=ntrk) goto noas;      
         AliAODMCParticle *np=(AliAODMCParticle*)stack->UncheckedAt(nlab);

         Int_t plab=TMath::Abs(ptrack->GetLabel());
         if (plab<0) goto noas;      
         if (plab>=ntrk) goto noas;      
         AliAODMCParticle *pp=(AliAODMCParticle*)stack->UncheckedAt(plab);

         Int_t i0=pp->GetMother();
         //if (np->GetMother() != i0) goto noas;

         Int_t in0=np->GetMother();
         if (in0<0) goto noas;
         if (in0>=ntrk) goto noas;
         if (in0 != i0) { // did the negative daughter decay ?
            AliAODMCParticle *nnp=(AliAODMCParticle*)stack->UncheckedAt(in0);
            if (nnp->GetMother() != i0) goto noas;
	 }

         if (i0<0) goto noas;
         if (i0>=ntrk) goto noas;
         AliAODMCParticle *p0=(AliAODMCParticle*)stack->UncheckedAt(i0);

         Int_t code=p0->GetPdgCode();
         if (code != kK0Short)
	    if (code != kLambda0)
	       if (code != kLambda0Bar) goto noas;

	 if (p0->Pt()<pMin) goto noas;
	 if (TMath::Abs(p0->Y())>yMax ) goto noas;

         Double_t dz0=mcZv - p0->Zv(),dy0=mcYv - p0->Yv(),dx0=mcXv - p0->Xv();
         Double_t l = TMath::Sqrt(dx0*dx0 + dy0*dy0 + dz0*dz0);

         dx0 = mcXv - pp->Xv(); dy0 = mcYv - pp->Yv();
         Double_t ltAs=TMath::Sqrt(dx0*dx0 + dy0*dy0);
         Double_t ptAs=p0->Pt();

	 if (l > 0.001) { // Secondary V0
	   if (code != kLambda0)
	      if (code != kLambda0Bar) goto noas;
           Int_t nx=p0->GetMother();
           if (nx<0) goto noas;
           if (nx>=ntrk) goto noas;
           AliAODMCParticle *xi=(AliAODMCParticle*)stack->UncheckedAt(nx);
           Int_t xcode=xi->GetPdgCode();
           if (code==kLambda0) {
              if ( xcode != kXiMinus )
	         if( xcode != 3322 ) goto noas; 
	      if (ctL) fLambdaFromXi->Fill(ptAs,ltAs,xi->Pt());
           } else if (code==kLambda0Bar) {
              if ( xcode != kXiPlusBar )
	         if( xcode != -3322 ) goto noas; 
	      if (ctL) fLambdaBarFromXiBar->Fill(ptAs,ltAs,xi->Pt());
           }
	 } else {
	   if (code == kLambda0) {
              if (ctL) fLambdaAs->Fill(ptAs,ltAs);
           }else if (code == kLambda0Bar) {
              if (ctL) fLambdaBarAs->Fill(ptAs,ltAs);
           }else {
              if (ctK) fK0sAs->Fill(ptAs,ltAs);
	   }
         }
 
      }
      //++++++++

  noas:

      Double_t dca=v0->DcaV0Daughters();
      Double_t cpa=v0->CosPointingAngle(aod->GetPrimaryVertex());

      Double_t mass=0., m=0., s=0.;
      if (ctK)
      if (TMath::Abs(v0->RapK0Short())<yMax) {
         mass=v0->MassK0Short();
         fK0sM->Fill(mass,pt);

         m=TDatabasePDG::Instance()->GetParticle(kK0Short)->Mass();
         s=0.0044 + (0.008-0.0044)/(10-1)*(pt - 1.);
         if (TMath::Abs(m-mass) < 3*s) {
            fK0sSi->Fill(pt,lt);
         }
         if (TMath::Abs(m-mass + 4.5*s) < 1.5*s) {
            fK0sSi->Fill(pt,lt,-1);
         }
         if (TMath::Abs(m-mass - 4.5*s) < 1.5*s) {
            fK0sSi->Fill(pt,lt,-1);
         }
      }
      
      if (ctL)
      if (isProton)
      if (TMath::Abs(v0->RapLambda())<yMax) {
         mass=v0->MassLambda();
         fLambdaM->Fill(mass,pt);

         m=TDatabasePDG::Instance()->GetParticle(kLambda0)->Mass();
         //s=0.0027 + (0.004-0.0027)/(10-1)*(pt-1);
         //s=0.0015 + (0.002-0.0015)/(2.6-1)*(pt-1);
         s=0.0023 + (0.004-0.0023)/(6-1)*(pt-1);
         if (TMath::Abs(m-mass) < 3*s) {
            fLambdaSi->Fill(pt,lt);
            fCPA->Fill(cpa,1);
            fDCA->Fill(dca,1);
         }
         if (TMath::Abs(m-mass + 4.5*s) < 1.5*s) {
            fLambdaSi->Fill(pt,lt,-1);
            fCPA->Fill(cpa,-1);
            fDCA->Fill(dca,-1);
         }
         if (TMath::Abs(m-mass - 4.5*s) < 1.5*s) {
            fLambdaSi->Fill(pt,lt,-1);
            fCPA->Fill(cpa,-1);
            fDCA->Fill(dca,-1);
         }
      }

      if (ctL)
      if (isProtonBar)
      if (TMath::Abs(v0->RapLambda())<yMax) {
         mass=v0->MassAntiLambda();
         fLambdaBarM->Fill(mass,pt);

         m=TDatabasePDG::Instance()->GetParticle(kLambda0Bar)->Mass();
         //s=0.0027 + (0.004-0.0027)/(10-1)*(pt-1);
         //s=0.0015 + (0.002-0.0015)/(2.6-1)*(pt-1);
         s=0.0023 + (0.004-0.0023)/(6-1)*(pt-1);
         if (TMath::Abs(m-mass) < 3*s) {
            fLambdaBarSi->Fill(pt,lt);
            fCPA->Fill(cpa,1);
            fDCA->Fill(dca,1);
         }
         if (TMath::Abs(m-mass + 4.5*s) < 1.5*s) {
            fLambdaBarSi->Fill(pt,lt,-1);
            fCPA->Fill(cpa,-1);
            fDCA->Fill(dca,-1);
         }
         if (TMath::Abs(m-mass - 4.5*s) < 1.5*s) {
            fLambdaBarSi->Fill(pt,lt,-1);
            fCPA->Fill(cpa,-1);
            fDCA->Fill(dca,-1);
         }
      }
  }

  Int_t ncs=aod->GetNumberOfCascades();
  for (Int_t i=0; i<ncs; i++) {
      AliAODcascade *cs=aod->GetCascade(i);
 
      if (TMath::Abs(cs->RapXi()) > yMax) continue;
      if (!AcceptCascade(cs,aod)) continue;

      const AliAODv0 *v0=(AliAODv0*)cs;
      if (v0->RapLambda() > yMax) continue;
      if (!AcceptV0(v0,aod)) continue;

      Double_t pt=TMath::Sqrt(cs->Pt2Xi());

      const AliAODTrack *ptrack=(AliAODTrack *)v0->GetDaughter(0);
      Bool_t isProton=AcceptPID(pidResponse, ptrack, stack);

      const AliAODTrack *ntrack=(AliAODTrack *)v0->GetDaughter(1);
      Bool_t isProtonBar=AcceptPID(pidResponse, ntrack, stack);

      Int_t charge=cs->ChargeXi();      
      if (isProton)
      if (charge < 0) {
         Double_t mass=cs->MassXi();
         fXiM->Fill(mass,pt);
         Double_t m=TDatabasePDG::Instance()->GetParticle(kXiMinus)->Mass();
         //Double_t s=0.0037;
         Double_t s=0.002 + (0.0032-0.002)/(6-1.5)*(pt-1.5);
         if (TMath::Abs(m-mass) < 3*s) {
            fXiSiP->Fill(pt);
         }
         if (TMath::Abs(m-mass + 4.5*s) < 1.5*s) {
            fXiSiP->Fill(pt,-1);
         }
         if (TMath::Abs(m-mass - 4.5*s) < 1.5*s) {
            fXiSiP->Fill(pt,-1);
         }
      }
      if (isProtonBar)
      if (charge > 0) {
         Double_t mass=cs->MassXi();
         fXiBarM->Fill(mass,pt);
         Double_t m=TDatabasePDG::Instance()->GetParticle(kXiPlusBar)->Mass();
         //Double_t s=0.0037;
         Double_t s=0.002 + (0.0032-0.002)/(6-1.5)*(pt-1.5);
         if (TMath::Abs(m-mass) < 3*s) {
            fXiBarSiP->Fill(pt);
         }
         if (TMath::Abs(m-mass + 4.5*s) < 1.5*s) {
            fXiBarSiP->Fill(pt,-1);
         }
         if (TMath::Abs(m-mass - 4.5*s) < 1.5*s) {
            fXiBarSiP->Fill(pt,-1);
         }
      }
  }

}

void AliAnalysisTaskCTauPbPbaod::Terminate(Option_t *)
{
   // The Terminate() function is the last function to be called during
   // a query. It always runs on the client, it can be used to present
   // the results graphically or save the results to file.
  
  fOutput=(TList*)GetOutputData(1);
  if (!fOutput) {
     Printf("ERROR: fOutput not available");
     return;
  }
 
  fMult = dynamic_cast<TH1F*>(fOutput->FindObject("fMult")) ; 
  if (!fMult) {
     Printf("ERROR: fMult not available");
     return;
  }

  fdEdx = dynamic_cast<TH2F*>(fOutput->FindObject("fdEdx")) ; 
  if (!fdEdx) {
     Printf("ERROR: fdEdx not available");
     return;
  }

  fdEdxPid = dynamic_cast<TH2F*>(fOutput->FindObject("fdEdxPid")) ; 
  if (!fdEdxPid) {
     Printf("ERROR: fdEdxPid not available");
     return;
  }


  fK0sMC = dynamic_cast<TH2F*>(fOutput->FindObject("fK0sMC")) ; 
  if (!fK0sMC) {
     Printf("ERROR: fK0sMC not available");
     return;
  }
  TH1D *k0sMcPx=fK0sMC->ProjectionX(); k0sMcPx->Sumw2();
  fK0sAs = dynamic_cast<TH2F*>(fOutput->FindObject("fK0sAs")) ; 
  if (!fK0sAs) {
     Printf("ERROR: fK0sAs not available");
     return;
  }
  TH1D *k0sAsPx=fK0sAs->ProjectionX(); 
  k0sAsPx->Sumw2(); //k0sAsPx->Scale(0.69);



  fLambdaFromXi = dynamic_cast<TH3F*>(fOutput->FindObject("fLambdaFromXi")) ; 
  if (!fLambdaFromXi) {
     Printf("ERROR: fLambdaFromXi not available");
     return;
  }
  TH1D *lambdaFromXiPx=fLambdaFromXi->ProjectionX(); lambdaFromXiPx->Sumw2();


  fLambdaMC = dynamic_cast<TH2F*>(fOutput->FindObject("fLambdaMC")) ; 
  if (!fLambdaMC) {
     Printf("ERROR: fLambdaMC not available");
     return;
  }
  TH1D *lambdaMcPx=fLambdaMC->ProjectionX(); lambdaMcPx->Sumw2();

  fLambdaAs = dynamic_cast<TH2F*>(fOutput->FindObject("fLambdaAs")) ; 
  if (!fLambdaAs) {
     Printf("ERROR: fLambdaAs not available");
     return;
  }
  TH1D *lambdaAsPx=fLambdaAs->ProjectionX(); 
  lambdaAsPx->Sumw2(); //lambdaAsPx->Scale(0.64);

  fLambdaSi = dynamic_cast<TH2F*>(fOutput->FindObject("fLambdaSi")) ; 
  if (!fLambdaSi) {
     Printf("ERROR: fLambdaSi not available");
     return;
  }
  TH1D *lambdaSiPx=fLambdaSi->ProjectionX(); 
  lambdaSiPx->SetName("fLambdaPt");
  lambdaSiPx->Sumw2();

  fLambdaEff = dynamic_cast<TH1D*>(fOutput->FindObject("fLambdaEff")) ; 
  if (!fLambdaEff) {
     Printf("ERROR: fLambdaEff not available");
     return;
  }
  fLambdaPt = dynamic_cast<TH1D*>(fOutput->FindObject("fLambdaPt")) ; 
  if (!fLambdaPt) {
     Printf("ERROR: fLambdaPt not available");
     return;
  }


  if (!gROOT->IsBatch()) {

    TCanvas *c1 = new TCanvas("c1","Mulitplicity");
    c1->SetLogy();
    fMult->DrawCopy() ;

    new TCanvas("c2","dE/dx");
    fdEdx->DrawCopy() ;

    new TCanvas("c3","dE/dx with PID");
    fdEdxPid->DrawCopy() ;

    if (fIsMC) {
       /*
       TH1D effK(*k0sAsPx); effK.SetTitle("Efficiency for K0s");
       effK.Divide(k0sAsPx,k0sMcPx,1,1,"b");
       new TCanvas("c4","Efficiency for K0s");
       effK.DrawCopy("E") ;
       */

       fLambdaEff->Divide(lambdaAsPx,lambdaMcPx,1,1,"b");
       new TCanvas("c5","Efficiency for #Lambda");
       fLambdaEff->DrawCopy("E") ;

       lambdaSiPx->Add(lambdaFromXiPx,-1);
       lambdaSiPx->Divide(fLambdaEff);

       new TCanvas("c6","Corrected #Lambda pt");
       lambdaSiPx->SetTitle("Corrected #Lambda pt");
      *fLambdaPt = *lambdaSiPx; 
       fLambdaPt->SetLineColor(2);
       fLambdaPt->DrawCopy("E");
    
       lambdaMcPx->DrawCopy("same");
 
    } else {
       new TCanvas("c6","Raw #Lambda pt");
       lambdaSiPx->SetTitle("Raw #Lambda pt");
      *fLambdaPt = *lambdaSiPx; 
       fLambdaPt->SetLineColor(2);
       fLambdaPt->DrawCopy("E");
    }
  }
}