| 1 | /* ======================================================================== *\
|
|---|
| 2 | !
|
|---|
| 3 | ! *
|
|---|
| 4 | ! * This file is part of MARS, the MAGIC Analysis and Reconstruction
|
|---|
| 5 | ! * Software. It is distributed to you in the hope that it can be a useful
|
|---|
| 6 | ! * and timesaving tool in analysing Data of imaging Cerenkov telescopes.
|
|---|
| 7 | ! * It is distributed WITHOUT ANY WARRANTY.
|
|---|
| 8 | ! *
|
|---|
| 9 | ! * Permission to use, copy, modify and distribute this software and its
|
|---|
| 10 | ! * documentation for any purpose is hereby granted without fee,
|
|---|
| 11 | ! * provided that the above copyright notice appear in all copies and
|
|---|
| 12 | ! * that both that copyright notice and this permission notice appear
|
|---|
| 13 | ! * in supporting documentation. It is provided "as is" without express
|
|---|
| 14 | ! * or implied warranty.
|
|---|
| 15 | ! *
|
|---|
| 16 | !
|
|---|
| 17 | !
|
|---|
| 18 | ! Author(s): Wolfgang Wittek, 04/2003 <mailto:wittek@mppmu.mpg.de>
|
|---|
| 19 | !
|
|---|
| 20 | ! Copyright: MAGIC Software Development, 2000-2003
|
|---|
| 21 | !
|
|---|
| 22 | !
|
|---|
| 23 | \* ======================================================================== */
|
|---|
| 24 |
|
|---|
| 25 | /////////////////////////////////////////////////////////////////////////////
|
|---|
| 26 | //
|
|---|
| 27 | // MSupercutsCalc
|
|---|
| 28 | //
|
|---|
| 29 | // this class calculates the hadronness for the supercuts
|
|---|
| 30 | // the parameters of the supercuts are taken
|
|---|
| 31 | // from the container MSupercuts
|
|---|
| 32 | //
|
|---|
| 33 | /////////////////////////////////////////////////////////////////////////////
|
|---|
| 34 | #include "MSupercutsCalc.h"
|
|---|
| 35 |
|
|---|
| 36 | #include <math.h>
|
|---|
| 37 | #include <fstream>
|
|---|
| 38 |
|
|---|
| 39 | #include "TFile.h"
|
|---|
| 40 | #include "TArrayD.h"
|
|---|
| 41 |
|
|---|
| 42 | #include "MParList.h"
|
|---|
| 43 | #include "MHillasExt.h"
|
|---|
| 44 | #include "MHillasSrc.h"
|
|---|
| 45 | #include "MNewImagePar.h"
|
|---|
| 46 | #include "MMcEvt.hxx"
|
|---|
| 47 | #include "MGeomCam.h"
|
|---|
| 48 | #include "MHadronness.h"
|
|---|
| 49 | #include "MHMatrix.h"
|
|---|
| 50 | #include "MSupercuts.h"
|
|---|
| 51 |
|
|---|
| 52 | #include "MLog.h"
|
|---|
| 53 | #include "MLogManip.h"
|
|---|
| 54 |
|
|---|
| 55 | ClassImp(MSupercutsCalc);
|
|---|
| 56 |
|
|---|
| 57 | using namespace std;
|
|---|
| 58 |
|
|---|
| 59 |
|
|---|
| 60 | // --------------------------------------------------------------------------
|
|---|
| 61 | //
|
|---|
| 62 | // constructor
|
|---|
| 63 | //
|
|---|
| 64 |
|
|---|
| 65 | MSupercutsCalc::MSupercutsCalc(const char *hilname,
|
|---|
| 66 | const char *hilsrcname,
|
|---|
| 67 | const char *name, const char *title)
|
|---|
| 68 | : fHadronnessName("MHadronness"), fHilName(hilname), fHilSrcName(hilsrcname),
|
|---|
| 69 | fHilExtName("MHillasExt"), fNewParName("MNewImagePar"),
|
|---|
| 70 | fSuperName("MSupercuts")
|
|---|
| 71 | {
|
|---|
| 72 | fName = name ? name : "MSupercutsCalc";
|
|---|
| 73 | fTitle = title ? title : "Class to evaluate the Supercuts";
|
|---|
| 74 |
|
|---|
| 75 | fMatrix = NULL;
|
|---|
| 76 | }
|
|---|
| 77 |
|
|---|
| 78 | // --------------------------------------------------------------------------
|
|---|
| 79 | //
|
|---|
| 80 | Int_t MSupercutsCalc::PreProcess(MParList *pList)
|
|---|
| 81 | {
|
|---|
| 82 | MGeomCam *cam = (MGeomCam*)pList->FindObject("MGeomCam");
|
|---|
| 83 | if (!cam)
|
|---|
| 84 | {
|
|---|
| 85 | *fLog << err << "MGeomCam (Camera Geometry) not found... aborting." << endl;
|
|---|
| 86 | return kFALSE;
|
|---|
| 87 | }
|
|---|
| 88 |
|
|---|
| 89 | fMm2Deg = cam->GetConvMm2Deg();
|
|---|
| 90 |
|
|---|
| 91 | fHadronness = (MHadronness*)pList->FindCreateObj("MHadronness", fHadronnessName);
|
|---|
| 92 | if (!fHadronness)
|
|---|
| 93 | {
|
|---|
| 94 | *fLog << err << fHadronnessName << " [MHadronness] not found... aborting." << endl;
|
|---|
| 95 | return kFALSE;
|
|---|
| 96 | }
|
|---|
| 97 |
|
|---|
| 98 | fSuper = (MSupercuts*)pList->FindObject(fSuperName, "MSupercuts");
|
|---|
| 99 | if (!fSuper)
|
|---|
| 100 | {
|
|---|
| 101 | *fLog << err << fSuperName << " [MSupercuts] not found... aborting." << endl;
|
|---|
| 102 | return kFALSE;
|
|---|
| 103 | }
|
|---|
| 104 |
|
|---|
| 105 | if (fMatrix)
|
|---|
| 106 | return kTRUE;
|
|---|
| 107 |
|
|---|
| 108 | //-----------------------------------------------------------
|
|---|
| 109 | fHil = (MHillas*)pList->FindObject(fHilName, "MHillas");
|
|---|
| 110 | if (!fHil)
|
|---|
| 111 | {
|
|---|
| 112 | *fLog << err << fHilName << " [MHillas] not found... aborting." << endl;
|
|---|
| 113 | return kFALSE;
|
|---|
| 114 | }
|
|---|
| 115 |
|
|---|
| 116 | fHilExt = (MHillasExt*)pList->FindObject(fHilExtName, "MHillasExt");
|
|---|
| 117 | if (!fHilExt)
|
|---|
| 118 | {
|
|---|
| 119 | *fLog << err << fHilExtName << " [MHillasExt] not found... aborting." << endl;
|
|---|
| 120 | return kFALSE;
|
|---|
| 121 | }
|
|---|
| 122 |
|
|---|
| 123 | fHilSrc = (MHillasSrc*)pList->FindObject(fHilSrcName, "MHillasSrc");
|
|---|
| 124 | if (!fHilSrc)
|
|---|
| 125 | {
|
|---|
| 126 | *fLog << err << fHilSrcName << " [MHillasSrc] not found... aborting." << endl;
|
|---|
| 127 | return kFALSE;
|
|---|
| 128 | }
|
|---|
| 129 |
|
|---|
| 130 | fNewPar = (MNewImagePar*)pList->FindObject(fNewParName, "MNewImagePar");
|
|---|
| 131 | if (!fNewPar)
|
|---|
| 132 | {
|
|---|
| 133 | *fLog << err << fNewParName << " [MNewImagePar] not found... aborting." << endl;
|
|---|
| 134 | return kFALSE;
|
|---|
| 135 | }
|
|---|
| 136 |
|
|---|
| 137 | fMcEvt = (MMcEvt*)pList->FindObject("MMcEvt");
|
|---|
| 138 | if (!fMcEvt)
|
|---|
| 139 | {
|
|---|
| 140 | *fLog << err << "MMcEvt not found... aborting." << endl;
|
|---|
| 141 | return kFALSE;
|
|---|
| 142 | }
|
|---|
| 143 |
|
|---|
| 144 |
|
|---|
| 145 | return kTRUE;
|
|---|
| 146 | }
|
|---|
| 147 |
|
|---|
| 148 | // --------------------------------------------------------------------------
|
|---|
| 149 | //
|
|---|
| 150 | // Calculation of upper and lower limits
|
|---|
| 151 | //
|
|---|
| 152 | Double_t MSupercutsCalc::CtsMCut(const Double_t* a, Double_t ls, Double_t ct,
|
|---|
| 153 | Double_t ls2, Double_t dd2) const
|
|---|
| 154 | {
|
|---|
| 155 | // define cut-function
|
|---|
| 156 | //
|
|---|
| 157 | // dNOMLOGSIZE = 5.0 (=log(150.0)
|
|---|
| 158 | // dNOMCOSZA = 1.0
|
|---|
| 159 | //
|
|---|
| 160 | // a: array of cut parameters
|
|---|
| 161 | // ls: log(SIZE) - dNOMLOGSIZE
|
|---|
| 162 | // ls2: ls^2
|
|---|
| 163 | // ct: Cos(ZA.) - dNOMCOSZA
|
|---|
| 164 | // dd2: DIST^2
|
|---|
| 165 | const Double_t limit =
|
|---|
| 166 | a[0] + a[1] * dd2 + a[2] * ct +
|
|---|
| 167 | ls * (a[3] + a[4] * dd2 + a[5] * ct) +
|
|---|
| 168 | ls2 * (a[6] + a[7] * dd2);
|
|---|
| 169 |
|
|---|
| 170 | //*fLog << "MSupercutsCalc::CtsMCut; *a = "
|
|---|
| 171 | // << *a << ", " << *(a+1) << ", " << *(a+2) << ", "
|
|---|
| 172 | // << *(a+3) << ", " << *(a+4) << ", " << *(a+5) << ", "
|
|---|
| 173 | // << *(a+6) << ", " << *(a+7) << endl;
|
|---|
| 174 |
|
|---|
| 175 | //*fLog << "MSupercutsCalc::CtsMCut; ls, ls2, ct, dd2, limit = " << ls
|
|---|
| 176 | // << ", " << ls2 << ", " << ct << ", " << dd2 << ", "
|
|---|
| 177 | // << limit << endl;
|
|---|
| 178 |
|
|---|
| 179 | return limit;
|
|---|
| 180 | }
|
|---|
| 181 |
|
|---|
| 182 | // --------------------------------------------------------------------------
|
|---|
| 183 | //
|
|---|
| 184 | // Returns the mapped value from the Matrix
|
|---|
| 185 | //
|
|---|
| 186 | Double_t MSupercutsCalc::GetVal(Int_t i) const
|
|---|
| 187 | {
|
|---|
| 188 |
|
|---|
| 189 | Double_t val = (*fMatrix)[fMap[i]];
|
|---|
| 190 |
|
|---|
| 191 |
|
|---|
| 192 | //*fLog << "MSupercutsCalc::GetVal; i, fMatrix, fMap, val = "
|
|---|
| 193 | // << i << ", " << fMatrix << ", " << fMap[i] << ", " << val << endl;
|
|---|
| 194 |
|
|---|
| 195 |
|
|---|
| 196 | return val;
|
|---|
| 197 | }
|
|---|
| 198 |
|
|---|
| 199 | // --------------------------------------------------------------------------
|
|---|
| 200 | //
|
|---|
| 201 | // You can use this function if you want to use a MHMatrix instead of the
|
|---|
| 202 | // given containers. This function adds all necessary columns to the
|
|---|
| 203 | // given matrix. Afterward you should fill the matrix with the corresponding
|
|---|
| 204 | // data (eg from a file by using MHMatrix::Fill). If you now loop
|
|---|
| 205 | // through the matrix (eg using MMatrixLoop) MEnergyEstParam::Process
|
|---|
| 206 | // will take the values from the matrix instead of the containers.
|
|---|
| 207 | //
|
|---|
| 208 | void MSupercutsCalc::InitMapping(MHMatrix *mat)
|
|---|
| 209 | {
|
|---|
| 210 | if (fMatrix)
|
|---|
| 211 | return;
|
|---|
| 212 |
|
|---|
| 213 | fMatrix = mat;
|
|---|
| 214 |
|
|---|
| 215 | fMap[0] = fMatrix->AddColumn("MMcEvt.fTelescopeTheta");
|
|---|
| 216 | fMap[1] = fMatrix->AddColumn("MHillas.fWidth");
|
|---|
| 217 | fMap[2] = fMatrix->AddColumn("MHillas.fLength");
|
|---|
| 218 | fMap[3] = fMatrix->AddColumn("MHillas.fSize");
|
|---|
| 219 | fMap[4] = fMatrix->AddColumn("MHillas.fMeanX");
|
|---|
| 220 | fMap[5] = fMatrix->AddColumn("MHillas.fMeanY");
|
|---|
| 221 | fMap[6] = fMatrix->AddColumn("MHillasSrc.fDist");
|
|---|
| 222 | fMap[7] = fMatrix->AddColumn("fabs(MHillasSrc.fAlpha)");
|
|---|
| 223 | fMap[8] = fMatrix->AddColumn("sgn(MHillasSrc.fCosDeltaAlpha)*(MHillasExt.fM3Long)");
|
|---|
| 224 | fMap[9] = fMatrix->AddColumn("MNewImagePar.fConc");
|
|---|
| 225 | fMap[10]= fMatrix->AddColumn("MNewImagePar.fLeakage1");
|
|---|
| 226 | }
|
|---|
| 227 |
|
|---|
| 228 | // ---------------------------------------------------------------------------
|
|---|
| 229 | //
|
|---|
| 230 | // Evaluate dynamical supercuts
|
|---|
| 231 | //
|
|---|
| 232 | // set hadronness to 0.25 if cuts are fullfilled
|
|---|
| 233 | // 0.75 otherwise
|
|---|
| 234 | //
|
|---|
| 235 | Int_t MSupercutsCalc::Process()
|
|---|
| 236 | {
|
|---|
| 237 | const Double_t kNomLogSize = 4.1;
|
|---|
| 238 | const Double_t kNomCosZA = 1.0;
|
|---|
| 239 |
|
|---|
| 240 | const Double_t theta = fMatrix ? GetVal(0) : fMcEvt->GetTelescopeTheta();
|
|---|
| 241 | const Double_t width0 = fMatrix ? GetVal(1) : fHil->GetWidth();
|
|---|
| 242 | const Double_t length0 = fMatrix ? GetVal(2) : fHil->GetLength();
|
|---|
| 243 | const Double_t size = fMatrix ? GetVal(3) : fHil->GetSize();
|
|---|
| 244 | const Double_t meanx = fMatrix ? GetVal(4) : fHil->GetMeanX();
|
|---|
| 245 | const Double_t meany = fMatrix ? GetVal(5) : fHil->GetMeanY();
|
|---|
| 246 | const Double_t dist0 = fMatrix ? GetVal(6) : fHilSrc->GetDist();
|
|---|
| 247 |
|
|---|
| 248 | Double_t help;
|
|---|
| 249 | if (!fMatrix)
|
|---|
| 250 | help = TMath::Sign(fHilExt->GetM3Long(),
|
|---|
| 251 | fHilSrc->GetCosDeltaAlpha());
|
|---|
| 252 | const Double_t asym0 = fMatrix ? GetVal(8) : help;
|
|---|
| 253 | const Double_t conc = fMatrix ? GetVal(9) : fNewPar->GetConc();
|
|---|
| 254 | const Double_t leakage = fMatrix ? GetVal(10): fNewPar->GetLeakage1();
|
|---|
| 255 |
|
|---|
| 256 | const Double_t newdist = dist0 * fMm2Deg;
|
|---|
| 257 |
|
|---|
| 258 | const Double_t dist2 = meanx*meanx + meany*meany;
|
|---|
| 259 | const Double_t dist = sqrt(dist2) * fMm2Deg;
|
|---|
| 260 | const Double_t dd2 = dist*dist;
|
|---|
| 261 |
|
|---|
| 262 |
|
|---|
| 263 | const Double_t dmls = log(size) - kNomLogSize;
|
|---|
| 264 | const Double_t dmls2 = dmls * dmls;
|
|---|
| 265 |
|
|---|
| 266 | const Double_t dmcza = cos(theta) - kNomCosZA;
|
|---|
| 267 |
|
|---|
| 268 | const Double_t length = length0 * fMm2Deg;
|
|---|
| 269 | const Double_t width = width0 * fMm2Deg;
|
|---|
| 270 | const Double_t asym = asym0 * fMm2Deg;
|
|---|
| 271 |
|
|---|
| 272 | /*
|
|---|
| 273 | *fLog << "newdist, length, width, asym, dist, conc, leakage = "
|
|---|
| 274 | << newdist << ", " << length << ", " << width << ", "
|
|---|
| 275 | << asym << ", " << dist << ", " << conc << ", " << leakage
|
|---|
| 276 | << endl;
|
|---|
| 277 |
|
|---|
| 278 | *fLog << "upper cuts in newdist, length, width, asym, dist, conc, leakage = "
|
|---|
| 279 | << CtsMCut (fSuper->GetDistUp(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 280 | << CtsMCut (fSuper->GetDistLo(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 281 |
|
|---|
| 282 | << CtsMCut (fSuper->GetLengthUp(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 283 | << CtsMCut (fSuper->GetLengthLo(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 284 |
|
|---|
| 285 | << CtsMCut (fSuper->GetWidthUp(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 286 | << CtsMCut (fSuper->GetWidthLo(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 287 |
|
|---|
| 288 | << CtsMCut (fSuper->GetAsymUp(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 289 | << CtsMCut (fSuper->GetAsymLo(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 290 |
|
|---|
| 291 | << CtsMCut (fSuper->GetDistUp(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 292 | << CtsMCut (fSuper->GetDistLo(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 293 |
|
|---|
| 294 | << CtsMCut (fSuper->GetConcUp(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 295 | << CtsMCut (fSuper->GetConcLo(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 296 |
|
|---|
| 297 | << CtsMCut (fSuper->GetLeakage1Up(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 298 | << CtsMCut (fSuper->GetLeakage1Lo(), dmls, dmcza, dmls2, dd2) << ", "
|
|---|
| 299 | << endl;
|
|---|
| 300 | */
|
|---|
| 301 |
|
|---|
| 302 |
|
|---|
| 303 | if (
|
|---|
| 304 | //dist < 1.05 &&
|
|---|
| 305 | //newdist < 1.05 &&
|
|---|
| 306 |
|
|---|
| 307 | newdist < CtsMCut (fSuper->GetDistUp(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 308 | newdist > CtsMCut (fSuper->GetDistLo(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 309 |
|
|---|
| 310 | length < CtsMCut (fSuper->GetLengthUp(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 311 | length > CtsMCut (fSuper->GetLengthLo(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 312 |
|
|---|
| 313 | width < CtsMCut (fSuper->GetWidthUp(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 314 | width > CtsMCut (fSuper->GetWidthLo(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 315 |
|
|---|
| 316 | asym < CtsMCut (fSuper->GetAsymUp(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 317 | asym > CtsMCut (fSuper->GetAsymLo(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 318 |
|
|---|
| 319 | dist < CtsMCut (fSuper->GetDistUp(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 320 | dist > CtsMCut (fSuper->GetDistLo(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 321 |
|
|---|
| 322 | conc < CtsMCut (fSuper->GetConcUp(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 323 | conc > CtsMCut (fSuper->GetConcLo(), dmls, dmcza, dmls2, dd2) &&
|
|---|
| 324 |
|
|---|
| 325 | leakage < CtsMCut (fSuper->GetLeakage1Up(),dmls, dmcza, dmls2, dd2) &&
|
|---|
| 326 | leakage > CtsMCut (fSuper->GetLeakage1Lo(),dmls, dmcza, dmls2, dd2) )
|
|---|
| 327 |
|
|---|
| 328 | fHadronness->SetHadronness(0.25);
|
|---|
| 329 | else
|
|---|
| 330 | fHadronness->SetHadronness(0.75);
|
|---|
| 331 |
|
|---|
| 332 | //*fLog << "SChadroness = " << fHadronness->GetHadronness() << endl;
|
|---|
| 333 |
|
|---|
| 334 | fHadronness->SetReadyToSave();
|
|---|
| 335 |
|
|---|
| 336 | return kTRUE;
|
|---|
| 337 | }
|
|---|
| 338 |
|
|---|
| 339 |
|
|---|
| 340 |
|
|---|
| 341 |
|
|---|
| 342 |
|
|---|
| 343 |
|
|---|
| 344 |
|
|---|
| 345 |
|
|---|
| 346 |
|
|---|