]> git.uio.no Git - u/mrichter/AliRoot.git/blob - TRD/AliTRDdigitizer.cxx
Important bugfix. Missing reset of the equipment header data. It was causing a wrong...
[u/mrichter/AliRoot.git] / TRD / AliTRDdigitizer.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 //  Creates and handles digits from TRD hits                                 //
21 //  Authors: C. Blume (blume@ikf.uni-frankfurt.de)                           //
22 //           C. Lippmann                                                     //
23 //           B. Vulpescu                                                     //
24 //                                                                           //
25 //  The following effects are included:                                      //
26 //      - Diffusion                                                          //
27 //      - ExB effects                                                        //
28 //      - Gas gain including fluctuations                                    //
29 //      - Pad-response (simple Gaussian approximation)                       //
30 //      - Time-response                                                      //
31 //      - Electronics noise                                                  //
32 //      - Electronics gain                                                   //
33 //      - Digitization                                                       //
34 //      - ADC threshold                                                      //
35 //  The corresponding parameter can be adjusted via the various              //
36 //  Set-functions. If these parameters are not explicitly set, default       //
37 //  values are used (see Init-function).                                     //
38 //                                                                           //
39 ///////////////////////////////////////////////////////////////////////////////
40
41 #include <stdlib.h>
42
43 #include <TMath.h>
44 #include <TVector.h>
45 #include <TRandom.h>
46 #include <TROOT.h>
47 #include <TTree.h>
48 #include <TFile.h>
49 #include <TF1.h>
50 #include <TList.h>
51 #include <TTask.h>
52 #include <TGeoManager.h>
53
54 #include "AliRun.h"
55 #include "AliRunLoader.h"
56 #include "AliLoader.h"
57 #include "AliConfig.h"
58 #include "AliMagF.h"
59 #include "AliRunDigitizer.h"
60 #include "AliRunLoader.h"
61 #include "AliLoader.h"
62 #include "AliLog.h"
63
64 #include "AliTRD.h"
65 #include "AliTRDhit.h"
66 #include "AliTRDdigitizer.h"
67 #include "AliTRDdataArrayI.h"
68 #include "AliTRDdataArrayF.h"
69 #include "AliTRDsegmentArray.h"
70 #include "AliTRDdigitsManager.h"
71 #include "AliTRDgeometry.h"
72 #include "AliTRDpadPlane.h"
73 #include "AliTRDcalibDB.h"
74 #include "AliTRDSimParam.h"
75 #include "AliTRDCommonParam.h"
76
77 ClassImp(AliTRDdigitizer)
78
79 //_____________________________________________________________________________
80 AliTRDdigitizer::AliTRDdigitizer()
81 {
82   //
83   // AliTRDdigitizer default constructor
84   //
85
86   fRunLoader          = 0;
87   fDigitsManager      = 0;
88   fSDigitsManager     = 0;
89   fSDigitsManagerList = 0;
90   fTRD                = 0;
91   fGeo                = 0;
92   fEvent              = 0;
93   fMasks              = 0;
94   fCompress           = kTRUE;
95   fSDigits            = kFALSE;
96   fSDigitsScale       = 0.0;
97   fMergeSignalOnly    = kFALSE;
98  
99   fTimeStructInfo.fLastVdrift   = 0;
100   fTimeStructInfo.fTimeStruct1  = 0;
101   fTimeStructInfo.fTimeStruct2  = 0;
102   fTimeStructInfo.fVDlo         = 0;
103   fTimeStructInfo.fVDhi         = 0;
104   
105   fDiffusionInfo.fLastVdrift    = 0;
106   fDiffusionInfo.fDiffusionT    = 0.0;
107   fDiffusionInfo.fDiffusionL    = 0.0;
108   fDiffusionInfo.fLorentzFactor = 0.0;
109   
110   Init();
111
112 }
113
114 //_____________________________________________________________________________
115 AliTRDdigitizer::AliTRDdigitizer(const Text_t *name, const Text_t *title)
116                 :AliDigitizer(name,title)
117 {
118   //
119   // AliTRDdigitizer constructor
120   //
121
122   Init();
123
124 }
125
126 //_____________________________________________________________________________
127 AliTRDdigitizer::AliTRDdigitizer(AliRunDigitizer *manager
128                                 , const Text_t *name, const Text_t *title)
129                 :AliDigitizer(manager,name,title)
130 {
131   //
132   // AliTRDdigitizer constructor
133   //
134
135   Init();
136
137 }
138
139 //_____________________________________________________________________________
140 AliTRDdigitizer::AliTRDdigitizer(AliRunDigitizer *manager)
141                 :AliDigitizer(manager,"AliTRDdigitizer","TRD digitizer")
142 {
143   //
144   // AliTRDdigitizer constructor
145   //
146
147   Init();
148
149 }
150
151 //_____________________________________________________________________________
152 Bool_t AliTRDdigitizer::Init()
153 {
154   //
155   // Initialize the digitizer with default values
156   //
157
158   fRunLoader          = 0;
159
160   //NewIO: These data members probably are not needed anymore
161   fDigitsManager      = 0;
162   fSDigitsManager     = 0;
163   fSDigitsManagerList = 0;
164   fTRD                = 0;
165   fGeo                = 0;
166   //End NewIO comment
167
168   fEvent              = 0;
169   fMasks              = 0;
170   fCompress           = kTRUE;
171   fSDigits            = kFALSE;
172   fSDigitsScale       = 100.; // For the summable digits
173   fMergeSignalOnly    = kFALSE;
174  
175   fTimeStructInfo.fLastVdrift   = -1;
176   fTimeStructInfo.fTimeStruct1  = 0;
177   fTimeStructInfo.fTimeStruct2  = 0;
178   fTimeStructInfo.fVDlo         = 0;
179   fTimeStructInfo.fVDhi         = 0;
180   
181   fDiffusionInfo.fLastVdrift    = -1;
182   fDiffusionInfo.fDiffusionT    = 0.0;
183   fDiffusionInfo.fDiffusionL    = 0.0;
184   fDiffusionInfo.fLorentzFactor = 0.0;
185
186   return AliDigitizer::Init();
187
188 }
189
190 //_____________________________________________________________________________
191 AliTRDdigitizer::AliTRDdigitizer(const AliTRDdigitizer &d):AliDigitizer(d)
192 {
193   //
194   // AliTRDdigitizer copy constructor
195   //
196
197   ((AliTRDdigitizer &) d).Copy(*this);
198
199 }
200
201 //_____________________________________________________________________________
202 AliTRDdigitizer::~AliTRDdigitizer()
203 {
204   //
205   // AliTRDdigitizer destructor
206   //
207
208   if (fDigitsManager) {
209     delete fDigitsManager;
210     fDigitsManager = 0;
211   }
212
213   fSDigitsManager = 0;
214
215   if (fSDigitsManagerList) {
216     fSDigitsManagerList->Delete();
217     delete fSDigitsManagerList;
218     fSDigitsManagerList = 0;
219   }
220
221   if (fMasks) {
222     delete [] fMasks;
223     fMasks = 0;
224   }
225
226   if (fTimeStructInfo.fTimeStruct1)
227   {
228     delete [] fTimeStructInfo.fTimeStruct1;
229     fTimeStructInfo.fTimeStruct1 = 0;
230   }
231
232   if (fTimeStructInfo.fTimeStruct2) 
233   {
234     delete [] fTimeStructInfo.fTimeStruct2;
235     fTimeStructInfo.fTimeStruct2 = 0;
236   }
237
238 }
239
240 //_____________________________________________________________________________
241 AliTRDdigitizer &AliTRDdigitizer::operator=(const AliTRDdigitizer &d)
242 {
243   //
244   // Assignment operator
245   //
246
247   if (this != &d) ((AliTRDdigitizer &) d).Copy(*this);
248   return *this;
249
250 }
251
252 //_____________________________________________________________________________
253 void AliTRDdigitizer::Copy(TObject &d) const
254 {
255   //
256   // Copy function
257   //
258
259   ((AliTRDdigitizer &) d).fRunLoader          = 0;
260   ((AliTRDdigitizer &) d).fDigitsManager      = 0;
261   ((AliTRDdigitizer &) d).fSDigitsManager     = 0;
262   ((AliTRDdigitizer &) d).fSDigitsManagerList = 0;
263   ((AliTRDdigitizer &) d).fTRD                = 0;
264   ((AliTRDdigitizer &) d).fGeo                = 0;
265   ((AliTRDdigitizer &) d).fEvent              = 0;
266   ((AliTRDdigitizer &) d).fMasks              = 0;
267   ((AliTRDdigitizer &) d).fCompress           = fCompress;
268   ((AliTRDdigitizer &) d).fSDigits            = fSDigits;
269   ((AliTRDdigitizer &) d).fSDigitsScale       = fSDigitsScale;
270   ((AliTRDdigitizer &) d).fMergeSignalOnly    = fMergeSignalOnly;
271                                        
272   AliTRDdigitizer& target = (AliTRDdigitizer &) d;
273   
274   target.fDiffusionInfo = fDiffusionInfo;
275   
276   // Do not copy timestructs, just invalidate lastvdrift.
277   // Next time they are requested, they get recalculated
278   if (target.fTimeStructInfo.fTimeStruct1)
279   {
280     delete[] target.fTimeStructInfo.fTimeStruct1;
281     target.fTimeStructInfo.fTimeStruct1 = 0;
282   }
283   if (target.fTimeStructInfo.fTimeStruct2)
284   {
285     delete[] target.fTimeStructInfo.fTimeStruct2;
286     target.fTimeStructInfo.fTimeStruct2 = 0;
287   }  
288   target.fTimeStructInfo.fLastVdrift = -1;
289
290 }
291
292 //_____________________________________________________________________________
293 void AliTRDdigitizer::Exec(Option_t* option)
294 {
295   //
296   // Executes the merging
297   //
298
299   Int_t iInput;
300
301   AliTRDdigitsManager *sdigitsManager;
302
303   TString optionString = option;
304   if (optionString.Contains("deb")) {
305     AliLog::SetClassDebugLevel("AliTRDdigitizer",1);
306     AliInfo("Called with debug option\n");
307   }
308
309   // The AliRoot file is already connected by the manager
310   AliRunLoader* inrl;
311   
312   if (gAlice) {
313     AliDebug(1,"AliRun object found on file.\n");
314   }
315   else {
316     inrl = AliRunLoader::GetRunLoader(fManager->GetInputFolderName(0));
317     inrl->LoadgAlice();
318     gAlice = inrl->GetAliRun();
319     if (!gAlice) {
320       AliError("Could not find AliRun object.\n")
321       return;
322     }
323   }
324                                                                            
325   Int_t nInput = fManager->GetNinputs();
326   fMasks = new Int_t[nInput];
327   for (iInput = 0; iInput < nInput; iInput++) {
328     fMasks[iInput] = fManager->GetMask(iInput);
329   }
330
331   //
332   // Initialization
333   //
334
335   AliRunLoader* orl = AliRunLoader::GetRunLoader(fManager->GetOutputFolderName());
336   if (InitDetector()) {
337
338     AliLoader* ogime = orl->GetLoader("TRDLoader");
339
340     TTree* tree = 0;
341     if (fSDigits) { 
342       // If we produce SDigits
343       tree = ogime->TreeS();
344       if (!tree) {
345         ogime->MakeTree("S");
346         tree = ogime->TreeS();
347       }
348     }
349     else {
350       // If we produce Digits
351       tree = ogime->TreeD();
352       if (!tree) {
353         ogime->MakeTree("D");
354         tree = ogime->TreeD();
355       }
356     }
357
358     MakeBranch(tree);
359
360   }
361  
362   for (iInput = 0; iInput < nInput; iInput++) {
363
364     AliDebug(1,Form("Add input stream %d\n",iInput));
365
366     // Check if the input tree exists
367     inrl = AliRunLoader::GetRunLoader(fManager->GetInputFolderName(iInput));
368     AliLoader* gime = inrl->GetLoader("TRDLoader");
369
370     TTree * treees =  gime->TreeS();
371     if (treees == 0x0) {
372       if (gime->LoadSDigits()) {
373         AliError(Form("Error Occured while loading S. Digits for input %d.",iInput));
374         return;
375       }
376       treees =  gime->TreeS();
377     }
378     
379     if (treees == 0x0) {
380       AliError(Form("Input stream %d does not exist\n",iInput));
381       return;
382     } 
383
384     // Read the s-digits via digits manager
385     sdigitsManager = new AliTRDdigitsManager();
386     sdigitsManager->SetSDigits(kTRUE);
387     
388     AliRunLoader* rl = AliRunLoader::GetRunLoader(fManager->GetInputFolderName(iInput));
389     AliLoader* gimme = rl->GetLoader("TRDLoader");
390     if (!gimme->TreeS()) gimme->LoadSDigits();
391     sdigitsManager->ReadDigits(gimme->TreeS());
392
393     // Add the s-digits to the input list 
394     AddSDigitsManager(sdigitsManager);
395
396   }
397
398   // Convert the s-digits to normal digits
399   AliDebug(1,"Do the conversion\n");
400   SDigits2Digits();
401
402   // Store the digits
403   AliDebug(1,"Write the digits\n");
404   fDigitsManager->WriteDigits();
405
406   // Write parameters
407   orl->CdGAFile();
408
409   AliDebug(1,"Done\n");
410
411   DeleteSDigitsManager();
412
413 }
414
415 //_____________________________________________________________________________
416 Bool_t AliTRDdigitizer::Open(const Char_t *file, Int_t nEvent)
417 {
418   //
419   // Opens a ROOT-file with TRD-hits and reads in the hit-tree
420   //
421   // Connect the AliRoot file containing Geometry, Kine, and Hits
422   //  
423
424   TString evfoldname = AliConfig::GetDefaultEventFolderName();
425
426   fRunLoader = AliRunLoader::GetRunLoader(evfoldname);
427   if (!fRunLoader) {
428     fRunLoader = AliRunLoader::Open(file,evfoldname,"UPDATE");
429   }  
430
431   if (!fRunLoader) {
432      AliError(Form("Can not open session for file %s.",file));
433      return kFALSE;
434    }
435    
436   if (!fRunLoader->GetAliRun()) {
437     fRunLoader->LoadgAlice();
438   }
439   gAlice = fRunLoader->GetAliRun();
440   
441   if (gAlice) {
442     AliDebug(1,"AliRun object found on file.\n");
443   }
444   else {
445     AliError("Could not find AliRun object.\n");
446     return kFALSE;
447   }
448
449   fEvent = nEvent;
450
451   // Import the Trees for the event nEvent in the file
452   //fRunLoader->GetEvent(fEvent);
453   
454   AliLoader* loader = fRunLoader->GetLoader("TRDLoader");
455   if (!loader) {
456     AliError("Can not get TRD loader from Run Loader");
457     return kFALSE;
458   }
459   
460   if (InitDetector()) {
461     TTree* tree = 0;
462     if (fSDigits) { 
463       // If we produce SDigits
464       tree = loader->TreeS();
465       if (!tree) {
466         loader->MakeTree("S");
467         tree = loader->TreeS();
468        }
469     }
470     else {
471       // If we produce Digits
472       if (!tree) {
473         loader->MakeTree("D");
474         tree = loader->TreeD();
475        }
476     }
477     return MakeBranch(tree);
478   }
479   else {
480     return kFALSE;
481   }
482
483 }
484
485 //_____________________________________________________________________________
486 Bool_t AliTRDdigitizer::InitDetector()
487 {
488   //
489   // Sets the pointer to the TRD detector and the geometry
490   //
491
492   // Get the pointer to the detector class and check for version 1
493   fTRD = (AliTRD *) gAlice->GetDetector("TRD");
494   if (!fTRD) {
495     AliFatal("No TRD module found\n");
496     exit(1);
497   }
498   if (fTRD->IsVersion() != 1) {
499     AliFatal("TRD must be version 1 (slow simulator)\n");
500     exit(1);
501   }
502
503   // Get the geometry
504   fGeo = fTRD->GetGeometry();
505   AliDebug(1,Form("Geometry version %d\n",fGeo->IsVersion()));
506
507   // Create a digits manager
508   delete fDigitsManager;
509   fDigitsManager = new AliTRDdigitsManager();
510   fDigitsManager->SetSDigits(fSDigits);
511   fDigitsManager->CreateArrays();
512   fDigitsManager->SetEvent(fEvent);
513
514   // The list for the input s-digits manager to be merged
515   if (fSDigitsManagerList) {
516     fSDigitsManagerList->Delete();
517   } 
518   else {
519     fSDigitsManagerList = new TList();
520   }
521
522   return kTRUE;
523
524 }
525
526 //_____________________________________________________________________________
527 Bool_t AliTRDdigitizer::MakeBranch(TTree* tree) const
528 {
529   // 
530   // Create the branches for the digits array
531   //
532
533   return fDigitsManager->MakeBranch(tree);
534
535 }
536
537 //_____________________________________________________________________________
538 Bool_t AliTRDdigitizer::MakeDigits()
539 {
540   //
541   // Creates digits.
542   //
543
544   ///////////////////////////////////////////////////////////////
545   // Parameter 
546   ///////////////////////////////////////////////////////////////
547
548   // Converts number of electrons to fC
549   const Double_t kEl2fC  = 1.602E-19 * 1.0E15; 
550
551   ///////////////////////////////////////////////////////////////
552
553   // Number of pads included in the pad response
554   const Int_t kNpad      = 3;
555
556   // Number of track dictionary arrays
557   const Int_t kNDict     = AliTRDdigitsManager::kNDict;
558
559   // Half the width of the amplification region
560   const Float_t kAmWidth = AliTRDgeometry::AmThick() / 2.;
561   // Width of the drift region
562   const Float_t kDrWidth = AliTRDgeometry::DrThick();
563   
564   Int_t    iRow, iCol, iTime, iPad;
565   Int_t    iDict  = 0;
566   Int_t    nBytes = 0;
567
568   Int_t    totalSizeDigits = 0;
569   Int_t    totalSizeDict0  = 0;
570   Int_t    totalSizeDict1  = 0;
571   Int_t    totalSizeDict2  = 0;
572
573   Int_t    timeBinTRFend   = 1;
574
575   Double_t pos[3];
576   Double_t rot[3];
577   Double_t xyz[3];
578   Double_t padSignal[kNpad];
579   Double_t signalOld[kNpad];
580
581   AliTRDdataArrayF *signals  = 0;
582   AliTRDdataArrayI *digits   = 0;
583   AliTRDdataArrayI *dictionary[kNDict];
584
585   AliTRDpadPlane   *padPlane = 0;
586
587   if (!gGeoManager) {
588     AliFatal("No geometry manager!");
589   }
590
591   AliTRDSimParam    *simParam    = AliTRDSimParam::Instance();
592   if (!simParam) {
593     AliError("Could not get simulation parameters\n");
594     return kFALSE;
595   }
596   
597   AliTRDCommonParam *commonParam = AliTRDCommonParam::Instance();
598   if (!commonParam) {
599     AliError("Could not get common params\n");
600     return kFALSE;
601   }
602   
603   // Create a container for the amplitudes
604   AliTRDsegmentArray *signalsArray = new AliTRDsegmentArray("AliTRDdataArrayF"
605                                                            ,AliTRDgeometry::Ndet());
606
607   AliTRDcalibDB* calibration = AliTRDcalibDB::Instance();
608   if (!calibration) {
609     AliError("Could not get calibration object\n");  
610     return kFALSE;
611   }
612
613   if (simParam->TRFOn()) {
614     timeBinTRFend = ((Int_t) (simParam->GetTRFhi() 
615                             * calibration->GetSamplingFrequency())) - 1;
616     AliDebug(1,Form("Sample the TRF up to bin %d\n",timeBinTRFend));
617   }
618
619   Float_t elAttachProp = simParam->GetElAttachProp() / 100.; 
620
621   if (!fGeo) {
622     AliError("No geometry defined\n");
623     return kFALSE;
624   }
625
626   AliDebug(1,"Start creating digits.\n");
627
628   AliLoader* gimme = fRunLoader->GetLoader("TRDLoader");
629   if (!gimme->TreeH()) {
630     gimme->LoadHits();
631   }
632   TTree* hitTree = gimme->TreeH();
633   if (hitTree == 0x0) {
634     AliError("Can not get TreeH");
635     return kFALSE;
636   }
637   fTRD->SetTreeAddress();
638   
639   // Get the number of entries in the hit tree
640   // (Number of primary particles creating a hit somewhere)
641   Int_t nTrack = (Int_t) hitTree->GetEntries();
642   AliDebug(1,Form("Found %d primary particles\n",nTrack));
643   AliDebug(1,Form("Sampling = %.0fMHz\n"        ,calibration->GetSamplingFrequency()));
644   AliDebug(1,Form("Gain     = %d\n"             ,((Int_t) simParam->GetGasGain())));
645   AliDebug(1,Form("Noise     = %d\n"            ,((Int_t) simParam->GetNoise())));
646   if (simParam->TimeStructOn()) {
647     AliDebug(1,"Time Structure of drift cells implemented.\n");
648   } 
649   else {
650     AliDebug(1,"Constant drift velocity in drift cells.\n");
651   }
652   
653   Int_t   detectorOld  = -1;
654   Int_t   countHits    =  0;
655  
656   Int_t   nTimeTotal   = calibration->GetNumberOfTimeBins();
657   Float_t samplingRate = calibration->GetSamplingFrequency();
658
659   // Loop through all entries in the tree
660   for (Int_t iTrack = 0; iTrack < nTrack; iTrack++) {
661
662     gAlice->ResetHits();
663     nBytes += hitTree->GetEvent(iTrack);
664
665     // Loop through the TRD hits
666     Int_t iHit = 0;
667     AliTRDhit *hit = (AliTRDhit *) fTRD->FirstHit(-1);
668     while (hit) {
669  
670       countHits++;
671       iHit++;
672
673               pos[0]        = hit->X();
674               pos[1]        = hit->Y();
675               pos[2]        = hit->Z();
676       Float_t q             = hit->GetCharge();
677       Int_t   track         = hit->Track();
678       Int_t   detector      = hit->GetDetector();
679       Int_t   plane         = fGeo->GetPlane(detector);
680       Int_t   chamber       = fGeo->GetChamber(detector);
681       Float_t time0         = AliTRDgeometry::GetTime0(plane);
682
683       padPlane              = commonParam->GetPadPlane(plane,chamber);
684       Float_t row0          = padPlane->GetRow0();
685       Int_t   nRowMax       = padPlane->GetNrows();
686       Int_t   nColMax       = padPlane->GetNcols();
687       Int_t   inDrift       = 1;
688        
689       // Don't analyze test hits
690       if (((Int_t) q) != 0) {
691
692         if (detector != detectorOld) {
693
694           // Compress the old one if enabled
695           if ((fCompress) && (detectorOld > -1)) {
696             AliDebug(1,"Compress the old container ...");
697             signals->Compress(1,0);
698             for (iDict = 0; iDict < kNDict; iDict++) {
699               dictionary[iDict]->Compress(1,0);
700             }
701           }
702           // Get the new container
703           signals = (AliTRDdataArrayF *) signalsArray->At(detector);
704           if (signals->GetNtime() == 0) {
705             // Allocate a new one if not yet existing
706             signals->Allocate(nRowMax,nColMax,nTimeTotal);
707           }
708           else {
709             // Expand an existing one
710             if (fCompress) {
711               signals->Expand();
712             }
713           }
714           // The same for the dictionary
715           for (iDict = 0; iDict < kNDict; iDict++) {       
716             dictionary[iDict] = fDigitsManager->GetDictionary(detector,iDict);
717             if (dictionary[iDict]->GetNtime() == 0) {
718               dictionary[iDict]->Allocate(nRowMax,nColMax,nTimeTotal);
719             }
720             else {
721               if (fCompress) dictionary[iDict]->Expand();
722             }
723           }      
724           detectorOld = detector;
725         }
726
727         // Rotate the sectors on top of each other       
728         // by using the geoManager
729         Double_t aaa[3];
730         gGeoManager->MasterToLocal(pos,aaa);
731         if (inDrift) {
732           aaa[2] = time0 - (kDrWidth / 2.0 + kAmWidth) + aaa[2];
733         } 
734         else {
735           aaa[2] = time0 + aaa[2];
736         }
737         aaa[1] = row0 + padPlane->GetLengthRim() + fGeo->RpadW() 
738                - 0.5 * fGeo->GetChamberLength(plane,chamber) 
739                + aaa[1];
740         rot[0] = aaa[2];
741         rot[1] = aaa[0];
742         rot[2] = aaa[1];
743
744         // The driftlength. It is negative if the hit is between pad plane and anode wires.
745         Double_t driftlength = time0 - rot[0];
746
747         // Loop over all electrons of this hit
748         // TR photons produce hits with negative charge
749         Int_t nEl = ((Int_t) TMath::Abs(q));
750         for (Int_t iEl = 0; iEl < nEl; iEl++) {
751
752           xyz[0] = rot[0];
753           xyz[1] = rot[1];
754           xyz[2] = rot[2];
755
756           // Stupid patch to take care of TR photons that are absorbed
757           // outside the chamber volume. A real fix would actually need
758           // a more clever implementation of the TR hit generation
759           if (q < 0.0) {
760             if ((xyz[2] < padPlane->GetRowEnd()) ||
761                 (xyz[2] > padPlane->GetRow0())) {
762               if (iEl == 0) {
763                 AliDebug(2,Form("Hit outside of sensitive volume, row (z=%f, row0=%f, rowE=%f)\n"
764                                ,xyz[2],padPlane->GetRow0(),padPlane->GetRowEnd()));
765               }
766               continue;
767             }
768             Float_t tt = driftlength + kAmWidth;
769             if (tt < 0.0 || tt > kDrWidth + 2.*kAmWidth) {
770               if (iEl == 0) {
771                 AliDebug(2,Form("Hit outside of sensitive volume, time (Q = %d)\n"
772                                ,((Int_t) q)));
773               }
774               continue;
775             }
776           }
777
778           // Get row and col of unsmeared electron to retrieve drift velocity
779           // The pad row (z-direction)
780           Int_t    rowE       = padPlane->GetPadRowNumber(xyz[2]);
781           if (rowE < 0) continue;
782           Double_t rowOffset  = padPlane->GetPadRowOffset(rowE,xyz[2]);
783
784           // The pad column (rphi-direction)
785           Double_t offsetTilt = padPlane->GetTiltOffset(rowOffset);
786           Int_t    colE       = padPlane->GetPadColNumber(xyz[1]+offsetTilt,rowOffset);
787           if (colE < 0) continue;         
788           Double_t colOffset  = padPlane->GetPadColOffset(colE,xyz[1]+offsetTilt);
789
790           Float_t driftvelocity = calibration->GetVdrift(detector,colE,rowE);
791                     
792           // Normalised drift length
793           Double_t absdriftlength = TMath::Abs(driftlength);
794           if (commonParam->ExBOn()) {
795             absdriftlength /= TMath::Sqrt(GetLorentzFactor(driftvelocity));
796           }
797
798           // Electron attachment
799           if (simParam->ElAttachOn()) {
800             if (gRandom->Rndm() < (absdriftlength * elAttachProp)) continue;
801           }
802           
803           // Apply the diffusion smearing
804           if (simParam->DiffusionOn()) {
805             if (!(Diffusion(driftvelocity, absdriftlength,xyz))) continue;
806           }
807
808           // Apply E x B effects (depends on drift direction)
809           if (commonParam->ExBOn()) { 
810             if (!(ExB(driftvelocity, driftlength,xyz))) continue;
811           }
812
813           // The electron position after diffusion and ExB in pad coordinates.
814           // The pad row (z-direction)
815           rowE       = padPlane->GetPadRowNumber(xyz[2]);
816           if (rowE < 0) continue;
817           rowOffset  = padPlane->GetPadRowOffset(rowE,xyz[2]);
818
819           // The pad column (rphi-direction)
820           offsetTilt = padPlane->GetTiltOffset(rowOffset);
821           colE       = padPlane->GetPadColNumber(xyz[1]+offsetTilt,rowOffset);
822           if (colE < 0) continue;         
823           colOffset  = padPlane->GetPadColOffset(colE,xyz[1]+offsetTilt);
824           
825           // Also re-retrieve drift velocity because col and row may have changed
826           driftvelocity = calibration->GetVdrift(detector,colE,rowE);
827           Float_t t0    = calibration->GetT0(detector,colE,rowE);
828           
829           // Convert the position to drift time, using either constant drift velocity or
830           // time structure of drift cells (non-isochronity, GARFIELD calculation).
831           Double_t drifttime;
832           if (simParam->TimeStructOn()) {
833             // Get z-position with respect to anode wire:
834             Double_t Z  =  row0 - xyz[2] + simParam->GetAnodeWireOffset();
835             Z -= ((Int_t)(2*Z))/2.0;
836             if (Z > 0.25) {
837               Z  = 0.5 - Z;
838             }
839             // Use drift time map (GARFIELD)
840             drifttime = TimeStruct(driftvelocity,time0-xyz[0]+kAmWidth,Z);
841           } 
842           else {
843             // use constant drift velocity
844             drifttime = TMath::Abs(time0 - xyz[0]) / driftvelocity;
845           }
846
847           // Apply the gas gain including fluctuations
848           Double_t ggRndm = 0.0;
849           do {
850             ggRndm = gRandom->Rndm();
851           } while (ggRndm <= 0);
852           Int_t signal = (Int_t) (-(simParam->GetGasGain()) * TMath::Log(ggRndm));
853
854           // Apply the pad response 
855           if (simParam->PRFOn()) {
856             // The distance of the electron to the center of the pad 
857             // in units of pad width
858             Double_t dist = (colOffset - 0.5*padPlane->GetColSize(colE))
859                           / padPlane->GetColSize(colE);
860             if (!(calibration->PadResponse(signal,dist,plane,padSignal))) continue;
861           }
862           else {
863             padSignal[0] = 0.0;
864             padSignal[1] = signal;
865             padSignal[2] = 0.0;
866           }
867
868           // The time bin (always positive), with t0 correction
869           Double_t timeBinIdeal = drifttime * samplingRate + t0;
870           // Protection 
871           if (TMath::Abs(timeBinIdeal) > 2*nTimeTotal) {
872             timeBinIdeal = 2 * nTimeTotal;
873           }
874           Int_t    timeBinTruncated = (Int_t) timeBinIdeal;
875           // The distance of the position to the middle of the timebin
876           Double_t timeOffset       = ((Float_t) timeBinTruncated 
877                                     + 0.5 - timeBinIdeal) / samplingRate;
878           
879           // Sample the time response inside the drift region
880           // + additional time bins before and after.
881           // The sampling is done always in the middle of the time bin
882           for (Int_t iTimeBin = TMath::Max(timeBinTruncated, 0);
883                iTimeBin < TMath::Min(timeBinTruncated+timeBinTRFend,nTimeTotal);
884                iTimeBin++) {
885
886             // Apply the time response
887             Double_t timeResponse = 1.0;
888             Double_t crossTalk    = 0.0;
889             Double_t time         = (iTimeBin - timeBinTruncated) / samplingRate + timeOffset;
890             if (simParam->TRFOn()) {
891               timeResponse = simParam->TimeResponse(time);
892             }
893       
894             if (simParam->CTOn()) {
895               crossTalk    = simParam->CrossTalk(time);
896             }
897
898             signalOld[0] = 0.0;
899             signalOld[1] = 0.0;
900             signalOld[2] = 0.0;
901
902             for (iPad = 0; iPad < kNpad; iPad++) {
903
904               Int_t colPos = colE + iPad - 1;
905               if (colPos <        0) continue;
906               if (colPos >= nColMax) break;
907
908               // Add the signals
909               Int_t iCurrentTimeBin = iTimeBin;
910               signalOld[iPad]  = signals->GetDataUnchecked(rowE,colPos,iCurrentTimeBin);
911               if( colPos != colE ) {
912                 signalOld[iPad] += padSignal[iPad] * (timeResponse + crossTalk);
913               } 
914               else {
915                 signalOld[iPad] += padSignal[iPad] * timeResponse;
916               }
917               signals->SetDataUnchecked(rowE,colPos,iCurrentTimeBin,signalOld[iPad]);
918
919               // Store the track index in the dictionary
920               // Note: We store index+1 in order to allow the array to be compressed
921               if (signalOld[iPad] > 0) { 
922                 for (iDict = 0; iDict < kNDict; iDict++) {
923                   Int_t oldTrack = dictionary[iDict]->GetDataUnchecked(rowE
924                                                                       ,colPos
925                                                                       ,iCurrentTimeBin);
926                   if (oldTrack == track+1) break;
927                   if (oldTrack ==       0) {
928                     dictionary[iDict]->SetDataUnchecked(rowE,colPos,iCurrentTimeBin,track+1);
929                     break;
930                   }
931                 }
932               }
933
934             } // Loop: pads
935
936           } // Loop: time bins
937
938         } // Loop: electrons of a single hit
939
940       } // If: detector and test hit
941
942       hit = (AliTRDhit *) fTRD->NextHit();   
943
944     } // Loop: hits of one primary track
945
946   } // Loop: primary tracks
947
948   AliDebug(1,Form("Finished analyzing %d hits\n",countHits));
949
950   // The coupling factor
951   Double_t coupling = simParam->GetPadCoupling() 
952                     * simParam->GetTimeCoupling();
953
954   // The conversion factor
955   Double_t convert  = kEl2fC 
956                     * simParam->GetChipGain();
957
958   // Loop through all chambers to finalize the digits
959   Int_t iDetBeg = 0;
960   Int_t iDetEnd = AliTRDgeometry::Ndet();
961   for (Int_t iDet = iDetBeg; iDet < iDetEnd; iDet++) {
962
963     Int_t plane       = fGeo->GetPlane(iDet);
964     Int_t sector      = fGeo->GetSector(iDet);
965     Int_t chamber     = fGeo->GetChamber(iDet);
966     Int_t nRowMax     = commonParam->GetRowMax(plane,chamber,sector);
967     Int_t nColMax     = commonParam->GetColMax(plane);
968
969     Double_t *inADC   = new Double_t[nTimeTotal];
970     Double_t *outADC  = new Double_t[nTimeTotal];
971
972     AliDebug(1,Form("Digitization for chamber %d\n",iDet));
973
974     // Add a container for the digits of this detector
975     digits = fDigitsManager->GetDigits(iDet);        
976     // Allocate memory space for the digits buffer
977     if (digits->GetNtime() == 0) {
978       digits->Allocate(nRowMax,nColMax,nTimeTotal);
979     }
980  
981     // Get the signal container
982     signals = (AliTRDdataArrayF *) signalsArray->At(iDet);
983     if (signals->GetNtime() == 0) {
984       // Create missing containers
985       signals->Allocate(nRowMax,nColMax,nTimeTotal);      
986     }
987     else {
988       // Expand the container if neccessary
989       if (fCompress) signals->Expand();
990     }
991     // Create the missing dictionary containers
992     for (iDict = 0; iDict < kNDict; iDict++) {       
993       dictionary[iDict] = fDigitsManager->GetDictionary(iDet,iDict);
994       if (dictionary[iDict]->GetNtime() == 0) {
995         dictionary[iDict]->Allocate(nRowMax,nColMax,nTimeTotal);
996       } 
997     }
998
999     Int_t nDigits = 0;
1000
1001     // Don't create noise in detectors that are switched off / not installed, etc.
1002     if (!calibration->GetChamberStatus(iDet)) {
1003
1004       // Create the digits for this chamber
1005       for (iRow  = 0; iRow  <  nRowMax;   iRow++ ) {
1006         for (iCol  = 0; iCol  <  nColMax;   iCol++ ) {
1007
1008           // Check whether pad is active / installed / whatever ...
1009           if (calibration->GetPadStatus(iDet,iCol,iRow)) continue;
1010           // Check whether MCM is active / installed / whatever ...
1011           if (calibration->GetMCMStatus(iDet,iCol,iRow)) continue;
1012
1013           // Create summable digits
1014           if (fSDigits) {
1015
1016             for (iTime = 0; iTime < nTimeTotal; iTime++) {         
1017               Float_t signalAmp = signals->GetDataUnchecked(iRow,iCol,iTime);
1018               signalAmp *= fSDigitsScale;
1019               signalAmp  = TMath::Min(signalAmp,(Float_t) 1.0e9);
1020               Int_t adc  = (Int_t) signalAmp;
1021               if (adc > 0) nDigits++;
1022               digits->SetDataUnchecked(iRow,iCol,iTime,adc);
1023             }
1024
1025           }
1026           // Create normal digits
1027           else {
1028
1029             for (iTime = 0; iTime < nTimeTotal; iTime++) {         
1030               Float_t signalAmp = signals->GetDataUnchecked(iRow,iCol,iTime);
1031
1032               // Pad and time coupling
1033               signalAmp *= coupling;
1034
1035               Float_t padgain = calibration->GetGainFactor(iDet, iCol, iRow);
1036               if (padgain <= 0) {
1037                 AliError(Form("Not a valid gain %f, %d %d %d\n", padgain, iDet, iCol, iRow));
1038               }
1039               signalAmp *= padgain;
1040
1041               // Add the noise, starting from minus ADC baseline in electrons
1042               Double_t baselineEl = simParam->GetADCbaseline() * (simParam->GetADCinRange()
1043                                                            / simParam->GetADCoutRange())
1044                                                            / convert;
1045               signalAmp  = TMath::Max((Double_t) gRandom->Gaus(signalAmp,simParam->GetNoise())
1046                                      ,-baselineEl);
1047               // Convert to mV
1048               signalAmp *= convert;
1049               // Add ADC baseline in mV
1050               signalAmp += simParam->GetADCbaseline() * (simParam->GetADCinRange()
1051                                                    / simParam->GetADCoutRange());
1052               // Convert to ADC counts. Set the overflow-bit fADCoutRange if the
1053               // signal is larger than fADCinRange
1054               Int_t adc  = 0;
1055               if (signalAmp >= simParam->GetADCinRange()) {
1056                 adc = ((Int_t) simParam->GetADCoutRange());
1057               }
1058               else {
1059                 adc = TMath::Nint(signalAmp * (simParam->GetADCoutRange()
1060                                            / simParam->GetADCinRange()));
1061               }
1062
1063               inADC[iTime]  = adc;
1064               outADC[iTime] = adc;
1065             }
1066
1067             for (iTime = 0; iTime < nTimeTotal; iTime++) {   
1068               // Store the amplitude of the digit if above threshold
1069               if (outADC[iTime] > simParam->GetADCthreshold()) {
1070                 nDigits++;
1071                 digits->SetDataUnchecked(iRow,iCol,iTime,((Int_t) outADC[iTime]));
1072               }
1073             }
1074
1075           }
1076
1077         }
1078       }
1079
1080     }
1081
1082     // Compress the arrays
1083     digits->Compress(1,0);
1084     for (iDict = 0; iDict < kNDict; iDict++) {
1085       dictionary[iDict]->Compress(1,0);
1086     }
1087
1088     totalSizeDigits += digits->GetSize();
1089     totalSizeDict0  += dictionary[0]->GetSize();
1090     totalSizeDict1  += dictionary[1]->GetSize();
1091     totalSizeDict2  += dictionary[2]->GetSize();
1092
1093     Float_t nPixel = nRowMax * nColMax * nTimeTotal;
1094     AliDebug(1,Form("Found %d digits in detector %d (%3.0f).\n"
1095               ,nDigits,iDet
1096               ,100.0 * ((Float_t) nDigits) / nPixel));
1097
1098     if (fCompress) {
1099       signals->Compress(1,0);
1100     }
1101
1102     delete [] inADC;
1103     delete [] outADC;
1104
1105   }
1106
1107   if (signalsArray) {
1108     delete signalsArray;
1109     signalsArray = 0;
1110   }
1111
1112   AliDebug(1,Form("Total number of analyzed hits = %d\n",countHits));
1113   AliDebug(1,Form("Total digits data size = %d, %d, %d, %d\n",totalSizeDigits
1114                                                              ,totalSizeDict0
1115                                                              ,totalSizeDict1
1116                                                              ,totalSizeDict2));
1117
1118   return kTRUE;
1119
1120 }
1121
1122 //_____________________________________________________________________________
1123 void AliTRDdigitizer::AddSDigitsManager(AliTRDdigitsManager *man)
1124 {
1125   //
1126   // Add a digits manager for s-digits to the input list.
1127   //
1128
1129   fSDigitsManagerList->Add(man);
1130
1131 }
1132
1133 //_____________________________________________________________________________
1134 void AliTRDdigitizer::DeleteSDigitsManager()
1135 {
1136   //
1137   // Removes digits manager from the input list.
1138   //
1139
1140   fSDigitsManagerList->Delete();
1141
1142 }
1143
1144 //_____________________________________________________________________________
1145 Bool_t AliTRDdigitizer::ConvertSDigits()
1146 {
1147   //
1148   // Converts s-digits to normal digits
1149   //
1150
1151   // Number of track dictionary arrays
1152   const Int_t    kNDict = AliTRDdigitsManager::kNDict;
1153
1154   // Converts number of electrons to fC
1155   const Double_t kEl2fC = 1.602E-19 * 1.0E15; 
1156
1157   Int_t iDict = 0;
1158   Int_t iRow;
1159   Int_t iCol;
1160   Int_t iTime;
1161
1162   AliTRDSimParam* simParam = AliTRDSimParam::Instance();
1163   if (!simParam) {
1164     AliError("Could not get simulation parameters\n");
1165     return kFALSE;
1166   }
1167   
1168   AliTRDCommonParam* commonParam = AliTRDCommonParam::Instance();
1169   if (!commonParam) {
1170     AliError("Could not get common parameters\n");
1171     return kFALSE;
1172   }
1173   
1174   AliTRDcalibDB* calibration = AliTRDcalibDB::Instance();
1175   if (!calibration) {
1176     AliError("Could not get calibration object\n");
1177     return kFALSE;
1178   }
1179     
1180   Double_t sDigitsScale = 1.0 / GetSDigitsScale();
1181   Double_t noise        = simParam->GetNoise();
1182   Double_t padCoupling  = simParam->GetPadCoupling();
1183   Double_t timeCoupling = simParam->GetTimeCoupling();
1184   Double_t chipGain     = simParam->GetChipGain();
1185   Double_t coupling     = padCoupling * timeCoupling;
1186   Double_t convert      = kEl2fC * chipGain;
1187   Double_t adcInRange   = simParam->GetADCinRange();
1188   Double_t adcOutRange  = simParam->GetADCoutRange();
1189   Int_t    adcThreshold = simParam->GetADCthreshold();
1190   Int_t    adcBaseline  = simParam->GetADCbaseline();   
1191
1192   Int_t    nTimeTotal   = calibration->GetNumberOfTimeBins();
1193
1194   AliTRDdataArrayI *digitsIn;
1195   AliTRDdataArrayI *digitsOut;
1196   AliTRDdataArrayI *dictionaryIn[kNDict];
1197   AliTRDdataArrayI *dictionaryOut[kNDict];
1198   
1199   // Loop through the detectors
1200   for (Int_t iDet = 0; iDet < AliTRDgeometry::Ndet(); iDet++) {
1201
1202     AliDebug(1,Form("Convert detector %d to digits.\n",iDet));
1203
1204     Int_t plane      = fGeo->GetPlane(iDet);
1205     Int_t sector     = fGeo->GetSector(iDet);
1206     Int_t chamber    = fGeo->GetChamber(iDet);
1207     Int_t nRowMax    = commonParam->GetRowMax(plane,chamber,sector);
1208     Int_t nColMax    = commonParam->GetColMax(plane);
1209
1210     Double_t *inADC  = new Double_t[nTimeTotal];
1211     Double_t *outADC = new Double_t[nTimeTotal];
1212
1213     digitsIn  = fSDigitsManager->GetDigits(iDet);
1214     digitsIn->Expand();
1215     digitsOut = fDigitsManager->GetDigits(iDet);
1216     digitsOut->Allocate(nRowMax,nColMax,nTimeTotal);
1217     for (iDict = 0; iDict < kNDict; iDict++) {
1218       dictionaryIn[iDict]  = fSDigitsManager->GetDictionary(iDet,iDict);
1219       dictionaryIn[iDict]->Expand();
1220       dictionaryOut[iDict] = fDigitsManager->GetDictionary(iDet,iDict);
1221       dictionaryOut[iDict]->Allocate(nRowMax,nColMax,nTimeTotal);
1222     }
1223
1224     for (iRow  = 0; iRow  <  nRowMax;   iRow++ ) {
1225       for (iCol  = 0; iCol  <  nColMax;   iCol++ ) {
1226
1227         for (iTime = 0; iTime < nTimeTotal; iTime++) {
1228
1229           Double_t signal = (Double_t) digitsIn->GetDataUnchecked(iRow,iCol,iTime);
1230           signal *= sDigitsScale;
1231           Float_t padgain = calibration->GetGainFactor(iDet,iCol,iRow);
1232           if (padgain <= 0.0) {
1233             AliError(Form("Not a valid gain %f, %d %d %d\n", padgain, iDet, iCol, iRow));
1234           }
1235
1236           signal *= padgain;
1237           // Pad and time coupling
1238           signal *= coupling;
1239           // Add the noise, starting from minus ADC baseline in electrons
1240           Double_t baselineEl = adcBaseline * (adcInRange / adcOutRange) / convert;
1241           signal  = TMath::Max((Double_t) gRandom->Gaus(signal,noise),-baselineEl);
1242           // Convert to mV
1243           signal *= convert;
1244           // add ADC baseline in mV
1245           signal += adcBaseline * (adcInRange / adcOutRange);
1246           // Convert to ADC counts. Set the overflow-bit adcOutRange if the
1247           // signal is larger than adcInRange
1248           Int_t adc  = 0;
1249           if (signal >= adcInRange) {
1250             adc = ((Int_t) adcOutRange);
1251           }
1252           else {
1253             adc = TMath::Nint(signal * (adcOutRange / adcInRange));
1254           }
1255           inADC[iTime]  = adc;
1256           outADC[iTime] = adc;
1257
1258         }
1259
1260         for (iTime = 0; iTime < nTimeTotal; iTime++) {
1261           // Store the amplitude of the digit if above threshold
1262           if (outADC[iTime] > adcThreshold) {
1263             digitsOut->SetDataUnchecked(iRow,iCol,iTime,((Int_t) outADC[iTime]));
1264             // Copy the dictionary
1265             for (iDict = 0; iDict < kNDict; iDict++) { 
1266               Int_t track = dictionaryIn[iDict]->GetDataUnchecked(iRow,iCol,iTime);
1267               dictionaryOut[iDict]->SetDataUnchecked(iRow,iCol,iTime,track);
1268             }
1269           }
1270         }
1271
1272       }
1273     }
1274
1275     if (fCompress) {
1276       digitsIn->Compress(1,0);
1277       digitsOut->Compress(1,0);
1278       for (iDict = 0; iDict < kNDict; iDict++) {
1279         dictionaryIn[iDict]->Compress(1,0);
1280         dictionaryOut[iDict]->Compress(1,0);
1281       }
1282     }
1283
1284     delete [] inADC;
1285     delete [] outADC;
1286
1287   }    
1288
1289   return kTRUE;
1290
1291 }
1292
1293 //_____________________________________________________________________________
1294 Bool_t AliTRDdigitizer::MergeSDigits()
1295 {
1296   //
1297   // Merges the input s-digits:
1298   //   - The amplitude of the different inputs are summed up.
1299   //   - Of the track IDs from the input dictionaries only one is
1300   //     kept for each input. This works for maximal 3 different merged inputs.
1301   //
1302
1303   // Number of track dictionary arrays
1304   const Int_t kNDict = AliTRDdigitsManager::kNDict;
1305
1306   AliTRDSimParam*    simParam    = AliTRDSimParam::Instance();
1307   if (!simParam) {
1308     AliError("Could not get simulation parameters\n");
1309     return kFALSE;
1310   }
1311   
1312   AliTRDCommonParam* commonParam = AliTRDCommonParam::Instance();
1313   if (!commonParam) {
1314     AliError("Could not get common parameters\n");
1315     return kFALSE;
1316   }
1317   
1318   AliTRDcalibDB*     calibration = AliTRDcalibDB::Instance();
1319   if (!calibration) {
1320     AliError("Could not get calibration object\n");
1321     return kFALSE;
1322   }
1323   
1324   Int_t iDict = 0;
1325   Int_t jDict = 0;
1326
1327   AliTRDdataArrayI *digitsA;
1328   AliTRDdataArrayI *digitsB;
1329   AliTRDdataArrayI *dictionaryA[kNDict];
1330   AliTRDdataArrayI *dictionaryB[kNDict];
1331
1332   // Get the first s-digits
1333   fSDigitsManager = (AliTRDdigitsManager *) fSDigitsManagerList->First();
1334   if (!fSDigitsManager) { 
1335     AliError("No SDigits manager\n");
1336     return kFALSE;
1337   }
1338
1339   // Loop through the other sets of s-digits
1340   AliTRDdigitsManager *mergeSDigitsManager;
1341   mergeSDigitsManager = (AliTRDdigitsManager *) fSDigitsManagerList->After(fSDigitsManager);
1342
1343   if (mergeSDigitsManager) {
1344     AliDebug(1,Form("Merge %d input files.\n",fSDigitsManagerList->GetSize()));
1345   }
1346   else {
1347     AliDebug(1,"Only one input file.\n");
1348   }
1349
1350   Int_t nTimeTotal = calibration->GetNumberOfTimeBins();
1351   
1352   Int_t iMerge = 0;
1353   while (mergeSDigitsManager) {
1354
1355     iMerge++;
1356
1357     // Loop through the detectors
1358     for (Int_t iDet = 0; iDet < AliTRDgeometry::Ndet(); iDet++) {
1359
1360       Int_t plane      = fGeo->GetPlane(iDet);
1361       Int_t sector     = fGeo->GetSector(iDet);
1362       Int_t chamber    = fGeo->GetChamber(iDet);
1363       Int_t nRowMax    = commonParam->GetRowMax(plane,chamber,sector);
1364       Int_t nColMax    = commonParam->GetColMax(plane);
1365
1366       // Loop through the pixels of one detector and add the signals
1367       digitsA = fSDigitsManager->GetDigits(iDet);
1368       digitsB = mergeSDigitsManager->GetDigits(iDet);
1369       digitsA->Expand();
1370       digitsB->Expand();
1371       for (iDict = 0; iDict < kNDict; iDict++) {
1372         dictionaryA[iDict] = fSDigitsManager->GetDictionary(iDet,iDict);
1373         dictionaryB[iDict] = mergeSDigitsManager->GetDictionary(iDet,iDict);
1374         dictionaryA[iDict]->Expand();
1375         dictionaryB[iDict]->Expand();
1376       }
1377
1378       // Merge only detectors that contain a signal
1379       Bool_t doMerge = kTRUE;
1380       if (fMergeSignalOnly) {
1381         if (digitsA->GetOverThreshold(0) == 0) {
1382           doMerge = kFALSE;
1383         }
1384       }
1385
1386       if (doMerge) {
1387
1388         AliDebug(1,Form("Merge detector %d of input no.%d\n",iDet,iMerge+1));
1389
1390         for (Int_t iRow  = 0; iRow  <  nRowMax;   iRow++ ) {
1391           for (Int_t iCol  = 0; iCol  <  nColMax;   iCol++ ) {
1392             for (Int_t iTime = 0; iTime < nTimeTotal; iTime++) {         
1393
1394               // Add the amplitudes of the summable digits 
1395               Int_t ampA = digitsA->GetDataUnchecked(iRow,iCol,iTime);
1396               Int_t ampB = digitsB->GetDataUnchecked(iRow,iCol,iTime);
1397               ampA += ampB;
1398               digitsA->SetDataUnchecked(iRow,iCol,iTime,ampA);
1399
1400               // Add the mask to the track id if defined.
1401               for (iDict = 0; iDict < kNDict; iDict++) {
1402                 Int_t trackB = dictionaryB[iDict]->GetDataUnchecked(iRow,iCol,iTime);
1403                 if ((fMasks) && (trackB > 0)) {
1404                   for (jDict = 0; jDict < kNDict; jDict++) { 
1405                     Int_t trackA = dictionaryA[iDict]->GetDataUnchecked(iRow,iCol,iTime);
1406                     if (trackA == 0) {
1407                       trackA = trackB + fMasks[iMerge];
1408                       dictionaryA[iDict]->SetDataUnchecked(iRow,iCol,iTime,trackA);
1409                     }
1410                   }
1411                 }
1412               }
1413
1414             }
1415           }
1416         }
1417
1418       }
1419
1420       if (fCompress) {
1421         digitsA->Compress(1,0);
1422         digitsB->Compress(1,0);
1423         for (iDict = 0; iDict < kNDict; iDict++) {
1424           dictionaryA[iDict]->Compress(1,0);
1425           dictionaryB[iDict]->Compress(1,0);
1426         }
1427       }
1428
1429     }    
1430
1431     // The next set of s-digits
1432     mergeSDigitsManager = (AliTRDdigitsManager *) fSDigitsManagerList->After(mergeSDigitsManager);
1433
1434   }
1435
1436   return kTRUE;
1437
1438 }
1439
1440 //_____________________________________________________________________________
1441 Bool_t AliTRDdigitizer::SDigits2Digits()
1442 {
1443   //
1444   // Merges the input s-digits and converts them to normal digits
1445   //
1446
1447   if (!MergeSDigits()) return kFALSE;
1448
1449   return ConvertSDigits();
1450
1451 }
1452
1453 //_____________________________________________________________________________
1454 Bool_t AliTRDdigitizer::WriteDigits() const
1455 {
1456   //
1457   // Writes out the TRD-digits and the dictionaries
1458   //
1459
1460   //Write parameters
1461   fRunLoader->CdGAFile();
1462
1463   // Store the digits and the dictionary in the tree
1464   return fDigitsManager->WriteDigits();
1465
1466 }
1467
1468 //_____________________________________________________________________________
1469 void AliTRDdigitizer::InitOutput(Int_t iEvent)
1470 {
1471   //
1472   // Initializes the output branches
1473   //
1474
1475   fEvent = iEvent;
1476    
1477   if (!fRunLoader) {
1478     AliError("Run Loader is NULL");
1479     return;  
1480   }
1481
1482   AliLoader* loader = fRunLoader->GetLoader("TRDLoader");
1483   if (!loader) {
1484     AliError("Can not get TRD loader from Run Loader");
1485     return;
1486   }
1487
1488   TTree* tree = 0;
1489   
1490   if (fSDigits) { 
1491     // If we produce SDigits
1492     tree = loader->TreeS();
1493     if (!tree) {
1494       loader->MakeTree("S");
1495       tree = loader->TreeS();
1496     }
1497   }
1498   else {
1499     // If we produce Digits
1500     tree = loader->TreeD();
1501     if (!tree) {
1502       loader->MakeTree("D");
1503       tree = loader->TreeD();
1504     }
1505   }
1506
1507   fDigitsManager->SetEvent(iEvent);
1508   fDigitsManager->MakeBranch(tree);
1509
1510 }
1511
1512 //_____________________________________________________________________________
1513 Double_t AliTRDdigitizer::TimeStruct(Float_t vdrift, Double_t dist, Double_t z)
1514 {
1515   //
1516   // Applies the time structure of the drift cells (by C.Lippmann).
1517   // The drift time of electrons to the anode wires depends on the
1518   // distance to the wire (z) and on the position in the drift region.
1519   // 
1520   // input :
1521   // dist = radial distance from (cathode) pad plane [cm]
1522   // z    = distance from anode wire (parallel to cathode planes) [cm]
1523   //
1524   // output :
1525   // tdrift = the drift time of an electron at the given position
1526   //
1527   // We interpolate between the drift time values at the two drift
1528   // velocities fVDlo and fVDhi, being smaller and larger than
1529   // fDriftVelocity. We use the two stored drift time maps fTimeStruct1
1530   // and fTimeStruct2, calculated for the two mentioned drift velocities.
1531   //
1532
1533   SampleTimeStruct(vdrift);
1534   
1535   // indices:
1536   Int_t r1 = (Int_t)(10*dist);
1537   if (r1 <  0) r1 =  0;
1538   if (r1 > 37) r1 = 37;
1539   Int_t r2 = r1 + 1;
1540   if (r2 <  0) r2 =  0;
1541   if (r2 > 37) r2 = 37;
1542   const Int_t kz1 = ((Int_t)(100 * z / 2.5));
1543   const Int_t kz2 = kz1 + 1;
1544
1545   if ((r1 <  0) || (r1 > 37) || (kz1 <  0) || (kz1 > 10)) {
1546     AliWarning(Form("Indices out of range: dist=%.2f, z=%.2f, r1=%d, kz1=%d\n"
1547                    ,dist,z,r1,kz1));
1548   }
1549
1550   const Float_t ky111 = fTimeStructInfo.fTimeStruct1[r1+38*kz1];
1551   const Float_t ky221 = ((r2 <= 37) && (kz2 <= 10)) 
1552                       ? fTimeStructInfo.fTimeStruct1[r2+38*kz2] 
1553                       : fTimeStructInfo.fTimeStruct1[37+38*10];
1554   const Float_t ky121 = (kz2 <= 10)             
1555                       ? fTimeStructInfo.fTimeStruct1[r1+38*kz2] 
1556                       : fTimeStructInfo.fTimeStruct1[r1+38*10];
1557   const Float_t ky211 = (r2 <= 37)              
1558                       ? fTimeStructInfo.fTimeStruct1[r2+38*kz1] 
1559                       : fTimeStructInfo.fTimeStruct1[37+38*kz1];
1560
1561   // 2D Interpolation, lower drift time map
1562   const Float_t ky11  = (ky211-ky111)*10*dist + ky111 - (ky211-ky111)*r1;
1563   const Float_t ky21  = (ky221-ky121)*10*dist + ky121 - (ky221-ky121)*r1;
1564
1565   const Float_t ky112 = fTimeStructInfo.fTimeStruct2[r1+38*kz1];
1566   const Float_t ky222 = ((r2 <= 37) && (kz2 <= 10)) 
1567                       ? fTimeStructInfo.fTimeStruct2[r2+38*kz2] 
1568                       : fTimeStructInfo.fTimeStruct2[37+38*10];
1569   const Float_t ky122 = (kz2 <= 10)             
1570                       ? fTimeStructInfo.fTimeStruct2[r1+38*kz2] 
1571                       : fTimeStructInfo.fTimeStruct2[r1+38*10];
1572   const Float_t ky212 = (r2 <= 37)              
1573                       ? fTimeStructInfo.fTimeStruct2[r2+38*kz1] 
1574                       : fTimeStructInfo.fTimeStruct2[37+38*kz1];
1575
1576   // 2D Interpolation, larger drift time map
1577   const Float_t ky12  = (ky212-ky112)*10*dist + ky112 - (ky212-ky112)*r1;
1578   const Float_t ky22  = (ky222-ky122)*10*dist + ky122 - (ky222-ky122)*r1;
1579
1580   // dist now is the drift distance to the anode wires (negative if electrons are
1581   // between anode wire plane and cathode pad plane)
1582   dist -= AliTRDgeometry::AmThick() / 2.0;
1583
1584   // Get the drift times for the drift velocities fVDlo and fVDhi
1585   const Float_t ktdrift1 = ((TMath::Abs(dist) > 0.005) || (z > 0.005)) 
1586                          ? (ky21 - ky11) * 100 * z / 2.5 + ky11 - (ky21 - ky11) * kz1 
1587                          : 0.0;
1588   const Float_t ktdrift2 = ((TMath::Abs(dist) > 0.005) || (z > 0.005)) 
1589                          ? (ky22 - ky12) * 100 * z / 2.5 + ky12 - (ky22 - ky12) * kz1 
1590                          : 0.0;
1591
1592   // 1D Interpolation between the values at fVDlo and fVDhi
1593   Float_t a = (ktdrift2 - ktdrift1) / (fTimeStructInfo.fVDhi - fTimeStructInfo.fVDlo);
1594   Float_t b = ktdrift2 - a * fTimeStructInfo.fVDhi;
1595
1596   return a * vdrift + b;
1597
1598 }
1599
1600 //_____________________________________________________________________________
1601 void AliTRDdigitizer::SampleTimeStruct(Float_t vdrift)
1602 {
1603   //
1604   // Samples the timing structure of a drift cell
1605   // Drift Time data calculated with Garfield (by C.Lippmann)
1606   //
1607   
1608   // TODO make caching proper, if same timing structure is selected: do not update timestructs!
1609   
1610   // Noting to do
1611   if (vdrift == fTimeStructInfo.fLastVdrift) {
1612     return;
1613   }
1614
1615   fTimeStructInfo.fLastVdrift = vdrift;
1616   
1617   // Drift time maps are saved for some drift velocity values (in drift region):
1618   Float_t  fVDsmp[8];
1619   fVDsmp[0] = 1.032;
1620   fVDsmp[1] = 1.158;
1621   fVDsmp[2] = 1.299;
1622   fVDsmp[3] = 1.450;
1623   fVDsmp[4] = 1.610;
1624   fVDsmp[5] = 1.783;
1625   fVDsmp[6] = 1.959;
1626   fVDsmp[7] = 2.134;
1627
1628   if      (vdrift < fVDsmp[0]) {
1629     AliWarning(Form("Drift Velocity too small (%.3f<%.3f)\n",vdrift,fVDsmp[0]));
1630     vdrift = fVDsmp[0];
1631   } 
1632   else if (vdrift > fVDsmp[7]) {
1633     AliWarning(Form("Drift Velocity too large (%.3f>%.3f)\n",vdrift,fVDsmp[6]));
1634     vdrift = fVDsmp[7];
1635   }
1636
1637   const Int_t ktimebin  = 38;
1638   const Int_t kZbin     = 11;
1639
1640   // Garfield simulation at UD = -1500V; vd = 1.032cm/microsec, <driftfield> = 525V/cm
1641   Float_t time1500[ktimebin][kZbin] =
1642       {{0.09170, 0.09205, 0.09306, 0.09475, 0.09716, 0.10035,
1643         0.10445, 0.10993, 0.11838, 0.13986, 0.37858},
1644        {0.06588, 0.06626, 0.06739, 0.06926, 0.07186, 0.07524,
1645         0.07951, 0.08515, 0.09381, 0.11601, 0.35673},
1646        {0.03946, 0.04003, 0.04171, 0.04435, 0.04780, 0.05193,
1647         0.05680, 0.06306, 0.07290, 0.09873, 0.34748},
1648        {0.01151, 0.01283, 0.01718, 0.02282, 0.02880, 0.03479,
1649         0.04098, 0.04910, 0.06413, 0.10567, 0.36897},
1650        {0.01116, 0.01290, 0.01721, 0.02299, 0.02863, 0.03447,
1651         0.04074, 0.04984, 0.06839, 0.11625, 0.37277},
1652        {0.03919, 0.03974, 0.04131, 0.04380, 0.04703, 0.05102,
1653         0.05602, 0.06309, 0.07651, 0.10938, 0.36838},
1654        {0.06493, 0.06560, 0.06640, 0.06802, 0.07051, 0.07392,
1655         0.07853, 0.08510, 0.09690, 0.12621, 0.38058},
1656        {0.09174, 0.09186, 0.09225, 0.09303, 0.09477, 0.00000,
1657         0.11205, 0.11952, 0.13461, 0.16984, 0.43017},
1658        {0.14356, 0.14494, 0.14959, 0.16002, 0.18328, 0.27981,
1659         0.22785, 0.21240, 0.21948, 0.25965, 0.52392},
1660        {0.23120, 0.23366, 0.24046, 0.25422, 0.28071, 0.36914,
1661         0.32999, 0.31208, 0.31772, 0.35804, 0.62249},
1662        {0.32686, 0.32916, 0.33646, 0.35053, 0.37710, 0.46292,
1663         0.42773, 0.40948, 0.41497, 0.45527, 0.71955},
1664        {0.42353, 0.42583, 0.43317, 0.44727, 0.47380, 0.55884,
1665         0.52479, 0.50650, 0.51194, 0.55225, 0.81658},
1666        {0.52038, 0.52271, 0.53000, 0.54415, 0.57064, 0.65545,
1667         0.62172, 0.60341, 0.60885, 0.64915, 0.91339},
1668        {0.61724, 0.61953, 0.62694, 0.64098, 0.66756, 0.75226,
1669         0.71862, 0.70030, 0.70575, 0.74604, 1.01035},
1670        {0.71460, 0.71678, 0.72376, 0.73786, 0.76447, 0.84913,
1671         0.81551, 0.79720, 0.80264, 0.84292, 1.10723},
1672        {0.81101, 0.81334, 0.82066, 0.83475, 0.86127, 0.94599,
1673         0.91240, 0.89408, 0.89952, 0.93981, 1.20409},
1674        {0.90788, 0.91023, 0.91752, 0.93163, 0.95815, 1.04293,
1675         1.00929, 0.99096, 0.99640, 1.03669, 1.30106},
1676        {1.00477, 1.00707, 1.01449, 1.02852, 1.05504, 1.13976,
1677         1.10617, 1.08784, 1.09329, 1.13358, 1.39796},
1678        {1.10166, 1.10397, 1.11130, 1.12541, 1.15257, 1.23672,
1679         1.20307, 1.18472, 1.19018, 1.23046, 1.49486},
1680        {1.19854, 1.20084, 1.20818, 1.22235, 1.24885, 1.33355,
1681         1.29992, 1.28156, 1.28707, 1.32735, 1.59177},
1682        {1.29544, 1.29780, 1.30507, 1.31917, 1.34575, 1.43073,
1683         1.39681, 1.37851, 1.38396, 1.42377, 1.68854},
1684        {1.39236, 1.39462, 1.40205, 1.41607, 1.44259, 1.52745,
1685         1.49368, 1.47541, 1.48083, 1.52112, 1.78546},
1686        {1.49314, 1.49149, 1.49885, 1.51297, 1.53949, 1.62420,
1687         1.59016, 1.57231, 1.57772, 1.61800, 1.88048},
1688        {1.58610, 1.58839, 1.59572, 1.60983, 1.63635, 1.72109,
1689         1.68651, 1.66921, 1.67463, 1.71489, 1.97918},
1690        {1.68400, 1.68529, 1.69261, 1.70671, 1.73331, 1.81830,
1691         1.78341, 1.76605, 1.77150, 1.81179, 2.07608},
1692        {1.77991, 1.78215, 1.78952, 1.80385, 1.83014, 1.91486,
1693         1.88128, 1.86215, 1.86837, 1.90865, 2.17304},
1694        {1.87674, 1.87904, 1.88647, 1.90052, 1.92712, 2.01173,
1695         1.97812, 1.95905, 1.96527, 2.00710, 2.26979},
1696        {1.97369, 1.97594, 1.98326, 1.99869, 2.02442, 2.10865,
1697         2.07501, 2.05666, 2.06214, 2.10243, 2.36669},
1698        {2.07052, 2.07281, 2.08016, 2.09425, 2.12132, 2.20555,
1699         2.17182, 2.15341, 2.15904, 2.19933, 2.46363},
1700        {2.16742, 2.16971, 2.17707, 2.19114, 2.21766, 2.30240,
1701         2.26877, 2.25015, 2.25573, 2.29586, 2.56060},
1702        {2.26423, 2.26659, 2.27396, 2.28803, 2.31456, 2.40828,
1703         2.36567, 2.34705, 2.35282, 2.39765, 2.65744},
1704        {2.36153, 2.36349, 2.37330, 2.38501, 2.41159, 2.49940,
1705         2.46257, 2.44420, 2.44843, 2.48987, 2.75431},
1706        {2.46558, 2.46035, 2.46822, 2.48181, 2.50849, 2.59630,
1707         2.55947, 2.54112, 2.54513, 2.58677, 2.85094},
1708        {2.56248, 2.55723, 2.56486, 2.57871, 2.60520, 2.68998,
1709         2.65626, 2.63790, 2.64316, 2.68360, 2.94813},
1710        {2.65178, 2.65441, 2.66153, 2.67556, 2.70210, 2.78687,
1711         2.75319, 2.73463, 2.74032, 2.78060, 3.04503},
1712        {2.74868, 2.75131, 2.75870, 2.77245, 2.79385, 2.88700,
1713         2.85009, 2.83177, 2.83723, 2.87750, 3.14193},
1714        {2.84574, 2.84789, 2.85560, 2.86935, 2.89075, 2.98060,
1715         2.94576, 2.92868, 2.93356, 2.97436, 3.23868},
1716        {2.94239, 2.94469, 2.95221, 2.96625, 2.99345, 3.07747,
1717         3.04266, 3.02545, 3.03051, 3.07118, 3.33555}};
1718   
1719   // Garfield simulation at UD = -1600V; vd = 1.158cm/microsec, <driftfield> = 558V/cm
1720   Float_t time1600[ktimebin][kZbin] =
1721       {{0.09169, 0.09203, 0.09305, 0.09473, 0.09714, 0.10032,
1722         0.10441, 0.10990, 0.11835, 0.13986, 0.37845},
1723        {0.06589, 0.06626, 0.06738, 0.06924, 0.07184, 0.07521,
1724         0.07947, 0.08512, 0.09379, 0.11603, 0.35648},
1725        {0.03947, 0.04003, 0.04171, 0.04434, 0.04778, 0.05190,
1726         0.05678, 0.06304, 0.07292, 0.09876, 0.34759},
1727        {0.01111, 0.01281, 0.01718, 0.02281, 0.02879, 0.03477,
1728         0.04097, 0.04910, 0.06415, 0.10573, 0.36896},
1729        {0.01120, 0.01311, 0.01721, 0.02279, 0.02862, 0.03446,
1730         0.04074, 0.04981, 0.06825, 0.11595, 0.37255},
1731        {0.03919, 0.03980, 0.04132, 0.04380, 0.04704, 0.05102,
1732         0.05602, 0.06302, 0.07633, 0.10896, 0.36743},
1733        {0.06531, 0.06528, 0.06631, 0.06805, 0.07053, 0.07392,
1734         0.07853, 0.08505, 0.09669, 0.12578, 0.37967},
1735        {0.09157, 0.09171, 0.09216, 0.09301, 0.09475, 0.00000,
1736         0.11152, 0.11879, 0.13352, 0.16802, 0.42750},
1737        {0.13977, 0.14095, 0.14509, 0.15433, 0.17534, 0.26406,
1738         0.21660, 0.20345, 0.21113, 0.25067, 0.51434},
1739        {0.21816, 0.22041, 0.22631, 0.23850, 0.26208, 0.34340,
1740         0.30755, 0.29237, 0.29878, 0.33863, 0.60258},
1741        {0.30344, 0.30547, 0.31241, 0.32444, 0.34809, 0.42696,
1742         0.39464, 0.37919, 0.38546, 0.42530, 0.68926},
1743        {0.38969, 0.39164, 0.39810, 0.41059, 0.43441, 0.51246,
1744         0.48112, 0.46562, 0.47191, 0.51172, 0.77558},
1745        {0.47592, 0.47799, 0.48442, 0.49689, 0.52061, 0.59855,
1746         0.56752, 0.55201, 0.55826, 0.59808, 0.86202},
1747        {0.56226, 0.56428, 0.57074, 0.58324, 0.60696, 0.68483,
1748         0.65388, 0.63837, 0.64461, 0.68445, 0.94830},
1749        {0.64881, 0.65063, 0.65709, 0.66958, 0.69331, 0.77117,
1750         0.74023, 0.72472, 0.73098, 0.77079, 1.03486},
1751        {0.73506, 0.73698, 0.74344, 0.75596, 0.77964, 0.85751,
1752         0.82658, 0.81107, 0.81731, 0.85712, 1.12106},
1753        {0.82132, 0.82333, 0.82979, 0.84228, 0.86608, 0.94386,
1754         0.91293, 0.89742, 0.90367, 0.94335, 1.20737},
1755        {0.90767, 0.90968, 0.91614, 0.92863, 0.95236, 1.03021,
1756         0.99928, 0.98377, 0.99001, 1.02984, 1.29371},
1757        {0.99410, 0.99602, 1.00257, 1.01498, 1.03869, 1.11720,
1758         1.08563, 1.07011, 1.07637, 1.11621, 1.37873},
1759        {1.08036, 1.08240, 1.08884, 1.10138, 1.12504, 1.20301,
1760         1.17198, 1.15647, 1.16272, 1.20255, 1.46651},
1761        {1.16670, 1.16872, 1.17525, 1.18783, 1.21139, 1.28934,
1762         1.25833, 1.24281, 1.24909, 1.28889, 1.55275},
1763        {1.25307, 1.25510, 1.26153, 1.27404, 1.29773, 1.37584,
1764         1.34469, 1.32916, 1.33536, 1.37524, 1.63915},
1765        {1.33942, 1.34146, 1.34788, 1.36040, 1.38410, 1.46438,
1766         1.43105, 1.41537, 1.42176, 1.46158, 1.72538},
1767        {1.42579, 1.42782, 1.43458, 1.44674, 1.47043, 1.55085,
1768         1.51675, 1.50168, 1.50810, 1.54793, 1.81174},
1769        {1.51207, 1.51454, 1.52060, 1.53307, 1.55684, 1.63478,
1770         1.60336, 1.58820, 1.59446, 1.63414, 1.89814},
1771        {1.59856, 1.60047, 1.60693, 1.61942, 1.64317, 1.72257,
1772         1.69008, 1.67454, 1.68080, 1.72063, 1.98433},
1773        {1.68481, 1.68682, 1.69330, 1.70584, 1.72949, 1.80752,
1774         1.77643, 1.76089, 1.76716, 1.80692, 2.07069},
1775        {1.77117, 1.77319, 1.77969, 1.79260, 1.81583, 1.89376,
1776         1.86226, 1.84720, 1.85355, 1.89256, 2.15343},
1777        {1.85748, 1.85967, 1.86605, 1.87848, 1.90222, 1.98010,
1778         1.94913, 1.93271, 1.93981, 1.97968, 2.24355},
1779        {1.94386, 1.94587, 1.95233, 1.96484, 1.98854, 2.06646,
1780         2.03542, 2.01755, 2.02617, 2.06604, 2.32993},
1781        {2.03022, 2.03230, 2.03868, 2.05134, 2.07488, 2.15367,
1782         2.12178, 2.10391, 2.11252, 2.15432, 2.41623},
1783        {2.11656, 2.11857, 2.12505, 2.13772, 2.16147, 2.23919,
1784         2.20817, 2.19265, 2.20744, 2.23872, 2.49996},
1785        {2.20291, 2.20611, 2.21137, 2.22387, 2.24758, 2.32563,
1786         2.29450, 2.27901, 2.28525, 2.32507, 2.58897},
1787        {2.28922, 2.29172, 2.29774, 2.31345, 2.33400, 2.41287,
1788         2.38086, 2.36535, 2.37160, 2.40869, 2.67113},
1789        {2.37572, 2.37764, 2.38410, 2.39803, 2.42046, 2.49817,
1790         2.46721, 2.45171, 2.45794, 2.49505, 2.76061},
1791        {2.46190, 2.46396, 2.47043, 2.48340, 2.50665, 2.58453,
1792         2.55357, 2.53728, 2.54430, 2.58407, 2.84816},
1793        {2.54833, 2.55032, 2.55679, 2.56976, 2.59312, 2.67103,
1794         2.63993, 2.62364, 2.63062, 2.67040, 2.93444},
1795        {2.63456, 2.63660, 2.64304, 2.65555, 2.67938, 2.75739,
1796         2.72629, 2.71064, 2.71688, 2.75671, 3.01886}};
1797   
1798   // Garfield simulation at UD = -1700V; vd = 1.299cm/microsec, <driftfield> = 590V/cm
1799   Float_t time1700[ktimebin][kZbin] =
1800       {{0.09167, 0.09201, 0.09302, 0.09471, 0.09712, 0.10029,
1801         0.10438, 0.10986, 0.11832, 0.13986, 0.37824},
1802        {0.06591, 0.06626, 0.06736, 0.06923, 0.07183, 0.07519,
1803         0.07944, 0.08511, 0.09378, 0.11603, 0.35625},
1804        {0.03946, 0.04003, 0.04170, 0.04433, 0.04777, 0.05189,
1805         0.05676, 0.06301, 0.07291, 0.09880, 0.34724},
1806        {0.01110, 0.01281, 0.01718, 0.02280, 0.02879, 0.03476,
1807         0.04096, 0.04910, 0.06417, 0.10582, 0.36861},
1808        {0.01115, 0.01294, 0.01721, 0.02276, 0.02862, 0.03447,
1809         0.04074, 0.04980, 0.06812, 0.11565, 0.37231},
1810        {0.03920, 0.03974, 0.04133, 0.04381, 0.04706, 0.05105,
1811         0.05603, 0.06299, 0.07618, 0.10860, 0.36646},
1812        {0.06498, 0.06529, 0.06634, 0.06808, 0.07055, 0.07395,
1813         0.07852, 0.08500, 0.09650, 0.12532, 0.37850},
1814        {0.09143, 0.09159, 0.09207, 0.09297, 0.09473, 0.00000,
1815         0.11102, 0.11809, 0.13245, 0.16627, 0.42496},
1816        {0.13646, 0.13750, 0.14112, 0.14926, 0.16806, 0.24960,
1817         0.20627, 0.19536, 0.20366, 0.24256, 0.50557},
1818        {0.20678, 0.20848, 0.21384, 0.22450, 0.24552, 0.32018,
1819         0.28740, 0.27477, 0.28196, 0.32128, 0.58475},
1820        {0.28287, 0.28461, 0.29020, 0.30108, 0.32224, 0.39467,
1821         0.36500, 0.35217, 0.35926, 0.39860, 0.66194},
1822        {0.35972, 0.36145, 0.36713, 0.37797, 0.39912, 0.47091,
1823         0.44212, 0.42925, 0.43632, 0.47563, 0.73892},
1824        {0.43667, 0.43841, 0.44413, 0.45494, 0.47607, 0.54780,
1825         0.51912, 0.50627, 0.51334, 0.55254, 0.81595},
1826        {0.51365, 0.51540, 0.52101, 0.53193, 0.55305, 0.62463,
1827         0.59617, 0.58328, 0.59035, 0.62965, 0.89303},
1828        {0.59064, 0.59240, 0.59801, 0.60893, 0.63009, 0.70169,
1829         0.67317, 0.66028, 0.66735, 0.70666, 0.96995},
1830        {0.66765, 0.66939, 0.67501, 0.68592, 0.70724, 0.77863,
1831         0.75016, 0.73728, 0.74435, 0.78366, 1.04696},
1832        {0.74464, 0.74636, 0.75200, 0.76293, 0.78405, 0.85561,
1833         0.82716, 0.81427, 0.82133, 0.86064, 1.12396},
1834        {0.82165, 0.82340, 0.82902, 0.83991, 0.86104, 0.93266,
1835         0.90414, 0.89128, 0.89834, 0.93763, 1.20100},
1836        {0.89863, 0.90042, 0.90659, 0.91705, 0.93805, 1.00960,
1837         0.98115, 0.96825, 0.97533, 1.01462, 1.27801},
1838        {0.97563, 0.97740, 0.98310, 0.99391, 1.01504, 1.08659,
1839         1.05814, 1.04526, 1.05233, 1.09163, 1.35503},
1840        {1.05276, 1.05451, 1.06002, 1.07090, 1.09099, 1.16357,
1841         1.13516, 1.12225, 1.12933, 1.16863, 1.43195},
1842        {1.12977, 1.13138, 1.13700, 1.14792, 1.16797, 1.24061,
1843         1.21212, 1.19926, 1.20626, 1.24554, 1.50900},
1844        {1.20664, 1.20839, 1.21400, 1.22490, 1.24606, 1.31772,
1845         1.28914, 1.27382, 1.28329, 1.32262, 1.58550},
1846        {1.28367, 1.28541, 1.29099, 1.30189, 1.32312, 1.39460,
1847         1.36612, 1.34924, 1.36030, 1.39961, 1.66310},
1848        {1.36064, 1.36249, 1.36799, 1.37896, 1.40004, 1.48030,
1849         1.44314, 1.43032, 1.43731, 1.47659, 1.73442},
1850        {1.43762, 1.43937, 1.44497, 1.45618, 1.47704, 1.54932,
1851         1.52012, 1.50725, 1.51430, 1.55357, 1.81708},
1852        {1.51462, 1.51937, 1.52203, 1.53316, 1.55403, 1.62572,
1853         1.59713, 1.58424, 1.59128, 1.63061, 1.89406},
1854        {1.59162, 1.59338, 1.59947, 1.60989, 1.63103, 1.70270,
1855         1.67411, 1.66124, 1.66799, 1.70759, 1.97103},
1856        {1.66874, 1.67037, 1.67597, 1.68687, 1.70814, 1.77969,
1857         1.75112, 1.73806, 1.74530, 1.78457, 2.04794},
1858        {1.74693, 1.74749, 1.75297, 1.76476, 1.78500, 1.85667,
1859         1.82811, 1.81504, 1.82101, 1.86161, 2.12492},
1860        {1.82260, 1.82437, 1.82995, 1.84174, 1.86202, 1.93372,
1861         1.90509, 1.89202, 1.89930, 1.93859, 2.20189},
1862        {1.89964, 1.90135, 1.90693, 1.91789, 1.93952, 2.01080,
1863         1.98207, 1.96921, 1.97628, 2.01384, 2.27887},
1864        {1.97662, 1.97917, 1.98611, 1.99487, 2.01601, 2.08778,
1865         2.05846, 2.04623, 2.05330, 2.09244, 2.35585},
1866        {2.05359, 2.05615, 2.06309, 2.07187, 2.09867, 2.16459,
1867         2.13610, 2.12322, 2.13029, 2.16942, 2.43199},
1868        {2.13063, 2.13233, 2.13795, 2.14886, 2.17008, 2.24199,
1869         2.21310, 2.20020, 2.20727, 2.24659, 2.50983},
1870        {2.20761, 2.20931, 2.21955, 2.22624, 2.24708, 2.32147,
1871         2.29009, 2.27725, 2.28276, 2.32359, 2.58680},
1872        {2.28459, 2.29108, 2.29202, 2.30286, 2.32007, 2.39559,
1873         2.36683, 2.35422, 2.36119, 2.40058, 2.66081},
1874        {2.36153, 2.36806, 2.36889, 2.37985, 2.40092, 2.47828,
1875         2.44381, 2.43099, 2.43819, 2.47750, 2.73779}};
1876   
1877   // Garfield simulation at UD = -1800V; vd = 1.450cm/microsec, <driftfield> = 623V/cm
1878   Float_t time1800[ktimebin][kZbin] =
1879       {{0.09166, 0.09199, 0.09300, 0.09470, 0.09709, 0.10026,
1880         0.10434, 0.10983, 0.11831, 0.13987, 0.37802},
1881        {0.06585, 0.06623, 0.06735, 0.06921, 0.07180, 0.07520,
1882         0.07941, 0.08507, 0.09376, 0.11604, 0.35624},
1883        {0.03945, 0.04004, 0.04169, 0.04432, 0.04776, 0.05187,
1884         0.05674, 0.06300, 0.07290, 0.09884, 0.34704},
1885        {0.01108, 0.01287, 0.01717, 0.02280, 0.02880, 0.03476,
1886         0.04095, 0.04909, 0.06419, 0.10589, 0.36843},
1887        {0.01115, 0.01287, 0.01720, 0.02276, 0.02862, 0.03448,
1888         0.04073, 0.04973, 0.06799, 0.11535, 0.37224},
1889        {0.03918, 0.03975, 0.04134, 0.04382, 0.04707, 0.05105,
1890         0.05603, 0.06296, 0.07605, 0.10822, 0.36560},
1891        {0.06498, 0.06532, 0.06635, 0.06809, 0.07058, 0.07395,
1892         0.07855, 0.08495, 0.09632, 0.12488, 0.37730},
1893        {0.09130, 0.09160, 0.09199, 0.09300, 0.09472, 0.00000,
1894         0.11059, 0.11747, 0.13146, 0.16462, 0.42233},
1895        {0.13364, 0.13449, 0.13767, 0.14481, 0.16147, 0.23635,
1896         0.19706, 0.18812, 0.19704, 0.23520, 0.49749},
1897        {0.19698, 0.19844, 0.20311, 0.21236, 0.23082, 0.29920,
1898         0.26936, 0.25927, 0.26732, 0.30601, 0.56871},
1899        {0.26518, 0.26670, 0.27160, 0.28099, 0.29955, 0.36597,
1900         0.33885, 0.32858, 0.33653, 0.37524, 0.63801},
1901        {0.33441, 0.33553, 0.34040, 0.34987, 0.36841, 0.43428,
1902         0.40797, 0.39763, 0.40556, 0.44425, 0.70698},
1903        {0.40296, 0.40447, 0.40934, 0.41881, 0.43737, 0.50306,
1904         0.47695, 0.46662, 0.47455, 0.51329, 0.77600},
1905        {0.47296, 0.47344, 0.47830, 0.48779, 0.50632, 0.57200,
1906         0.54593, 0.53559, 0.54351, 0.58222, 0.84489},
1907        {0.54089, 0.54264, 0.54727, 0.55673, 0.57529, 0.64094,
1908         0.61490, 0.60457, 0.61249, 0.65118, 0.91394},
1909        {0.60987, 0.61138, 0.61624, 0.62573, 0.64428, 0.70989,
1910         0.68397, 0.67354, 0.68147, 0.72015, 0.98291},
1911        {0.67883, 0.68035, 0.68521, 0.69469, 0.71324, 0.77896,
1912         0.75287, 0.74251, 0.75043, 0.78912, 1.04458},
1913        {0.74780, 0.74932, 0.75421, 0.76367, 0.78221, 0.84785,
1914         0.82185, 0.81148, 0.81941, 0.85811, 1.12085},
1915        {0.81690, 0.81830, 0.82316, 0.83263, 0.85120, 0.91683,
1916         0.89077, 0.88045, 0.88837, 0.92707, 1.18976},
1917        {0.88574, 0.88726, 0.89228, 0.90198, 0.92017, 0.98578,
1918         0.95974, 0.94947, 0.95734, 0.99604, 1.25873},
1919        {0.95493, 0.95624, 0.96110, 0.97058, 0.98913, 1.05481,
1920         1.02873, 1.01839, 1.02631, 1.06503, 1.32772},
1921        {1.02392, 1.02524, 1.03008, 1.03955, 1.05810, 1.12378,
1922         1.09757, 1.08605, 1.09530, 1.13399, 1.39669},
1923        {1.09270, 1.09418, 1.09911, 1.10854, 1.12714, 1.19281,
1924         1.16502, 1.15633, 1.16427, 1.20271, 1.46574},
1925        {1.16168, 1.16323, 1.16801, 1.17772, 1.19604, 1.26190,
1926         1.23399, 1.22531, 1.23323, 1.27194, 1.53475},
1927        {1.23061, 1.23214, 1.23698, 1.24669, 1.26503, 1.33073,
1928         1.30461, 1.29428, 1.30220, 1.34091, 1.60372},
1929        {1.29960, 1.30110, 1.30596, 1.31544, 1.33398, 1.39962,
1930         1.37228, 1.36323, 1.37121, 1.40988, 1.67273},
1931        {1.36851, 1.37007, 1.37512, 1.38441, 1.40297, 1.46865,
1932         1.44256, 1.43222, 1.44017, 1.47878, 1.74155},
1933        {1.43752, 1.43904, 1.44773, 1.45338, 1.47220, 1.53759,
1934         1.51136, 1.50119, 1.50914, 1.54775, 1.81050},
1935        {1.50646, 1.50802, 1.51288, 1.52237, 1.54097, 1.60697,
1936         1.58049, 1.57018, 1.57811, 1.61678, 1.87947},
1937        {1.57545, 1.57720, 1.58185, 1.59134, 1.60996, 1.67787,
1938         1.64929, 1.63914, 1.64707, 1.68570, 1.94851},
1939        {1.64442, 1.64617, 1.65081, 1.66035, 1.67893, 1.74684,
1940         1.71826, 1.70745, 1.71604, 1.75310, 2.01748},
1941        {1.71337, 1.71513, 1.71978, 1.72932, 1.74645, 1.81346,
1942         1.78739, 1.77642, 1.78501, 1.82151, 2.08644},
1943        {1.78238, 1.78410, 1.78876, 1.79824, 1.81678, 1.88332,
1944         1.85639, 1.84262, 1.85397, 1.89270, 2.15533},
1945        {1.85135, 1.85306, 1.85778, 1.86728, 1.88580, 1.95615,
1946         1.92536, 1.91171, 1.92283, 1.96165, 2.22428},
1947        {1.92774, 1.92184, 1.92672, 1.93618, 1.95477, 2.02048,
1948         1.99427, 1.98068, 1.99192, 2.03062, 2.29338},
1949        {1.98929, 1.99081, 1.99567, 2.00515, 2.02373, 2.08987,
1950         2.06332, 2.05249, 2.05939, 2.09928, 2.36227},
1951        {2.05829, 2.05978, 2.06464, 2.07414, 2.09272, 2.15850,
1952         2.12928, 2.12194, 2.12987, 2.16825, 2.43083},
1953        {2.12726, 2.12869, 2.13360, 2.14425, 2.16160, 2.22872,
1954         2.20118, 2.19078, 2.19876, 2.23416, 2.50007}};
1955   
1956   // Garfield simulation at UD = -1900V; vd = 1.610cm/microsec, <driftfield> = 655V/cm
1957   Float_t time1900[ktimebin][kZbin] =
1958       {{0.09166, 0.09198, 0.09298, 0.09467, 0.09707, 0.10023,
1959         0.10431, 0.10980, 0.11828, 0.13988, 0.37789},
1960        {0.06584, 0.06622, 0.06735, 0.06920, 0.07179, 0.07514,
1961         0.07938, 0.08505, 0.09374, 0.11606, 0.35599},
1962        {0.03945, 0.04002, 0.04169, 0.04432, 0.04775, 0.05185,
1963         0.05672, 0.06298, 0.07290, 0.09888, 0.34695},
1964        {0.01109, 0.01281, 0.01717, 0.02279, 0.02878, 0.03476,
1965         0.04094, 0.04909, 0.06421, 0.10597, 0.36823},
1966        {0.01115, 0.01287, 0.01720, 0.02294, 0.02862, 0.03448,
1967         0.04074, 0.04973, 0.06783, 0.11506, 0.37206},
1968        {0.03940, 0.03975, 0.04135, 0.04386, 0.04708, 0.05106,
1969         0.05604, 0.06293, 0.07592, 0.10787, 0.36484},
1970        {0.06500, 0.06534, 0.06638, 0.06811, 0.07060, 0.07413,
1971         0.07852, 0.08491, 0.09614, 0.12446, 0.37626},
1972        {0.09119, 0.09140, 0.09194, 0.09293, 0.09471, 0.00000,
1973         0.11013, 0.11685, 0.13050, 0.16302, 0.41991},
1974        {0.13111, 0.13190, 0.13466, 0.14091, 0.15554, 0.22409,
1975         0.18846, 0.18167, 0.19113, 0.22854, 0.48995},
1976        {0.18849, 0.18975, 0.19380, 0.20185, 0.21797, 0.28050,
1977         0.25368, 0.24575, 0.25446, 0.29249, 0.55442},
1978        {0.24995, 0.25125, 0.25563, 0.26366, 0.27986, 0.34065,
1979         0.31605, 0.30815, 0.31680, 0.35482, 0.61697},
1980        {0.31187, 0.31324, 0.31745, 0.32580, 0.34205, 0.40217,
1981         0.37825, 0.37031, 0.37897, 0.41696, 0.67890},
1982        {0.37401, 0.37531, 0.37955, 0.38777, 0.40395, 0.46408,
1983         0.44037, 0.43242, 0.44108, 0.47906, 0.74122},
1984        {0.43610, 0.43741, 0.44161, 0.44986, 0.46604, 0.52614,
1985         0.50248, 0.49452, 0.50316, 0.54116, 0.80326},
1986        {0.49820, 0.49988, 0.50372, 0.51196, 0.52814, 0.58822,
1987         0.56459, 0.55661, 0.56527, 0.60326, 0.86526},
1988        {0.56032, 0.56161, 0.56582, 0.57408, 0.59024, 0.65032,
1989         0.62670, 0.61872, 0.62737, 0.66537, 0.92749},
1990        {0.62240, 0.62371, 0.62792, 0.63624, 0.65236, 0.71241,
1991         0.68881, 0.68081, 0.68947, 0.72750, 0.98941},
1992        {0.68449, 0.68581, 0.69002, 0.69828, 0.71444, 0.77452,
1993         0.75089, 0.74295, 0.75157, 0.78957, 1.05157},
1994        {0.74660, 0.74790, 0.75212, 0.76036, 0.77654, 0.83748,
1995         0.81299, 0.80501, 0.81193, 0.85168, 1.11375},
1996        {0.80870, 0.81017, 0.81423, 0.82246, 0.83867, 0.89908,
1997         0.87509, 0.86660, 0.87577, 0.91376, 1.17586},
1998        {0.87080, 0.87233, 0.87632, 0.88458, 0.90074, 0.96083,
1999         0.93718, 0.92922, 0.93787, 0.97588, 1.23794},
2000        {0.93291, 0.93422, 0.93844, 0.94667, 0.96293, 1.02295,
2001         0.99929, 0.99127, 0.99997, 1.03797, 1.29995},
2002        {0.99500, 0.99645, 1.00308, 1.00877, 1.02497, 1.08504,
2003         1.06140, 1.05343, 1.06203, 1.10006, 1.36216},
2004        {1.05712, 1.05926, 1.06262, 1.07092, 1.08706, 1.14754,
2005         1.12350, 1.11550, 1.12417, 1.16218, 1.42427},
2006        {1.11921, 1.12059, 1.12473, 1.13297, 1.14916, 1.21140,
2007         1.18560, 1.17284, 1.18625, 1.22414, 1.48629},
2008        {1.18140, 1.18262, 1.18690, 1.19508, 1.21125, 1.27139,
2009         1.24164, 1.23495, 1.24838, 1.28634, 1.54852},
2010        {1.24340, 1.24473, 1.24901, 1.25732, 1.27336, 1.33358,
2011         1.30793, 1.30179, 1.31047, 1.34848, 1.61066},
2012        {1.30551, 1.30684, 1.31104, 1.32056, 1.33553, 1.39609,
2013         1.37004, 1.36392, 1.37045, 1.41057, 1.67259},
2014        {1.36755, 1.36892, 1.37315, 1.39148, 1.39755, 1.45820,
2015         1.43215, 1.42602, 1.43467, 1.47268, 1.73477},
2016        {1.42966, 1.43101, 1.43549, 1.45359, 1.45976, 1.52031,
2017         1.49601, 1.48811, 1.49677, 1.53477, 1.79691},
2018        {1.49180, 1.49321, 1.49760, 1.51570, 1.52175, 1.58185,
2019         1.55771, 1.55023, 1.55888, 1.59672, 1.85501},
2020        {1.55391, 1.55527, 1.55943, 1.57782, 1.58391, 1.64395,
2021         1.62008, 1.61233, 1.62085, 1.65883, 1.92091},
2022        {1.61599, 1.61732, 1.62154, 1.63993, 1.64612, 1.70608,
2023         1.68237, 1.67108, 1.68301, 1.72110, 1.97931},
2024        {1.67808, 1.67948, 1.68364, 1.70204, 1.70823, 1.76858,
2025         1.74404, 1.73539, 1.74512, 1.78321, 2.04522},
2026        {1.74019, 1.74152, 1.74573, 1.76415, 1.77015, 1.83040,
2027         1.80615, 1.79366, 1.80723, 1.84509, 2.10742},
2028        {1.80235, 1.80362, 1.80783, 1.82626, 1.83227, 1.89246,
2029         1.86795, 1.85405, 1.86938, 1.90720, 2.16953},
2030        {1.86442, 1.86572, 1.86994, 1.88837, 1.89438, 1.95445,
2031         1.93006, 1.92283, 1.93148, 1.96931, 2.23147},
2032        {1.92700, 1.92783, 1.93197, 1.95049, 1.95649, 2.01668,
2033         1.99217, 1.98486, 1.99352, 2.03143, 2.29358}};
2034
2035   // Garfield simulation at UD = -2000V; vd = 1.783cm/microsec, <driftfield> = 688V/cm
2036   Float_t time2000[ktimebin][kZbin] =
2037       {{0.09176, 0.09196, 0.09296, 0.09465, 0.09704, 0.10020,
2038         0.10427, 0.10977, 0.11825, 0.13988, 0.37774},
2039        {0.06583, 0.06620, 0.06735, 0.06918, 0.07177, 0.07513,
2040         0.07936, 0.08503, 0.09372, 0.11606, 0.35586},
2041        {0.03944, 0.04001, 0.04170, 0.04431, 0.04774, 0.05184,
2042         0.05670, 0.06296, 0.07291, 0.09893, 0.34680},
2043        {0.01108, 0.01281, 0.01719, 0.02279, 0.02879, 0.03474,
2044         0.04093, 0.04908, 0.06422, 0.10605, 0.36800},
2045        {0.01114, 0.01287, 0.01720, 0.02276, 0.02863, 0.03449,
2046         0.04073, 0.04970, 0.06774, 0.11478, 0.37179},
2047        {0.03925, 0.03977, 0.04135, 0.04386, 0.04711, 0.05108,
2048         0.05604, 0.06290, 0.07580, 0.10748, 0.36386},
2049        {0.06501, 0.06536, 0.06640, 0.06814, 0.07062, 0.07398,
2050         0.07852, 0.08487, 0.09598, 0.12405, 0.37519},
2051        {0.09109, 0.09127, 0.09188, 0.09292, 0.09472, 0.00000,
2052         0.10964, 0.11630, 0.12960, 0.16150, 0.41765},
2053        {0.12898, 0.12968, 0.13209, 0.13749, 0.15034, 0.21286,
2054         0.18088, 0.17590, 0.18591, 0.22254, 0.48315},
2055        {0.18122, 0.18227, 0.18574, 0.19263, 0.20674, 0.26376,
2056         0.23960, 0.23375, 0.24316, 0.28047, 0.54179},
2057        {0.23674, 0.23784, 0.24142, 0.24847, 0.26264, 0.31810,
2058         0.29602, 0.29008, 0.29944, 0.33675, 0.59795},
2059        {0.29279, 0.29382, 0.29742, 0.30448, 0.31865, 0.37364,
2060         0.35215, 0.34629, 0.35555, 0.39286, 0.65411},
2061        {0.34875, 0.34987, 0.35346, 0.36054, 0.37472, 0.42956,
2062         0.40825, 0.40229, 0.41167, 0.44894, 0.71033},
2063        {0.40484, 0.40594, 0.40954, 0.41660, 0.43077, 0.48560,
2064         0.46433, 0.45840, 0.46772, 0.50500, 0.76632},
2065        {0.46090, 0.46201, 0.46560, 0.47267, 0.48684, 0.54167,
2066         0.52041, 0.51449, 0.52382, 0.56108, 0.82227},
2067        {0.51698, 0.51809, 0.52173, 0.52874, 0.54291, 0.59776,
2068         0.57646, 0.57052, 0.57986, 0.61717, 0.87836},
2069        {0.57306, 0.57418, 0.57782, 0.58513, 0.59899, 0.65380,
2070         0.63255, 0.62661, 0.63594, 0.67325, 0.93460},
2071        {0.62912, 0.63024, 0.63383, 0.64103, 0.65506, 0.70988,
2072         0.68484, 0.68267, 0.69202, 0.72878, 0.99046},
2073        {0.68521, 0.68633, 0.68990, 0.69699, 0.71115, 0.76595,
2074         0.74468, 0.73872, 0.74814, 0.78538, 1.04674},
2075        {0.74127, 0.74239, 0.74605, 0.75303, 0.77022, 0.82204,
2076         0.80078, 0.79484, 0.80416, 0.84147, 1.10261},
2077        {0.79736, 0.79846, 0.80206, 0.80947, 0.82330, 0.87813,
2078         0.85688, 0.85087, 0.86023, 0.89752, 1.15874},
2079        {0.85342, 0.85454, 0.85815, 0.86519, 0.87936, 0.93417,
2080         0.91293, 0.90428, 0.91631, 0.95360, 1.20760},
2081        {0.90949, 0.91061, 0.91423, 0.92128, 0.93544, 0.99026,
2082         0.96807, 0.96305, 0.97239, 1.00967, 1.27078},
2083        {0.96556, 0.96669, 0.97111, 0.97734, 0.99151, 1.04664,
2084         1.02508, 1.01879, 1.02846, 1.06167, 1.32695},
2085        {1.02167, 1.02279, 1.02656, 1.03341, 1.04759, 1.10242,
2086         1.08115, 1.07003, 1.08453, 1.12184, 1.38304},
2087        {1.07776, 1.07883, 1.08242, 1.08950, 1.10384, 1.16422,
2088         1.13725, 1.13133, 1.14061, 1.17793, 1.43910},
2089        {1.13379, 1.13492, 1.13864, 1.14567, 1.15973, 1.21455,
2090         1.19323, 1.18734, 1.19668, 1.23401, 1.49528},
2091        {1.18988, 1.19098, 1.19457, 1.20164, 1.21582, 1.27064,
2092         1.24937, 1.24044, 1.25275, 1.29004, 1.55137},
2093        {1.24592, 1.24706, 1.25087, 1.25773, 1.27188, 1.32670,
2094         1.30544, 1.29953, 1.30883, 1.34613, 1.60743},
2095        {1.30202, 1.30313, 1.30673, 1.31381, 1.32797, 1.38278,
2096         1.36151, 1.35167, 1.36490, 1.40221, 1.66306},
2097        {1.35809, 1.35921, 1.36282, 1.36986, 1.38403, 1.43888,
2098         1.41760, 1.41174, 1.42083, 1.45830, 1.71915},
2099        {1.41419, 1.41528, 1.41890, 1.42595, 1.44011, 1.49496,
2100         1.47368, 1.46769, 1.47706, 1.51436, 1.77523},
2101        {1.47131, 1.47141, 1.47494, 1.48850, 1.49620, 1.55137,
2102         1.52977, 1.51820, 1.53315, 1.57042, 1.83158},
2103        {1.52635, 1.52750, 1.53103, 1.53814, 1.55228, 1.60736,
2104         1.58503, 1.57986, 1.58920, 1.62649, 1.88767},
2105        {1.58418, 1.58355, 1.58711, 1.59526, 1.60833, 1.66316,
2106         1.63345, 1.63261, 1.64556, 1.68204, 1.94359},
2107        {1.64027, 1.63958, 1.64489, 1.65024, 1.66443, 1.71925,
2108         1.69794, 1.69201, 1.70143, 1.73865, 1.99968},
2109        {1.69450, 1.69566, 1.69940, 1.70697, 1.71841, 1.77819,
2110         1.75396, 1.74814, 1.75743, 1.79083, 2.05427},
2111        {1.75054, 1.75221, 1.75527, 1.76306, 1.77662, 1.83428,
2112         1.81006, 1.81173, 1.81345, 1.85076, 2.10289}};
2113
2114   // Garfield simulation at UD = -2100V; vd = 1.959cm/microsec, <driftfield> = 720V/cm
2115   Float_t time2100[ktimebin][kZbin] =
2116       {{0.09160, 0.09194, 0.09294, 0.09462, 0.09701, 0.10017,
2117         0.10424, 0.10974, 0.11823, 0.13988, 0.37762},
2118        {0.06585, 0.06619, 0.06731, 0.06916, 0.07174, 0.07509,
2119         0.07933, 0.08500, 0.09370, 0.11609, 0.35565},
2120        {0.03960, 0.04001, 0.04171, 0.04430, 0.04774, 0.05182,
2121         0.05668, 0.06294, 0.07291, 0.09896, 0.34676},
2122        {0.01109, 0.01280, 0.01716, 0.02279, 0.02876, 0.03474,
2123         0.04096, 0.04908, 0.06424, 0.10612, 0.36790},
2124        {0.01114, 0.01285, 0.01719, 0.02287, 0.02863, 0.03449,
2125         0.04073, 0.04964, 0.06759, 0.11446, 0.37162},
2126        {0.03922, 0.03977, 0.04146, 0.04386, 0.04711, 0.05109,
2127         0.05605, 0.06287, 0.07575, 0.10713, 0.36298},
2128        {0.06504, 0.06538, 0.06641, 0.06818, 0.07064, 0.07426,
2129         0.07852, 0.08483, 0.09581, 0.12363, 0.37424},
2130        {0.09103, 0.09129, 0.09186, 0.09291, 0.09476, 0.00000,
2131         0.10923, 0.11578, 0.12873, 0.16005, 0.41525},
2132        {0.12723, 0.12777, 0.12988, 0.13458, 0.14579, 0.20264,
2133         0.17421, 0.17078, 0.18132, 0.21708, 0.47699},
2134        {0.17508, 0.17601, 0.17897, 0.18487, 0.19698, 0.24881,
2135         0.22737, 0.22337, 0.23348, 0.27000, 0.53032},
2136        {0.22571, 0.22663, 0.22969, 0.23570, 0.24787, 0.29826,
2137         0.27871, 0.27462, 0.28471, 0.32122, 0.58166},
2138        {0.27664, 0.27759, 0.28067, 0.28669, 0.29891, 0.34898,
2139         0.32982, 0.32570, 0.33576, 0.37229, 0.63268},
2140        {0.32766, 0.32862, 0.33170, 0.33778, 0.34988, 0.39973,
2141         0.38088, 0.37675, 0.38680, 0.42333, 0.68159},
2142        {0.37872, 0.37966, 0.38275, 0.38875, 0.40093, 0.45073,
2143         0.43192, 0.42780, 0.43786, 0.47438, 0.73480},
2144        {0.42974, 0.43070, 0.43378, 0.43982, 0.45196, 0.50177,
2145         0.48297, 0.47884, 0.48889, 0.52544, 0.78581},
2146        {0.48081, 0.48175, 0.48482, 0.49084, 0.50302, 0.55290,
2147         0.53398, 0.52988, 0.53994, 0.57647, 0.83687},
2148        {0.53645, 0.53295, 0.53586, 0.54188, 0.55408, 0.60398,
2149         0.58504, 0.58092, 0.59100, 0.62768, 0.88773},
2150        {0.58345, 0.58409, 0.58690, 0.59292, 0.60510, 0.65562,
2151         0.63609, 0.63197, 0.64203, 0.67856, 0.93907},
2152        {0.63397, 0.63490, 0.63795, 0.64403, 0.65613, 0.70612,
2153         0.68714, 0.68301, 0.69294, 0.72955, 0.99000},
2154        {0.68496, 0.68592, 0.68899, 0.69504, 0.70733, 0.75708,
2155         0.73818, 0.73405, 0.74412, 0.78064, 1.04100},
2156        {0.73600, 0.73696, 0.74003, 0.74624, 0.75828, 0.80805,
2157         0.78904, 0.78512, 0.79517, 0.83152, 1.09205},
2158        {0.78709, 0.78801, 0.79108, 0.79709, 0.80931, 0.85906,
2159         0.84027, 0.83614, 0.84621, 0.88269, 1.14058},
2160        {0.83808, 0.83905, 0.84215, 0.84816, 0.86031, 0.91011,
2161         0.89139, 0.88718, 0.89725, 0.93377, 1.19413},
2162        {0.88916, 0.89010, 0.89320, 0.89920, 0.91136, 0.96117,
2163         0.94235, 0.93822, 0.94828, 0.98480, 1.24538},
2164        {0.94036, 0.94113, 0.94422, 0.95023, 0.96241, 1.01220,
2165         0.99310, 0.98927, 0.99933, 1.03585, 1.29629},
2166        {0.99139, 0.99220, 0.99525, 1.00127, 1.01344, 1.06324,
2167         1.04451, 1.04033, 1.04836, 1.08690, 1.34727},
2168        {1.04261, 1.04325, 1.04628, 1.05232, 1.06448, 1.12090,
2169         1.09546, 1.09136, 1.10142, 1.13795, 1.39831},
2170        {1.09331, 1.09429, 1.09742, 1.10336, 1.11557, 1.16547,
2171         1.14658, 1.13642, 1.15247, 1.18898, 1.44936},
2172        {1.14436, 1.14539, 1.14847, 1.15443, 1.16662, 1.21794,
2173         1.19763, 1.19329, 1.20349, 1.23956, 1.50043},
2174        {1.19533, 1.19651, 1.19943, 1.20548, 1.21666, 1.26753,
2175         1.24862, 1.24434, 1.25455, 1.29106, 1.55142},
2176        {1.24638, 1.24756, 1.25046, 1.25648, 1.26764, 1.31858,
2177         1.29967, 1.29538, 1.30499, 1.34211, 1.60250},
2178        {1.29747, 1.29847, 1.30175, 1.30753, 1.31869, 1.36969,
2179         1.35069, 1.34656, 1.35663, 1.39316, 1.64644},
2180        {1.35537, 1.34952, 1.35255, 1.35869, 1.36973, 1.41387,
2181         1.40173, 1.39761, 1.40768, 1.44396, 1.70238},
2182        {1.39956, 1.40056, 1.40380, 1.40961, 1.42178, 1.46492,
2183         1.45278, 1.45423, 1.45872, 1.49522, 1.75557},
2184        {1.45080, 1.45159, 1.45463, 1.46109, 1.47287, 1.52263,
2185         1.50382, 1.50050, 1.50977, 1.54502, 1.80670},
2186        {1.50165, 1.50264, 1.50570, 1.51214, 1.52233, 1.57370,
2187         1.55484, 1.55155, 1.56080, 1.59731, 1.85778},
2188        {1.55269, 1.55364, 1.55675, 1.56274, 1.57491, 1.62598,
2189         1.60590, 1.60259, 1.61185, 1.64836, 1.90883},
2190        {1.60368, 1.60469, 1.60779, 1.61373, 1.62596, 1.67738,
2191         1.65651, 1.65249, 1.66290, 1.69936, 1.95959}};
2192
2193   // Garfield simulation at UD = -2200V; vd = 2.134cm/microsec, <driftfield> = 753V/cm
2194   Float_t time2200[ktimebin][kZbin] =
2195       {{0.09162, 0.09194, 0.09292, 0.09460, 0.09702, 0.10014,
2196         0.10421, 0.10971, 0.11820, 0.13990, 0.37745},
2197        {0.06581, 0.06618, 0.06730, 0.06915, 0.07173, 0.07507,
2198         0.07931, 0.08497, 0.09368, 0.11609, 0.35560},
2199        {0.03947, 0.04001, 0.04167, 0.04429, 0.04772, 0.05183,
2200         0.05667, 0.06293, 0.07292, 0.09900, 0.34673},
2201        {0.01111, 0.01280, 0.01716, 0.02279, 0.02876, 0.03473,
2202         0.04091, 0.04907, 0.06426, 0.10620, 0.36766},
2203        {0.01113, 0.01285, 0.01719, 0.02276, 0.02863, 0.03452,
2204         0.04076, 0.04960, 0.06745, 0.11419, 0.37139},
2205        {0.03923, 0.03978, 0.04137, 0.04387, 0.04713, 0.05110,
2206         0.05605, 0.06284, 0.07551, 0.10677, 0.36210},
2207        {0.06505, 0.06540, 0.06644, 0.06820, 0.07069, 0.07401,
2208         0.07852, 0.08479, 0.09565, 0.12325, 0.37313},
2209        {0.09107, 0.09127, 0.09181, 0.09291, 0.09474, 0.00000,
2210         0.10883, 0.11528, 0.12789, 0.15865, 0.41313},
2211        {0.12559, 0.12622, 0.12800, 0.13206, 0.14166, 0.19331,
2212         0.16832, 0.16632, 0.17724, 0.21218, 0.47098},
2213        {0.16992, 0.17070, 0.17325, 0.17831, 0.18871, 0.23557,
2214         0.21690, 0.21451, 0.22514, 0.26082, 0.52034},
2215        {0.21640, 0.21722, 0.21987, 0.22500, 0.23540, 0.28097,
2216         0.26399, 0.26154, 0.27214, 0.30784, 0.56734},
2217        {0.26318, 0.26400, 0.26679, 0.27181, 0.28220, 0.32739,
2218         0.31090, 0.30842, 0.31902, 0.35474, 0.61415},
2219        {0.31001, 0.31085, 0.31348, 0.31866, 0.32903, 0.37412,
2220         0.35777, 0.35546, 0.36588, 0.40159, 0.66103},
2221        {0.35687, 0.35769, 0.36033, 0.36556, 0.37588, 0.42094,
2222         0.40523, 0.40214, 0.41273, 0.44841, 0.70785},
2223        {0.40372, 0.40457, 0.40723, 0.41234, 0.42273, 0.46778,
2224         0.45148, 0.44903, 0.45961, 0.49526, 0.75486},
2225        {0.45062, 0.45139, 0.45404, 0.45966, 0.46958, 0.51470,
2226         0.49833, 0.49584, 0.50644, 0.54211, 0.80160},
2227        {0.49742, 0.49825, 0.50088, 0.50605, 0.51644, 0.56148,
2228         0.54518, 0.54270, 0.55330, 0.58897, 0.84854},
2229        {0.54427, 0.54510, 0.54774, 0.55290, 0.56329, 0.60846,
2230         0.59203, 0.58955, 0.60014, 0.63578, 0.89528},
2231        {0.59119, 0.59199, 0.59471, 0.59975, 0.61014, 0.65533,
2232         0.63889, 0.63636, 0.64699, 0.68269, 0.94197},
2233        {0.63866, 0.63880, 0.64145, 0.64664, 0.65701, 0.70639,
2234         0.68574, 0.68325, 0.69385, 0.72949, 0.98900},
2235        {0.68483, 0.68566, 0.68831, 0.69347, 0.70386, 0.74890,
2236         0.73260, 0.73010, 0.74069, 0.77638, 1.03320},
2237        {0.73168, 0.73255, 0.73515, 0.74031, 0.75072, 0.79576,
2238         0.77117, 0.77501, 0.78755, 0.82318, 1.08006},
2239        {0.77854, 0.78310, 0.78200, 0.79525, 0.79756, 0.84281,
2240         0.81803, 0.82393, 0.83441, 0.87008, 1.12692},
2241        {0.82541, 0.82642, 0.82916, 0.83528, 0.84442, 0.89086,
2242         0.87315, 0.87079, 0.88125, 0.91694, 1.17648},
2243        {0.87226, 0.87308, 0.87602, 0.88086, 0.89128, 0.93772,
2244         0.92001, 0.91751, 0.92811, 0.95587, 1.22328},
2245        {0.91921, 0.91994, 0.92256, 0.92772, 0.94713, 0.98566,
2246         0.96690, 0.96436, 0.97495, 1.01064, 1.26882},
2247        {0.96790, 0.96679, 0.96941, 0.97463, 0.99399, 1.03001,
2248         1.01376, 1.01112, 1.02181, 1.05749, 1.31568},
2249        {1.01278, 1.01390, 1.01674, 1.02147, 1.03182, 1.07820,
2250         1.06056, 1.05798, 1.06867, 1.10433, 1.36390},
2251        {1.05964, 1.06076, 1.06331, 1.06833, 1.07870, 1.13297,
2252         1.10742, 1.10520, 1.11543, 1.15120, 1.41069},
2253        {1.10664, 1.10762, 1.10997, 1.11519, 1.12556, 1.17531,
2254         1.15427, 1.14620, 1.16229, 1.19805, 1.45758},
2255        {1.15352, 1.15421, 1.15683, 1.16218, 1.17242, 1.21910,
2256         1.20035, 1.19863, 1.20579, 1.24473, 1.50412},
2257        {1.20019, 1.20115, 1.20369, 1.20892, 1.21928, 1.26913,
2258         1.24721, 1.24549, 1.25605, 1.29159, 1.54920},
2259        {1.24707, 1.24846, 1.25052, 1.25602, 1.26608, 1.31558,
2260         1.29448, 1.29232, 1.30293, 1.33675, 1.59798},
2261        {1.29391, 1.29475, 1.29738, 1.30255, 1.31294, 1.36244,
2262         1.34167, 1.33918, 1.34979, 1.38229, 1.64496},
2263        {1.34078, 1.34304, 1.34424, 1.35565, 1.35980, 1.40930,
2264         1.38853, 1.38229, 1.39664, 1.42863, 1.69162},
2265        {1.38762, 1.38847, 1.39110, 1.39627, 1.40666, 1.45183,
2266         1.43539, 1.43289, 1.44348, 1.47549, 1.73876},
2267        {1.43524, 1.43533, 1.43796, 1.44310, 1.45371, 1.49305,
2268         1.48224, 1.47941, 1.49034, 1.52601, 1.78552},
2269        {1.48122, 1.48219, 1.48482, 1.48991, 1.50030, 1.53991,
2270         1.52898, 1.52653, 1.53653, 1.57282, 1.82386}};
2271
2272   if (fTimeStructInfo.fTimeStruct1)  delete [] fTimeStructInfo.fTimeStruct1;
2273   fTimeStructInfo.fTimeStruct1  = new Float_t[ktimebin*kZbin];
2274
2275   if (fTimeStructInfo.fTimeStruct2)  delete [] fTimeStructInfo.fTimeStruct2;
2276   fTimeStructInfo.fTimeStruct2  = new Float_t[ktimebin*kZbin];
2277
2278   for (Int_t ctrt = 0; ctrt<ktimebin; ctrt++) {
2279     for (Int_t ctrz = 0; ctrz<kZbin; ctrz++) {
2280       if ( vdrift > fVDsmp[6] ) {
2281         fTimeStructInfo.fTimeStruct1[ctrt+ctrz*ktimebin] = time2100[ctrt][ctrz];
2282         fTimeStructInfo.fTimeStruct2[ctrt+ctrz*ktimebin] = time2200[ctrt][ctrz];            
2283         fTimeStructInfo.fVDlo = fVDsmp[6];
2284         fTimeStructInfo.fVDhi = fVDsmp[7];
2285       } else if ( vdrift > fVDsmp[5] ) {
2286         fTimeStructInfo.fTimeStruct1[ctrt+ctrz*ktimebin] = time2000[ctrt][ctrz];
2287         fTimeStructInfo.fTimeStruct2[ctrt+ctrz*ktimebin] = time2100[ctrt][ctrz];            
2288         fTimeStructInfo.fVDlo = fVDsmp[5];
2289         fTimeStructInfo.fVDhi = fVDsmp[6];
2290       } else if ( vdrift > fVDsmp[4] ) {
2291         fTimeStructInfo.fTimeStruct1[ctrt+ctrz*ktimebin] = time1900[ctrt][ctrz];
2292         fTimeStructInfo.fTimeStruct2[ctrt+ctrz*ktimebin] = time2000[ctrt][ctrz];            
2293         fTimeStructInfo.fVDlo = fVDsmp[4];
2294         fTimeStructInfo.fVDhi = fVDsmp[5];
2295       } else if ( vdrift > fVDsmp[3] ) {
2296         fTimeStructInfo.fTimeStruct1[ctrt+ctrz*ktimebin] = time1800[ctrt][ctrz];
2297         fTimeStructInfo.fTimeStruct2[ctrt+ctrz*ktimebin] = time1900[ctrt][ctrz];            
2298         fTimeStructInfo.fVDlo = fVDsmp[3];
2299         fTimeStructInfo.fVDhi = fVDsmp[4];
2300       } else if ( vdrift > fVDsmp[2] ) {
2301         fTimeStructInfo.fTimeStruct1[ctrt+ctrz*ktimebin] = time1700[ctrt][ctrz];
2302         fTimeStructInfo.fTimeStruct2[ctrt+ctrz*ktimebin] = time1800[ctrt][ctrz];            
2303         fTimeStructInfo.fVDlo = fVDsmp[2];
2304         fTimeStructInfo.fVDhi = fVDsmp[3];
2305       } else if ( vdrift > fVDsmp[1] ) {
2306         fTimeStructInfo.fTimeStruct1[ctrt+ctrz*ktimebin] = time1600[ctrt][ctrz];
2307         fTimeStructInfo.fTimeStruct2[ctrt+ctrz*ktimebin] = time1700[ctrt][ctrz];            
2308         fTimeStructInfo.fVDlo = fVDsmp[1];
2309         fTimeStructInfo.fVDhi = fVDsmp[2];
2310       } else if ( vdrift > (fVDsmp[0] - 1.e-5) ) {
2311         fTimeStructInfo.fTimeStruct1[ctrt+ctrz*ktimebin] = time1500[ctrt][ctrz];
2312         fTimeStructInfo.fTimeStruct2[ctrt+ctrz*ktimebin] = time1600[ctrt][ctrz];            
2313         fTimeStructInfo.fVDlo = fVDsmp[0];
2314         fTimeStructInfo.fVDhi = fVDsmp[1];
2315       }
2316     }
2317   }
2318 }
2319
2320 //_____________________________________________________________________________
2321 void AliTRDdigitizer::RecalcDiffusion(Float_t vdrift)
2322 {
2323   if (vdrift == fDiffusionInfo.fLastVdrift)
2324     return;
2325
2326   AliTRDSimParam*    simParam    = AliTRDSimParam::Instance();
2327   if (!simParam) {
2328     AliError("Could not get simulation parameters\n");
2329     return;
2330   }
2331   
2332   AliTRDCommonParam* commonParam = AliTRDCommonParam::Instance();
2333   if (!commonParam) {
2334     AliError("Could not get common parameters\n");
2335     return;
2336   }
2337   
2338   AliTRDcalibDB*     calibration = AliTRDcalibDB::Instance();
2339   if (!calibration) {
2340     AliError("Could not get calibration object\n");
2341     return;
2342   }
2343   
2344   Float_t field = commonParam->GetField();
2345   fDiffusionInfo.fLastVdrift = vdrift;
2346   
2347   // DiffusionL
2348   {
2349     const Int_t kNb = 5;
2350     Float_t p0[kNb] = {  0.007440,  0.007493,  0.007513,  0.007672,  0.007831 };
2351     Float_t p1[kNb] = {  0.019252,  0.018912,  0.018636,  0.018012,  0.017343 };
2352     Float_t p2[kNb] = { -0.005042, -0.004926, -0.004867, -0.004650, -0.004424 };
2353     Float_t p3[kNb] = {  0.000195,  0.000189,  0.000195,  0.000182,  0.000169 };
2354
2355     Int_t ib = ((Int_t) (10 * (field - 0.15)));
2356     ib       = TMath::Max(  0,ib);
2357     ib       = TMath::Min(kNb,ib);
2358
2359     fDiffusionInfo.fDiffusionL = p0[ib] 
2360                                + p1[ib] * vdrift
2361                                + p2[ib] * vdrift*vdrift
2362                                + p3[ib] * vdrift*vdrift*vdrift;
2363   }
2364   
2365   // DiffusionT
2366   {
2367     const Int_t kNb = 5;
2368     Float_t p0[kNb] = {  0.009550,  0.009599,  0.009674,  0.009757,  0.009850 };
2369     Float_t p1[kNb] = {  0.006667,  0.006539,  0.006359,  0.006153,  0.005925 };
2370     Float_t p2[kNb] = { -0.000853, -0.000798, -0.000721, -0.000635, -0.000541 };
2371     Float_t p3[kNb] = {  0.000131,  0.000122,  0.000111,  0.000098,  0.000085 };
2372
2373     Int_t ib = ((Int_t) (10 * (field - 0.15)));
2374     ib       = TMath::Max(  0,ib);
2375     ib       = TMath::Min(kNb,ib);
2376
2377     fDiffusionInfo.fDiffusionT = p0[ib] 
2378                                + p1[ib] * vdrift
2379                                + p2[ib] * vdrift*vdrift
2380                                + p3[ib] * vdrift*vdrift*vdrift;
2381   }    
2382
2383   // OmegaTau
2384   fDiffusionInfo.fOmegaTau = calibration->GetOmegaTau(vdrift);
2385   
2386   // Lorentzfactor
2387   {
2388     if (commonParam->ExBOn()) {
2389       fDiffusionInfo.fLorentzFactor = 1.0 / (1.0 + fDiffusionInfo.fOmegaTau*fDiffusionInfo.fOmegaTau);
2390     }
2391     else {
2392       fDiffusionInfo.fLorentzFactor = 1.0;
2393     }
2394   }
2395
2396 }
2397   
2398 //_____________________________________________________________________________
2399 Float_t AliTRDdigitizer::GetDiffusionL(Float_t vdrift)
2400 {
2401   //
2402   // Returns the longitudinal diffusion coefficient for a given drift 
2403   // velocity <vd> and a B-field <b> for Xe/CO2 (15%).
2404   // The values are according to a GARFIELD simulation.
2405   //
2406
2407   RecalcDiffusion(vdrift);
2408   return fDiffusionInfo.fDiffusionL;
2409
2410 }
2411
2412 //_____________________________________________________________________________
2413 Float_t AliTRDdigitizer::GetDiffusionT(Float_t vdrift)
2414 {
2415   //
2416   // Returns the transverse diffusion coefficient for a given drift 
2417   // velocity <vd> and a B-field <b> for Xe/CO2 (15%).
2418   // The values are according to a GARFIELD simulation.
2419   //
2420
2421   RecalcDiffusion(vdrift);
2422   return fDiffusionInfo.fDiffusionT;
2423
2424 }
2425
2426 //_____________________________________________________________________________
2427 Int_t AliTRDdigitizer::Diffusion(Float_t vdrift, Double_t driftlength, Double_t *xyz)
2428 {
2429   //
2430   // Applies the diffusion smearing to the position of a single electron
2431   //
2432   
2433   RecalcDiffusion(vdrift);
2434
2435   Float_t driftSqrt = TMath::Sqrt(driftlength);
2436   Float_t sigmaT    = driftSqrt * fDiffusionInfo.fDiffusionT;
2437   Float_t sigmaL    = driftSqrt * fDiffusionInfo.fDiffusionL;
2438   xyz[0] = gRandom->Gaus(xyz[0], sigmaL * GetLorentzFactor(vdrift));
2439   xyz[1] = gRandom->Gaus(xyz[1], sigmaT * GetLorentzFactor(vdrift));
2440   xyz[2] = gRandom->Gaus(xyz[2], sigmaT);
2441
2442   return 1;
2443
2444 }
2445
2446 //_____________________________________________________________________________
2447 Float_t AliTRDdigitizer::GetLorentzFactor(Float_t vd)
2448 {
2449   //
2450   // Returns the recalculated Lorentz factor
2451   //
2452
2453   RecalcDiffusion(vd);
2454   return fDiffusionInfo.fLorentzFactor;
2455
2456 }
2457   
2458 //_____________________________________________________________________________
2459 Int_t AliTRDdigitizer::ExB(Float_t vdrift, Double_t driftlength, Double_t *xyz)
2460 {
2461   //
2462   // Applies E x B effects to the position of a single electron
2463   //
2464   
2465   RecalcDiffusion(vdrift);
2466   
2467   xyz[0] = xyz[0];
2468   xyz[1] = xyz[1] + fDiffusionInfo.fOmegaTau * driftlength;
2469   xyz[2] = xyz[2];
2470
2471   return 1;
2472
2473 }