// -*- C++ -*-
#include "Rivet/Analysis.hh"
#include "Rivet/Projections/ChargedFinalState.hh"
#include "Rivet/Projections/PrimaryParticles.hh"
#include "Rivet/Tools/Correlators.hh"

namespace Rivet {


  /// @brief Add a short analysis description here
  class CMS_2017_I1471287 : public CumulantAnalysis {
  public:

    /// Constructor
    CMS_2017_I1471287() : CumulantAnalysis("CMS_2017_I1471287") { };


    /// @name Analysis methods
    /// @{

    /// Book histograms and initialise projections before the run
    void init() {
      // A projection for charged tracks to manage centrality, corresponding
      // to CMS offline tracks.
      ChargedFinalState cfsMult(Cuts::abseta < 2.4 && Cuts::pT > 0.4*GeV);
      declare(cfsMult, "CFSMult");

      // The positive eta side used for rapidity gap, integrated.
      const ChargedFinalState& cfsp = ChargedFinalState(Cuts::eta > 1.0 &&
                                                        Cuts::eta < 2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 3.0*GeV);
      declare(cfsp, "CFSP");
      // ..negative ditto.
      const ChargedFinalState& cfsn = ChargedFinalState(Cuts::eta < -1.0 &&
                                                        Cuts::eta > -2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 3.0*GeV);
      declare(cfsn, "CFSN");


      // The positive eta side used for rapidity gap, differential, charged particles.
      const ChargedFinalState& cfsppT = ChargedFinalState(Cuts::eta > 1.0 &&
                                                          Cuts::eta < 2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 6.0*GeV);
      declare(cfsppT, "CFSPPT");
      // ..negative ditto.
      const ChargedFinalState& cfsnpT = ChargedFinalState(Cuts::eta < -1.0 &&
                                                          Cuts::eta > -2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 6.0*GeV);
      declare(cfsnpT, "CFSNPT");

      // The positive eta side used for rapidity gap, differential, Kaons.
      const PrimaryParticles& kfsppT = PrimaryParticles({310},Cuts::eta > 1.0 &&
                                                        Cuts::eta < 2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 6.0*GeV);
      declare(kfsppT, "KFSP");
      // ..negative ditto.
      const PrimaryParticles& kfsnpT = PrimaryParticles({310},Cuts::eta < -1.0 &&
                                                        Cuts::eta > -2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 6.0*GeV);
      declare(kfsnpT, "KFSN");
      // The positive eta side used for rapidity gap, differential, Lambda.
      const PrimaryParticles& lfsppT = PrimaryParticles({3122},Cuts::eta > 1.0 &&
                                                        Cuts::eta < 2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 6.0*GeV);
      declare(lfsppT, "LFSP");
      // ..negative ditto.
      const PrimaryParticles& lfsnpT = PrimaryParticles({3122},Cuts::eta < -1.0 &&
                                                        Cuts::eta > -2.0 && Cuts::pT > 0.3*GeV && Cuts::pT < 6.0*GeV);
      declare(lfsnpT, "LFSN");

      // v22 |delta eta| > 2 (fig 4a)
      book(h_v22, 1, 1, 1);
      // v32 |delta eta| > 2 (fig 4b)
      book(h_v32, 3, 1, 1);
      // v22(pT) high mult., high pT (fig 6a)
      book(h_v22pT, 11, 1, 1);
      // v22(pT) charged low mult. (fig. 7a)
      book(h_v22pTh, 17, 1, 1);
      // v22(pT) K0S low mult. (fig. 7a)
      book(h_v22pTK, 18, 1, 1);
      // v22(pT) Lambda low mult. (fig. 7a)
      book(h_v22pTL, 19, 1, 1);
      // v22(pT) K0S high mult. (fig. 7b)
      book(h_v22pTKc, 21, 1, 1);
      // v22(pT) Lambda high mult. (fig. 7b)
      book(h_v22pTLc, 22, 1, 1);
      // c24 (fig. 9a)
      book(h_c24, 28, 1, 1);
      // c26 (fig. 9b)
      book(h_c26, 31, 1, 1);

      // Corresponding event averaged correlators.
      ec22 = bookECorrelatorGap<2,2>("ec22",refData(1,1,1));
      ec32 = bookECorrelatorGap<3,2>("ec32",refData(3,1,1));

      // ... pT binned
      ec22pT = bookECorrelatorGap<2,2>("ec22pT",refData(11,1,1));
      ec22pTh = bookECorrelatorGap<2,2>("ec22pTh",refData(17,1,1));
      ec22pTK = bookECorrelatorGap<2,2>("ec22pTK",refData(18,1,1));
      ec22pTL = bookECorrelatorGap<2,2>("ec22pTL",refData(19,1,1));
      ec22pTKc = bookECorrelatorGap<2,2>("ec22pTKc",refData(21,1,1));
      ec22pTLc = bookECorrelatorGap<2,2>("ec22pTLc",refData(22,1,1));

      // Maximal N and P for the gapped.
      pair<int, int> max = getMaxValues();

      // For the four particle cumulant.
      ec22_4 = bookECorrelator<2,2>("ec22_4",refData(28,1,1));
      ec24_4 = bookECorrelator<2,4>("ec24_4",refData(28,1,1));

      // For the six particle cumulant.
      ec22_6 = bookECorrelator<2,2>("ec22_6",refData(31,1,1));
      ec24_6 = bookECorrelator<2,4>("ec24_6",refData(31,1,1));
      ec26_6 = bookECorrelator<2,6>("ec26_6",refData(31,1,1));

      // Maximal N and P for the higher orders.
      pair<int, int> maxH = getMaxValues();

      // Declare correlator projections.
      // For integrated.
      declare(Correlators(cfsMult, maxH.first, maxH.second),"CH");

      // ... gapped
      declare(Correlators(cfsp, max.first, max.second),"CPos");
      declare(Correlators(cfsn, max.first, max.second),"CNeg");

      // For pT differential, charged particles, low multiplicity.
      declare(Correlators(cfsppT, max.first, max.second, refData(17,1,1)),"CPosLowPT");
      declare(Correlators(cfsnpT, max.first, max.second, refData(17,1,1)),"CNegLowPT");

      // For pT differential, charged particles, high multiplicity.
      declare(Correlators(cfsppT, max.first, max.second, refData(11,1,1)),"CPosHighPT");
      declare(Correlators(cfsnpT, max.first, max.second, refData(11,1,1)),"CNegHighPT");

      // For pT differential, kaons. low multiplicity.
      declare(Correlators(kfsppT, max.first, max.second, refData(18,1,1)),"CPosLowPTK");
      declare(Correlators(kfsnpT, max.first, max.second, refData(18,1,1)),"CNegLowPTK");

      // For pT differential, kaons. high multiplicity.
      declare(Correlators(kfsppT, max.first, max.second, refData(21,1,1)),"CPosHighPTK");
      declare(Correlators(kfsnpT, max.first, max.second, refData(21,1,1)),"CNegHighPTK");

      // For pT differential, lambda. low multiplicity.
      declare(Correlators(lfsppT, max.first, max.second, refData(19,1,1)),"CPosLowPTL");
      declare(Correlators(lfsnpT, max.first, max.second, refData(19,1,1)),"CNegLowPTL");

      // For pT differential, lambda. high multiplicity.
      declare(Correlators(lfsppT, max.first, max.second, refData(22,1,1)),"CPosHighPTL");
      declare(Correlators(lfsnpT, max.first, max.second, refData(22,1,1)),"CNegHighPTL");


    }


