1 /**************************************************************************
2 * Copyright(c) 2007, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
7 * Permission to use, copy, modify and distribute this software and its *
8 * documentation strictly for non-commercial purposes is hereby granted *
9 * without fee, provided that the above copyright notice appears in all *
10 * copies and that both the copyright notice and this permission notice *
11 * appear in the supporting documentation. The authors make no claims *
12 * about the suitability of this software for any purpose. It is *
13 * provided "as is" without express or implied warranty. *
14 **************************************************************************/
18 // This class decodes the stream of ALTRO samples to extract
19 // the PHOS "digits" of current event. Uses fitting procedure
20 // to separate reasonable samples
23 // AliRawReader* rf = new AliRawReaderDate("2006run2211.raw");
24 // AliPHOSRawDecoder dc(rf);
25 // while (rf->NextEvent()) {
26 // dc.SetOldRCUFormat(kTRUE);
27 // dc.SubtractPedestals(kTRUE);
28 // while ( dc.NextDigit() ) {
29 // Int_t module = dc.GetModule();
30 // Int_t column = dc.GetColumn();
31 // Int_t row = dc.GetRow();
32 // Double_t amplitude = dc.GetEnergy();
33 // Double_t time = dc.GetTime();
34 // Bool_t IsLowGain = dc.IsLowGain();
39 // Author: Dmitri Peressounko
41 // --- ROOT system ---
52 // --- AliRoot header files ---
54 #include "AliPHOSRawDecoderv1.h"
55 #include "AliPHOSPulseGenerator.h"
58 ClassImp(AliPHOSRawDecoderv1)
60 //-----------------------------------------------------------------------------
61 AliPHOSRawDecoderv1::AliPHOSRawDecoderv1():AliPHOSRawDecoder(),
62 fSampleParamsLow(0x0),fSampleParamsHigh(0x0),fToFit(0x0)
64 //Default constructor.
67 //-----------------------------------------------------------------------------
68 AliPHOSRawDecoderv1::AliPHOSRawDecoderv1(AliRawReader* rawReader, AliAltroMapping **mapping):
69 AliPHOSRawDecoder(rawReader,mapping),
70 fSampleParamsLow(0x0),fSampleParamsHigh(0x0),fToFit(0x0)
72 //Construct a decoder object.
73 //Is is user responsibility to provide next raw event
74 //using AliRawReader::NextEvent().
77 gMinuit = new TMinuit(100);
78 fSampleParamsHigh =new TArrayD(7) ;
79 fSampleParamsHigh->AddAt(2.174,0) ;
80 fSampleParamsHigh->AddAt(0.106,1) ;
81 fSampleParamsHigh->AddAt(0.173,2) ;
82 fSampleParamsHigh->AddAt(0.06106,3) ;
83 //last two parameters are pedestal and overflow
84 fSampleParamsLow=new TArrayD(7) ;
85 fSampleParamsLow->AddAt(2.456,0) ;
86 fSampleParamsLow->AddAt(0.137,1) ;
87 fSampleParamsLow->AddAt(2.276,2) ;
88 fSampleParamsLow->AddAt(0.08246,3) ;
89 fToFit = new TList() ;
92 //-----------------------------------------------------------------------------
93 AliPHOSRawDecoderv1::~AliPHOSRawDecoderv1()
97 delete fSampleParamsLow ;
100 if(fSampleParamsHigh){
101 delete fSampleParamsHigh ;
110 //-----------------------------------------------------------------------------
111 AliPHOSRawDecoderv1::AliPHOSRawDecoderv1(const AliPHOSRawDecoderv1 &phosDecoder ):
112 AliPHOSRawDecoder(phosDecoder),
113 fSampleParamsLow(0x0),fSampleParamsHigh(0x0),fToFit(0x0)
116 fToFit = new TList() ;
117 fSampleParamsLow =new TArrayD(*(phosDecoder.fSampleParamsLow)) ;
118 fSampleParamsHigh=new TArrayD(*(phosDecoder.fSampleParamsHigh)) ;
121 //-----------------------------------------------------------------------------
122 AliPHOSRawDecoderv1& AliPHOSRawDecoderv1::operator = (const AliPHOSRawDecoderv1 &phosDecoder)
124 //Assignment operator.
126 // if(this != &phosDecoder) {
128 fToFit = new TList() ;
129 if(fSampleParamsLow){
130 fSampleParamsLow = phosDecoder.fSampleParamsLow ;
131 fSampleParamsHigh= phosDecoder.fSampleParamsHigh ;
134 fSampleParamsLow =new TArrayD(*(phosDecoder.fSampleParamsLow)) ;
135 fSampleParamsHigh=new TArrayD(*(phosDecoder.fSampleParamsHigh)) ;
140 //-----------------------------------------------------------------------------
141 Bool_t AliPHOSRawDecoderv1::NextDigit()
143 //Extract an energy deposited in the crystal,
144 //crystal' position (module,column,row),
145 //time and gain (high or low).
146 //First collects sample, then evaluates it and if it has
147 //reasonable shape, fits it with Gamma2 function and extracts
150 //Debug=====================
151 // TCanvas * c = 0; //(TCanvas*)gROOT->FindObjectAny("CSample") ;
153 // c = new TCanvas("CSample","CSample") ;
155 // TH1D * h = 0 ; //(TH1D*)gROOT->FindObjectAny("hSample") ;
157 // h=new TH1D("hSample","",200,0.,200.) ;
159 // TF1 * fff = 0 ; //(TF1*)gROOT->FindObjectAny("fff") ;
161 // fff = new TF1("fff","[0]+[1]*((abs(x-[2]))^[3]*exp(-(x-[2])*[4])+[5]*(x-[2])*(x-[2])*exp(-(x-[2])*[6]))",0.,1000.) ;
162 //End debug===========
164 AliCaloRawStream* in = fCaloStream;
166 Int_t iBin = fSamples->GetSize() ;
171 Float_t baseLine = 1.0;
172 const Float_t nPreSamples = 10;
174 const Float_t sampleMaxHG=102.332 ; //maximal height of HG sample with given parameterization
175 const Float_t sampleMaxLG=277.196 ; //maximal height of HG sample with given parameterization
176 const Float_t maxEtoFit=5 ; //fit only samples above this energy, accept all samples (with good aRMS) below it
178 while ( in->Next() ) {
181 tLength = in->GetTimeLength();
182 if(tLength!=fSamples->GetSize()) {
185 fSamples = new TArrayI(tLength);
186 fTimes = new TArrayI(tLength);
187 iBin= fSamples->GetSize() ;
194 // Fit the full sample
195 if(in->IsNewHWAddress() && iBin != fSamples->GetSize()) {
197 //First remember new sample
198 fNewLowGainFlag = in->IsLowGain();
199 fNewModule = in->GetModule()+1;
200 fNewRow = in->GetRow() +1;
201 fNewColumn = in->GetColumn()+1;
202 fNewAmp = in->GetSignal() ;
203 fNewTime=in->GetTime() ;
204 //new handle already collected
205 Double_t pedestal =0. ;
208 pedestal = (Double_t)(pedMean/nPed);
213 //calculate time and energy
220 for(Int_t i=iBin; i<fSamples->GetSize(); i++){
221 if(fSamples->At(i)>0){
222 Double_t de=fSamples->At(i)-pedestal ;
228 if(de>2 && tStart==0)
230 if(maxAmp<fSamples->At(i)){
232 maxAmp=fSamples->At(i) ;
236 if(maxBin==fSamples->GetSize()-1){//bad "rising" sample
242 fEnergy=Double_t(maxAmp)-pedestal ;
243 fOverflow =0 ; //look for plato on the top of sample
244 if(fEnergy>500 && //this is not fluctuation of soft sample
245 maxBin<fSamples->GetSize()-1 && fSamples->At(maxBin+1)==maxAmp){ //and there is a plato
251 aRMS=aRMS/wts-aMean*aMean;
254 //do not take too small energies
255 if(fEnergy < baseLine)
258 //do not test quality of too soft samples
259 if(fEnergy<maxEtoFit){
260 fTime=fTimes->At(tStart);
261 if(aRMS<2.) //sigle peak
269 //Debug:=====Draw sample
270 //if(fEnergy>pedestal+10.){
271 //if(fLowGainFlag && fEnergy>2){
273 // if(!fLowGainFlag && fRow==32 && fColumn==18){
274 // TCanvas *c = new TCanvas("CSample","CSample") ;
278 // printf("fEnergy=%f, aRMS=%f \n",fEnergy,aRMS) ;
281 //======================
283 //IF sample has reasonable mean and RMS, try to fit it with gamma2
285 gMinuit->mncler(); // Reset Minuit's list of paramters
286 gMinuit->SetPrintLevel(-1) ; // No Printout
287 gMinuit->SetFCN(AliPHOSRawDecoderv1::UnfoldingChiSquare) ;
288 // To set the address of the minimization function
291 Double_t b,bmin,bmax ;
293 fSampleParamsLow->AddAt(pedestal,4) ;
295 fSampleParamsLow->AddAt(double(maxAmp),5) ;
297 fSampleParamsLow->AddAt(double(1023),5) ;
298 fSampleParamsLow->AddAt(double(iBin),6) ;
299 fToFit->AddFirst((TObject*)fSampleParamsLow) ;
300 b=fSampleParamsLow->At(2) ;
305 fSampleParamsHigh->AddAt(pedestal,4) ;
307 fSampleParamsHigh->AddAt(double(maxAmp),5) ;
309 fSampleParamsHigh->AddAt(double(1023),5);
310 fSampleParamsHigh->AddAt(double(iBin),6);
311 fToFit->AddFirst((TObject*)fSampleParamsHigh) ;
312 b=fSampleParamsHigh->At(2) ;
316 fToFit->AddLast((TObject*)fSamples) ;
317 fToFit->AddLast((TObject*)fTimes) ;
319 gMinuit->SetObjectFit((TObject*)fToFit) ; // To tranfer pointer to UnfoldingChiSquare
321 gMinuit->mnparm(0, "t0", 1.*tStart, 0.01, 0, 0, ierflg) ;
323 // AliWarning(Form("Unable to set initial value for fit procedure : t0=%e\n",1.*tStart) ) ;
327 return kTRUE ; //will scan further
331 amp0=fEnergy/sampleMaxLG;
333 amp0=fEnergy/sampleMaxHG;
335 gMinuit->mnparm(1, "Energy", amp0 , 0.01*amp0, 0, 0, ierflg) ;
337 // AliWarning(Form("Unable to set initial value for fit procedure : E=%e\n", amp0)) ;
341 return kTRUE ; //will scan further
344 gMinuit->mnparm(2, "p2", b, 0.01*b, bmin, bmax, ierflg) ;
346 // AliWarning(Form("Unable to set initial value for fit procedure : E=%e\n", amp0)) ;
350 return kTRUE ; //will scan further
354 Double_t p0 = 0.0001 ; // "Tolerance" Evaluation stops when EDM = 0.0001*p0 ; The number of function call slightly
358 gMinuit->mnexcm("SET STR", &p2, 0, ierflg) ; // force TMinuit to reduce function calls
359 gMinuit->mnexcm("SET GRA", &p1, 1, ierflg) ; // force TMinuit to use my gradient
360 // gMinuit->SetMaxIterations(100);
361 gMinuit->mnexcm("SET NOW", &p2 , 0, ierflg) ; // No Warnings
363 gMinuit->mnexcm("MIGRAD", &p0, 0, ierflg) ; // minimize
368 gMinuit->GetParameter(0,t0, t0err) ;
369 gMinuit->GetParameter(1,efit, err) ;
371 Double_t bfit, berr ;
372 gMinuit->GetParameter(2,bfit,berr) ;
374 //Calculate total energy
375 //this isparameterization of depetendence of pulse height on parameter b
377 efit*=99.54910 + 78.65038*bfit ;
379 efit*=80.33109+128.6433*bfit ;
381 if(efit<0. || efit > 10000.){
382 //leave energy as previously found max
383 // fEnergy=0 ; //bad sample
389 //evaluate fit quality
390 Double_t fmin,fedm,errdef ;
391 Int_t npari,nparx,istat;
392 gMinuit->mnstat(fmin,fedm,errdef,npari,nparx,istat) ;
393 fQuality=fmin/(fSamples->GetSize()-iBin) ;
394 //compare quality with some parameterization
396 fQuality/=2.+0.002*fEnergy ;
399 fQuality/=0.75+0.0025*fEnergy ;
402 //Debug================
403 // Double_t n,alpha,beta ;
405 // n=fSampleParamsLow->At(0) ;
406 // alpha=fSampleParamsLow->At(1) ;
407 // beta=fSampleParamsLow->At(3) ;
410 // n=fSampleParamsHigh->At(0) ;
411 // alpha=fSampleParamsHigh->At(1) ;
412 // beta=fSampleParamsHigh->At(3) ;
415 // if( fQuality > 1 && fEnergy > 20. && !fOverflow){
416 // if(!fLowGainFlag && fRow==32 && fColumn==18){
417 // printf("Col=%d, row=%d, qual=%f, E=%f, t0=%f, b=%f\n",fColumn,fRow,fQuality,efit,t0,bfit) ;
418 // TCanvas * c = new TCanvas("samp") ;
422 // fff->SetParameters(pedestal,efit/sampleMaxLG,t0,n,alpha,bfit,beta) ;
425 // fff->SetParameters(pedestal,efit/sampleMaxHG,t0,n,alpha,bfit,beta) ;
427 //// for(Int_t i=1;i<=h->GetNbinsX(); i++){
428 // Double_t x=h->GetBinCenter(i) ;
429 // h->SetBinContent(i,h->GetBinContent(i)-fff->Eval(x)) ;
431 // h->SetMinimum(-15.) ;
432 // h->SetMaximum(15.) ;
434 // fff->Draw("same") ;
438 //====================
447 fLowGainFlag = in->IsLowGain();
448 fModule = in->GetModule()+1;
449 fRow = in->GetRow() +1;
450 fColumn = in->GetColumn()+1;
452 //add previouly taken if coincides
453 if(fLowGainFlag==fNewLowGainFlag && fModule==fNewModule &&
454 fRow==fNewRow && fColumn==fNewColumn){
456 if(fPedSubtract && fNewTime < nPreSamples) {
457 pedMean += in->GetSignal();
460 fSamples->AddAt(fNewAmp,iBin);
461 fTimes->AddAt(fNewTime,iBin);
463 //Mark that we already take it
467 // Fill array with samples
469 if(fPedSubtract && (in->GetTime() < nPreSamples)) {
470 pedMean += in->GetSignal();
473 fSamples->AddAt(in->GetSignal(),iBin);
474 fTimes->AddAt(in->GetTime(),iBin);
476 //Debug==============
477 // h->SetBinContent(iBin,in->GetSignal()) ;
483 //_____________________________________________________________________________
484 void AliPHOSRawDecoderv1::UnfoldingChiSquare(Int_t & /*nPar*/, Double_t * Grad, Double_t & fret, Double_t * x, Int_t iflag)
486 // Number of parameters, Gradient, Chi squared, parameters, what to do
488 TList * toFit= (TList*)gMinuit->GetObjectFit() ;
489 TArrayD * params=(TArrayD*)toFit->At(0) ;
490 TArrayI * samples = (TArrayI*)toFit->At(1) ;
491 TArrayI * times = (TArrayI*)toFit->At(2) ;
495 for(Int_t iparam = 0 ; iparam < 3 ; iparam++)
496 Grad[iparam] = 0 ; // Will evaluate gradient
501 Double_t n=params->At(0) ;
502 Double_t alpha=params->At(1) ;
503 Double_t beta=params->At(3) ;
504 Double_t ped=params->At(4) ;
506 Double_t overflow=params->At(5) ;
507 Int_t iBin = (Int_t) params->At(6) ;
508 Int_t nSamples=TMath::Min(iBin+70,samples->GetSize()) ; //Here we set number of points to fit (70)
510 Int_t tStep=times->At(iBin+1)-times->At(iBin) ;
511 Double_t ddt=TMath::Ceil(t0)-t0-tStep ;
512 Double_t exp1=TMath::Exp(-alpha*ddt) ;
513 Double_t exp2=TMath::Exp(-beta*ddt) ;
514 Double_t dexp1=TMath::Exp(-alpha*tStep) ;
515 Double_t dexp2=TMath::Exp(-beta*tStep) ;
516 for(Int_t i = iBin; i<nSamples ; i++) {
517 Double_t fsample = double(samples->At(i)) ;
518 // if(fsample>=overflow)
520 Double_t dt=double(times->At(i))-t0 ;
529 Double_t dtn=TMath::Power(dt,n) ;
530 Double_t dtnE=dtn*exp1 ;
531 Double_t dt2E=dt*dt*exp2 ;
532 Double_t fit=ped+en*(dtnE + b*dt2E) ;
534 diff=fsample-overflow ;
539 diff = fsample - fit ;
541 if(iflag == 2){ // calculate gradient
542 Grad[0] += en*diff*(dtnE*(n/dt-alpha)+b*dt2E*(2./dt-beta)) ; //derivative over t0
543 Grad[1] -= diff*(dtnE+b*dt2E) ;
544 Grad[2] -= en*diff*dt2E ;
549 for(Int_t iparam = 0 ; iparam < 3 ; iparam++)
552 //-----------------------------------------------------------------------------
553 Double_t AliPHOSRawDecoderv1::Gamma2(Double_t dt,Double_t en,Double_t b,TArrayD * params){ //Function for fitting samples
555 //dt-time after start
557 //function parameters
559 Double_t ped=params->At(4) ;
561 return ped ; //pedestal
563 return ped+en*(TMath::Power(dt,params->At(0))*TMath::Exp(-dt*params->At(1))+b*dt*dt*TMath::Exp(-dt*params->At(3))) ;