wid2compare.cc

Go to the documentation of this file.

#define TF_WID2COMPARE_CC_VERSION \
  "TF_WID2COMPARE_CC   V1.0   "

#include <cmath>
#include <sffxx.h>

namespace sff {

  bool WID2compare::operator()(const WID2& hd1, const WID2& hd2) const
  {
    bool retval=true;
    if (Mflags & Fdate) {
      libtime::TRelativeTime diff=hd2.date-hd1.date;
      retval=retval && (libtime::time2double(diff) 
                        <= ((hd1.dt+hd2.dt)*0.5*Mdatetolerance)); 
    }
    if (Mflags & Fstation) { retval=retval && (hd1.station==hd2.station); }
    if (Mflags & Fchannel) { retval=retval && (hd1.channel==hd2.channel); }
    if (Mflags & Fauxid) { retval=retval && (hd1.auxid==hd2.auxid); }
    if (Mflags & Fnsamples) { retval=retval && (hd1.nsamples==hd2.nsamples); }
    if (Mflags & Fdt) 
    { 
      double diff=hd1.dt-hd2.dt;
      diff = diff >= 0. ? diff : -diff;
      retval=retval && (diff <= (hd1.dt*Mdttolerance)); 
    }
    if (Mflags & Fcalib) { retval=retval && (hd1.calib==hd2.calib); }
    if (Mflags & Fcalper) { retval=retval && (hd1.calper==hd2.calper); }
    if (Mflags & Finstype) { retval=retval && (hd1.instype==hd2.instype); }
    if (Mflags & Fhang) { retval=retval && (hd1.hang==hd2.hang); }
    if (Mflags & Fvang) { retval=retval && (hd1.vang==hd2.vang); }
    return(retval);
  }; // WID2compare::operator()

} // namespace sff

/* ----- END OF wid2compare.cc ----- */