JSimplex.cc

Go to the documentation of this file.

#include <string>
#include <iostream>
#include <iomanip>
#include <vector>
#include <map>
#include <algorithm>

#include "evt/Head.hh"
#include "evt/Evt.hh"
#include "JDAQ/JDAQEvent.hh"
#include "JDAQ/JDAQTimeslice.hh"
#include "JDAQ/JDAQSummaryslice.hh"

#include "JDetector/JDetector.hh"
#include "JDetector/JDetectorToolkit.hh"
#include "JDetector/JModuleRouter.hh"

#include "JTrigger/JHit.hh"
#include "JTrigger/JFrame.hh"
#include "JTrigger/JTimeslice.hh"
#include "JTrigger/JSuperFrame2D.hh"
#include "JTrigger/JHitL0.hh"
#include "JTrigger/JHitL1.hh"
#include "JTrigger/JHitR1.hh"
#include "JTrigger/JBuildL0.hh"
#include "JTrigger/JBuildL1.hh"
#include "JTrigger/JBuildL2.hh"
#include "JTrigger/JTriggerParameters.hh"

#include "JSupport/JMultipleFileScanner.hh"
#include "JSupport/JParallelFileScanner.hh"
#include "JSupport/JFileRecorder.hh"
#include "JSupport/JSupport.hh"
#include "JSupport/JMeta.hh"

#include "JTools/JConstants.hh"

#include "JFit/JLine3Z.hh"
#include "JFit/JSimplex.hh"
#include "JFit/JLine3ZRegressor.hh"
#include "JFit/JFitToolkit.hh"
#include "JFit/JEvt.hh"
#include "JFit/JEvtToolkit.hh"
#include "JFit/JModel.hh"

#include "Jeep/JParser.hh"
#include "Jeep/JMessage.hh"


/**
 * \file
 *
 * Program to perform JFIT::JRegressor<JLine3Z,JSimplex> fit with I/O of JFIT::JEvt data.
 * \author mdejong
 */