    /// Perform the per-event analysis
    void analyze(const Event& event) {
      const double nTrk = apply<ChargedFinalState>(event, "CFSMult").particles().size();
      if (nTrk < 10) vetoEvent;

      // The correlators.
      const Correlators& ch = apply<Correlators>(event, "CH");

      const Correlators& cp = apply<Correlators>(event, "CPos");
      const Correlators& cn = apply<Correlators>(event, "CNeg");

      const Correlators& cpLow = apply<Correlators>(event, "CPosLowPT");
      const Correlators& cnLow = apply<Correlators>(event, "CNegLowPT");

      const Correlators& cpHigh = apply<Correlators>(event, "CPosHighPT");
      const Correlators& cnHigh = apply<Correlators>(event, "CNegHighPT");

      const Correlators& cpLowK = apply<Correlators>(event, "CPosLowPTK");
      const Correlators& cnLowK = apply<Correlators>(event, "CNegLowPTK");

      const Correlators& cpHighK = apply<Correlators>(event, "CPosHighPTK");
      const Correlators& cnHighK = apply<Correlators>(event, "CNegHighPTK");

      const Correlators& cpLowL = apply<Correlators>(event, "CPosLowPTL");
      const Correlators& cnLowL = apply<Correlators>(event, "CNegLowPTL");

      const Correlators& cpHighL = apply<Correlators>(event, "CPosHighPTL");
      const Correlators& cnHighL = apply<Correlators>(event, "CNegHighPTL");

      ec22->fill(nTrk, cp, cn);
      ec32->fill(nTrk, cp, cn);

      ec22_4->fill(nTrk, ch);
      ec24_4->fill(nTrk, ch);
      ec22_6->fill(nTrk, ch);
      ec24_6->fill(nTrk, ch);
      ec26_6->fill(nTrk, ch);

      if (nTrk < 20) {
        ec22pTh->fill(cpLow, cnLow);
        ec22pTK->fill(cpLowK, cnLowK);
        ec22pTL->fill(cpLowL, cnLowL);
      } else if(nTrk >= 105 && nTrk < 150) { //< AB: brace was missing so condition only applied to first fill: seems wrong
        ec22pT->fill(cpHigh, cnHigh);
        ec22pTKc->fill(cpHighK, cnHighK);
        ec22pTLc->fill(cpHighL, cnHighL);
      }
    }


