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