int main(int argc, char **argv)
{
  using namespace std;
  using namespace JPP;
  using namespace KM3NETDAQ;

  typedef JParallelFileScanner< JTypeList<JDAQEvent, JEvt> >       JParallelFileScanner_t;
  typedef JParallelFileScanner_t::multi_pointer_type               multi_pointer_type;
  typedef JTYPELIST<JAllTypes_t, JEvt>::typelist                   typelist;

  JParallelFileScanner_t  inputFile;
  JFileRecorder<typelist> outputFile;
  JLimit_t&      numberOfEvents = inputFile.getLimit();
  string         detectorFile;
  double         Tmax_ns;
  double         roadWidth_m;
  double         ctMin;
  size_t         numberOfPrefits;
  double         sigma_ns;
  bool           useL0;
  bool           reprocess;
  int            debug;

  try { 

    JParser<> zap("Program to perform intermediate fit of muon trajectory to data.");
    
    zap['f'] = make_field(inputFile);
    zap['o'] = make_field(outputFile)          = "simplex.root";
    zap['a'] = make_field(detectorFile);
    zap['n'] = make_field(numberOfEvents)      = JLimit::max();
    zap['T'] = make_field(Tmax_ns)             =  20.0;               // [ns]
    zap['R'] = make_field(roadWidth_m)         = 200.0;               // [m]    
    zap['C'] = make_field(ctMin)               =   0.0;               //   
    zap['N'] = make_field(numberOfPrefits)     = 0;
    zap['S'] = make_field(sigma_ns);
    zap['U'] = make_field(useL0);
    zap['r'] = make_field(reprocess);
    zap['d'] = make_field(debug)               = 1;
    
    zap(argc, argv);
  }
  catch(const exception& error) {
    FATAL(error.what() << endl);
  }



  cout.tie(&cerr);


  const double TMAX_NS = 50.0;       // [ns]

  JDetector detector;

  try {
    load(detectorFile, detector);
  }
  catch(const JException& error) {
    FATAL(error);
  }

  const JModuleRouter moduleRouter(detector);


  typedef vector<JHitL0>     JDataL0_t;
  typedef vector<JHitL1>     JDataL1_t;
  typedef vector<JHitR1>     JDataR1_t;

  JSuperFrame2D<JHit>        buffer;
  const JBuildL0<JHitL0>     buildL0;
  const JBuildL2<JHitL1>     buildL2(2, Tmax_ns, ctMin);


  typedef JRegressor<JLine3Z, JSimplex>  JRegressor_t;

  JRegressor_t fit(sigma_ns);

  fit.estimator.reset(new JMEstimatorLorentzian());

  JRegressor_t::debug              = debug;
  JRegressor_t::MAXIMUM_ITERATIONS = 10000;
    

  outputFile.open();

  outputFile.put(JMeta(argc, argv));

  while (inputFile.hasNext()) {

    STATUS("event: " << setw(10) << inputFile.getCounter() << '\r'); DEBUG(endl);

    multi_pointer_type ps = inputFile.next();

    JDAQEvent* tev = ps;
    JEvt*      evt = ps;
    JEvt       out;

    JEvt::iterator __end = evt->end();

    if (reprocess) {
      __end = partition(evt->begin(), __end, JHistory::is_not_event(JMUONSIMPLEX));
    }

    if (evt->begin() != __end) {

      copy(evt->begin(), __end, back_inserter(out));
    
      if (numberOfPrefits > 0) {
        advance(__end = evt->begin(), min(numberOfPrefits, out.size()));
      }

      partial_sort(evt->begin(), __end, evt->end(), qualitySorter);
      
      __end = partition(evt->begin(), __end, JHistory::is_event(evt->begin()->getHistory()));


      JDataL0_t dataL0;
      JDataL1_t dataL1;
      
      JDAQTimeslice timeslice(*tev, true);
      
      for (JDAQTimeslice::const_iterator i = timeslice.begin(); i != timeslice.end(); ++i) {

        if (moduleRouter.hasModule(i->getModuleID())) {
          
          buffer(*i, moduleRouter.getModule(i->getModuleID()));
        
          buildL0(buffer, back_inserter(dataL0));
          buildL2(buffer, back_inserter(dataL1));
        }
      }
      

      JDataR1_t data;

      for (JEvt::const_iterator track = evt->begin(); track != __end; ++track) {

        const JRotation3D     R (getDirection(*track));
        const JLine1Z         tz(getPosition (*track).rotate(R), track->getT());
        const JModel<JLine1Z> match(tz, roadWidth_m, JTimeRange(-TMAX_NS, +TMAX_NS));
            
        data.clear();

        for (JDataL1_t::const_iterator i = dataL1.begin(); i != dataL1.end(); ++i) {

          JHitR1 hit(*i);
              
          hit.rotate(R);

          if (match(hit)) {
            data.push_back(hit);
          }
        }

        if (useL0) {

          data.reserve(data.size() + dataL0.size());
      
          JDataR1_t::iterator __end1 = data.end();      

          for (JDataL0_t::iterator i = dataL0.begin(); i != dataL0.end(); ++i) {
              
            if (find_if(data.begin(), __end1, bind2nd(equal_to<JDAQModuleIdentifier>(), i->getModuleID())) == __end1) {

              JHitR1 hit(*i);
              
              hit.rotate(R);
              
              if (match(hit)) {
                data.push_back(hit);
              }
            }
          }
        }


        fit.step.resize(5);
        
        fit.step[0] = JLine3Z(JLine1Z(JVector3D(0.5, 0.0, 0.0), 0.0));
        fit.step[1] = JLine3Z(JLine1Z(JVector3D(0.0, 0.5, 0.0), 0.0));
        fit.step[2] = JLine3Z(JLine1Z(JVector3D(0.0, 0.0, 0.0), 1.0));
        fit.step[3] = JLine3Z(JLine1Z(JVector3D(), 0.0), JVersor3Z(0.005, 0.0));
        fit.step[4] = JLine3Z(JLine1Z(JVector3D(), 0.0), JVersor3Z(0.0, 0.005));
        
        const int NDF = getCount(data.begin(), data.end()) - fit.step.size();

        if (NDF >= 0) {

          const double chi2 = fit(JLine3Z(tz), data.begin(), data.end());
              
          JTrack3D tb(fit.value);
              
          tb.rotate_back(R);

          out.push_back(getFit(JHistory(track->getHistory()).add(JMUONSIMPLEX), tb, getQuality(chi2, NDF), NDF)); 
        }
      }

      // apply default sorter

      sort(out.begin(), out.end(), qualitySorter);
    }

    outputFile.put(out);
  }
  STATUS(endl);

  JSingleFileScanner<JRemove<typelist, JEvt>::typelist> io(inputFile);

  io >> outputFile;

  outputFile.close();
}