// -*- C++ -*-
#include "Rivet/Analysis.hh"
#include "Rivet/Projections/Beam.hh"
#include "Rivet/Projections/UnstableParticles.hh"

namespace Rivet {


  /// @brief Spectrum for D_s1
  class ARGUS_1989_I282570 : public Analysis {
  public:

    /// Constructor
    RIVET_DEFAULT_ANALYSIS_CTOR(ARGUS_1989_I282570);


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

    /// Book histograms and initialise projections before the run
    void init() {
      // projections
      declare(Beam(), "Beams");
      declare(UnstableParticles(), "UFS");
      // book histos
      book(_h_rate1 ,1,1,1);
      book(_h_rate2 ,1,1,2);
      book(_h_x     ,2,1,1);
    }

    bool isK0(int id) {
      return id==310 || id==130 || abs(id)==311;
    }


    /// Perform the per-event analysis
    void analyze(const Event& event) {
      static const int DsID = 10433;
      // Get beams and average beam momentum
      const ParticlePair& beams = apply<Beam>(event, "Beams").beams();
      const double Emax = ( beams.first.p3().mod() + beams.second.p3().mod() ) / 2.0;
      const double Pmax = sqrt(sqr(Emax)-sqr(2.535));
      const UnstableParticles& ufs = apply<UnstableParticles>(event, "UFS");
      for (const Particle& p : ufs.particles(Cuts::abspid==DsID)) {
        double xp = p.momentum().p3().mod()/Pmax;
        _h_x->fill(xp);
        if(p.children().size()!=2) continue;
        int sign = p.pid()/DsID;
        if(p.children()[0].pid()==sign*413 &&
           isK0(p.children()[1].pid())) {
          _h_rate1->fill(10);
          _h_rate2->fill(10);
        }
        else if (p.children()[1].pid()==sign*413 &&
           isK0(p.children()[0].pid())) {
          _h_rate1->fill(10);
          _h_rate2->fill(10);
        }
        else if(p.children()[0].pid()==sign*423 &&
          p.children()[1].pid()==sign*321) {
          _h_rate2->fill(10);
        }
        else if(p.children()[1].pid()==sign*423 &&
          p.children()[0].pid()==sign*321) {
          _h_rate2->fill(10);
        }
      }
    }


    /// Normalise histograms etc., after the run
    void finalize() {
      normalize(_h_x);
      scale(_h_rate1,crossSection()/sumOfWeights()/picobarn);
      scale(_h_rate2,crossSection()/sumOfWeights()/picobarn);
    }

    /// @}


    /// @name Histograms
    /// @{
    BinnedHistoPtr<int> _h_rate1,_h_rate2;
    Histo1DPtr _h_x;
    /// @}


  };


  RIVET_DECLARE_PLUGIN(ARGUS_1989_I282570);

}
