]> git.uio.no Git - u/mrichter/AliRoot.git/blob - TRD/AliTRDcalibDB.cxx
Move to numbers of atoms for gas mixture
[u/mrichter/AliRoot.git] / TRD / AliTRDcalibDB.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 /* $Id$ */
17
18 ///////////////////////////////////////////////////////////////////////////////
19 //                                                                           //
20 // Class providing the calibration parameters by accessing the CDB           //
21 //                                                                           //
22 // Request an instance with AliTRDcalibDB::Instance()                 //
23 // If a new event is processed set the event number with SetRun              //
24 // Then request the calibration data                                         // 
25 //                                                                           //
26 ///////////////////////////////////////////////////////////////////////////////
27
28 #include <TRandom.h>
29
30 #include <AliCDBManager.h>
31
32 #include "AliTRDcalibDB.h"
33 #include "AliTRDgeometry.h"
34 #include "AliTRDpadPlane.h"
35 #include "AliTRDCommonParam.h"
36
37 #include "Cal/AliTRDCalROC.h"
38
39 #include "Cal/AliTRDCalPad.h"
40 #include "Cal/AliTRDCalDet.h"
41 #include "Cal/AliTRDCalGlobals.h"
42 #include "Cal/AliTRDCalPIDLQ.h"
43 #include "Cal/AliTRDCalMonitoring.h"
44
45 #include "Cal/AliTRDCalSuperModuleStatus.h"
46 #include "Cal/AliTRDCalChamberStatus.h"
47 #include "Cal/AliTRDCalMCMStatus.h"
48 #include "Cal/AliTRDCalPadStatus.h"
49 #include "Cal/AliTRDCalSingleChamberStatus.h"
50
51 ClassImp(AliTRDcalibDB)
52
53 AliTRDcalibDB* AliTRDcalibDB::fgInstance = 0;
54 Bool_t AliTRDcalibDB::fgTerminated = kFALSE;
55
56 //_ singleton implementation __________________________________________________
57 AliTRDcalibDB* AliTRDcalibDB::Instance()
58 {
59   //
60   // Singleton implementation
61   // Returns an instance of this class, it is created if neccessary
62   //
63   
64   if (fgTerminated != kFALSE)
65     return 0;
66
67   if (fgInstance == 0)
68     fgInstance = new AliTRDcalibDB();
69
70   return fgInstance;
71 }
72
73 void AliTRDcalibDB::Terminate()
74 {
75   //
76   // Singleton implementation
77   // Deletes the instance of this class and sets the terminated flag, instances cannot be requested anymore
78   // This function can be called several times.
79   //
80   
81   fgTerminated = kTRUE;
82   
83   if (fgInstance != 0)
84   {
85     delete fgInstance;
86     fgInstance = 0;
87   }
88 }
89
90 //_____________________________________________________________________________
91 AliTRDcalibDB::AliTRDcalibDB()
92 {
93   //
94   // constructor
95   //
96   
97   // TODO Default runnumber is set to 0, this should be changed later to an invalid value (e.g. -1) to prevent
98   // TODO invalid calibration data to be used.
99   fRun = -1;
100   
101   fPadResponse.fPRFbin             = 0;
102   fPadResponse.fPRFlo              = 0.0;
103   fPadResponse.fPRFhi              = 0.0;
104   fPadResponse.fPRFwid             = 0.0;
105   fPadResponse.fPRFpad             = 0;
106   fPadResponse.fPRFsmp             = 0;
107
108   for (Int_t i=0; i<kCDBCacheSize; ++i)
109   {
110     fCDBCache[i] = 0;
111     fCDBEntries[i] = 0;
112   }
113   
114   // Create the sampled PRF
115   SamplePRF();
116 }
117
118 //_____________________________________________________________________________
119 AliTRDcalibDB::~AliTRDcalibDB() 
120 {
121   //
122   // destructor
123   //
124   
125   if (fPadResponse.fPRFsmp) {
126     delete [] fPadResponse.fPRFsmp;
127     fPadResponse.fPRFsmp = 0;
128   }
129
130   Invalidate();
131 }
132
133 //_caching functions____________________________________________________________
134 const TObject* AliTRDcalibDB::GetCachedCDBObject(Int_t id)
135 {
136     //
137     // Retrieves a cdb object with the given id. The objects are cached as long as the run number is not changed.
138     //
139     // Put together the available objects here by using the lines
140     //   a) For usual calibration objects:
141     //      ase kID<Name> : return CacheCDBEntry(kID<Name>, "TRD/Calib/<Path>"); break;
142     //      See function CacheCDBEntry for details.
143     //   and
144     //   b) For calibration data which depends on two objects: One containing a value per detector and one the local fluctuations per pad:
145     //      case kID<Name> : return CacheMergeCDBEntry(kID<Name>, "TRD/Calib/<padPath>", "TRD/Calib/<chamberPath>"); break;
146     //      See function CacheMergeCDBEntry for details.
147     //
148     
149     switch (id)
150     {
151       // parameters defined per pad and chamber
152       case kIDVdriftPad : return CacheCDBEntry(kIDVdriftPad, "TRD/Calib/LocalVdrift"); break;
153       case kIDVdriftChamber : return CacheCDBEntry(kIDVdriftChamber, "TRD/Calib/ChamberVdrift"); break;
154
155       case kIDT0Pad : return CacheCDBEntry(kIDT0Pad, "TRD/Calib/LocalT0"); break;
156       case kIDT0Chamber : return CacheCDBEntry(kIDT0Chamber, "TRD/Calib/ChamberT0"); break;
157
158       case kIDGainFactorPad : return CacheCDBEntry(kIDGainFactorPad, "TRD/Calib/LocalGainFactor"); break;
159       case kIDGainFactorChamber : return CacheCDBEntry(kIDGainFactorChamber, "TRD/Calib/ChamberGainFactor"); break;
160
161       // parameters defined per pad
162       case kIDPRFWidth : return CacheCDBEntry(kIDPRFWidth, "TRD/Calib/PRFWidth"); break;
163
164       // status values
165       case kIDSuperModuleStatus : return CacheCDBEntry(kIDSuperModuleStatus, "TRD/Calib/SuperModuleStatus"); break;
166       case kIDChamberStatus : return CacheCDBEntry(kIDChamberStatus, "TRD/Calib/ChamberStatus"); break;
167       case kIDMCMStatus : return CacheCDBEntry(kIDMCMStatus, "TRD/Calib/MCMStatus"); break;
168       case kIDPadStatus : return CacheCDBEntry(kIDPadStatus, "TRD/Calib/PadStatus"); break;
169
170       // global parameters
171       case kIDMonitoringData : return CacheCDBEntry(kIDMonitoringData, "TRD/Calib/MonitoringData"); break;
172       case kIDGlobals : return CacheCDBEntry(kIDGlobals, "TRD/Calib/Globals"); break;
173       case kIDPIDLQ : return CacheCDBEntry(kIDPIDLQ, "TRD/Calib/PIDLQ"); break;
174     }
175     return 0;
176 }
177
178 //_____________________________________________________________________________
179 AliCDBEntry* AliTRDcalibDB::GetCDBEntry(const char* cdbPath)
180 {
181   // 
182   // Retrieves an entry with path <cdbPath> from the CDB.
183   //
184     
185   AliCDBEntry* entry = AliCDBManager::Instance()->Get(cdbPath, fRun);
186   if (!entry)
187   { 
188     std::cerr << "AliTRDcalibDB: Failed to get entry: " << cdbPath << std::endl; 
189     return 0; 
190   }
191   
192   std::cout << "AliTRDcalibDB: Retrieved object: " << cdbPath << std::endl;
193   return entry;
194 }
195
196 //_____________________________________________________________________________
197 const TObject* AliTRDcalibDB::CacheCDBEntry(Int_t id, const char* cdbPath)
198 {
199   //
200   // Caches the entry <id> with cdb path <cdbPath>
201   //
202   
203   if (!fCDBCache[id])
204   {
205     fCDBEntries[id] = GetCDBEntry(cdbPath);
206     if (fCDBEntries[id])
207       fCDBCache[id] = fCDBEntries[id]->GetObject();
208   }
209   return fCDBCache[id];
210 }
211
212 //_____________________________________________________________________________
213 void AliTRDcalibDB::SetRun(Long64_t run)
214 {
215   //
216   // Sets current run number. Calibration data is read from the corresponding file.
217   // When the run number changes the caching is invalidated.
218   //
219
220   if (fRun == run)
221     return;
222
223   fRun = run;
224   Invalidate();
225 }
226
227 //_____________________________________________________________________________
228 void AliTRDcalibDB::Invalidate()
229 {
230   //
231   // Invalidates cache (when run number is changed).
232   //
233   
234   for (Int_t i=0; i<kCDBCacheSize; ++i)
235   {
236     if (fCDBEntries[i])
237     {
238       if (AliCDBManager::Instance()->GetCacheFlag() == kFALSE)
239       {
240         if (fCDBEntries[i]->IsOwner() == kFALSE && fCDBCache[i])
241           delete fCDBCache[i];
242
243         delete fCDBEntries[i];
244       }
245       fCDBEntries[i] = 0;
246       fCDBCache[i] = 0;
247     }
248   }
249 }
250
251 //_____________________________________________________________________________
252 Float_t AliTRDcalibDB::GetVdrift(Int_t det, Int_t col, Int_t row)
253 {
254   //
255   // Returns the drift velocity for the given pad.
256   //
257
258   const AliTRDCalPad* calPad = dynamic_cast<const AliTRDCalPad*> (GetCachedCDBObject(kIDVdriftPad));
259   if (!calPad)
260     return -1;
261
262   AliTRDCalROC* roc = calPad->GetCalROC(det);
263   if (!roc)
264     return -1;
265
266   const AliTRDCalDet* calChamber = dynamic_cast<const AliTRDCalDet*> (GetCachedCDBObject(kIDVdriftChamber));
267   if (!calChamber)
268     return -1;
269
270   return calChamber->GetValue(det) * roc->GetValue(col, row);
271 }
272
273 //_____________________________________________________________________________
274 Float_t AliTRDcalibDB::GetVdriftAverage(Int_t det)
275 {
276   //
277   // Returns the average drift velocity for the given detector
278   //
279
280   const AliTRDCalDet* calDet = dynamic_cast<const AliTRDCalDet*> (GetCachedCDBObject(kIDVdriftChamber));
281   if (!calDet)
282     return -1;
283
284   return calDet->GetValue(det);
285 }
286
287 //_____________________________________________________________________________
288 Float_t AliTRDcalibDB::GetT0(Int_t det, Int_t col, Int_t row)
289 {
290   //
291   // Returns t0 for the given pad.
292   //
293   
294   const AliTRDCalPad* calPad = dynamic_cast<const AliTRDCalPad*> (GetCachedCDBObject(kIDT0Pad));
295   if (!calPad)
296     return -1;
297
298   AliTRDCalROC* roc = calPad->GetCalROC(det);
299   if (!roc)
300     return -1;
301
302   const AliTRDCalDet* calChamber = dynamic_cast<const AliTRDCalDet*> (GetCachedCDBObject(kIDT0Chamber));
303   if (!calChamber)
304     return -1;
305
306   return calChamber->GetValue(det) * roc->GetValue(col, row);
307 }
308
309 //_____________________________________________________________________________
310 Float_t AliTRDcalibDB::GetT0Average(Int_t det)
311 {
312   //
313   // Returns the average t0 for the given detector
314   //
315
316   const AliTRDCalDet* calDet = dynamic_cast<const AliTRDCalDet*> (GetCachedCDBObject(kIDT0Chamber));
317   if (!calDet)
318     return -1;
319
320   return calDet->GetValue(det);
321 }
322
323 //_____________________________________________________________________________
324 Float_t AliTRDcalibDB::GetGainFactor(Int_t det, Int_t col, Int_t row)
325 {
326   //
327   // Returns the gain factor for the given pad.
328   //
329   
330   const AliTRDCalPad* calPad = dynamic_cast<const AliTRDCalPad*> (GetCachedCDBObject(kIDGainFactorPad));
331   if (!calPad)
332     return -1;
333
334   AliTRDCalROC* roc = calPad->GetCalROC(det);
335   if (!roc)
336     return -1;
337
338   const AliTRDCalDet* calChamber = dynamic_cast<const AliTRDCalDet*> (GetCachedCDBObject(kIDGainFactorChamber));
339   if (!calChamber)
340     return -1;
341
342   return calChamber->GetValue(det) * roc->GetValue(col, row);
343 }
344
345 //_____________________________________________________________________________
346 Float_t AliTRDcalibDB::GetGainFactorAverage(Int_t det)
347 {
348   //
349   // Returns the average gain factor for the given detector
350   //
351
352   const AliTRDCalDet* calDet = dynamic_cast<const AliTRDCalDet*> (GetCachedCDBObject(kIDGainFactorChamber));
353   if (!calDet)
354     return -1;
355
356   return calDet->GetValue(det);
357 }
358
359 //_____________________________________________________________________________
360 Float_t AliTRDcalibDB::GetPRFWidth(Int_t det, Int_t col, Int_t row)
361 {
362   //
363   // Returns the PRF width for the given pad.
364   //
365   
366   const AliTRDCalPad* calPad = dynamic_cast<const AliTRDCalPad*> (GetCachedCDBObject(kIDPRFWidth));
367   if (!calPad)
368     return -1;
369
370   AliTRDCalROC* roc = calPad->GetCalROC(det);
371   if (!roc)
372     return -1;
373
374   return roc->GetValue(col, row);
375 }
376
377 //_____________________________________________________________________________
378 Float_t AliTRDcalibDB::GetSamplingFrequency()
379 {
380   //
381   // Returns the sampling frequency of the TRD read-out.
382   //
383   
384   const AliTRDCalGlobals* calGlobal = dynamic_cast<const AliTRDCalGlobals*> (GetCachedCDBObject(kIDGlobals));
385   if (!calGlobal)
386     return -1;  
387   
388   return calGlobal->GetSamplingFrequency();
389 }
390   
391 //_____________________________________________________________________________
392 Int_t AliTRDcalibDB::GetNumberOfTimeBins()
393 {
394   //
395   // Returns the number of time bins which are read-out.
396   //
397
398   const AliTRDCalGlobals* calGlobal = dynamic_cast<const AliTRDCalGlobals*> (GetCachedCDBObject(kIDGlobals));
399   if (!calGlobal)
400     return -1;
401
402   return calGlobal->GetNumberOfTimeBins();
403 }
404
405 //_____________________________________________________________________________
406 Char_t AliTRDcalibDB::GetPadStatus(Int_t det, Int_t col, Int_t row)
407 {
408   //
409   // Returns the status of the given pad
410   //
411
412   const AliTRDCalPadStatus* cal = dynamic_cast<const AliTRDCalPadStatus*> (GetCachedCDBObject(kIDPadStatus));
413   if (!cal)
414     return -1;
415
416   const AliTRDCalSingleChamberStatus* roc = cal->GetCalROC(det);
417   if (!roc)
418     return -1;
419
420   return roc->GetStatus(col, row);
421 }
422
423 //_____________________________________________________________________________
424 Char_t AliTRDcalibDB::GetMCMStatus(Int_t det, Int_t col, Int_t row)
425 {
426   //
427   // Returns the status of the given MCM
428   //
429
430   const AliTRDCalMCMStatus* cal = dynamic_cast<const AliTRDCalMCMStatus*> (GetCachedCDBObject(kIDMCMStatus));
431   if (!cal)
432     return -1;
433
434   const AliTRDCalSingleChamberStatus* roc = cal->GetCalROC(det);
435   if (!roc)
436     return -1;
437
438   return roc->GetStatus(col, row);
439 }
440
441 //_____________________________________________________________________________
442 Char_t AliTRDcalibDB::GetChamberStatus(Int_t det)
443 {
444   //
445   // Returns the status of the given chamber
446   //
447
448   const AliTRDCalChamberStatus* cal = dynamic_cast<const AliTRDCalChamberStatus*> (GetCachedCDBObject(kIDChamberStatus));
449   if (!cal)
450     return -1;
451
452   return cal->GetStatus(det);
453 }
454
455 //_____________________________________________________________________________
456 Char_t AliTRDcalibDB::GetSuperModuleStatus(Int_t sm)
457 {
458   //
459   // Returns the status of the given chamber
460   //
461
462   const AliTRDCalSuperModuleStatus* cal = dynamic_cast<const AliTRDCalSuperModuleStatus*> (GetCachedCDBObject(kIDSuperModuleStatus));
463   if (!cal)
464     return -1;
465
466   return cal->GetStatus(sm);
467 }
468
469 //_____________________________________________________________________________
470 Bool_t AliTRDcalibDB::IsPadMasked(Int_t det, Int_t col, Int_t row)
471 {
472   //
473   // Returns status, see name of functions for details ;-)
474   //
475
476   const AliTRDCalPadStatus* cal = dynamic_cast<const AliTRDCalPadStatus*> (GetCachedCDBObject(kIDPadStatus));
477   if (!cal)
478     return -1;
479
480   return cal->IsMasked(det, col, row);
481 }
482
483 //_____________________________________________________________________________
484 Bool_t AliTRDcalibDB::IsPadBridgedLeft(Int_t det, Int_t col, Int_t row)
485 {
486   //
487   // Returns status, see name of functions for details ;-)
488   //
489
490   const AliTRDCalPadStatus* cal = dynamic_cast<const AliTRDCalPadStatus*> (GetCachedCDBObject(kIDPadStatus));
491   if (!cal)
492     return -1;
493
494   return cal->IsBridgedLeft(det, col, row);
495 }
496
497 //_____________________________________________________________________________
498 Bool_t AliTRDcalibDB::IsPadBridgedRight(Int_t det, Int_t col, Int_t row)
499 {
500   //
501   // Returns status, see name of functions for details ;-)
502   //
503
504   const AliTRDCalPadStatus* cal = dynamic_cast<const AliTRDCalPadStatus*> (GetCachedCDBObject(kIDPadStatus));
505   if (!cal)
506     return -1;
507
508   return cal->IsBridgedRight(det, col, row);
509 }
510
511 //_____________________________________________________________________________
512 Bool_t AliTRDcalibDB::IsMCMMasked(Int_t det, Int_t col, Int_t row)
513 {
514   //
515   // Returns status, see name of functions for details ;-)
516   //
517
518   const AliTRDCalMCMStatus* cal = dynamic_cast<const AliTRDCalMCMStatus*> (GetCachedCDBObject(kIDMCMStatus));
519   if (!cal)
520     return -1;
521
522   return cal->IsMasked(det, col, row);
523 }
524
525 //_____________________________________________________________________________
526 Bool_t AliTRDcalibDB::IsChamberInstalled(Int_t det)
527 {
528   //
529   // Returns status, see name of functions for details ;-)
530   //
531
532   const AliTRDCalChamberStatus* cal = dynamic_cast<const AliTRDCalChamberStatus*> (GetCachedCDBObject(kIDChamberStatus));
533   if (!cal)
534     return -1;
535
536   return cal->IsInstalled(det);
537 }
538
539 //_____________________________________________________________________________
540 Bool_t AliTRDcalibDB::IsChamberMasked(Int_t det)
541 {
542   //
543   // Returns status, see name of functions for details ;-)
544   //
545
546   const AliTRDCalChamberStatus* cal = dynamic_cast<const AliTRDCalChamberStatus*> (GetCachedCDBObject(kIDChamberStatus));
547   if (!cal)
548     return -1;
549
550   return cal->IsMasked(det);
551 }
552
553 //_____________________________________________________________________________
554 Bool_t AliTRDcalibDB::IsSuperModuleInstalled(Int_t det)
555 {
556   //
557   // Returns status, see name of functions for details ;-)
558   //
559
560   const AliTRDCalSuperModuleStatus* cal = dynamic_cast<const AliTRDCalSuperModuleStatus*> (GetCachedCDBObject(kIDSuperModuleStatus));
561   if (!cal)
562     return -1;
563
564   return cal->IsInstalled(det);
565 }
566
567 //_____________________________________________________________________________
568 Bool_t AliTRDcalibDB::IsSuperModuleMasked(Int_t det)
569 {
570   //
571   // Returns status, see name of functions for details ;-)
572   //
573
574   const AliTRDCalSuperModuleStatus* cal = dynamic_cast<const AliTRDCalSuperModuleStatus*> (GetCachedCDBObject(kIDSuperModuleStatus));
575   if (!cal)
576     return -1;
577
578   return cal->IsMasked(det);
579 }
580
581 //_____________________________________________________________________________
582 const AliTRDCalPIDLQ* AliTRDcalibDB::GetPIDLQObject()
583 {
584   //
585   // Returns the object storing the distributions for PID with likelihood
586   //
587
588   return dynamic_cast<const AliTRDCalPIDLQ*> (GetCachedCDBObject(kIDPIDLQ));
589 }
590
591 //_____________________________________________________________________________
592 const AliTRDCalMonitoring* AliTRDcalibDB::GetMonitoringObject()
593 {
594   //
595   // Returns the object storing the monitoring data
596   //
597
598   return dynamic_cast<const AliTRDCalMonitoring*> (GetCachedCDBObject(kIDMonitoringData));
599 }
600
601 //_____________________________________________________________________________
602 Float_t AliTRDcalibDB::GetOmegaTau(Float_t vdrift)
603 {
604   //
605   // Returns omega*tau (tan(Lorentz-angle)) for a given drift velocity <vd> 
606   // and a B-field <b> for Xe/CO2 (15%).
607   // The values are according to a GARFIELD simulation.
608   //
609   // This function basically does not belong to the calibration class. It should be moved somewhere else. 
610   // However, currently it is in use by simulation and reconstruction.
611   //
612   
613   AliTRDCommonParam* commonParam = AliTRDCommonParam::Instance();
614   if (!commonParam)
615     return -1;
616   Float_t fieldAbs = TMath::Abs(commonParam->GetField());
617   Float_t fieldSgn = 1.0;
618   if (fieldAbs > 0.0) {
619     fieldSgn = commonParam->GetField() / fieldAbs;
620   }
621
622   const Int_t kNb = 5;
623   Float_t p0[kNb] = {  0.004810,  0.007412,  0.010252,  0.013409,  0.016888 };
624   Float_t p1[kNb] = {  0.054875,  0.081534,  0.107333,  0.131983,  0.155455 };
625   Float_t p2[kNb] = { -0.008682, -0.012896, -0.016987, -0.020880, -0.024623 };
626   Float_t p3[kNb] = {  0.000155,  0.000238,  0.000330,  0.000428,  0.000541 };
627
628   Int_t ib = ((Int_t) (10 * (fieldAbs - 0.15)));
629   ib       = TMath::Max(  0,ib);
630   ib       = TMath::Min(kNb,ib);
631
632   Float_t alphaL = p0[ib] 
633                  + p1[ib] * vdrift
634                  + p2[ib] * vdrift*vdrift
635                  + p3[ib] * vdrift*vdrift*vdrift;
636
637   return TMath::Tan(fieldSgn * alphaL);
638
639 }
640
641 //_____________________________________________________________________________
642 void AliTRDcalibDB::SamplePRF()
643 {
644   //
645   // Samples the pad response function
646   //
647
648   const Int_t kPRFbin = 61;
649
650   Float_t prf[kNplan][kPRFbin] = { {2.9037e-02, 3.3608e-02, 3.9020e-02, 4.5292e-02,
651                     5.2694e-02, 6.1362e-02, 7.1461e-02, 8.3362e-02,
652                     9.7063e-02, 1.1307e-01, 1.3140e-01, 1.5235e-01,
653                     1.7623e-01, 2.0290e-01, 2.3294e-01, 2.6586e-01,
654                     3.0177e-01, 3.4028e-01, 3.8077e-01, 4.2267e-01,
655                     4.6493e-01, 5.0657e-01, 5.4655e-01, 5.8397e-01,
656                     6.1767e-01, 6.4744e-01, 6.7212e-01, 6.9188e-01,
657                     7.0627e-01, 7.1499e-01, 7.1851e-01, 7.1499e-01,
658                     7.0627e-01, 6.9188e-01, 6.7212e-01, 6.4744e-01,
659                     6.1767e-01, 5.8397e-01, 5.4655e-01, 5.0657e-01,
660                     4.6493e-01, 4.2267e-01, 3.8077e-01, 3.4028e-01,
661                     3.0177e-01, 2.6586e-01, 2.3294e-01, 2.0290e-01,
662                     1.7623e-01, 1.5235e-01, 1.3140e-01, 1.1307e-01,
663                     9.7063e-02, 8.3362e-02, 7.1461e-02, 6.1362e-02,
664                     5.2694e-02, 4.5292e-02, 3.9020e-02, 3.3608e-02,
665                     2.9037e-02},
666                    {2.5478e-02, 2.9695e-02, 3.4655e-02, 4.0454e-02,
667                     4.7342e-02, 5.5487e-02, 6.5038e-02, 7.6378e-02,
668                     8.9696e-02, 1.0516e-01, 1.2327e-01, 1.4415e-01,
669                     1.6794e-01, 1.9516e-01, 2.2573e-01, 2.5959e-01,
670                     2.9694e-01, 3.3719e-01, 3.7978e-01, 4.2407e-01,
671                     4.6889e-01, 5.1322e-01, 5.5569e-01, 5.9535e-01,
672                     6.3141e-01, 6.6259e-01, 6.8882e-01, 7.0983e-01,
673                     7.2471e-01, 7.3398e-01, 7.3761e-01, 7.3398e-01,
674                     7.2471e-01, 7.0983e-01, 6.8882e-01, 6.6259e-01,
675                     6.3141e-01, 5.9535e-01, 5.5569e-01, 5.1322e-01,
676                     4.6889e-01, 4.2407e-01, 3.7978e-01, 3.3719e-01,
677                     2.9694e-01, 2.5959e-01, 2.2573e-01, 1.9516e-01,
678                     1.6794e-01, 1.4415e-01, 1.2327e-01, 1.0516e-01,
679                     8.9696e-02, 7.6378e-02, 6.5038e-02, 5.5487e-02,
680                     4.7342e-02, 4.0454e-02, 3.4655e-02, 2.9695e-02,
681                     2.5478e-02},
682                    {2.2363e-02, 2.6233e-02, 3.0782e-02, 3.6140e-02,
683                     4.2535e-02, 5.0157e-02, 5.9197e-02, 6.9900e-02,
684                     8.2707e-02, 9.7811e-02, 1.1548e-01, 1.3601e-01,
685                     1.5998e-01, 1.8739e-01, 2.1840e-01, 2.5318e-01,
686                     2.9182e-01, 3.3373e-01, 3.7837e-01, 4.2498e-01,
687                     4.7235e-01, 5.1918e-01, 5.6426e-01, 6.0621e-01,
688                     6.4399e-01, 6.7700e-01, 7.0472e-01, 7.2637e-01,
689                     7.4206e-01, 7.5179e-01, 7.5551e-01, 7.5179e-01,
690                     7.4206e-01, 7.2637e-01, 7.0472e-01, 6.7700e-01,
691                     6.4399e-01, 6.0621e-01, 5.6426e-01, 5.1918e-01,
692                     4.7235e-01, 4.2498e-01, 3.7837e-01, 3.3373e-01,
693                     2.9182e-01, 2.5318e-01, 2.1840e-01, 1.8739e-01,
694                     1.5998e-01, 1.3601e-01, 1.1548e-01, 9.7811e-02,
695                     8.2707e-02, 6.9900e-02, 5.9197e-02, 5.0157e-02,
696                     4.2535e-02, 3.6140e-02, 3.0782e-02, 2.6233e-02,
697                     2.2363e-02},
698                    {1.9635e-02, 2.3167e-02, 2.7343e-02, 3.2293e-02,
699                     3.8224e-02, 4.5335e-02, 5.3849e-02, 6.4039e-02,
700                     7.6210e-02, 9.0739e-02, 1.0805e-01, 1.2841e-01,
701                     1.5216e-01, 1.7960e-01, 2.1099e-01, 2.4671e-01,
702                     2.8647e-01, 3.2996e-01, 3.7660e-01, 4.2547e-01,
703                     4.7536e-01, 5.2473e-01, 5.7215e-01, 6.1632e-01,
704                     6.5616e-01, 6.9075e-01, 7.1939e-01, 7.4199e-01,
705                     7.5838e-01, 7.6848e-01, 7.7227e-01, 7.6848e-01,
706                     7.5838e-01, 7.4199e-01, 7.1939e-01, 6.9075e-01,
707                     6.5616e-01, 6.1632e-01, 5.7215e-01, 5.2473e-01,
708                     4.7536e-01, 4.2547e-01, 3.7660e-01, 3.2996e-01,
709                     2.8647e-01, 2.4671e-01, 2.1099e-01, 1.7960e-01,
710                     1.5216e-01, 1.2841e-01, 1.0805e-01, 9.0739e-02,
711                     7.6210e-02, 6.4039e-02, 5.3849e-02, 4.5335e-02,
712                     3.8224e-02, 3.2293e-02, 2.7343e-02, 2.3167e-02,
713                     1.9635e-02},
714                    {1.7224e-02, 2.0450e-02, 2.4286e-02, 2.8860e-02,
715                     3.4357e-02, 4.0979e-02, 4.8966e-02, 5.8612e-02,
716                     7.0253e-02, 8.4257e-02, 1.0102e-01, 1.2094e-01,
717                     1.4442e-01, 1.7196e-01, 2.0381e-01, 2.4013e-01,
718                     2.8093e-01, 3.2594e-01, 3.7450e-01, 4.2563e-01,
719                     4.7796e-01, 5.2991e-01, 5.7974e-01, 6.2599e-01,
720                     6.6750e-01, 7.0344e-01, 7.3329e-01, 7.5676e-01,
721                     7.7371e-01, 7.8410e-01, 7.8793e-01, 7.8410e-01,
722                     7.7371e-01, 7.5676e-01, 7.3329e-01, 7.0344e-01,
723                     6.6750e-01, 6.2599e-01, 5.7974e-01, 5.2991e-01,
724                     4.7796e-01, 4.2563e-01, 3.7450e-01, 3.2594e-01,
725                     2.8093e-01, 2.4013e-01, 2.0381e-01, 1.7196e-01,
726                     1.4442e-01, 1.2094e-01, 1.0102e-01, 8.4257e-02,
727                     7.0253e-02, 5.8612e-02, 4.8966e-02, 4.0979e-02,
728                     3.4357e-02, 2.8860e-02, 2.4286e-02, 2.0450e-02,
729                     1.7224e-02},
730                    {1.5096e-02, 1.8041e-02, 2.1566e-02, 2.5793e-02,
731                     3.0886e-02, 3.7044e-02, 4.4515e-02, 5.3604e-02,
732                     6.4668e-02, 7.8109e-02, 9.4364e-02, 1.1389e-01,
733                     1.3716e-01, 1.6461e-01, 1.9663e-01, 2.3350e-01,
734                     2.7527e-01, 3.2170e-01, 3.7214e-01, 4.2549e-01,
735                     4.8024e-01, 5.3460e-01, 5.8677e-01, 6.3512e-01,
736                     6.7838e-01, 7.1569e-01, 7.4655e-01, 7.7071e-01,
737                     7.8810e-01, 7.9871e-01, 8.0255e-01, 7.9871e-01,
738                     7.8810e-01, 7.7071e-01, 7.4655e-01, 7.1569e-01,
739                     6.7838e-01, 6.3512e-01, 5.8677e-01, 5.3460e-01,
740                     4.8024e-01, 4.2549e-01, 3.7214e-01, 3.2170e-01,
741                     2.7527e-01, 2.3350e-01, 1.9663e-01, 1.6461e-01,
742                     1.3716e-01, 1.1389e-01, 9.4364e-02, 7.8109e-02,
743                     6.4668e-02, 5.3604e-02, 4.4515e-02, 3.7044e-02,
744                     3.0886e-02, 2.5793e-02, 2.1566e-02, 1.8041e-02,
745                     1.5096e-02}};
746
747   // More sampling precision with linear interpolation
748   fPadResponse.fPRFlo  = -1.5;
749   fPadResponse.fPRFhi  =  1.5;
750   Float_t pad[kPRFbin];
751   Int_t   sPRFbin = kPRFbin;  
752   Float_t sPRFwid = (fPadResponse.fPRFhi - fPadResponse.fPRFlo) / ((Float_t) sPRFbin);
753   for (Int_t iPad = 0; iPad < sPRFbin; iPad++) {
754     pad[iPad] = ((Float_t) iPad + 0.5) * sPRFwid + fPadResponse.fPRFlo;
755   }
756   fPadResponse.fPRFbin = 500;  
757   fPadResponse.fPRFwid = (fPadResponse.fPRFhi - fPadResponse.fPRFlo) / ((Float_t) fPadResponse.fPRFbin);
758   fPadResponse.fPRFpad = ((Int_t) (1.0 / fPadResponse.fPRFwid));
759
760   if (fPadResponse.fPRFsmp) delete [] fPadResponse.fPRFsmp;
761   fPadResponse.fPRFsmp = new Float_t[kNplan*fPadResponse.fPRFbin];
762
763   Int_t   ipos1;
764   Int_t   ipos2;
765   Float_t diff;
766
767   for (Int_t iPla = 0; iPla < kNplan; iPla++) {
768
769     for (Int_t iBin = 0; iBin < fPadResponse.fPRFbin; iBin++) {
770
771       Float_t bin = (((Float_t) iBin) + 0.5) * fPadResponse.fPRFwid + fPadResponse.fPRFlo;
772       ipos1 = ipos2 = 0;
773       diff  = 0;
774       do {
775         diff = bin - pad[ipos2++];
776       } while ((diff > 0) && (ipos2 < kPRFbin));
777       if      (ipos2 == kPRFbin) {
778         fPadResponse.fPRFsmp[iPla*fPadResponse.fPRFbin+iBin] = prf[iPla][ipos2-1];
779       }
780       else if (ipos2 == 1) {
781         fPadResponse.fPRFsmp[iPla*fPadResponse.fPRFbin+iBin] = prf[iPla][ipos2-1];
782       }
783       else {
784         ipos2--;
785         if (ipos2 >= kPRFbin) ipos2 = kPRFbin - 1;
786         ipos1 = ipos2 - 1;
787         fPadResponse.fPRFsmp[iPla*fPadResponse.fPRFbin+iBin] = prf[iPla][ipos2] 
788                                    + diff * (prf[iPla][ipos2] - prf[iPla][ipos1]) 
789                                           / sPRFwid;
790       }
791
792     }
793   } 
794
795 }
796
797 //_____________________________________________________________________________
798 Int_t AliTRDcalibDB::PadResponse(Double_t signal, Double_t dist
799     , Int_t plane, Double_t *pad) const
800 {
801   //
802   // Applies the pad response
803   //
804
805   Int_t iBin  = ((Int_t) (( - dist - fPadResponse.fPRFlo) / fPadResponse.fPRFwid));
806   Int_t iOff  = plane * fPadResponse.fPRFbin;
807
808   Int_t iBin0 = iBin - fPadResponse.fPRFpad + iOff;
809   Int_t iBin1 = iBin           + iOff;
810   Int_t iBin2 = iBin + fPadResponse.fPRFpad + iOff;
811
812   pad[0] = 0.0;
813   pad[1] = 0.0;
814   pad[2] = 0.0;
815   if ((iBin1 >= 0) && (iBin1 < (fPadResponse.fPRFbin*kNplan))) {
816
817     if (iBin0 >= 0) {
818       pad[0] = signal * fPadResponse.fPRFsmp[iBin0];
819     }
820     pad[1] = signal * fPadResponse.fPRFsmp[iBin1];
821     if (iBin2 < (fPadResponse.fPRFbin*kNplan)) {
822       pad[2] = signal * fPadResponse.fPRFsmp[iBin2];
823     }
824
825     return 1;
826
827   }
828   else {
829
830     return 0;
831
832   }
833
834 }
835