    /// Normalise histograms etc., after the run
    void finalize() {
      cnTwoInt(h_v22, ec22);
      cnTwoInt(h_v32, ec32);
      vnTwoDiff(h_v22pT, ec22pT);
      vnTwoDiff(h_v22pTh, ec22pTh);
      cnFourInt(h_c24, ec22_4, ec24_4);
      cnSixInt(h_c26, ec22_6, ec24_6, ec26_6);

      // Set correct reference flow for pid flow.
      ec22pTK->setReference(ec22pTh->getReference());
      vnTwoDiff(h_v22pTK, ec22pTK);
      ec22pTL->setReference(ec22pTh->getReference());
      vnTwoDiff(h_v22pTL, ec22pTL);
      ec22pTKc->setReference(ec22pT->getReference());
      vnTwoDiff(h_v22pTKc, ec22pTKc);
      ec22pTLc->setReference(ec22pT->getReference());
      vnTwoDiff(h_v22pTLc, ec22pTLc);

    }

    /// @}
    Scatter2DPtr h_v22;
    Scatter2DPtr h_v32;
    Scatter2DPtr h_v22pT;
    Scatter2DPtr h_v22pTh;
    Scatter2DPtr h_v22pTK;
    Scatter2DPtr h_v22pTL;
    Scatter2DPtr h_v22pTKc;
    Scatter2DPtr h_v22pTLc;
    Scatter2DPtr h_c24;
    Scatter2DPtr h_c26;

    ECorrPtr ec22;
    ECorrPtr ec32;

    ECorrPtr ec22_4;
    ECorrPtr ec24_4;

    ECorrPtr ec22_6;
    ECorrPtr ec24_6;
    ECorrPtr ec26_6;

    ECorrPtr ec22pT;
    ECorrPtr ec22pTh;
    ECorrPtr ec22pTK;
    ECorrPtr ec22pTL;
    ECorrPtr ec22pTKc;
    ECorrPtr ec22pTLc;

  };


  RIVET_DECLARE_PLUGIN(CMS_2017_I1471287);


}
