| 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 expressed
|
|---|
| 14 | ! * or implied warranty.
|
|---|
| 15 | ! *
|
|---|
| 16 | !
|
|---|
| 17 | !
|
|---|
| 18 | ! Author(s): Javier López , 4/2004 <mailto:jlopez@ifae.es>
|
|---|
| 19 | ! Robert Wagner, 7/2004 <mailto:rwagner@mppmu.mpg.de>
|
|---|
| 20 | ! Wolfgang Wittek, 8/2004 <mailto:wittek@mppmu.mpg.de>
|
|---|
| 21 | !
|
|---|
| 22 | ! Copyright: MAGIC Software Development, 2000-2004
|
|---|
| 23 | !
|
|---|
| 24 | !
|
|---|
| 25 | \* ======================================================================== */
|
|---|
| 26 | #include "MStarPos.h"
|
|---|
| 27 |
|
|---|
| 28 | #include <TEllipse.h>
|
|---|
| 29 | #include <TMarker.h>
|
|---|
| 30 |
|
|---|
| 31 | #include "MLog.h"
|
|---|
| 32 | #include "MLogManip.h"
|
|---|
| 33 |
|
|---|
| 34 | ClassImp(MStarPos);
|
|---|
| 35 |
|
|---|
| 36 | using namespace std;
|
|---|
| 37 |
|
|---|
| 38 | MStarPos::MStarPos(const char *name, const char *title)
|
|---|
| 39 | {
|
|---|
| 40 |
|
|---|
| 41 | fName = name ? name : "MStarPos";
|
|---|
| 42 | fTitle = title ? title : "";
|
|---|
| 43 |
|
|---|
| 44 | Reset();
|
|---|
| 45 | }
|
|---|
| 46 |
|
|---|
| 47 | void MStarPos::Reset()
|
|---|
| 48 | {
|
|---|
| 49 |
|
|---|
| 50 | //Expected position on camera
|
|---|
| 51 | fMagExp = 0.;
|
|---|
| 52 | fXExp = 0.;
|
|---|
| 53 | fYExp = 0.;
|
|---|
| 54 |
|
|---|
| 55 | //Ideal position on camera
|
|---|
| 56 | fMagIdeal = 0.;
|
|---|
| 57 | fXIdeal = 0.;
|
|---|
| 58 | fYIdeal = 0.;
|
|---|
| 59 |
|
|---|
| 60 | //Info from calculation
|
|---|
| 61 | fMagCalc = 0.;
|
|---|
| 62 | fMaxCalc = 0.;
|
|---|
| 63 | fMeanXCalc = 0.;
|
|---|
| 64 | fMeanYCalc = 0.;
|
|---|
| 65 | fSigmaXCalc = 0.;
|
|---|
| 66 | fSigmaYCalc = 0.;
|
|---|
| 67 | fCorrXYCalc = 0.;
|
|---|
| 68 | fXXErrCalc = 0.;
|
|---|
| 69 | fXYErrCalc = 0.;
|
|---|
| 70 | fYYErrCalc = 0.;
|
|---|
| 71 |
|
|---|
| 72 | //Info from Gauss fit
|
|---|
| 73 | fMagFit = 0.;
|
|---|
| 74 | fMaxFit = 0.;
|
|---|
| 75 | fMeanXFit = 0.;
|
|---|
| 76 | fMeanYFit = 0.;
|
|---|
| 77 | fSigmaXFit = 0.;
|
|---|
| 78 | fSigmaYFit = 0.;
|
|---|
| 79 | fCorrXYFit = 0.;
|
|---|
| 80 | fXXErrFit = 0.;
|
|---|
| 81 | fXYErrFit = 0.;
|
|---|
| 82 | fYYErrFit = 0.;
|
|---|
| 83 |
|
|---|
| 84 | fChiSquareFit = 0.;
|
|---|
| 85 | fNdofFit = 1;
|
|---|
| 86 |
|
|---|
| 87 | }
|
|---|
| 88 |
|
|---|
| 89 | void MStarPos::SetExpValues(Float_t mag, Float_t x, Float_t y)
|
|---|
| 90 | {
|
|---|
| 91 | fMagExp = mag;
|
|---|
| 92 | fXExp = x;
|
|---|
| 93 | fYExp = y;
|
|---|
| 94 | }
|
|---|
| 95 |
|
|---|
| 96 | void MStarPos::SetIdealValues(Float_t mag, Float_t x, Float_t y)
|
|---|
| 97 | {
|
|---|
| 98 | fMagIdeal = mag;
|
|---|
| 99 | fXIdeal = x;
|
|---|
| 100 | fYIdeal = y;
|
|---|
| 101 | }
|
|---|
| 102 |
|
|---|
| 103 | void MStarPos::SetCalcValues(Float_t mag, Float_t max, Float_t x, Float_t y,
|
|---|
| 104 | Float_t sigmaX, Float_t sigmaY, Float_t correlation,
|
|---|
| 105 | Float_t xx, Float_t xy, Float_t yy)
|
|---|
| 106 | {
|
|---|
| 107 | fMagCalc = mag;
|
|---|
| 108 | fMaxCalc = max;
|
|---|
| 109 | fMeanXCalc = x;
|
|---|
| 110 | fMeanYCalc = y;
|
|---|
| 111 | fSigmaXCalc = sigmaX;
|
|---|
| 112 | fSigmaYCalc = sigmaY;
|
|---|
| 113 | fCorrXYCalc = correlation;
|
|---|
| 114 | fXXErrCalc = xx;
|
|---|
| 115 | fXYErrCalc = xy;
|
|---|
| 116 | fYYErrCalc = yy;
|
|---|
| 117 | }
|
|---|
| 118 |
|
|---|
| 119 |
|
|---|
| 120 | void MStarPos::SetFitValues(
|
|---|
| 121 | Float_t mag, Float_t max, Float_t x, Float_t y,
|
|---|
| 122 | Float_t sigmaX, Float_t sigmaY, Float_t correlation,
|
|---|
| 123 | Float_t xx, Float_t xy, Float_t yy,
|
|---|
| 124 | Float_t chiSquare, Int_t ndof)
|
|---|
| 125 | {
|
|---|
| 126 | fMagFit = mag;
|
|---|
| 127 | fMaxFit = max;
|
|---|
| 128 | fMeanXFit = x;
|
|---|
| 129 | fMeanYFit = y;
|
|---|
| 130 | fSigmaXFit = sigmaX;
|
|---|
| 131 | fSigmaYFit = sigmaY;
|
|---|
| 132 | fCorrXYFit = correlation;
|
|---|
| 133 | fXXErrFit = xx;
|
|---|
| 134 | fXYErrFit = xy;
|
|---|
| 135 | fYYErrFit = yy;
|
|---|
| 136 |
|
|---|
| 137 | fChiSquareFit = chiSquare;
|
|---|
| 138 | fNdofFit = ndof;
|
|---|
| 139 | }
|
|---|
| 140 |
|
|---|
| 141 |
|
|---|
| 142 | // --------------------------------------------------------------------------
|
|---|
| 143 | //
|
|---|
| 144 | // Paint the ellipse corresponding to the parameters
|
|---|
| 145 | //
|
|---|
| 146 | void MStarPos::Paint(Option_t *opt)
|
|---|
| 147 | {
|
|---|
| 148 | //Print a cross in the expected position
|
|---|
| 149 | TMarker mexp(fXExp, fYExp, 29);
|
|---|
| 150 | mexp.SetMarkerSize(3);
|
|---|
| 151 | mexp.SetMarkerColor(94);
|
|---|
| 152 | mexp.Paint();
|
|---|
| 153 |
|
|---|
| 154 | if (fSigmaXCalc>0. && fSigmaYCalc>0.)
|
|---|
| 155 | {
|
|---|
| 156 | TEllipse ecalc(fMeanXCalc, fMeanYCalc, fSigmaXCalc, fSigmaYCalc,
|
|---|
| 157 | 0, 360, 0);
|
|---|
| 158 | ecalc.SetLineWidth(3);
|
|---|
| 159 | //ecalc.SetLineColor(kBlue);
|
|---|
| 160 | ecalc.SetLineColor(kMagenta);
|
|---|
| 161 | ecalc.Paint();
|
|---|
| 162 | }
|
|---|
| 163 |
|
|---|
| 164 | if (fSigmaXFit>0. && fSigmaYFit>0.)
|
|---|
| 165 | {
|
|---|
| 166 | //Print a cross in the fitted position
|
|---|
| 167 | //TMarker mFit(fMeanXFit, fMeanYFit, 3);
|
|---|
| 168 | //mFit.SetMarkerSize(3);
|
|---|
| 169 | //mFit.SetMarkerColor(1);
|
|---|
| 170 | //mFit.Paint();
|
|---|
| 171 |
|
|---|
| 172 | Double_t cxx = fSigmaXFit*fSigmaXFit;
|
|---|
| 173 | Double_t cyy = fSigmaYFit*fSigmaYFit;
|
|---|
| 174 | Double_t d = cyy - cxx;
|
|---|
| 175 | Double_t cxy = fCorrXYFit * fSigmaXFit * fSigmaYFit;
|
|---|
| 176 | Double_t tandel;
|
|---|
| 177 | if (cxy != 0.0)
|
|---|
| 178 | tandel = ( d + sqrt(d*d + 4.0*cxy*cxy) ) / (2.0*cxy);
|
|---|
| 179 | else
|
|---|
| 180 | tandel = 0.0;
|
|---|
| 181 |
|
|---|
| 182 | Double_t sindel = tandel / sqrt(1.0 + tandel*tandel);
|
|---|
| 183 | Double_t delta = TMath::ASin(sindel);
|
|---|
| 184 |
|
|---|
| 185 | Double_t major = (cxx + 2.0*tandel*cxy + tandel*tandel*cyy)
|
|---|
| 186 | / (1.0 + tandel*tandel);
|
|---|
| 187 |
|
|---|
| 188 | Double_t minor = (tandel*tandel*cxx - 2.0*tandel*cxy + cyy)
|
|---|
| 189 | / (1.0 + tandel*tandel);
|
|---|
| 190 |
|
|---|
| 191 | TEllipse efit(fMeanXFit, fMeanYFit, sqrt(major), sqrt(minor),
|
|---|
| 192 | 0, 360, delta*kRad2Deg);
|
|---|
| 193 | efit.SetLineWidth(3);
|
|---|
| 194 | //efit.SetLineColor(kMagenta);
|
|---|
| 195 | //efit.SetLineColor(kBlack);
|
|---|
| 196 | efit.Paint();
|
|---|
| 197 | }
|
|---|
| 198 | }
|
|---|
| 199 |
|
|---|
| 200 | void MStarPos::Print(Option_t *opt) const
|
|---|
| 201 | {
|
|---|
| 202 | TString o = opt;
|
|---|
| 203 |
|
|---|
| 204 | if (o.Contains("name", TString::kIgnoreCase) || opt == NULL)
|
|---|
| 205 | {
|
|---|
| 206 | *fLog << inf << "Star Name: \"" << this->GetName() << "\"" << endl;
|
|---|
| 207 | }
|
|---|
| 208 |
|
|---|
| 209 | if (o.Contains("mag", TString::kIgnoreCase) || opt == NULL)
|
|---|
| 210 | {
|
|---|
| 211 |
|
|---|
| 212 | *fLog << inf << "Star magnitude:" << endl;
|
|---|
| 213 | *fLog << inf << " Ideal \t" << setw(4) << fMagIdeal << endl;
|
|---|
| 214 | *fLog << inf << " Expected \t" << setw(4) << fMagExp << endl;
|
|---|
| 215 | *fLog << inf << " Calcultated \t " << setw(4) << fMagCalc << endl;
|
|---|
| 216 | *fLog << inf << " Fitted \t " << setw(4) << fMagFit << endl;
|
|---|
| 217 | }
|
|---|
| 218 |
|
|---|
| 219 | if (o.Contains("max", TString::kIgnoreCase) || opt == NULL)
|
|---|
| 220 | {
|
|---|
| 221 | *fLog << inf << "Star Maximum:" << endl;
|
|---|
| 222 | *fLog << inf << " Calcultated \t " << setw(4) << fMaxCalc << " uA"
|
|---|
| 223 | << endl;
|
|---|
| 224 | *fLog << inf << " Fitted \t " << setw(4) << fMaxFit << " uA" << endl;
|
|---|
| 225 | }
|
|---|
| 226 |
|
|---|
| 227 | if (o.Contains("pos", TString::kIgnoreCase) || opt == NULL)
|
|---|
| 228 | {
|
|---|
| 229 | *fLog << inf << "Star position:" << endl;
|
|---|
| 230 | *fLog << inf << " Ideal \t X " << setw(4) << fXIdeal
|
|---|
| 231 | << " mm \tY " << setw(4) << fYIdeal << " mm" << endl;
|
|---|
| 232 | *fLog << inf << " Expected \t X " << setw(4) << fXExp
|
|---|
| 233 | << " mm \tY " << setw(4) << fYExp << " mm" << endl;
|
|---|
| 234 | *fLog << inf << " Calcultated \t X " << setw(4) << fMeanXCalc
|
|---|
| 235 | << " mm \tY " << setw(4) << fMeanYCalc << " mm" << endl;
|
|---|
| 236 | *fLog << inf << " Fitted \t X " << setw(4) << fMeanXFit
|
|---|
| 237 | << " mm \tY " << setw(4) << fMeanYFit << " mm" << endl;
|
|---|
| 238 | }
|
|---|
| 239 |
|
|---|
| 240 | if (o.Contains("siz", TString::kIgnoreCase) || opt == NULL)
|
|---|
| 241 | {
|
|---|
| 242 | *fLog << inf << "Star size:" << endl;
|
|---|
| 243 | *fLog << inf << " Calcultated \t X " << setw(4) << fSigmaXCalc
|
|---|
| 244 | << " mm \tY " << setw(4) << fSigmaYCalc << " mm \t correlation "
|
|---|
| 245 | << setw(4) << fCorrXYCalc << endl;
|
|---|
| 246 | *fLog << inf << " Fitted \t X " << setw(4) << fSigmaXFit
|
|---|
| 247 | << " mm \tY " << setw(4) << fSigmaYFit << " mm \t correlation "
|
|---|
| 248 | << setw(4) << fCorrXYFit << endl;
|
|---|
| 249 | }
|
|---|
| 250 |
|
|---|
| 251 | if (o.Contains("chi", TString::kIgnoreCase) || opt == NULL)
|
|---|
| 252 | {
|
|---|
| 253 | *fLog << inf << "Star Fit Quality:" << endl;
|
|---|
| 254 | *fLog << inf << " ChiSquareFit/NdofFit \t " << setw(3)
|
|---|
| 255 | << fChiSquareFit << "/" << fNdofFit << endl;
|
|---|
| 256 | }
|
|---|
| 257 |
|
|---|
| 258 | if (o.Contains("err", TString::kIgnoreCase) || opt == NULL)
|
|---|
| 259 | {
|
|---|
| 260 | *fLog << inf << "Error Matrix of (fMeanX,fMeanY) :"
|
|---|
| 261 | << endl;
|
|---|
| 262 | *fLog << inf << " xxCalc,xyCalc,yyCalc \t " << setw(3) << fXXErrCalc
|
|---|
| 263 | << ", " << fXYErrCalc << ", " << fYYErrCalc << endl;
|
|---|
| 264 | *fLog << inf << " xxFit,xyFit,yyFit \t " << setw(3) << fXXErrFit << ", "
|
|---|
| 265 | << fXYErrFit << ", " << fYYErrFit << endl;
|
|---|
| 266 | }
|
|---|
| 267 |
|
|---|
| 268 |
|
|---|
| 269 | }
|
|---|
| 270 | //--------------------------------------------------------------------------
|
|---|
| 271 |
|
|---|
| 272 |
|
|---|
| 273 |
|
|---|
| 274 |
|
|---|
| 275 |
|
|---|
| 276 |
|
|---|
| 277 |
|
|---|
| 278 |
|
|---|
| 279 |
|
|---|