Number of sigma pedestal cut increased to 4
[u/mrichter/AliRoot.git] / STEER / AliQACheckerBase.cxx
1 /**************************************************************************
2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3  *                                                                        *
4  * Author: The ALICE Off-line Project.                                    *
5  * Contributors are mentioned in the code where appropriate.              *
6  *                                                                        *
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  **************************************************************************/
15
16
17 /* $Id$ */
18
19 //
20 //  Base class for detectors quality assurance checkers 
21 //  Compares Data made by QADataMakers with reference data
22 //  Y. Schutz CERN August 2007
23 //
24
25 // --- ROOT system ---
26 #include <TCanvas.h>
27 #include <TClass.h>
28 #include <TH1F.h> 
29 #include <TH1I.h> 
30 #include <TIterator.h> 
31 #include <TKey.h> 
32 #include <TFile.h> 
33 #include <TList.h>
34 #include <TNtupleD.h>
35 #include <TParameter.h>
36 #include <TPaveText.h>
37
38 // --- Standard library ---
39
40 // --- AliRoot header files ---
41 #include "AliCDBEntry.h"
42 #include "AliLog.h"
43 #include "AliQAv1.h"
44 #include "AliQAChecker.h"
45 #include "AliQACheckerBase.h"
46 #include "AliQADataMaker.h"
47 #include "AliQAManager.h"
48 #include "AliDetectorRecoParam.h"
49
50 ClassImp(AliQACheckerBase)
51
52            
53 //____________________________________________________________________________ 
54 AliQACheckerBase::AliQACheckerBase(const char * name, const char * title) : 
55   TNamed(name, title), 
56   fDataSubDir(0x0),
57   fRefSubDir(0x0), 
58   fRefOCDBSubDir(new TObjArray*[AliRecoParam::kNSpecies]), 
59   fLowTestValue(new Float_t[AliQAv1::kNBIT]),
60   fUpTestValue(new Float_t[AliQAv1::kNBIT]),
61   fImage(new TCanvas*[AliRecoParam::kNSpecies]), 
62   fPrintImage(kTRUE), 
63   fExternParamList(new TList())
64 {
65   // ctor
66   fLowTestValue[AliQAv1::kINFO]    =  0.5   ; 
67   fUpTestValue[AliQAv1::kINFO]     = 1.0 ; 
68   fLowTestValue[AliQAv1::kWARNING] =  0.002 ; 
69   fUpTestValue[AliQAv1::kWARNING]  = 0.5 ; 
70   fLowTestValue[AliQAv1::kERROR]   =  0.0   ; 
71   fUpTestValue[AliQAv1::kERROR]    = 0.002 ; 
72   fLowTestValue[AliQAv1::kFATAL]   = -1.0   ; 
73   fUpTestValue[AliQAv1::kFATAL]    = 0.0 ; 
74   
75   AliDebug(AliQAv1::GetQADebugLevel(), "Default setting is:") ;
76   if ( AliDebugLevel()  == AliQAv1::GetQADebugLevel() ) {
77     const Char_t * text= Form(" INFO    -> %1.5f <  value <  %1.5f  WARNING -> %1.5f <  value <= %1.5f \n ERROR   -> %1.5f <  value <= %1.5f \n FATAL   -> %1.5f <= value <  %1.5f \n", 
78                               fLowTestValue[AliQAv1::kINFO], fUpTestValue[AliQAv1::kINFO], 
79                               fLowTestValue[AliQAv1::kWARNING], fUpTestValue[AliQAv1::kWARNING], 
80                               fLowTestValue[AliQAv1::kERROR], fUpTestValue[AliQAv1::kERROR], 
81                               fLowTestValue[AliQAv1::kFATAL], fUpTestValue[AliQAv1::kFATAL]) ; 
82     AliInfo(Form("%s", text)) ; 
83   }
84   
85   for (Int_t specie = 0 ; specie < AliRecoParam::kNSpecies ; specie++) {
86     fImage[specie] = NULL ; 
87     fRefOCDBSubDir[specie] = NULL ;
88   }
89 }
90
91 //____________________________________________________________________________ 
92 AliQACheckerBase::AliQACheckerBase(const AliQACheckerBase& qac) :
93   TNamed(qac.GetName(), qac.GetTitle()),
94   fDataSubDir(qac.fDataSubDir), 
95   fRefSubDir(qac.fRefSubDir), 
96   fRefOCDBSubDir(qac.fRefOCDBSubDir), 
97   fLowTestValue(new Float_t[AliQAv1::kNBIT]),
98   fUpTestValue(new Float_t[AliQAv1::kNBIT]), 
99   fImage(new TCanvas*[AliRecoParam::kNSpecies]),  
100   fPrintImage(kTRUE), 
101   fExternParamList(new TList())  
102 {
103   //copy ctor
104   for (Int_t index = 0 ; index < AliQAv1::kNBIT ; index++) {
105     fLowTestValue[index]  = qac.fLowTestValue[index] ; 
106     fUpTestValue[index] = qac.fUpTestValue[index] ; 
107   }
108     for (Int_t specie = 0 ; specie < AliRecoParam::kNSpecies ; specie++) {
109       fImage[specie] = qac.fImage[specie] ; 
110       fRefOCDBSubDir[specie] = qac.fRefOCDBSubDir[specie] ; 
111     }
112   if (qac.fExternParamList) {
113     TIter next(qac.fExternParamList) ; 
114     TParameter<double> * p ; 
115     while ( (p = (TParameter<double>*)next()) )
116       fExternParamList->Add(p) ;
117   }
118 }
119
120 //____________________________________________________________________________
121 AliQACheckerBase& AliQACheckerBase::operator = (const AliQACheckerBase& qac )
122 {
123   // Equal operator.
124   this->~AliQACheckerBase();
125   new(this) AliQACheckerBase(qac);
126   return *this;
127 }
128
129 //____________________________________________________________________________ 
130 AliQACheckerBase::~AliQACheckerBase()
131 {
132   delete [] fLowTestValue ; 
133   delete [] fUpTestValue ; 
134   for (Int_t esIndex = 0 ; esIndex < AliRecoParam::kNSpecies ; esIndex++) {
135     if ( fImage[esIndex] ) 
136       delete fImage[esIndex] ;
137     if ( fRefOCDBSubDir[esIndex] ) 
138       delete fRefOCDBSubDir[esIndex] ; 
139   }
140   delete[] fImage ; 
141   delete[] fRefOCDBSubDir ; 
142   AliQAv1::GetQAResultFile()->Close() ; 
143   if (fExternParamList) {
144     fExternParamList->Clear() ; 
145     delete fExternParamList ; 
146   }
147 }
148
149 //____________________________________________________________________________
150 void AliQACheckerBase::Check(Double_t * test, AliQAv1::ALITASK_t index, const AliDetectorRecoParam * recoParam) 
151 {
152   // Performs a basic checking
153   // Compares all the histograms stored in the directory
154   // With reference histograms either in a file of in OCDB  
155
156   TObjArray ** list = new TObjArray *[AliRecoParam::kNSpecies] ; 
157   Int_t specie ;
158   for (specie = 0 ; specie < AliRecoParam::kNSpecies ; specie++) {
159     list[specie] =  new TObjArray(AliQAv1::GetMaxQAObj()) ; 
160     if ( !AliQAv1::Instance()->IsEventSpecieSet(specie) ) 
161       continue ; 
162     if (fDataSubDir) {
163       TList * keyList = fDataSubDir->GetListOfKeys() ; 
164       TIter next(keyList) ; 
165       TKey * key ;
166       while ( (key = static_cast<TKey *>(next())) ) {
167         TDirectory * specieDir = fDataSubDir->GetDirectory(key->GetName()) ; 
168         TList * keykeyList = specieDir->GetListOfKeys() ; 
169         TIter next2(keykeyList) ; 
170         TKey * keykey ;
171         while ( (keykey = static_cast<TKey *>(next2())) ) {
172           TObject * odata = specieDir->Get(keykey->GetName()) ; 
173           if ( odata->IsA()->InheritsFrom("TH1") ) {
174             TH1 * hdata = static_cast<TH1*>(odata) ;
175             list[specie]->Add(hdata) ; 
176           } else if (!odata->IsA()->InheritsFrom("TDirectory")) // skip the expert directory
177             AliError(Form("%s Is a Classname that cannot be processed", key->GetClassName())) ;
178         }
179       }
180     }
181   }
182  
183   Check(test, index, list, recoParam) ;
184   
185   delete[] list ; 
186     
187 }  
188
189 //____________________________________________________________________________
190 void AliQACheckerBase::Check(Double_t * test, AliQAv1::ALITASK_t task, TObjArray ** list, const AliDetectorRecoParam * /*recoParam*/) 
191 {
192   // Performs a basic checking
193   // Compares all the histograms in the list
194
195   Int_t count[AliRecoParam::kNSpecies]   = { 0 }; 
196
197   GetRefSubDir(GetName(), AliQAv1::GetTaskName(task), fRefSubDir, fRefOCDBSubDir) ;
198  // SetRefandData(refDir, refOCDBDir) ; 
199   
200   for (Int_t specie = 0 ; specie < AliRecoParam::kNSpecies ; specie++) {
201     test[specie] = 1.0 ; 
202     if ( !AliQAv1::Instance()->IsEventSpecieSet(specie)) continue ; 
203     if (list[specie]->GetEntries() == 0)  
204       test[specie] = 0. ; // nothing to check
205     else {
206       if (!fRefSubDir && !fRefOCDBSubDir)
207         test[specie] = -1 ; // no reference data
208       else {
209         TIter next(list[specie]) ; 
210         TH1 * hdata ;
211         count[specie] = 0 ; 
212         while ( (hdata = static_cast<TH1 *>(next())) ) {
213           if ( hdata->IsA()->InheritsFrom("TH1") ) {
214             if ( hdata->TestBit(AliQAv1::GetExpertBit()) )  // does not perform the test for expert data
215               continue ; 
216             // 
217             // First try to find the ref histo with exact name (with possible trigger clon ending)
218             TString hname = hdata->GetName();
219             TH1 * href = NULL ; 
220             if (fRefSubDir)                  href  = static_cast<TH1*>(fRefSubDir->Get(hname.Data())) ;
221             else if (fRefOCDBSubDir[specie]) href  = static_cast<TH1*>(fRefOCDBSubDir[specie]->FindObject(hname.Data()));
222             //
223             if (!href && hdata->TestBit(AliQAv1::GetClonedBit())) { // try to find the histo for the base name (w/o trigger ending
224               int ind = hname.Index(AliQADataMaker::GetTriggerPrefix());
225               if (ind>0) {
226                 hname.Resize(ind);
227                 if (fRefSubDir)                  href  = static_cast<TH1*>(fRefSubDir->Get(hname.Data())) ;
228                 else if (fRefOCDBSubDir[specie]) href  = static_cast<TH1*>(fRefOCDBSubDir[specie]->FindObject(hname.Data()));
229               }             
230             }
231             //
232             if (!href) 
233               test[specie] = -1 ; // no reference data ; 
234             else {
235               Double_t rv =  DiffK(hdata, href) ;
236               AliDebug(AliQAv1::GetQADebugLevel(), Form("%s ->Test = %f", hdata->GetName(), rv)) ; 
237               test[specie] += rv ; 
238               count[specie]++ ;
239             }
240           } else
241             AliError("Data type cannot be processed") ;
242           if (count[specie] != 0) 
243             test[specie] /= count[specie] ;
244         }
245       }
246     }
247   }
248 }  
249
250
251 //____________________________________________________________________________ 
252 Double_t AliQACheckerBase::DiffC(const TH1 * href, const TH1 * hin) const
253 {
254   // compares two histograms using the Chi2 test
255   if ( hin->Integral() == 0 ) {
256     AliDebug(AliQAv1::GetQADebugLevel(), Form("Spectrum %s is empty", hin->GetName())) ; 
257     return 0. ;
258   }
259     
260   return hin->Chi2Test(href) ;  
261 }
262
263 //____________________________________________________________________________ 
264 Double_t AliQACheckerBase::DiffK(const TH1 * href, const TH1 * hin) const
265 {
266   // compares two histograms using the Kolmogorov test
267   if ( hin->Integral() == 0 || href->Integral() == 0) {
268     AliDebug(AliQAv1::GetQADebugLevel(), Form("Spectrum %s or its reference is empty", hin->GetName())) ; 
269     return 0. ;
270   }
271     
272   return hin->KolmogorovTest(href) ;  
273 }
274
275   //_____________________________________________________________________________
276 void AliQACheckerBase::GetRefSubDir(const char * det, const char * task, TDirectory *& dirFile, TObjArray **& dirOCDB)     
277
278     // Opens and returns the file with the reference data 
279   dirFile = NULL ; 
280   TString refStorage(AliQAv1::GetQARefStorage()) ;
281   if (!refStorage.Contains(AliQAv1::GetLabLocalOCDB()) && !refStorage.Contains(AliQAv1::GetLabAliEnOCDB())) {
282     AliError(Form("%s is not a valid location for reference data", refStorage.Data())) ; 
283     return ; 
284   } else {
285     AliQAManager* manQA = AliQAManager::QAManager(AliQAv1::GetTaskIndex(task)) ;
286       //    dirOCDB = new TObjArray*[AliRecoParam::kNSpecies] ; 
287     for (Int_t specie = 0 ; specie < AliRecoParam::kNSpecies ; specie++) {
288       dirOCDB[specie] = NULL ; 
289       if ( !AliQAv1::Instance()->IsEventSpecieSet(specie) ) 
290         continue ; 
291       AliQAv1::SetQARefDataDirName(specie) ;
292       if ( ! manQA->GetLock() ) { 
293         manQA->SetDefaultStorage(AliQAv1::GetQARefStorage()) ; 
294         manQA->SetSpecificStorage("*", AliQAv1::GetQARefStorage()) ;
295         manQA->SetRun(AliCDBManager::Instance()->GetRun()) ; 
296         manQA->SetLock() ; 
297       }
298       char * detOCDBDir = Form("%s/%s/%s", det, AliQAv1::GetRefOCDBDirName(), AliQAv1::GetRefDataDirName()) ; 
299       AliCDBEntry * entry = manQA->Get(detOCDBDir, manQA->GetRun()) ;
300       if (entry) {
301         TList * listDetQAD =static_cast<TList *>(entry->GetObject()) ;
302         if ( listDetQAD && strcmp(listDetQAD->ClassName(), "TList") != 0 ) {
303           AliError(Form("Expected a Tlist and found a %s for detector %s", listDetQAD->ClassName(), det)) ; 
304           listDetQAD = NULL ; 
305           continue ; 
306         } 
307         if ( listDetQAD ) {
308           TIter next(listDetQAD) ;
309           while ( (TObjArray*)next() ) 
310             dirOCDB[specie] = static_cast<TObjArray *>(listDetQAD->FindObject(Form("%s/%s", task, AliRecoParam::GetEventSpecieName(specie)))) ;             
311         }
312       }
313     }
314   }
315 }
316
317 //____________________________________________________________________________
318 void AliQACheckerBase::PrintExternParam() 
319 {
320     // Print the list of external parameter list
321   TIter next(fExternParamList) ; 
322   TParameter<double> *pp ; 
323   TString printit("\n") ;
324   while( (pp = (TParameter<double>*)next()) )
325     printit += Form("%s = %f\n", pp->GetName(), pp->GetVal());  
326   AliInfo(Form("%s", printit.Data())) ;
327 }
328   
329 //____________________________________________________________________________
330 void AliQACheckerBase::Run(AliQAv1::ALITASK_t index, AliDetectorRecoParam * recoParam) 
331
332   AliDebug(AliQAv1::GetQADebugLevel(), Form("Processing %s", AliQAv1::GetAliTaskName(index))) ; 
333   
334   Double_t * rv = new Double_t[AliRecoParam::kNSpecies] ;
335   Check(rv, index, recoParam) ;
336   SetQA(index, rv) ;    
337   
338   AliDebug(AliQAv1::GetQADebugLevel(), Form("Test result of %s", AliQAv1::GetAliTaskName(index))) ;
339   
340   delete [] rv ; 
341   Finish() ; 
342 }
343
344 //____________________________________________________________________________
345 void AliQACheckerBase::Run(AliQAv1::ALITASK_t index, TObjArray ** list, AliDetectorRecoParam * recoParam) 
346
347   // RS: perform check for all trigger classes in loop
348   Double_t * rv = new Double_t[AliRecoParam::kNSpecies] ;
349   //
350   TObjArray ** listTrig = new TObjArray *[AliRecoParam::kNSpecies];
351   //
352   for (int itc=-1;itc<AliQADataMaker::GetNTrigClasses();itc++) {
353     //
354     // RS: fetch the histograms for each specie and for given trigger
355     //AliInfo(Form("Processing %s for trigger: %s", AliQAv1::GetAliTaskName(index),AliQADataMaker::GetTrigClassName(itc))); 
356     
357     for (int specie=0;specie<AliRecoParam::kNSpecies;specie++) {
358       listTrig[specie] = 0;
359       if ( !AliQAv1::Instance()->IsEventSpecieSet(specie) || !list[specie]) continue;
360       listTrig[specie] = new TObjArray( list[specie]->GetSize() ); // destination for clones of this trigger
361       AliQADataMaker::GetDataOfTrigClass(list[specie],itc, listTrig[specie]);
362     }
363     AliDebug(AliQAv1::GetQADebugLevel(), Form("Processing %s for trigger: %s", AliQAv1::GetAliTaskName(index),AliQADataMaker::GetTrigClassName(itc))); 
364     Check(rv, index, listTrig, recoParam) ;
365     SetQA(index, rv) ;  
366     AliDebug(AliQAv1::GetQADebugLevel(), Form("Test result of %s for trigger: %s", AliQAv1::GetAliTaskName(index),AliQADataMaker::GetTrigClassName(itc)));
367     //
368     for (int specie=0;specie<AliRecoParam::kNSpecies;specie++) if (listTrig[specie]) delete listTrig[specie]; // clean temporary container
369   }
370   delete [] rv ; 
371   delete [] listTrig;
372   Finish() ; 
373 }
374
375 //____________________________________________________________________________
376 void AliQACheckerBase::Finish() const 
377 {
378   // wrap up and save QA in proper file
379   AliQAv1::GetQAResultFile() ; 
380   AliQAv1 * qa = AliQAv1::Instance() ; 
381   qa->Write(AliQAv1::GetQAName(), kWriteDelete) ;   
382 }
383
384 //____________________________________________________________________________ 
385 void AliQACheckerBase::MakeImage( TObjArray ** list, AliQAv1::TASKINDEX_t task, AliQAv1::MODE_t mode) 
386 {
387   // makes the QA image for sim and rec
388   TObjArray tmpArr;  // array to store flat version of original array (which may contain clones)
389   //
390   for (Int_t esIndex = 0; esIndex < AliRecoParam::kNSpecies; esIndex++) {
391     if (! AliQAv1::Instance(AliQAv1::GetDetIndex(GetName()))->IsEventSpecieSet(AliRecoParam::ConvertIndex(esIndex)) || list[esIndex]->GetEntries() == 0) continue;
392     Int_t nImages = 0;
393     TIter next(list[esIndex]);
394     TObject* hdata = NULL;
395     tmpArr.Clear();
396     while ( (hdata=(next())) ) { // count histos and transfere to flat array
397       if (hdata->InheritsFrom(TH1::Class()) && hdata->TestBit(AliQAv1::GetImageBit()) ) {  // histo, not cloned
398         nImages++; 
399         tmpArr.AddLast(hdata); 
400         continue;
401       }
402       if (!hdata->TestBit(AliQAv1::GetClonedBit())) continue;  // not an array of clones, unknown object
403       TIter nextCl((TObjArray*)hdata);   // array of histo clones
404       TObject* hcl = 0;
405       while ((hcl=nextCl())) if (hcl->InheritsFrom(TH1::Class()) && hcl->TestBit(AliQAv1::GetImageBit())) {tmpArr.AddLast(hcl); nImages++;}
406     }
407     //
408     if ( nImages == 0 ) {
409       AliDebug(AliQAv1::GetQADebugLevel(), Form("No histogram will be plotted for %s %s %s\n", GetName(), AliQAv1::GetTaskName(task).Data(), AliRecoParam::GetEventSpecieName(esIndex)));  
410       continue;
411     }
412     AliDebug(AliQAv1::GetQADebugLevel(), Form("%d histograms will be plotted for %s %s %s\n", nImages, GetName(), AliQAv1::GetTaskName(task).Data(),AliRecoParam::GetEventSpecieName(esIndex)));  
413     //        
414     const Char_t * title = Form("QA_%s_%s_%s", GetName(), AliQAv1::GetTaskName(task).Data(), AliRecoParam::GetEventSpecieName(esIndex)); 
415     //
416     if ( !fImage[esIndex] ) fImage[esIndex] = new TCanvas(title, title);
417     //
418     fImage[esIndex]->Clear(); 
419     fImage[esIndex]->SetTitle(title); 
420     fImage[esIndex]->cd(); 
421     TPaveText someText(0.015, 0.015, 0.98, 0.98);
422     someText.AddText(title);
423     someText.Draw(); 
424     fImage[esIndex]->Print(Form("%s%s%d.%s", AliQAv1::GetImageFileName(), AliQAv1::GetModeName(mode), AliQAChecker::Instance()->GetRunNumber(), AliQAv1::GetImageFileFormat())); 
425     fImage[esIndex]->Clear(); 
426     Int_t nx = TMath::Nint(TMath::Sqrt(nImages));
427     Int_t ny = nx; 
428     if (nx < TMath::Sqrt(nImages)) ny++; 
429     //
430     fImage[esIndex]->Divide(nx, ny); 
431     TIter nexthist(&tmpArr);
432     Int_t npad = 1; 
433     fImage[esIndex]->cd(npad); 
434     TH1* histo = 0;
435     while ( (histo=(TH1*)nexthist()) ) { // tmpArr is guaranteed to contain only plottable histos, no checks needed
436       TString opts = histo->GetDrawOption();
437       if (opts.Contains("logy",TString::kIgnoreCase)) gPad->SetLogy();
438       if (opts.Contains("logx",TString::kIgnoreCase)) gPad->SetLogx();
439       histo->DrawCopy(); 
440       fImage[esIndex]->cd(++npad); 
441     }
442     fImage[esIndex]->Print(Form("%s%s%d.%s", AliQAv1::GetImageFileName(), AliQAv1::GetModeName(mode), AliQAChecker::Instance()->GetRunNumber(), AliQAv1::GetImageFileFormat()), "ps"); 
443   }
444 }
445
446 //____________________________________________________________________________
447 void AliQACheckerBase::SetHiLo(Float_t * hiValue, Float_t * lowValue) 
448 {
449   AliDebug(AliQAv1::GetQADebugLevel(), "Previous setting was:") ;
450   if ( AliDebugLevel() == AliQAv1::GetQADebugLevel() ) {
451     const Char_t * text= Form(" INFO    -> %1.5f <  value <  %1.5f  WARNING -> %1.5f <  value <= %1.5f \n ERROR   -> %1.5f <  value <= %1.5f \n FATAL   -> %1.5f <= value <  %1.5f \n", 
452                               fLowTestValue[AliQAv1::kINFO], fUpTestValue[AliQAv1::kINFO], 
453                               fLowTestValue[AliQAv1::kWARNING], fUpTestValue[AliQAv1::kWARNING], 
454                               fLowTestValue[AliQAv1::kERROR], fUpTestValue[AliQAv1::kERROR], 
455                               fLowTestValue[AliQAv1::kFATAL], fUpTestValue[AliQAv1::kFATAL]) ; 
456     AliInfo(Form("%s", text)) ; 
457   }
458   
459   for (Int_t index = 0 ; index < AliQAv1::kNBIT ; index++) {
460     fLowTestValue[index]  = lowValue[index] ; 
461     fUpTestValue[index]   = hiValue[index] ; 
462   }
463   AliDebug(AliQAv1::GetQADebugLevel(), "Current setting is:") ;
464   if ( AliDebugLevel()  == AliQAv1::GetQADebugLevel() ) {
465     const Char_t * text= Form(" INFO    -> %1.5f <  value <  %1.5f  WARNING -> %1.5f <  value <= %1.5f \n ERROR   -> %1.5f <  value <= %1.5f \n FATAL   -> %1.5f <= value <  %1.5f \n", 
466                               fLowTestValue[AliQAv1::kINFO], fUpTestValue[AliQAv1::kINFO], 
467                               fLowTestValue[AliQAv1::kWARNING], fUpTestValue[AliQAv1::kWARNING], 
468                               fLowTestValue[AliQAv1::kERROR], fUpTestValue[AliQAv1::kERROR], 
469                               fLowTestValue[AliQAv1::kFATAL], fUpTestValue[AliQAv1::kFATAL]) ;     AliInfo(Form("%s", text)) ; 
470   }
471 }
472
473 //____________________________________________________________________________
474 void AliQACheckerBase::SetQA(AliQAv1::ALITASK_t index, Double_t * value) const
475 {
476         // sets the QA according the return value of the Check
477
478   AliQAv1 * qa = AliQAv1::Instance(index) ;
479
480   for (Int_t specie = 0 ; specie < AliRecoParam::kNSpecies ; specie++) {
481     if (! qa->IsEventSpecieSet(AliRecoParam::ConvertIndex(specie)))
482       continue ;
483     if (  value == NULL ) { // No checker is implemented, set all QA to Fatal
484       qa->Set(AliQAv1::kFATAL, specie) ; 
485     } else {
486       if ( value[specie] >= fLowTestValue[AliQAv1::kFATAL] && value[specie] < fUpTestValue[AliQAv1::kFATAL] ) 
487         qa->Set(AliQAv1::kFATAL, AliRecoParam::ConvertIndex(specie)) ; 
488       else if ( value[specie] > fLowTestValue[AliQAv1::kERROR] && value[specie] <= fUpTestValue[AliQAv1::kERROR]  )
489         qa->Set(AliQAv1::kERROR, AliRecoParam::ConvertIndex(specie)) ; 
490       else if ( value[specie] > fLowTestValue[AliQAv1::kWARNING] && value[specie] <= fUpTestValue[AliQAv1::kWARNING]  )
491         qa->Set(AliQAv1::kWARNING, AliRecoParam::ConvertIndex(specie)) ;
492       else if ( value[specie] > fLowTestValue[AliQAv1::kINFO] && value[specie] <= fUpTestValue[AliQAv1::kINFO] ) 
493         qa->Set(AliQAv1::kINFO, AliRecoParam::ConvertIndex(specie)) ;   
494     }
495   }
496 }