Reducing the amount of printout
[u/mrichter/AliRoot.git] / TRD / AliTRDtracker.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 //  The standard TRD tracker                                                 //
21 //                                                                           //
22 ///////////////////////////////////////////////////////////////////////////////
23
24 #include <Riostream.h>
25 #include <TFile.h>
26 #include <TBranch.h>
27 #include <TTree.h>  
28 #include <TObjArray.h> 
29
30 #include "AliTRDgeometry.h"
31 #include "AliTRDparameter.h"
32 #include "AliTRDgeometryDetail.h"
33 #include "AliTRDgeometryHole.h"
34 #include "AliTRDcluster.h" 
35 #include "AliTRDtrack.h"
36 #include "AliTRDPartID.h"
37 #include "../TPC/AliTPCtrack.h"
38
39 #include "AliTRDtracker.h"
40
41 ClassImp(AliTRDtracker) 
42
43   const  Float_t     AliTRDtracker::fgkSeedDepth          = 0.5; 
44   const  Float_t     AliTRDtracker::fgkSeedStep           = 0.10;   
45   const  Float_t     AliTRDtracker::fgkSeedGap            = 0.25;  
46
47   const  Float_t     AliTRDtracker::fgkMaxSeedDeltaZ12    = 40.;  
48   const  Float_t     AliTRDtracker::fgkMaxSeedDeltaZ      = 25.;  
49   const  Float_t     AliTRDtracker::fgkMaxSeedC           = 0.0052; 
50   const  Float_t     AliTRDtracker::fgkMaxSeedTan         = 1.2;  
51   const  Float_t     AliTRDtracker::fgkMaxSeedVertexZ     = 150.; 
52
53   const  Double_t    AliTRDtracker::fgkSeedErrorSY        = 0.2;
54   const  Double_t    AliTRDtracker::fgkSeedErrorSY3       = 2.5;
55   const  Double_t    AliTRDtracker::fgkSeedErrorSZ        = 0.1;
56
57   const  Float_t     AliTRDtracker::fgkMinClustersInSeed  = 0.7;  
58
59   const  Float_t     AliTRDtracker::fgkMinClustersInTrack = 0.5;  
60   const  Float_t     AliTRDtracker::fgkMinFractionOfFoundClusters = 0.8;  
61
62   const  Float_t     AliTRDtracker::fgkSkipDepth          = 0.3;
63   const  Float_t     AliTRDtracker::fgkLabelFraction      = 0.8;  
64   const  Float_t     AliTRDtracker::fgkWideRoad           = 20.;
65
66   const  Double_t    AliTRDtracker::fgkMaxChi2            = 12.; 
67
68 const Int_t AliTRDtracker::fgkFirstPlane = 5;
69 const Int_t AliTRDtracker::fgkLastPlane = 17;
70
71
72 //____________________________________________________________________
73 AliTRDtracker::AliTRDtracker():AliTracker(),
74                                fGeom(0),
75                                fPar(0),
76                                fNclusters(0),
77                                fClusters(0),
78                                fNseeds(0),
79                                fSeeds(0),
80                                fNtracks(0),
81                                fTracks(0),
82                                fSY2corr(0),
83                                fSZ2corr(0),
84                                fTimeBinsPerPlane(0),
85                                fMaxGap(0),
86                                fVocal(kFALSE),
87                                fAddTRDseeds(kFALSE),
88                                fNoTilt(kFALSE)
89 {
90   for(Int_t i=0;i<kTrackingSectors;i++) fTrSec[i]=0;
91   for(Int_t j=0;j<5;j++)
92     for(Int_t k=0;k<18;k++) fHoles[j][k]=kFALSE;
93
94 //____________________________________________________________________
95 AliTRDtracker::AliTRDtracker(const TFile *geomfile):AliTracker()
96 {
97   // 
98   //  Main constructor
99   //  
100
101   //Float_t fTzero = 0;
102    
103   fAddTRDseeds = kFALSE;
104   fGeom = NULL;
105   fNoTilt = kFALSE;
106   
107   TDirectory *savedir=gDirectory; 
108   TFile *in=(TFile*)geomfile;  
109   if (!in->IsOpen()) {
110     printf("AliTRDtracker::AliTRDtracker(): geometry file is not open!\n");
111     printf("    DETAIL TRD geometry and DEFAULT TRD parameter will be used\n");
112   }
113   else {
114     in->cd();  
115 //    in->ls();
116     fGeom = (AliTRDgeometry*) in->Get("TRDgeometry");
117     fPar  = (AliTRDparameter*) in->Get("TRDparameter");
118 //    fGeom->Dump();
119   }
120
121   if(fGeom) {
122     //    fTzero = geo->GetT0();
123     printf("Found geometry version %d on file \n", fGeom->IsVersion());
124   }
125   else { 
126     printf("AliTRDtracker::AliTRDtracker(): can't find TRD geometry!\n");
127     //printf("The DETAIL TRD geometry will be used\n");
128     //fGeom = new AliTRDgeometryDetail();
129     fGeom = new AliTRDgeometryHole();
130     fGeom->SetPHOShole();
131     fGeom->SetRICHhole();    
132   } 
133
134   if (!fPar) {  
135     printf("AliTRDtracker::AliTRDtracker(): can't find TRD parameter!\n");
136     printf("The DEFAULT TRD parameter will be used\n");
137     fPar = new AliTRDparameter();
138   }
139   fPar->ReInit();
140
141   savedir->cd();  
142
143
144   //  fGeom->SetT0(fTzero);
145
146   fNclusters = 0;
147   fClusters  = new TObjArray(2000); 
148   fNseeds    = 0;
149   fSeeds     = new TObjArray(2000);
150   fNtracks   = 0;
151   fTracks    = new TObjArray(1000);
152
153   for(Int_t geomS = 0; geomS < kTrackingSectors; geomS++) {
154     Int_t trS = CookSectorIndex(geomS);
155     fTrSec[trS] = new AliTRDtrackingSector(fGeom, geomS, fPar);
156     for (Int_t icham=0;icham<AliTRDgeometry::kNcham; icham++){
157       fHoles[icham][trS]=fGeom->IsHole(0,icham,geomS);
158     }
159   }
160
161   Float_t tiltAngle = TMath::Abs(fPar->GetTiltingAngle()); 
162   if(tiltAngle < 0.1) {
163     fNoTilt = kTRUE;
164   }
165
166   fSY2corr = 0.2;
167   fSZ2corr = 120.;      
168
169   if(fNoTilt && (tiltAngle > 0.1)) fSY2corr = fSY2corr + tiltAngle * 0.05; 
170
171
172   // calculate max gap on track
173
174   Double_t dxAmp = (Double_t) fGeom->CamHght();   // Amplification region
175   Double_t dxDrift = (Double_t) fGeom->CdrHght(); // Drift region
176
177   Double_t dx = (Double_t) fPar->GetTimeBinSize();   
178   Int_t tbAmp = fPar->GetTimeBefore();
179   Int_t maxAmp = (Int_t) ((dxAmp+0.000001)/dx);
180   if(kTRUE) maxAmp = 0;  // intentional until we change the parameter class 
181   Int_t tbDrift = fPar->GetTimeMax();
182   Int_t maxDrift = (Int_t) ((dxDrift+0.000001)/dx);
183
184   tbDrift = TMath::Min(tbDrift,maxDrift);
185   tbAmp = TMath::Min(tbAmp,maxAmp);
186
187   fTimeBinsPerPlane = tbAmp + tbDrift;
188   fMaxGap = (Int_t) (fTimeBinsPerPlane * fGeom->Nplan() * fgkSkipDepth);
189
190   fVocal = kFALSE;
191
192
193   // Barrel Tracks [SR, 03.04.2003]
194
195   fBarrelFile = 0;
196   fBarrelTree = 0;
197   fBarrelArray = 0;
198   fBarrelTrack = 0;
199
200   savedir->cd();
201 }   
202
203 //___________________________________________________________________
204 AliTRDtracker::~AliTRDtracker()
205 {
206   //
207   // Destructor of AliTRDtracker 
208   //
209
210   if (fClusters) {
211     fClusters->Delete();
212     delete fClusters;
213   }
214   if (fTracks) {
215     fTracks->Delete();
216     delete fTracks;
217   }
218   if (fSeeds) {
219     fSeeds->Delete();
220     delete fSeeds;
221   }
222   delete fGeom;  
223   delete fPar;  
224
225   for(Int_t geomS = 0; geomS < kTrackingSectors; geomS++) {
226     delete fTrSec[geomS];
227   }
228 }   
229
230 //_____________________________________________________________________
231
232 void AliTRDtracker::SetBarrelTree(const char *mode) {
233   //
234   //
235   //
236
237   if (!IsStoringBarrel()) return;
238
239   TDirectory *sav = gDirectory;
240   if (!fBarrelFile) fBarrelFile = new TFile("AliBarrelTracks.root", "UPDATE");
241
242   char buff[40];
243   sprintf(buff,  "BarrelTRD_%d_%s", GetEventNumber(), mode);
244
245   fBarrelFile->cd();
246   fBarrelTree = new TTree(buff, "Barrel TPC tracks");
247   
248   Int_t nRefs = fgkLastPlane - fgkFirstPlane + 1;
249
250   if (!fBarrelArray) fBarrelArray = new TClonesArray("AliBarrelTrack", nRefs);
251   for(Int_t i=0; i<nRefs; i++) new((*fBarrelArray)[i]) AliBarrelTrack();
252   
253   fBarrelTree->Branch("tracks", &fBarrelArray);
254   sav->cd();
255 }
256   
257 //_____________________________________________________________________
258
259 void AliTRDtracker::StoreBarrelTrack(AliTRDtrack *ps, Int_t refPlane, Int_t isIn) {
260   //
261   //
262   //
263   
264   if (!IsStoringBarrel()) return;
265   
266   static Int_t nClusters;
267   static Int_t nWrong;
268   static Double_t chi2;
269   static Int_t index;
270   static Bool_t wasLast = kTRUE;
271   
272   Int_t newClusters, newWrong;
273   Double_t newChi2;
274   
275   if (wasLast) {   
276  
277     fBarrelArray->Clear();
278     nClusters = nWrong = 0;
279     chi2 = 0.0;
280     index = 0;
281     wasLast = kFALSE;
282   }
283   
284   fBarrelTrack = (AliBarrelTrack*)(*fBarrelArray)[index++];
285   ps->GetBarrelTrack(fBarrelTrack);
286   
287   newClusters = ps->GetNumberOfClusters() - nClusters; 
288   newWrong = ps->GetNWrong() - nWrong;
289   newChi2 = ps->GetChi2() - chi2;
290   
291   nClusters =  ps->GetNumberOfClusters();
292   nWrong = ps->GetNWrong();
293   chi2 = ps->GetChi2();  
294
295   if (refPlane != fgkLastPlane) {
296     fBarrelTrack->SetNClusters(newClusters, newChi2);
297     fBarrelTrack->SetNWrongClusters(newWrong);
298   } else {
299     wasLast = kTRUE;
300   } 
301
302   fBarrelTrack->SetRefPlane(refPlane, isIn);
303 }
304
305 //_____________________________________________________________________
306
307 Bool_t AliTRDtracker::AdjustSector(AliTRDtrack *track) {
308   //
309   // Rotates the track when necessary
310   //
311
312   Double_t alpha = AliTRDgeometry::GetAlpha(); 
313   Double_t y = track->GetY();
314   Double_t ymax = track->GetX()*TMath::Tan(0.5*alpha);
315
316   //Int_t ns = AliTRDgeometry::kNsect;
317   //Int_t s=Int_t(track->GetAlpha()/alpha)%ns; 
318
319   if (y > ymax) {
320     //s = (s+1) % ns;
321     if (!track->Rotate(alpha)) return kFALSE;
322   } else if (y <-ymax) {
323     //s = (s-1+ns) % ns;                           
324     if (!track->Rotate(-alpha)) return kFALSE;   
325   } 
326
327   return kTRUE;
328 }
329
330 //_____________________________________________________________________
331 inline Double_t f1trd(Double_t x1,Double_t y1,
332                       Double_t x2,Double_t y2,
333                       Double_t x3,Double_t y3)
334 {
335   //
336   // Initial approximation of the track curvature
337   //
338   Double_t d=(x2-x1)*(y3-y2)-(x3-x2)*(y2-y1);
339   Double_t a=0.5*((y3-y2)*(y2*y2-y1*y1+x2*x2-x1*x1)-
340                   (y2-y1)*(y3*y3-y2*y2+x3*x3-x2*x2));
341   Double_t b=0.5*((x2-x1)*(y3*y3-y2*y2+x3*x3-x2*x2)-
342                   (x3-x2)*(y2*y2-y1*y1+x2*x2-x1*x1));
343
344   Double_t xr=TMath::Abs(d/(d*x1-a)), yr=d/(d*y1-b);
345
346   return -xr*yr/sqrt(xr*xr+yr*yr);
347 }          
348
349 //_____________________________________________________________________
350 inline Double_t f2trd(Double_t x1,Double_t y1,
351                       Double_t x2,Double_t y2,
352                       Double_t x3,Double_t y3)
353 {
354   //
355   // Initial approximation of the track curvature times X coordinate
356   // of the center of curvature
357   //
358
359   Double_t d=(x2-x1)*(y3-y2)-(x3-x2)*(y2-y1);
360   Double_t a=0.5*((y3-y2)*(y2*y2-y1*y1+x2*x2-x1*x1)-
361                   (y2-y1)*(y3*y3-y2*y2+x3*x3-x2*x2));
362   Double_t b=0.5*((x2-x1)*(y3*y3-y2*y2+x3*x3-x2*x2)-
363                   (x3-x2)*(y2*y2-y1*y1+x2*x2-x1*x1));
364
365   Double_t xr=TMath::Abs(d/(d*x1-a)), yr=d/(d*y1-b);
366
367   return -a/(d*y1-b)*xr/sqrt(xr*xr+yr*yr);
368 }          
369
370 //_____________________________________________________________________
371 inline Double_t f3trd(Double_t x1,Double_t y1,
372                       Double_t x2,Double_t y2,
373                       Double_t z1,Double_t z2)
374 {
375   //
376   // Initial approximation of the tangent of the track dip angle
377   //
378
379   return (z1 - z2)/sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
380 }            
381
382
383 AliTRDcluster * AliTRDtracker::GetCluster(AliTRDtrack * track, Int_t plane, Int_t timebin){
384   //
385   //try to find cluster in the backup list
386   //
387   AliTRDcluster * cl =0;
388   UInt_t *indexes = track->GetBackupIndexes();
389   for (UInt_t i=0;i<kMaxTimeBinIndex;i++){
390     if (indexes[i]==0) break;  
391     AliTRDcluster * cli = (AliTRDcluster*)fClusters->UncheckedAt(indexes[i]);
392     if (!cli) break;
393     if (cli->GetLocalTimeBin()!=timebin) continue;
394     Int_t iplane = fGeom->GetPlane(cli->GetDetector());
395     if (iplane==plane) {
396       cl = cli;
397       break;
398     }
399   }
400   return cl;
401 }
402
403
404 Int_t  AliTRDtracker::GetLastPlane(AliTRDtrack * track){
405   //
406   //return last updated plane
407   Int_t lastplane=0;
408   UInt_t *indexes = track->GetBackupIndexes();
409   for (UInt_t i=0;i<kMaxTimeBinIndex;i++){
410     AliTRDcluster * cli = (AliTRDcluster*)fClusters->UncheckedAt(indexes[i]);
411     if (!cli) break;
412     Int_t iplane = fGeom->GetPlane(cli->GetDetector());
413     if (iplane>lastplane) {
414       lastplane = iplane;
415     }
416   }
417   return lastplane;
418 }
419 //___________________________________________________________________
420 Int_t AliTRDtracker::Clusters2Tracks(const TFile *inp, TFile *out)
421 {
422   //
423   // Finds tracks within the TRD. File <inp> is expected to contain seeds 
424   // at the outer part of the TRD. If <inp> is NULL, the seeds
425   // are found within the TRD if fAddTRDseeds is TRUE. 
426   // The tracks are propagated to the innermost time bin 
427   // of the TRD and stored in file <out>. 
428   //
429
430   LoadEvent();
431  
432   TDirectory *savedir=gDirectory;
433
434   char   tname[100];
435
436   if (!out->IsOpen()) {
437     cerr<<"AliTRDtracker::Clusters2Tracks(): output file is not open !\n";
438     return 1;
439   }    
440
441   sprintf(tname,"seedTRDtoTPC_%d",GetEventNumber()); 
442   TTree tpcTree(tname,"Tree with seeds from TRD at outer TPC pad row");
443   AliTPCtrack *iotrack=0;
444   tpcTree.Branch("tracks","AliTPCtrack",&iotrack,32000,0); 
445
446   sprintf(tname,"TreeT%d_TRD",GetEventNumber());
447   TTree trdTree(tname,"TRD tracks at inner TRD time bin");
448   AliTRDtrack *iotrackTRD=0;
449   trdTree.Branch("tracks","AliTRDtrack",&iotrackTRD,32000,0);  
450
451   Int_t timeBins = fTrSec[0]->GetNumberOfTimeBins();
452   Float_t foundMin = fgkMinClustersInTrack * timeBins; 
453
454   if (inp) {
455      TFile *in=(TFile*)inp;
456      if (!in->IsOpen()) {
457         cerr<<
458           "AliTRDtracker::Clusters2Tracks(): file with seeds is not open !\n";
459         cerr<<" ... going for seeds finding inside the TRD\n";
460      }
461      else {
462        in->cd();
463        sprintf(tname,"TRDb_%d",GetEventNumber());  
464        TTree *seedTree=(TTree*)in->Get(tname);  
465        if (!seedTree) {
466          cerr<<"AliTRDtracker::Clusters2Tracks(): ";
467          cerr<<"can't get a tree with track seeds !\n";
468          return 3;
469        }  
470        AliTRDtrack *seed=new AliTRDtrack;
471        seedTree->SetBranchAddress("tracks",&seed);
472
473        Int_t n=(Int_t)seedTree->GetEntries();
474        for (Int_t i=0; i<n; i++) {
475          seedTree->GetEvent(i);
476          seed->ResetCovariance(); 
477          AliTRDtrack *tr = new AliTRDtrack(*seed,seed->GetAlpha());
478          fSeeds->AddLast(tr);
479          fNseeds++;
480        }          
481        delete seed;
482        delete seedTree;
483      }
484   }
485
486   out->cd();
487
488
489   // find tracks from loaded seeds
490
491   Int_t nseed=fSeeds->GetEntriesFast();
492   Int_t i, found = 0;
493   Int_t innerTB = fTrSec[0]->GetInnerTimeBin();
494
495   for (i=0; i<nseed; i++) {   
496     AliTRDtrack *pt=(AliTRDtrack*)fSeeds->UncheckedAt(i), &t=*pt; 
497     FollowProlongation(t, innerTB); 
498     if (t.GetNumberOfClusters() >= foundMin) {
499       UseClusters(&t);
500       CookLabel(pt, 1-fgkLabelFraction);
501       //      t.CookdEdx();
502     }
503     iotrackTRD = pt;
504     trdTree.Fill();
505     found++;
506 //    cout<<found<<'\r';     
507
508     if(PropagateToTPC(t)) {
509       AliTPCtrack *tpc = new AliTPCtrack(*pt,pt->GetAlpha());
510       iotrack = tpc;
511       tpcTree.Fill();
512       delete tpc;
513     }  
514     delete fSeeds->RemoveAt(i);
515     fNseeds--;
516   }     
517
518   cout<<"Number of loaded seeds: "<<nseed<<endl;  
519   cout<<"Number of found tracks from loaded seeds: "<<found<<endl;
520
521   // after tracks from loaded seeds are found and the corresponding 
522   // clusters are used, look for additional seeds from TRD
523
524   if(fAddTRDseeds) { 
525     // Find tracks for the seeds in the TRD
526     Int_t timeBins = fTrSec[0]->GetNumberOfTimeBins();
527   
528     Int_t nSteps = (Int_t) (fgkSeedDepth / fgkSeedStep);
529     Int_t gap = (Int_t) (timeBins * fgkSeedGap);
530     Int_t step = (Int_t) (timeBins * fgkSeedStep);
531   
532     // make a first turn with tight cut on initial curvature
533     for(Int_t turn = 1; turn <= 2; turn++) {
534       if(turn == 2) {
535         nSteps = (Int_t) (fgkSeedDepth / (3*fgkSeedStep));
536         step = (Int_t) (timeBins * (3*fgkSeedStep));
537       }
538       for(Int_t i=0; i<nSteps; i++) {
539         Int_t outer=timeBins-1-i*step; 
540         Int_t inner=outer-gap;
541
542         nseed=fSeeds->GetEntriesFast();
543       
544         MakeSeeds(inner, outer, turn);
545       
546         nseed=fSeeds->GetEntriesFast();
547         printf("\n turn %d, step %d: number of seeds for TRD inward %d\n", 
548                turn, i, nseed); 
549               
550         for (Int_t i=0; i<nseed; i++) {   
551           AliTRDtrack *pt=(AliTRDtrack*)fSeeds->UncheckedAt(i), &t=*pt; 
552           FollowProlongation(t,innerTB); 
553           if (t.GetNumberOfClusters() >= foundMin) {
554             UseClusters(&t);
555             CookLabel(pt, 1-fgkLabelFraction);
556             t.CookdEdx();
557             found++;
558 //            cout<<found<<'\r';     
559             iotrackTRD = pt;
560             trdTree.Fill();
561             if(PropagateToTPC(t)) {
562               AliTPCtrack *tpc = new AliTPCtrack(*pt,pt->GetAlpha());
563               iotrack = tpc;
564               tpcTree.Fill();
565               delete tpc;
566             }        
567           }
568           delete fSeeds->RemoveAt(i);
569           fNseeds--;
570         }
571       }
572     }
573   }
574   tpcTree.Write(); 
575   trdTree.Write(); 
576   
577   cout<<"Total number of found tracks: "<<found<<endl;
578     
579   UnloadEvent();
580     
581   savedir->cd();  
582   
583   return 0;    
584 }     
585           
586 //___________________________________________________________________
587 Int_t AliTRDtracker::Clusters2Tracks(AliESD* event)
588 {
589   //
590   // Finds tracks within the TRD. The ESD event is expected to contain seeds 
591   // at the outer part of the TRD. The seeds
592   // are found within the TRD if fAddTRDseeds is TRUE. 
593   // The tracks are propagated to the innermost time bin 
594   // of the TRD and the ESD event is updated
595   //
596
597   Int_t timeBins = fTrSec[0]->GetNumberOfTimeBins();
598   Float_t foundMin = fgkMinClustersInTrack * timeBins; 
599   Int_t nseed = 0;
600   Int_t found = 0;
601   Int_t innerTB = fTrSec[0]->GetInnerTimeBin();
602
603   Int_t n = event->GetNumberOfTracks();
604   for (Int_t i=0; i<n; i++) {
605     AliESDtrack* seed=event->GetTrack(i);
606     ULong_t status=seed->GetStatus();
607     if ( (status & AliESDtrack::kTRDout ) == 0 ) continue;
608     if ( (status & AliESDtrack::kTRDin) != 0 ) continue;
609     nseed++;
610
611     AliTRDtrack* seed2 = new AliTRDtrack(*seed);
612     //seed2->ResetCovariance(); 
613     AliTRDtrack *pt = new AliTRDtrack(*seed2,seed2->GetAlpha());
614     AliTRDtrack &t=*pt; 
615     FollowProlongation(t, innerTB); 
616     if (t.GetNumberOfClusters() >= foundMin) {
617       UseClusters(&t);
618       CookLabel(pt, 1-fgkLabelFraction);
619       //      t.CookdEdx();
620     }
621     found++;
622 //    cout<<found<<'\r';     
623
624     if(PropagateToTPC(t)) {
625       seed->UpdateTrackParams(pt, AliESDtrack::kTRDin);
626     }  
627     delete seed2;
628     delete pt;
629   }     
630
631   cout<<"Number of loaded seeds: "<<nseed<<endl;  
632   cout<<"Number of found tracks from loaded seeds: "<<found<<endl;
633
634   // after tracks from loaded seeds are found and the corresponding 
635   // clusters are used, look for additional seeds from TRD
636
637   if(fAddTRDseeds) { 
638     // Find tracks for the seeds in the TRD
639     Int_t timeBins = fTrSec[0]->GetNumberOfTimeBins();
640   
641     Int_t nSteps = (Int_t) (fgkSeedDepth / fgkSeedStep);
642     Int_t gap = (Int_t) (timeBins * fgkSeedGap);
643     Int_t step = (Int_t) (timeBins * fgkSeedStep);
644   
645     // make a first turn with tight cut on initial curvature
646     for(Int_t turn = 1; turn <= 2; turn++) {
647       if(turn == 2) {
648         nSteps = (Int_t) (fgkSeedDepth / (3*fgkSeedStep));
649         step = (Int_t) (timeBins * (3*fgkSeedStep));
650       }
651       for(Int_t i=0; i<nSteps; i++) {
652         Int_t outer=timeBins-1-i*step; 
653         Int_t inner=outer-gap;
654
655         nseed=fSeeds->GetEntriesFast();
656       
657         MakeSeeds(inner, outer, turn);
658       
659         nseed=fSeeds->GetEntriesFast();
660         printf("\n turn %d, step %d: number of seeds for TRD inward %d\n", 
661                turn, i, nseed); 
662               
663         for (Int_t i=0; i<nseed; i++) {   
664           AliTRDtrack *pt=(AliTRDtrack*)fSeeds->UncheckedAt(i), &t=*pt; 
665           FollowProlongation(t,innerTB); 
666           if (t.GetNumberOfClusters() >= foundMin) {
667             UseClusters(&t);
668             CookLabel(pt, 1-fgkLabelFraction);
669             t.CookdEdx();
670             found++;
671 //            cout<<found<<'\r';     
672             if(PropagateToTPC(t)) {
673               AliESDtrack track;
674               track.UpdateTrackParams(pt,AliESDtrack::kTRDin);
675               event->AddTrack(&track);
676             }        
677           }
678           delete fSeeds->RemoveAt(i);
679           fNseeds--;
680         }
681       }
682     }
683   }
684   
685   cout<<"Total number of found tracks: "<<found<<endl;
686     
687   return 0;    
688 }     
689      
690   
691
692 //_____________________________________________________________________________
693 Int_t AliTRDtracker::PropagateBack(const TFile *inp, TFile *out) {
694   //
695   // Reads seeds from file <inp>. The seeds are AliTPCtrack's found and
696   // backpropagated by the TPC tracker. Each seed is first propagated 
697   // to the TRD, and then its prolongation is searched in the TRD.
698   // If sufficiently long continuation of the track is found in the TRD
699   // the track is updated, otherwise it's stored as originaly defined 
700   // by the TPC tracker.   
701   //  
702
703   LoadEvent();
704
705   TDirectory *savedir=gDirectory;
706
707   TFile *in=(TFile*)inp;
708
709   if (!in->IsOpen()) {
710      cerr<<"AliTRDtracker::PropagateBack(): ";
711      cerr<<"file with back propagated TPC tracks is not open !\n";
712      return 1;
713   }                   
714
715   if (!out->IsOpen()) {
716      cerr<<"AliTRDtracker::PropagateBack(): ";
717      cerr<<"file for back propagated TRD tracks is not open !\n";
718      return 2;
719   }      
720
721   in->cd();
722   char   tname[100];
723   sprintf(tname,"seedsTPCtoTRD_%d",GetEventNumber());       
724   TTree *seedTree=(TTree*)in->Get(tname);
725   if (!seedTree) {
726      cerr<<"AliTRDtracker::PropagateBack(): ";
727      cerr<<"can't get a tree with seeds from TPC !\n";
728      cerr<<"check if your version of TPC tracker creates tree "<<tname<<"\n";
729      return 3;
730   }
731
732   AliTPCtrack *seed=new AliTPCtrack;
733   seedTree->SetBranchAddress("tracks",&seed);
734
735   Int_t n=(Int_t)seedTree->GetEntries();
736   for (Int_t i=0; i<n; i++) {
737      seedTree->GetEvent(i);
738      Int_t lbl = seed->GetLabel();
739      AliTRDtrack *tr = new AliTRDtrack(*seed,seed->GetAlpha());
740      tr->SetSeedLabel(lbl);
741      fSeeds->AddLast(tr);
742      fNseeds++;
743   }
744
745   delete seed;
746   delete seedTree;
747
748   out->cd();
749
750   AliTPCtrack *otrack=0;
751
752   sprintf(tname,"seedsTRDtoTOF1_%d",GetEventNumber());  
753   TTree tofTree1(tname,"Tracks back propagated through TPC and TRD");
754   tofTree1.Branch("tracks","AliTPCtrack",&otrack,32000,0);  
755
756   sprintf(tname,"seedsTRDtoTOF2_%d",GetEventNumber());  
757   TTree tofTree2(tname,"Tracks back propagated through TPC and TRD");
758   tofTree2.Branch("tracks","AliTPCtrack",&otrack,32000,0);  
759
760   sprintf(tname,"seedsTRDtoPHOS_%d",GetEventNumber());  
761   TTree phosTree(tname,"Tracks back propagated through TPC and TRD");
762   phosTree.Branch("tracks","AliTPCtrack",&otrack,32000,0);  
763
764   sprintf(tname,"seedsTRDtoRICH_%d",GetEventNumber());  
765   TTree richTree(tname,"Tracks back propagated through TPC and TRD");
766   richTree.Branch("tracks","AliTPCtrack",&otrack,32000,0);  
767
768   sprintf(tname,"TRDb_%d",GetEventNumber());  
769   TTree trdTree(tname,"Back propagated TRD tracks at outer TRD time bin");
770   AliTRDtrack *otrackTRD=0;
771   trdTree.Branch("tracks","AliTRDtrack",&otrackTRD,32000,0);   
772      
773   if (IsStoringBarrel()) SetBarrelTree("back");
774   out->cd();
775
776   Int_t found=0;  
777   Int_t nseed=fSeeds->GetEntriesFast();
778
779   //  Float_t foundMin = fgkMinClustersInTrack * fTimeBinsPerPlane * fGeom->Nplan(); 
780   Float_t foundMin = 40;
781
782   Int_t outermostTB  = fTrSec[0]->GetOuterTimeBin();
783
784   for (Int_t i=0; i<nseed; i++) {  
785
786     AliTRDtrack *ps=(AliTRDtrack*)fSeeds->UncheckedAt(i), &s=*ps;
787     Int_t expectedClr = FollowBackProlongation(s);
788
789     if (IsStoringBarrel()) {
790       StoreBarrelTrack(ps, fgkLastPlane, kTrackBack);
791       fBarrelTree->Fill();        
792     }
793
794     Int_t foundClr = s.GetNumberOfClusters();
795     Int_t lastTB = fTrSec[0]->GetLayerNumber(s.GetX());
796
797     //    printf("seed %d: found %d out of %d expected clusters, Min is %f\n",
798     //     i, foundClr, expectedClr, foundMin);
799
800     if (foundClr >= foundMin) {
801       if(foundClr >= 2) {
802         s.CookdEdx(); 
803         CookLabel(ps, 1-fgkLabelFraction);
804         UseClusters(ps);
805       }
806       
807       // Propagate to outer reference plane [SR, GSI, 18.02.2003]
808       ps->PropagateTo(364.8);
809       otrackTRD=ps;
810       trdTree.Fill();
811       found++;
812 //      cout<<found<<'\r';
813     }
814
815     if(((expectedClr < 10) && (lastTB == outermostTB)) ||
816        ((expectedClr >= 10) && 
817         (((Float_t) foundClr) / ((Float_t) expectedClr) >= 
818          fgkMinFractionOfFoundClusters) && (lastTB == outermostTB))) {
819
820       Double_t xTOF = 375.5;
821     
822       if(PropagateToOuterPlane(s,xTOF)) {
823         AliTPCtrack *pt = new AliTPCtrack(*ps,ps->GetAlpha());
824         otrack = pt;
825         tofTree1.Fill();
826         delete pt;
827
828         xTOF = 381.5;
829     
830         if(PropagateToOuterPlane(s,xTOF)) {
831           AliTPCtrack *pt = new AliTPCtrack(*ps,ps->GetAlpha());
832           otrack = pt;
833           tofTree2.Fill();
834           delete pt;
835
836           Double_t xPHOS = 460.;
837           
838           if(PropagateToOuterPlane(s,xPHOS)) {
839             AliTPCtrack *pt = new AliTPCtrack(*ps,ps->GetAlpha());
840             otrack = pt;
841             phosTree.Fill();
842             delete pt;
843             
844             Double_t xRICH = 490+1.267;
845             
846             if(PropagateToOuterPlane(s,xRICH)) {
847               AliTPCtrack *pt = new AliTPCtrack(*ps,ps->GetAlpha());
848               otrack = pt;
849               richTree.Fill();
850               delete pt;
851             }   
852           }
853         }
854       }      
855     }
856   }
857   
858   
859   out->cd();
860   tofTree1.Write(); 
861   tofTree2.Write(); 
862   phosTree.Write(); 
863   richTree.Write(); 
864   trdTree.Write(); 
865
866   if (IsStoringBarrel()) { // [SR, 03.04.2003]
867     fBarrelFile->cd();
868     fBarrelTree->Write();
869     fBarrelFile->Flush();
870   }
871
872   savedir->cd();  
873   cerr<<"Number of seeds: "<<nseed<<endl;  
874   cerr<<"Number of back propagated TRD tracks: "<<found<<endl;
875
876   UnloadEvent();
877
878   return 0;
879
880 }
881
882 //_____________________________________________________________________________
883 Int_t AliTRDtracker::PropagateBack(AliESD* event) {
884   //
885   // Gets seeds from ESD event. The seeds are AliTPCtrack's found and
886   // backpropagated by the TPC tracker. Each seed is first propagated 
887   // to the TRD, and then its prolongation is searched in the TRD.
888   // If sufficiently long continuation of the track is found in the TRD
889   // the track is updated, otherwise it's stored as originaly defined 
890   // by the TPC tracker.   
891   //  
892
893   Int_t found=0;  
894   Float_t foundMin = 40;
895
896   Int_t n = event->GetNumberOfTracks();
897   for (Int_t i=0; i<n; i++) {
898     AliESDtrack* seed=event->GetTrack(i);
899     ULong_t status=seed->GetStatus();
900     if ( (status & AliESDtrack::kTPCout ) == 0 ) continue;
901     if ( (status & AliESDtrack::kTRDout) != 0 ) continue;
902
903     Int_t lbl = seed->GetLabel();
904     AliTRDtrack *track = new AliTRDtrack(*seed);
905     track->SetSeedLabel(lbl);
906     fNseeds++;
907
908     Int_t expectedClr = FollowBackProlongation(*track);
909     if (track->GetNumberOfClusters()<expectedClr/3){
910       AliTRDtrack *track1 = new AliTRDtrack(*seed);
911       track1->SetSeedLabel(lbl);
912       FollowBackProlongation(*track1);
913       AliTRDtrack *track2= new AliTRDtrack(*seed);
914       track->SetSeedLabel(lbl);
915       FollowBackProlongation(*track2);      
916       delete track1;
917       delete track2;
918     }
919     
920     Int_t foundClr = track->GetNumberOfClusters();
921     if (foundClr >= foundMin) {
922       if(foundClr >= 2) {
923         track->CookdEdx(); 
924 //      CookLabel(track, 1-fgkLabelFraction);
925         UseClusters(track);
926       }
927       
928       // Propagate to outer reference plane [SR, GSI, 18.02.2003]
929 //      track->PropagateTo(364.8);  why?
930       
931       //seed->UpdateTrackParams(track, AliESDtrack::kTRDout);
932       //found++;
933     }
934
935     //Propagation to the TOF (I.Belikov)
936     
937     if (track->GetStop()==kFALSE){
938       Double_t xTOF = 375.5;    
939       PropagateToOuterPlane(*track,xTOF); 
940       
941       Double_t xtof=378.;
942       Double_t c2=track->GetC()*xtof - track->GetEta();
943       if (TMath::Abs(c2)>=0.9999999){
944         delete track;
945         continue;
946       }
947       
948       Double_t ymax=xtof*TMath::Tan(0.5*AliTRDgeometry::GetAlpha());
949       Double_t y=track->GetYat(xtof);
950       if (y > ymax) {
951         if (!track->Rotate(AliTRDgeometry::GetAlpha())) {
952           delete track;
953           return 1;
954         }
955       } else if (y <-ymax) {
956         if (!track->Rotate(-AliTRDgeometry::GetAlpha())) {
957           delete track;
958           return 1;
959         }
960       }
961       
962       if (track->PropagateTo(xtof)) {
963         seed->UpdateTrackParams(track, AliESDtrack::kTRDout);    
964         if (track->GetNumberOfClusters()>foundMin) found++;
965       }
966     }else{
967       if (track->GetNumberOfClusters()>15&&track->GetNumberOfClusters()>0.5*expectedClr){
968         seed->UpdateTrackParams(track, AliESDtrack::kTRDout);
969         seed->UpdateTrackParams(track, AliESDtrack::kTRDStop);    
970         found++;
971       }
972     }
973
974     delete track;
975     
976     //End of propagation to the TOF
977     //if (foundClr>foundMin)
978     //  seed->UpdateTrackParams(track, AliESDtrack::kTRDout);
979     
980
981   }
982   
983   cerr<<"Number of seeds: "<<fNseeds<<endl;  
984   cerr<<"Number of back propagated TRD tracks: "<<found<<endl;
985
986   fSeeds->Clear(); fNseeds=0;
987
988   return 0;
989
990 }
991
992 //_____________________________________________________________________________
993 Int_t AliTRDtracker::RefitInward(AliESD* event)
994 {
995   //
996   // Refits tracks within the TRD. The ESD event is expected to contain seeds 
997   // at the outer part of the TRD. 
998   // The tracks are propagated to the innermost time bin 
999   // of the TRD and the ESD event is updated
1000   // Origin: Thomas KUHR (Thomas.Kuhr@cern.ch)
1001   //
1002
1003   Int_t timeBins = fTrSec[0]->GetNumberOfTimeBins();
1004   Float_t foundMin = fgkMinClustersInTrack * timeBins; 
1005   Int_t nseed = 0;
1006   Int_t found = 0;
1007   Int_t innerTB = fTrSec[0]->GetInnerTimeBin();
1008
1009   Int_t n = event->GetNumberOfTracks();
1010   for (Int_t i=0; i<n; i++) {
1011     AliESDtrack* seed=event->GetTrack(i);
1012     ULong_t status=seed->GetStatus();
1013     if ( (status & AliESDtrack::kTRDout ) == 0 ) continue;
1014     if ( (status & AliESDtrack::kTRDin) != 0 ) continue;
1015     nseed++;
1016
1017     AliTRDtrack* seed2 = new AliTRDtrack(*seed);
1018     seed2->ResetCovariance(5.); 
1019     AliTRDtrack *pt = new AliTRDtrack(*seed2,seed2->GetAlpha());
1020     UInt_t * indexes2 = seed2->GetIndexes();
1021     UInt_t * indexes3 = pt->GetBackupIndexes();
1022     for (Int_t i=0;i<200;i++) {
1023       if (indexes2[i]==0) break;
1024       indexes3[i] = indexes2[i];
1025     }          
1026     //AliTRDtrack *pt = seed2;
1027     AliTRDtrack &t=*pt; 
1028     FollowProlongation(t, innerTB); 
1029
1030     if (t.GetNumberOfClusters()<seed->GetTRDclusters(indexes3)*0.5){
1031       // debug  - why we dont go back?
1032       AliTRDtrack *pt2 = new AliTRDtrack(*seed2,seed2->GetAlpha());
1033       UInt_t * indexes2 = seed2->GetIndexes();
1034       UInt_t * indexes3 = pt2->GetBackupIndexes();
1035       for (Int_t i=0;i<200;i++) {
1036         if (indexes2[i]==0) break;
1037         indexes3[i] = indexes2[i];
1038       }  
1039       FollowProlongation(*pt2, innerTB);
1040       delete pt2;
1041     }
1042
1043     if (t.GetNumberOfClusters() >= foundMin) {
1044       //      UseClusters(&t);
1045       //CookLabel(pt, 1-fgkLabelFraction);
1046       //      t.CookdEdx();
1047     }
1048     found++;
1049 //    cout<<found<<'\r';     
1050
1051     if(PropagateToTPC(t)) {
1052       seed->UpdateTrackParams(pt, AliESDtrack::kTRDrefit);
1053     }  
1054     delete seed2;
1055     delete pt;
1056   }     
1057
1058   cout<<"Number of loaded seeds: "<<nseed<<endl;  
1059   cout<<"Number of found tracks from loaded seeds: "<<found<<endl;
1060
1061   return 0;
1062
1063 }
1064
1065
1066 //---------------------------------------------------------------------------
1067 Int_t AliTRDtracker::FollowProlongation(AliTRDtrack& t, Int_t rf)
1068 {
1069   // Starting from current position on track=t this function tries
1070   // to extrapolate the track up to timeBin=0 and to confirm prolongation
1071   // if a close cluster is found. Returns the number of clusters
1072   // expected to be found in sensitive layers
1073
1074   Float_t  wIndex, wTB, wChi2;
1075   Float_t  wYrt, wYclosest, wYcorrect, wYwindow;
1076   Float_t  wZrt, wZclosest, wZcorrect, wZwindow;
1077   Float_t  wPx, wPy, wPz, wC;
1078   Double_t px, py, pz;
1079   Float_t  wSigmaC2, wSigmaTgl2, wSigmaY2, wSigmaZ2;
1080   Int_t lastplane = GetLastPlane(&t);
1081
1082   Int_t trackIndex = t.GetLabel();  
1083
1084   Int_t ns=Int_t(2*TMath::Pi()/AliTRDgeometry::GetAlpha()+0.5);     
1085
1086   Int_t tryAgain=fMaxGap;
1087
1088   Double_t alpha=t.GetAlpha();
1089   alpha = TVector2::Phi_0_2pi(alpha);
1090
1091   Int_t s=Int_t(alpha/AliTRDgeometry::GetAlpha())%AliTRDgeometry::kNsect;  
1092   Double_t radLength, rho, x, dx, y, ymax, z;
1093
1094   Int_t expectedNumberOfClusters = 0;
1095   Bool_t lookForCluster;
1096
1097   alpha=AliTRDgeometry::GetAlpha();  // note: change in meaning
1098
1099  
1100   for (Int_t nr=fTrSec[0]->GetLayerNumber(t.GetX()); nr>rf; nr--) { 
1101
1102     y = t.GetY(); z = t.GetZ();
1103
1104     // first propagate to the inner surface of the current time bin 
1105     fTrSec[s]->GetLayer(nr)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1106     x = fTrSec[s]->GetLayer(nr)->GetX()-dx/2; y = t.GetY(); z = t.GetZ();
1107     if(!t.PropagateTo(x,radLength,rho)) break;
1108     y = t.GetY();
1109     ymax = x*TMath::Tan(0.5*alpha);
1110     if (y > ymax) {
1111       s = (s+1) % ns;
1112       if (!t.Rotate(alpha)) break;
1113       if(!t.PropagateTo(x,radLength,rho)) break;
1114     } else if (y <-ymax) {
1115       s = (s-1+ns) % ns;                           
1116       if (!t.Rotate(-alpha)) break;   
1117       if(!t.PropagateTo(x,radLength,rho)) break;
1118     } 
1119
1120     y = t.GetY(); z = t.GetZ();
1121
1122     // now propagate to the middle plane of the next time bin 
1123     fTrSec[s]->GetLayer(nr-1)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1124     x = fTrSec[s]->GetLayer(nr-1)->GetX(); y = t.GetY(); z = t.GetZ();
1125     if(!t.PropagateTo(x,radLength,rho)) break;
1126     y = t.GetY();
1127     ymax = x*TMath::Tan(0.5*alpha);
1128     if (y > ymax) {
1129       s = (s+1) % ns;
1130       if (!t.Rotate(alpha)) break;
1131       if(!t.PropagateTo(x,radLength,rho)) break;
1132     } else if (y <-ymax) {
1133       s = (s-1+ns) % ns;                           
1134       if (!t.Rotate(-alpha)) break;   
1135       if(!t.PropagateTo(x,radLength,rho)) break;
1136     } 
1137
1138
1139     if(lookForCluster) {
1140
1141       expectedNumberOfClusters++;       
1142       wIndex = (Float_t) t.GetLabel();
1143       wTB = nr;
1144
1145       AliTRDpropagationLayer& timeBin=*(fTrSec[s]->GetLayer(nr-1));
1146
1147       Double_t sy2=ExpectedSigmaY2(x,t.GetTgl(),t.GetPt());
1148       Double_t sz2=ExpectedSigmaZ2(x,t.GetTgl());
1149
1150       Double_t road;
1151       if((t.GetSigmaY2() + sy2) > 0) road=10.*sqrt(t.GetSigmaY2() + sy2);
1152       else return expectedNumberOfClusters;
1153       
1154       wYrt = (Float_t) y;
1155       wZrt = (Float_t) z;
1156       wYwindow = (Float_t) road;
1157       t.GetPxPyPz(px,py,pz);
1158       wPx = (Float_t) px;
1159       wPy = (Float_t) py;
1160       wPz = (Float_t) pz;
1161       wC  = (Float_t) t.GetC();
1162       wSigmaC2 = (Float_t) t.GetSigmaC2();
1163       wSigmaTgl2    = (Float_t) t.GetSigmaTgl2();
1164       wSigmaY2 = (Float_t) t.GetSigmaY2();
1165       wSigmaZ2 = (Float_t) t.GetSigmaZ2();
1166       wChi2 = -1;            
1167       
1168
1169       AliTRDcluster *cl=0;
1170       UInt_t index=0;
1171
1172       Double_t maxChi2=fgkMaxChi2;
1173
1174       wYclosest = 12345678;
1175       wYcorrect = 12345678;
1176       wZclosest = 12345678;
1177       wZcorrect = 12345678;
1178       wZwindow  = TMath::Sqrt(2.25 * 12 * sz2);   
1179
1180       // Find the closest correct cluster for debugging purposes
1181       if (timeBin) {
1182         Float_t minDY = 1000000;
1183         for (Int_t i=0; i<timeBin; i++) {
1184           AliTRDcluster* c=(AliTRDcluster*)(timeBin[i]);
1185           if((c->GetLabel(0) != trackIndex) &&
1186              (c->GetLabel(1) != trackIndex) &&
1187              (c->GetLabel(2) != trackIndex)) continue;
1188           if(TMath::Abs(c->GetY() - y) > minDY) continue;
1189           minDY = TMath::Abs(c->GetY() - y);
1190           wYcorrect = c->GetY();
1191           wZcorrect = c->GetZ();
1192
1193           Double_t h01 = GetTiltFactor(c);
1194           wChi2 = t.GetPredictedChi2(c, h01);
1195         }
1196       }                    
1197
1198       // Now go for the real cluster search
1199
1200       if (timeBin) {
1201         //
1202         //find cluster in history
1203         cl =0;
1204         
1205         AliTRDcluster * cl0 = timeBin[0];
1206         if (!cl0) {
1207           continue;
1208         }
1209         Int_t plane = fGeom->GetPlane(cl0->GetDetector());
1210         if (plane>lastplane) continue;
1211         Int_t timebin = cl0->GetLocalTimeBin();
1212         AliTRDcluster * cl2= GetCluster(&t,plane, timebin);
1213         if (cl2) {
1214           cl =cl2;      
1215           Double_t h01 = GetTiltFactor(cl);
1216           maxChi2=t.GetPredictedChi2(cl,h01);
1217         }
1218         if ((!cl) && road>fgkWideRoad) {
1219           //if (t.GetNumberOfClusters()>4)
1220           //  cerr<<t.GetNumberOfClusters()
1221           //    <<"FindProlongation warning: Too broad road !\n";
1222           continue;
1223         }             
1224
1225
1226         if(!cl){
1227
1228           for (Int_t i=timeBin.Find(y-road); i<timeBin; i++) {
1229             AliTRDcluster* c=(AliTRDcluster*)(timeBin[i]);
1230             if (c->GetY() > y+road) break;
1231             if (c->IsUsed() > 0) continue;
1232             if((c->GetZ()-z)*(c->GetZ()-z) > 3 * sz2) continue;
1233             
1234             Double_t h01 = GetTiltFactor(c);
1235             Double_t chi2=t.GetPredictedChi2(c,h01);
1236             
1237             if (chi2 > maxChi2) continue;
1238             maxChi2=chi2;
1239             cl=c;
1240             index=timeBin.GetIndex(i);
1241           }               
1242         }
1243
1244         if(!cl) {
1245
1246           for (Int_t i=timeBin.Find(y-road); i<timeBin; i++) {
1247             AliTRDcluster* c=(AliTRDcluster*)(timeBin[i]);
1248             
1249             if (c->GetY() > y+road) break;
1250             if (c->IsUsed() > 0) continue;
1251             if((c->GetZ()-z)*(c->GetZ()-z) > 12 * sz2) continue;
1252             
1253             Double_t h01 = GetTiltFactor(c);
1254             Double_t chi2=t.GetPredictedChi2(c, h01);
1255             
1256             if (chi2 > maxChi2) continue;
1257             maxChi2=chi2;
1258             cl=c;
1259             index=timeBin.GetIndex(i);
1260           }
1261         }        
1262         if (cl) {
1263           wYclosest = cl->GetY();
1264           wZclosest = cl->GetZ();
1265           Double_t h01 = GetTiltFactor(cl);
1266
1267           t.SetSampledEdx(cl->GetQ()/dx,t.GetNumberOfClusters()); 
1268           //printf("Track   position\t%f\t%f\t%f\n",t.GetX(),t.GetY(),t.GetZ());
1269           //printf("Cluster position\t%d\t%f\t%f\n",cl->GetLocalTimeBin(),cl->GetY(),cl->GetZ());
1270           Int_t det = cl->GetDetector();    
1271           Int_t plane = fGeom->GetPlane(det);
1272
1273           if(!t.UpdateMI(cl,maxChi2,index,h01,plane)) {
1274             //if(!t.Update(cl,maxChi2,index,h01)) {
1275             //if(!tryAgain--) return 0;
1276           }  
1277           else tryAgain=fMaxGap;
1278         }
1279         else {
1280           //if (tryAgain==0) break; 
1281           tryAgain--;
1282         }
1283
1284         /*
1285         if((((Int_t) wTB)%15 == 0) || (((Int_t) wTB)%15 == 14)) {
1286           
1287           printf(" %f", wIndex);       //1
1288           printf(" %f", wTB);          //2
1289           printf(" %f", wYrt);         //3
1290           printf(" %f", wYclosest);    //4
1291           printf(" %f", wYcorrect);    //5
1292           printf(" %f", wYwindow);     //6
1293           printf(" %f", wZrt);         //7
1294           printf(" %f", wZclosest);    //8
1295           printf(" %f", wZcorrect);    //9
1296           printf(" %f", wZwindow);     //10
1297           printf(" %f", wPx);          //11
1298           printf(" %f", wPy);          //12
1299           printf(" %f", wPz);          //13
1300           printf(" %f", wSigmaC2*1000000);  //14
1301           printf(" %f", wSigmaTgl2*1000);   //15
1302           printf(" %f", wSigmaY2);     //16
1303           //      printf(" %f", wSigmaZ2);     //17
1304           printf(" %f", wChi2);     //17
1305           printf(" %f", wC);           //18
1306           printf("\n");
1307         } 
1308         */                        
1309       }
1310     }  
1311   }
1312   return expectedNumberOfClusters;
1313   
1314   
1315 }                
1316
1317 //___________________________________________________________________
1318
1319 Int_t AliTRDtracker::FollowBackProlongation(AliTRDtrack& t)
1320 {
1321   // Starting from current radial position of track <t> this function
1322   // extrapolates the track up to outer timebin and in the sensitive
1323   // layers confirms prolongation if a close cluster is found. 
1324   // Returns the number of clusters expected to be found in sensitive layers
1325
1326   Float_t  wIndex, wTB, wChi2;
1327   Float_t  wYrt, wYclosest, wYcorrect, wYwindow;
1328   Float_t  wZrt, wZclosest, wZcorrect, wZwindow;
1329   Float_t  wPx, wPy, wPz, wC;
1330   Double_t px, py, pz;
1331   Float_t  wSigmaC2, wSigmaTgl2, wSigmaY2, wSigmaZ2;
1332
1333   Int_t trackIndex = t.GetLabel();  
1334   Int_t tryAgain=fMaxGap;
1335
1336   Double_t alpha=t.GetAlpha();
1337   TVector2::Phi_0_2pi(alpha);
1338
1339   Int_t s;
1340
1341   Int_t outerTB = fTrSec[0]->GetOuterTimeBin();
1342   Double_t radLength, rho, x, dx, y, ymax = 0, z;
1343   Bool_t lookForCluster;
1344
1345   Int_t expectedNumberOfClusters = 0;
1346   x = t.GetX();
1347
1348   alpha=AliTRDgeometry::GetAlpha();  // note: change in meaning
1349
1350   Int_t nRefPlane = fgkFirstPlane;
1351   Bool_t isNewLayer = kFALSE; 
1352
1353   Double_t chi2;
1354   Double_t minDY;
1355   Int_t zone =-10;
1356   Int_t nr;
1357   for (nr=fTrSec[0]->GetLayerNumber(t.GetX()); nr<outerTB+1; nr++) { 
1358     
1359     y = t.GetY(); 
1360     z = t.GetZ();
1361
1362     // first propagate to the outer surface of the current time bin 
1363
1364     s = t.GetSector();
1365     fTrSec[s]->GetLayer(nr)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1366     x = fTrSec[s]->GetLayer(nr)->GetX()+dx/2; 
1367     y = t.GetY(); 
1368     z = t.GetZ();
1369
1370     if(!t.PropagateTo(x,radLength,rho)) break;
1371     //    if (!AdjustSector(&t)) break;
1372     //
1373     // MI -fix untill correct material desription will be implemented
1374     //
1375     Float_t angle =  t.GetAlpha();  // MI - if rotation - we go through the material - 
1376     if (!AdjustSector(&t)) break;
1377     if (TMath::Abs(angle -  t.GetAlpha())>0.000001) break; //better to stop track
1378     Int_t currentzone = fTrSec[s]->GetLayer(nr)->GetZone(z);
1379     if (currentzone==-10) break;  // we are in the frame
1380     if (currentzone>-10){   // layer knows where we are
1381       if (zone==-10) zone = currentzone;
1382       if (zone!=currentzone) break;  
1383     }
1384     //
1385     //
1386     s = t.GetSector();
1387     if (!t.PropagateTo(x,radLength,rho)) break;
1388
1389     y = t.GetY();
1390     z = t.GetZ();
1391
1392     // Barrel Tracks [SR, 04.04.2003]
1393
1394     s = t.GetSector();
1395     if (fTrSec[s]->GetLayer(nr)->IsSensitive() != 
1396         fTrSec[s]->GetLayer(nr+1)->IsSensitive() ) {
1397
1398 //      if (IsStoringBarrel()) StoreBarrelTrack(&t, nRefPlane++, kTrackBack);
1399     }
1400
1401     if (fTrSec[s]->GetLayer(nr-1)->IsSensitive() && 
1402           ! fTrSec[s]->GetLayer(nr)->IsSensitive()) {
1403       isNewLayer = kTRUE;
1404     } else {isNewLayer = kFALSE;}
1405
1406     y = t.GetY();
1407     z = t.GetZ();
1408
1409     // now propagate to the middle plane of the next time bin 
1410     fTrSec[s]->GetLayer(nr+1)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1411
1412     x = fTrSec[s]->GetLayer(nr+1)->GetX(); 
1413       if(!t.PropagateTo(x,radLength,rho)) break;
1414     if (!AdjustSector(&t)) break;
1415     s = t.GetSector();
1416       if(!t.PropagateTo(x,radLength,rho)) break;
1417
1418     y = t.GetY();
1419     z = t.GetZ();
1420
1421     if(fVocal) printf("nr+1=%d, x %f, z %f, y %f, ymax %f\n",nr+1,x,z,y,ymax);
1422     //    printf("label %d, pl %d, lookForCluster %d \n",
1423     //     trackIndex, nr+1, lookForCluster);
1424
1425     if(lookForCluster) {
1426       expectedNumberOfClusters++;       
1427
1428       wIndex = (Float_t) t.GetLabel();
1429       wTB = fTrSec[s]->GetLayer(nr+1)->GetTimeBinIndex();
1430
1431       AliTRDpropagationLayer& timeBin=*(fTrSec[s]->GetLayer(nr+1));
1432       Double_t sy2=ExpectedSigmaY2(t.GetX(),t.GetTgl(),t.GetPt());
1433       Double_t sz2=ExpectedSigmaZ2(t.GetX(),t.GetTgl());
1434       if((t.GetSigmaY2() + sy2) < 0) break;
1435       Double_t road = 10.*sqrt(t.GetSigmaY2() + sy2); 
1436       Double_t y=t.GetY(), z=t.GetZ();
1437
1438       wYrt = (Float_t) y;
1439       wZrt = (Float_t) z;
1440       wYwindow = (Float_t) road;
1441       t.GetPxPyPz(px,py,pz);
1442       wPx = (Float_t) px;
1443       wPy = (Float_t) py;
1444       wPz = (Float_t) pz;
1445       wC  = (Float_t) t.GetC();
1446       wSigmaC2 = (Float_t) t.GetSigmaC2();
1447       wSigmaTgl2    = (Float_t) t.GetSigmaTgl2();
1448       wSigmaY2 = (Float_t) t.GetSigmaY2();
1449       wSigmaZ2 = (Float_t) t.GetSigmaZ2();
1450       wChi2 = -1;            
1451       
1452       if (road>fgkWideRoad) {
1453         if (t.GetNumberOfClusters()>4)
1454           cerr<<t.GetNumberOfClusters()
1455               <<"FindProlongation warning: Too broad road !\n";
1456         return 0;
1457       }      
1458
1459       AliTRDcluster *cl=0;
1460       UInt_t index=0;
1461
1462       Double_t maxChi2=fgkMaxChi2;
1463
1464       if (isNewLayer) { 
1465         road = 3 * road;
1466         //sz2 = 3 * sz2;
1467         maxChi2 = 10 * fgkMaxChi2;
1468       }
1469       
1470       if (nRefPlane == fgkFirstPlane) maxChi2 = 20 * fgkMaxChi2; 
1471       if (nRefPlane == fgkFirstPlane+2) maxChi2 = 15 * fgkMaxChi2;
1472       if (t.GetNRotate() > 0) maxChi2 = 3 * maxChi2;
1473       
1474
1475       wYclosest = 12345678;
1476       wYcorrect = 12345678;
1477       wZclosest = 12345678;
1478       wZcorrect = 12345678;
1479       wZwindow  = TMath::Sqrt(2.25 * 12 * sz2);   
1480
1481       // Find the closest correct cluster for debugging purposes
1482       if (timeBin) {
1483         minDY = 1000000;
1484         for (Int_t i=0; i<timeBin; i++) {
1485           AliTRDcluster* c=(AliTRDcluster*)(timeBin[i]);
1486           if((c->GetLabel(0) != trackIndex) &&
1487              (c->GetLabel(1) != trackIndex) &&
1488              (c->GetLabel(2) != trackIndex)) continue;
1489           if(TMath::Abs(c->GetY() - y) > minDY) continue;
1490           //minDY = TMath::Abs(c->GetY() - y);
1491           minDY = c->GetY() - y;
1492           wYcorrect = c->GetY();
1493           wZcorrect = c->GetZ();
1494
1495           Double_t h01 = GetTiltFactor(c);
1496           wChi2 = t.GetPredictedChi2(c, h01);
1497         }
1498       }                    
1499
1500       // Now go for the real cluster search
1501
1502       if (timeBin) {
1503
1504         for (Int_t i=timeBin.Find(y-road); i<timeBin; i++) {
1505           AliTRDcluster* c=(AliTRDcluster*)(timeBin[i]);
1506           if (c->GetY() > y+road) break;
1507           if (c->IsUsed() > 0) continue;
1508           if((c->GetZ()-z)*(c->GetZ()-z) > 3 * sz2) continue;
1509
1510           Double_t h01 = GetTiltFactor(c);
1511           chi2=t.GetPredictedChi2(c,h01);
1512           
1513           if (chi2 > maxChi2) continue;
1514           maxChi2=chi2;
1515           cl=c;
1516           index=timeBin.GetIndex(i);
1517
1518           //check is correct
1519           if((c->GetLabel(0) != trackIndex) &&
1520              (c->GetLabel(1) != trackIndex) &&
1521              (c->GetLabel(2) != trackIndex)) t.AddNWrong();
1522         }               
1523         
1524         if(!cl) {
1525
1526           for (Int_t i=timeBin.Find(y-road); i<timeBin; i++) {
1527             AliTRDcluster* c=(AliTRDcluster*)(timeBin[i]);
1528             
1529             if (c->GetY() > y+road) break;
1530             if (c->IsUsed() > 0) continue;
1531             if((c->GetZ()-z)*(c->GetZ()-z) > 2.25 * 12 * sz2) continue;
1532             
1533             Double_t h01 = GetTiltFactor(c);
1534             chi2=t.GetPredictedChi2(c,h01);
1535             
1536             if (chi2 > maxChi2) continue;
1537             maxChi2=chi2;
1538             cl=c;
1539             index=timeBin.GetIndex(i);
1540           }
1541         }        
1542         
1543         if (cl) {
1544           wYclosest = cl->GetY();
1545           wZclosest = cl->GetZ();
1546
1547           t.SetSampledEdx(cl->GetQ()/dx,t.GetNumberOfClusters()); 
1548           Double_t h01 = GetTiltFactor(cl);
1549           Int_t det = cl->GetDetector();    
1550           Int_t plane = fGeom->GetPlane(det);
1551
1552           if(!t.UpdateMI(cl,maxChi2,index,h01,plane)) {
1553           //if(!t.Update(cl,maxChi2,index,h01)) {
1554             if(!tryAgain--) return 0;
1555           }  
1556           else tryAgain=fMaxGap;
1557         }
1558         else {
1559           if (tryAgain==0) break; 
1560           tryAgain--;
1561           
1562           //if (minDY < 1000000 && isNewLayer) 
1563             //cout << "\t" << nRefPlane << "\t" << "\t" << t.GetNRotate() <<  "\t" << 
1564             //  road << "\t" << minDY << "\t" << chi2 << "\t" << wChi2 << "\t" << maxChi2 << endl;
1565                                                                      
1566         }
1567
1568         isNewLayer = kFALSE;
1569
1570         /*
1571         if((((Int_t) wTB)%15 == 0) || (((Int_t) wTB)%15 == 14)) {
1572           
1573           printf(" %f", wIndex);       //1
1574           printf(" %f", wTB);          //2
1575           printf(" %f", wYrt);         //3
1576           printf(" %f", wYclosest);    //4
1577           printf(" %f", wYcorrect);    //5
1578           printf(" %f", wYwindow);     //6
1579           printf(" %f", wZrt);         //7
1580           printf(" %f", wZclosest);    //8
1581           printf(" %f", wZcorrect);    //9
1582           printf(" %f", wZwindow);     //10
1583           printf(" %f", wPx);          //11
1584           printf(" %f", wPy);          //12
1585           printf(" %f", wPz);          //13
1586           printf(" %f", wSigmaC2*1000000);  //14
1587           printf(" %f", wSigmaTgl2*1000);   //15
1588           printf(" %f", wSigmaY2);     //16
1589           //      printf(" %f", wSigmaZ2);     //17
1590           printf(" %f", wChi2);     //17
1591           printf(" %f", wC);           //18
1592           printf("\n");
1593         } 
1594         */                        
1595       }
1596     }  
1597   }
1598   if (nr<outerTB) 
1599     t.SetStop(kTRUE);
1600   else
1601     t.SetStop(kFALSE);
1602   return expectedNumberOfClusters;
1603
1604
1605 }         
1606
1607 //---------------------------------------------------------------------------
1608 Int_t AliTRDtracker::Refit(AliTRDtrack& t, Int_t rf)
1609 {
1610   // Starting from current position on track=t this function tries
1611   // to extrapolate the track up to timeBin=0 and to reuse already
1612   // assigned clusters. Returns the number of clusters
1613   // expected to be found in sensitive layers
1614   // get indices of assigned clusters for each layer
1615   // Origin: Thomas KUHR (Thomas.Kuhr@cern.ch)
1616
1617   Int_t iCluster[90];
1618   for (Int_t i = 0; i < 90; i++) iCluster[i] = 0;
1619   for (Int_t i = 0; i < t.GetNumberOfClusters(); i++) {
1620     Int_t index = t.GetClusterIndex(i);
1621     AliTRDcluster *cl=(AliTRDcluster*) GetCluster(index);
1622     if (!cl) continue;
1623     Int_t detector=cl->GetDetector();
1624     Int_t localTimeBin=cl->GetLocalTimeBin();
1625     Int_t sector=fGeom->GetSector(detector);
1626     Int_t plane=fGeom->GetPlane(detector);
1627
1628     Int_t trackingSector = CookSectorIndex(sector);
1629
1630     Int_t gtb = fTrSec[trackingSector]->CookTimeBinIndex(plane,localTimeBin);
1631     if(gtb < 0) continue; 
1632     Int_t layer = fTrSec[trackingSector]->GetLayerNumber(gtb);
1633     iCluster[layer] = index;
1634   }
1635   t.ResetClusters();
1636
1637   Int_t ns=Int_t(2*TMath::Pi()/AliTRDgeometry::GetAlpha()+0.5);     
1638
1639   Double_t alpha=t.GetAlpha();
1640   alpha = TVector2::Phi_0_2pi(alpha);
1641
1642   Int_t s=Int_t(alpha/AliTRDgeometry::GetAlpha())%AliTRDgeometry::kNsect;  
1643   Double_t radLength, rho, x, dx, y, ymax, z;
1644
1645   Int_t expectedNumberOfClusters = 0;
1646   Bool_t lookForCluster;
1647
1648   alpha=AliTRDgeometry::GetAlpha();  // note: change in meaning
1649
1650  
1651   for (Int_t nr=fTrSec[0]->GetLayerNumber(t.GetX()); nr>rf; nr--) { 
1652
1653     y = t.GetY(); z = t.GetZ();
1654
1655     // first propagate to the inner surface of the current time bin 
1656     fTrSec[s]->GetLayer(nr)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1657     x = fTrSec[s]->GetLayer(nr)->GetX()-dx/2; y = t.GetY(); z = t.GetZ();
1658     if(!t.PropagateTo(x,radLength,rho)) break;
1659     y = t.GetY();
1660     ymax = x*TMath::Tan(0.5*alpha);
1661     if (y > ymax) {
1662       s = (s+1) % ns;
1663       if (!t.Rotate(alpha)) break;
1664       if(!t.PropagateTo(x,radLength,rho)) break;
1665     } else if (y <-ymax) {
1666       s = (s-1+ns) % ns;                           
1667       if (!t.Rotate(-alpha)) break;   
1668       if(!t.PropagateTo(x,radLength,rho)) break;
1669     } 
1670
1671     y = t.GetY(); z = t.GetZ();
1672
1673     // now propagate to the middle plane of the next time bin 
1674     fTrSec[s]->GetLayer(nr-1)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1675     x = fTrSec[s]->GetLayer(nr-1)->GetX(); y = t.GetY(); z = t.GetZ();
1676     if(!t.PropagateTo(x,radLength,rho)) break;
1677     y = t.GetY();
1678     ymax = x*TMath::Tan(0.5*alpha);
1679     if (y > ymax) {
1680       s = (s+1) % ns;
1681       if (!t.Rotate(alpha)) break;
1682       if(!t.PropagateTo(x,radLength,rho)) break;
1683     } else if (y <-ymax) {
1684       s = (s-1+ns) % ns;                           
1685       if (!t.Rotate(-alpha)) break;   
1686       if(!t.PropagateTo(x,radLength,rho)) break;
1687     } 
1688
1689     if(lookForCluster) expectedNumberOfClusters++;       
1690
1691     // use assigned cluster
1692     if (!iCluster[nr-1]) continue;
1693     AliTRDcluster *cl=(AliTRDcluster*)GetCluster(iCluster[nr-1]);
1694     Double_t h01 = GetTiltFactor(cl);
1695     Double_t chi2=t.GetPredictedChi2(cl, h01);
1696     t.SetSampledEdx(cl->GetQ()/dx,t.GetNumberOfClusters()); 
1697     t.Update(cl,chi2,iCluster[nr-1],h01);
1698   }
1699
1700   return expectedNumberOfClusters;
1701 }                
1702
1703 //___________________________________________________________________
1704
1705 Int_t AliTRDtracker::PropagateToOuterPlane(AliTRDtrack& t, Double_t xToGo)
1706 {
1707   // Starting from current radial position of track <t> this function
1708   // extrapolates the track up to radial position <xToGo>. 
1709   // Returns 1 if track reaches the plane, and 0 otherwise 
1710
1711   Int_t ns=Int_t(2*TMath::Pi()/AliTRDgeometry::GetAlpha()+0.5);     
1712
1713   Double_t alpha=t.GetAlpha();
1714
1715   if (alpha > 2.*TMath::Pi()) alpha -= 2.*TMath::Pi();
1716   if (alpha < 0.            ) alpha += 2.*TMath::Pi();
1717
1718   Int_t s=Int_t(alpha/AliTRDgeometry::GetAlpha())%AliTRDgeometry::kNsect;  
1719
1720   Bool_t lookForCluster;
1721   Double_t radLength, rho, x, dx, y, ymax, z;
1722
1723   x = t.GetX();
1724
1725   alpha=AliTRDgeometry::GetAlpha();  // note: change in meaning
1726
1727   Int_t plToGo = fTrSec[0]->GetLayerNumber(xToGo);
1728
1729   for (Int_t nr=fTrSec[0]->GetLayerNumber(x); nr<plToGo; nr++) { 
1730
1731     y = t.GetY(); z = t.GetZ();
1732
1733     // first propagate to the outer surface of the current time bin 
1734     fTrSec[s]->GetLayer(nr)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1735     x = fTrSec[s]->GetLayer(nr)->GetX()+dx/2; y = t.GetY(); z = t.GetZ();
1736     if(!t.PropagateTo(x,radLength,rho)) return 0;
1737     y = t.GetY();
1738     ymax = x*TMath::Tan(0.5*alpha);
1739     if (y > ymax) {
1740       s = (s+1) % ns;
1741       if (!t.Rotate(alpha)) return 0;
1742     } else if (y <-ymax) {
1743       s = (s-1+ns) % ns;                           
1744       if (!t.Rotate(-alpha)) return 0;   
1745     } 
1746     if(!t.PropagateTo(x,radLength,rho)) return 0;
1747
1748     y = t.GetY(); z = t.GetZ();
1749
1750     // now propagate to the middle plane of the next time bin 
1751     fTrSec[s]->GetLayer(nr+1)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1752     x = fTrSec[s]->GetLayer(nr+1)->GetX(); y = t.GetY(); z = t.GetZ();
1753     if(!t.PropagateTo(x,radLength,rho)) return 0;
1754     y = t.GetY();
1755     ymax = x*TMath::Tan(0.5*alpha);
1756     if (y > ymax) {
1757       s = (s+1) % ns;
1758       if (!t.Rotate(alpha)) return 0;
1759     } else if (y <-ymax) {
1760       s = (s-1+ns) % ns;                           
1761       if (!t.Rotate(-alpha)) return 0;   
1762     } 
1763     if(!t.PropagateTo(x,radLength,rho)) return 0;
1764   }
1765   return 1;
1766 }         
1767
1768 //___________________________________________________________________
1769
1770 Int_t AliTRDtracker::PropagateToTPC(AliTRDtrack& t)
1771 {
1772   // Starting from current radial position of track <t> this function
1773   // extrapolates the track up to radial position of the outermost
1774   // padrow of the TPC. 
1775   // Returns 1 if track reaches the TPC, and 0 otherwise 
1776
1777   //Int_t ns=Int_t(2*TMath::Pi()/AliTRDgeometry::GetAlpha()+0.5);     
1778
1779   Double_t alpha=t.GetAlpha();
1780   alpha = TVector2::Phi_0_2pi(alpha);
1781
1782   Int_t s=Int_t(alpha/AliTRDgeometry::GetAlpha())%AliTRDgeometry::kNsect;  
1783
1784   Bool_t lookForCluster;
1785   Double_t radLength, rho, x, dx, y, /*ymax,*/ z;
1786
1787   x = t.GetX();
1788
1789   alpha=AliTRDgeometry::GetAlpha();  // note: change in meaning
1790   Int_t plTPC = fTrSec[0]->GetLayerNumber(246.055);
1791
1792   for (Int_t nr=fTrSec[0]->GetLayerNumber(x); nr>plTPC; nr--) { 
1793
1794     y = t.GetY(); 
1795     z = t.GetZ();
1796
1797     // first propagate to the outer surface of the current time bin 
1798     fTrSec[s]->GetLayer(nr)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1799     x = fTrSec[s]->GetLayer(nr)->GetX()-dx/2; 
1800     
1801     if(!t.PropagateTo(x,radLength,rho)) return 0;
1802     AdjustSector(&t);
1803     if(!t.PropagateTo(x,radLength,rho)) return 0;
1804
1805     y = t.GetY(); 
1806     z = t.GetZ();
1807
1808     // now propagate to the middle plane of the next time bin 
1809     fTrSec[s]->GetLayer(nr-1)->GetPropagationParameters(y,z,dx,rho,radLength,lookForCluster);
1810     x = fTrSec[s]->GetLayer(nr-1)->GetX(); 
1811     
1812     if(!t.PropagateTo(x,radLength,rho)) return 0;
1813     AdjustSector(&t);
1814     if(!t.PropagateTo(x,radLength,rho)) return 0;
1815   }
1816   return 1;
1817 }         
1818
1819 void AliTRDtracker::LoadEvent()
1820 {
1821   // Fills clusters into TRD tracking_sectors 
1822   // Note that the numbering scheme for the TRD tracking_sectors 
1823   // differs from that of TRD sectors
1824
1825   ReadClusters(fClusters);
1826   Int_t ncl=fClusters->GetEntriesFast();
1827   cout<<"LoadSectors: sorting "<<ncl<<" clusters"<<endl;
1828               
1829   UInt_t index;
1830   while (ncl--) {
1831 //    printf("\r %d left  ",ncl); 
1832     AliTRDcluster *c=(AliTRDcluster*)fClusters->UncheckedAt(ncl);
1833     Int_t detector=c->GetDetector();
1834     Int_t localTimeBin=c->GetLocalTimeBin();
1835     Int_t sector=fGeom->GetSector(detector);
1836     Int_t plane=fGeom->GetPlane(detector);
1837
1838     Int_t trackingSector = CookSectorIndex(sector);
1839
1840     Int_t gtb = fTrSec[trackingSector]->CookTimeBinIndex(plane,localTimeBin);
1841     if(gtb < 0) continue; 
1842     Int_t layer = fTrSec[trackingSector]->GetLayerNumber(gtb);
1843
1844     index=ncl;
1845     fTrSec[trackingSector]->GetLayer(layer)->InsertCluster(c,index);
1846   }    
1847   //  printf("\r\n");
1848
1849 }
1850
1851 //_____________________________________________________________________________
1852 Int_t AliTRDtracker::LoadClusters(TTree *cTree)
1853 {
1854   // Fills clusters into TRD tracking_sectors 
1855   // Note that the numbering scheme for the TRD tracking_sectors 
1856   // differs from that of TRD sectors
1857
1858   if (ReadClusters(fClusters,cTree)) {
1859      Error("LoadClusters","Problem with reading the clusters !");
1860      return 1;
1861   }
1862   Int_t ncl=fClusters->GetEntriesFast();
1863   cout<<"\n LoadSectors: sorting "<<ncl<<" clusters"<<endl;
1864               
1865   UInt_t index;
1866   for (Int_t ichamber=0;ichamber<5;ichamber++)
1867     for (Int_t isector=0;isector<18;isector++){
1868       fHoles[ichamber][isector]=kTRUE;
1869     }
1870
1871
1872   while (ncl--) {
1873 //    printf("\r %d left  ",ncl); 
1874     AliTRDcluster *c=(AliTRDcluster*)fClusters->UncheckedAt(ncl);
1875     Int_t detector=c->GetDetector();
1876     Int_t localTimeBin=c->GetLocalTimeBin();
1877     Int_t sector=fGeom->GetSector(detector);
1878     Int_t plane=fGeom->GetPlane(detector);
1879       
1880     Int_t trackingSector = CookSectorIndex(sector);
1881     if (c->GetLabel(0)>0){
1882       Int_t chamber = fGeom->GetChamber(detector);
1883       fHoles[chamber][trackingSector]=kFALSE;
1884     }
1885
1886     Int_t gtb = fTrSec[trackingSector]->CookTimeBinIndex(plane,localTimeBin);
1887     if(gtb < 0) continue; 
1888     Int_t layer = fTrSec[trackingSector]->GetLayerNumber(gtb);
1889
1890     index=ncl;
1891     fTrSec[trackingSector]->GetLayer(layer)->InsertCluster(c,index);
1892   }    
1893   printf("\r\n");
1894   //
1895   //
1896   /*
1897   for (Int_t isector=0;isector<18;isector++){
1898     for (Int_t ichamber=0;ichamber<5;ichamber++)      
1899       if (fHoles[ichamber][isector]!=fGeom->IsHole(0,ichamber,17-isector)) 
1900         printf("Problem \t%d\t%d\t%d\t%d\n",isector,ichamber,fHoles[ichamber][isector],
1901              fGeom->IsHole(0,ichamber,17-isector));
1902   }
1903   */
1904   return 0;
1905 }
1906
1907 //_____________________________________________________________________________
1908 void AliTRDtracker::UnloadEvent() 
1909
1910   //
1911   // Clears the arrays of clusters and tracks. Resets sectors and timebins 
1912   //
1913
1914   Int_t i, nentr;
1915
1916   nentr = fClusters->GetEntriesFast();
1917   for (i = 0; i < nentr; i++) delete fClusters->RemoveAt(i);
1918
1919   nentr = fSeeds->GetEntriesFast();
1920   for (i = 0; i < nentr; i++) delete fSeeds->RemoveAt(i);
1921
1922   nentr = fTracks->GetEntriesFast();
1923   for (i = 0; i < nentr; i++) delete fTracks->RemoveAt(i);
1924
1925   Int_t nsec = AliTRDgeometry::kNsect;
1926
1927   for (i = 0; i < nsec; i++) {    
1928     for(Int_t pl = 0; pl < fTrSec[i]->GetNumberOfLayers(); pl++) {
1929       fTrSec[i]->GetLayer(pl)->Clear();
1930     }
1931   }
1932
1933 }
1934
1935 //__________________________________________________________________________
1936 void AliTRDtracker::MakeSeeds(Int_t inner, Int_t outer, Int_t turn)
1937 {
1938   // Creates track seeds using clusters in timeBins=i1,i2
1939
1940   if(turn > 2) {
1941     cerr<<"MakeSeeds: turn "<<turn<<" exceeds the limit of 2"<<endl;
1942     return;
1943   }
1944
1945   Double_t x[5], c[15];
1946   Int_t maxSec=AliTRDgeometry::kNsect;
1947   
1948   Double_t alpha=AliTRDgeometry::GetAlpha();
1949   Double_t shift=AliTRDgeometry::GetAlpha()/2.;
1950   Double_t cs=cos(alpha), sn=sin(alpha);
1951   Double_t cs2=cos(2.*alpha), sn2=sin(2.*alpha);
1952     
1953       
1954   Int_t i2 = fTrSec[0]->GetLayerNumber(inner);
1955   Int_t i1 = fTrSec[0]->GetLayerNumber(outer);
1956       
1957   Double_t x1 =fTrSec[0]->GetX(i1);
1958   Double_t xx2=fTrSec[0]->GetX(i2);
1959       
1960   for (Int_t ns=0; ns<maxSec; ns++) {
1961     
1962     Int_t nl2 = *(fTrSec[(ns-2+maxSec)%maxSec]->GetLayer(i2));
1963     Int_t nl=(*fTrSec[(ns-1+maxSec)%maxSec]->GetLayer(i2));
1964     Int_t nm=(*fTrSec[ns]->GetLayer(i2));
1965     Int_t nu=(*fTrSec[(ns+1)%maxSec]->GetLayer(i2));
1966     Int_t nu2=(*fTrSec[(ns+2)%maxSec]->GetLayer(i2));
1967     
1968     AliTRDpropagationLayer& r1=*(fTrSec[ns]->GetLayer(i1));
1969     
1970     for (Int_t is=0; is < r1; is++) {
1971       Double_t y1=r1[is]->GetY(), z1=r1[is]->GetZ();
1972       
1973       for (Int_t js=0; js < nl2+nl+nm+nu+nu2; js++) {
1974         
1975         const AliTRDcluster *cl;
1976         Double_t x2,   y2,   z2;
1977         Double_t x3=0., y3=0.;   
1978         
1979         if (js<nl2) {
1980           if(turn != 2) continue;
1981           AliTRDpropagationLayer& r2=*(fTrSec[(ns-2+maxSec)%maxSec]->GetLayer(i2));
1982           cl=r2[js];
1983           y2=cl->GetY(); z2=cl->GetZ();
1984           
1985           x2= xx2*cs2+y2*sn2;
1986           y2=-xx2*sn2+y2*cs2;
1987         }
1988         else if (js<nl2+nl) {
1989           if(turn != 1) continue;
1990           AliTRDpropagationLayer& r2=*(fTrSec[(ns-1+maxSec)%maxSec]->GetLayer(i2));
1991           cl=r2[js-nl2];
1992           y2=cl->GetY(); z2=cl->GetZ();
1993           
1994           x2= xx2*cs+y2*sn;
1995           y2=-xx2*sn+y2*cs;
1996         }                                
1997         else if (js<nl2+nl+nm) {
1998           if(turn != 1) continue;
1999           AliTRDpropagationLayer& r2=*(fTrSec[ns]->GetLayer(i2));
2000           cl=r2[js-nl2-nl];
2001           x2=xx2; y2=cl->GetY(); z2=cl->GetZ();
2002         }
2003         else if (js<nl2+nl+nm+nu) {
2004           if(turn != 1) continue;
2005           AliTRDpropagationLayer& r2=*(fTrSec[(ns+1)%maxSec]->GetLayer(i2));
2006           cl=r2[js-nl2-nl-nm];
2007           y2=cl->GetY(); z2=cl->GetZ();
2008           
2009           x2=xx2*cs-y2*sn;
2010           y2=xx2*sn+y2*cs;
2011         }              
2012         else {
2013           if(turn != 2) continue;
2014           AliTRDpropagationLayer& r2=*(fTrSec[(ns+2)%maxSec]->GetLayer(i2));
2015           cl=r2[js-nl2-nl-nm-nu];
2016           y2=cl->GetY(); z2=cl->GetZ();
2017           
2018           x2=xx2*cs2-y2*sn2;
2019           y2=xx2*sn2+y2*cs2;
2020         }
2021         
2022         if(TMath::Abs(z1-z2) > fgkMaxSeedDeltaZ12) continue;
2023         
2024         Double_t zz=z1 - z1/x1*(x1-x2);
2025         
2026         if (TMath::Abs(zz-z2)>fgkMaxSeedDeltaZ) continue;
2027         
2028         Double_t d=(x2-x1)*(0.-y2)-(0.-x2)*(y2-y1);
2029         if (d==0.) {cerr<<"TRD MakeSeeds: Straight seed !\n"; continue;}
2030         
2031         x[0]=y1;
2032         x[1]=z1;
2033         x[4]=f1trd(x1,y1,x2,y2,x3,y3);
2034         
2035         if (TMath::Abs(x[4]) > fgkMaxSeedC) continue;      
2036         
2037         x[2]=f2trd(x1,y1,x2,y2,x3,y3);
2038         
2039         if (TMath::Abs(x[4]*x1-x[2]) >= 0.99999) continue;
2040         
2041         x[3]=f3trd(x1,y1,x2,y2,z1,z2);
2042         
2043         if (TMath::Abs(x[3]) > fgkMaxSeedTan) continue;
2044         
2045         Double_t a=asin(x[2]);
2046         Double_t zv=z1 - x[3]/x[4]*(a+asin(x[4]*x1-x[2]));
2047         
2048         if (TMath::Abs(zv)>fgkMaxSeedVertexZ) continue;
2049         
2050         Double_t sy1=r1[is]->GetSigmaY2(), sz1=r1[is]->GetSigmaZ2();
2051         Double_t sy2=cl->GetSigmaY2(),     sz2=cl->GetSigmaZ2();
2052         Double_t sy3=fgkSeedErrorSY3, sy=fgkSeedErrorSY, sz=fgkSeedErrorSZ;  
2053
2054         // Tilt changes
2055         Double_t h01 = GetTiltFactor(r1[is]);
2056         Double_t xuFactor = 100.;
2057         if(fNoTilt) { 
2058           h01 = 0;
2059           xuFactor = 1;
2060         }
2061
2062         sy1=sy1+sz1*h01*h01;
2063         Double_t syz=sz1*(-h01);
2064         // end of tilt changes
2065         
2066         Double_t f40=(f1trd(x1,y1+sy,x2,y2,x3,y3)-x[4])/sy;
2067         Double_t f42=(f1trd(x1,y1,x2,y2+sy,x3,y3)-x[4])/sy;
2068         Double_t f43=(f1trd(x1,y1,x2,y2,x3,y3+sy)-x[4])/sy;
2069         Double_t f20=(f2trd(x1,y1+sy,x2,y2,x3,y3)-x[2])/sy;
2070         Double_t f22=(f2trd(x1,y1,x2,y2+sy,x3,y3)-x[2])/sy;
2071         Double_t f23=(f2trd(x1,y1,x2,y2,x3,y3+sy)-x[2])/sy;
2072         Double_t f30=(f3trd(x1,y1+sy,x2,y2,z1,z2)-x[3])/sy;
2073         Double_t f31=(f3trd(x1,y1,x2,y2,z1+sz,z2)-x[3])/sz;
2074         Double_t f32=(f3trd(x1,y1,x2,y2+sy,z1,z2)-x[3])/sy;
2075         Double_t f34=(f3trd(x1,y1,x2,y2,z1,z2+sz)-x[3])/sz;    
2076
2077         
2078         c[0]=sy1;
2079         //        c[1]=0.;       c[2]=sz1;
2080         c[1]=syz;       c[2]=sz1*xuFactor;
2081         c[3]=f20*sy1;  c[4]=0.;       c[5]=f20*sy1*f20+f22*sy2*f22+f23*sy3*f23;
2082         c[6]=f30*sy1;  c[7]=f31*sz1;  c[8]=f30*sy1*f20+f32*sy2*f22;
2083                        c[9]=f30*sy1*f30+f31*sz1*f31+f32*sy2*f32+f34*sz2*f34;
2084         c[10]=f40*sy1; c[11]=0.; c[12]=f40*sy1*f20+f42*sy2*f22+f43*sy3*f23;
2085         c[13]=f30*sy1*f40+f32*sy2*f42;
2086         c[14]=f40*sy1*f40+f42*sy2*f42+f43*sy3*f43;      
2087         
2088         UInt_t index=r1.GetIndex(is);
2089         
2090         AliTRDtrack *track=new AliTRDtrack(r1[is],index,x,c,x1,ns*alpha+shift);
2091
2092         Int_t rc=FollowProlongation(*track, i2);     
2093         
2094         if ((rc < 1) ||
2095             (track->GetNumberOfClusters() < 
2096              (outer-inner)*fgkMinClustersInSeed)) delete track;
2097         else {
2098           fSeeds->AddLast(track); fNseeds++;
2099 //          cerr<<"\r found seed "<<fNseeds;
2100         }
2101       }
2102     }
2103   }
2104 }            
2105
2106 //_____________________________________________________________________________
2107 Int_t AliTRDtracker::ReadClusters(TObjArray *array, TTree *ClusterTree) 
2108 {
2109   //
2110   // Reads AliTRDclusters (option >= 0) or AliTRDrecPoints (option < 0) 
2111   // from the file. The names of the cluster tree and branches 
2112   // should match the ones used in AliTRDclusterizer::WriteClusters()
2113   //
2114   TObjArray *clusterArray = new TObjArray(400); 
2115   
2116   TBranch *branch=ClusterTree->GetBranch("TRDcluster");
2117   if (!branch) {
2118     Error("ReadClusters","Can't get the branch !");
2119     return 1;
2120   }
2121   branch->SetAddress(&clusterArray); 
2122   
2123   Int_t nEntries = (Int_t) ClusterTree->GetEntries();
2124   //  printf("found %d entries in %s.\n",nEntries,ClusterTree->GetName());
2125   
2126   // Loop through all entries in the tree
2127   Int_t nbytes;
2128   AliTRDcluster *c = 0;
2129   // printf("\n");
2130
2131   for (Int_t iEntry = 0; iEntry < nEntries; iEntry++) {    
2132     
2133     // Import the tree
2134     nbytes += ClusterTree->GetEvent(iEntry);  
2135     
2136     // Get the number of points in the detector
2137     Int_t nCluster = clusterArray->GetEntriesFast();  
2138 //    printf("\r Read %d clusters from entry %d", nCluster, iEntry);
2139     
2140     // Loop through all TRD digits
2141     for (Int_t iCluster = 0; iCluster < nCluster; iCluster++) { 
2142       c = (AliTRDcluster*)clusterArray->UncheckedAt(iCluster);
2143       AliTRDcluster *co = new AliTRDcluster(*c);
2144       co->SetSigmaY2(c->GetSigmaY2() * fSY2corr);
2145       Int_t ltb = co->GetLocalTimeBin();
2146       if(ltb == 19) co->SetSigmaZ2(c->GetSigmaZ2());
2147       else if(fNoTilt) co->SetSigmaZ2(c->GetSigmaZ2() * fSZ2corr);
2148       array->AddLast(co);
2149       delete clusterArray->RemoveAt(iCluster); 
2150     }
2151   }
2152
2153   delete clusterArray;
2154
2155   return 0;
2156 }
2157
2158 //______________________________________________________________________
2159 void AliTRDtracker::ReadClusters(TObjArray *array, const Char_t *filename)
2160 {
2161   //
2162   // Reads AliTRDclusters from file <filename>. The names of the cluster
2163   // tree and branches should match the ones used in
2164   // AliTRDclusterizer::WriteClusters()
2165   // if <array> == 0, clusters are added into AliTRDtracker fCluster array
2166   //
2167
2168   TDirectory *savedir=gDirectory;
2169
2170   TFile *file = TFile::Open(filename);
2171   if (!file->IsOpen()) {
2172     cerr<<"Can't open file with TRD clusters"<<endl;
2173     return;
2174   }
2175
2176   Char_t treeName[12];
2177   sprintf(treeName,"TreeR%d_TRD",GetEventNumber());
2178   TTree *clusterTree = (TTree*) gDirectory->Get(treeName);
2179
2180   if (!clusterTree) {
2181      cerr<<"AliTRDtracker::ReadClusters(): ";
2182      cerr<<"can't get a tree with clusters !\n";
2183      return;
2184   }
2185
2186   TObjArray *clusterArray = new TObjArray(400);
2187
2188   clusterTree->GetBranch("TRDcluster")->SetAddress(&clusterArray);
2189
2190   Int_t nEntries = (Int_t) clusterTree->GetEntries();
2191   cout<<"found "<<nEntries<<" in clusterTree"<<endl;   
2192
2193   // Loop through all entries in the tree
2194   Int_t nbytes;
2195   AliTRDcluster *c = 0;
2196
2197   printf("\n");
2198
2199   for (Int_t iEntry = 0; iEntry < nEntries; iEntry++) {
2200
2201     // Import the tree
2202     nbytes += clusterTree->GetEvent(iEntry);
2203
2204     // Get the number of points in the detector
2205     Int_t nCluster = clusterArray->GetEntriesFast();
2206     printf("\n Read %d clusters from entry %d", nCluster, iEntry);
2207
2208     // Loop through all TRD digits
2209     for (Int_t iCluster = 0; iCluster < nCluster; iCluster++) {
2210       c = (AliTRDcluster*)clusterArray->UncheckedAt(iCluster);
2211       AliTRDcluster *co = new AliTRDcluster(*c);
2212       co->SetSigmaY2(c->GetSigmaY2() * fSY2corr);
2213       Int_t ltb = co->GetLocalTimeBin();
2214       if(ltb == 19) co->SetSigmaZ2(c->GetSigmaZ2());
2215       else if(fNoTilt) co->SetSigmaZ2(c->GetSigmaZ2() * fSZ2corr);
2216       array->AddLast(co);
2217       delete clusterArray->RemoveAt(iCluster);
2218     }
2219   }
2220
2221   file->Close();
2222   delete clusterArray;
2223   savedir->cd();
2224
2225 }                      
2226
2227 void AliTRDtracker::ReadClusters(TObjArray *array, const TFile *inp) 
2228 {
2229   //
2230   // Reads AliTRDclusters (option >= 0) or AliTRDrecPoints (option < 0) 
2231   // from the file. The names of the cluster tree and branches 
2232   // should match the ones used in AliTRDclusterizer::WriteClusters()
2233   //
2234
2235   TDirectory *savedir=gDirectory; 
2236
2237   if (inp) {
2238      TFile *in=(TFile*)inp;
2239      if (!in->IsOpen()) {
2240         cerr<<"AliTRDtracker::ReadClusters(): input file is not open !\n";
2241         return;
2242      }
2243      else{
2244        in->cd();
2245      }
2246   }
2247
2248   Char_t treeName[12];
2249   sprintf(treeName,"TreeR%d_TRD",GetEventNumber());
2250   TTree *clusterTree = (TTree*) gDirectory->Get(treeName);
2251   
2252   TObjArray *clusterArray = new TObjArray(400); 
2253   
2254   clusterTree->GetBranch("TRDcluster")->SetAddress(&clusterArray); 
2255   
2256   Int_t nEntries = (Int_t) clusterTree->GetEntries();
2257   printf("found %d entries in %s.\n",nEntries,clusterTree->GetName());
2258   
2259   // Loop through all entries in the tree
2260   Int_t nbytes;
2261   AliTRDcluster *c = 0;
2262   printf("\n");
2263
2264   for (Int_t iEntry = 0; iEntry < nEntries; iEntry++) {    
2265     
2266     // Import the tree
2267     nbytes += clusterTree->GetEvent(iEntry);  
2268     
2269     // Get the number of points in the detector
2270     Int_t nCluster = clusterArray->GetEntriesFast();  
2271 //    printf("\r Read %d clusters from entry %d", nCluster, iEntry);
2272     
2273     // Loop through all TRD digits
2274     for (Int_t iCluster = 0; iCluster < nCluster; iCluster++) { 
2275       c = (AliTRDcluster*)clusterArray->UncheckedAt(iCluster);
2276       AliTRDcluster *co = new AliTRDcluster(*c);
2277       co->SetSigmaY2(c->GetSigmaY2() * fSY2corr);
2278       Int_t ltb = co->GetLocalTimeBin();
2279       if(ltb == 19) co->SetSigmaZ2(c->GetSigmaZ2());
2280       else if(fNoTilt) co->SetSigmaZ2(c->GetSigmaZ2() * fSZ2corr);
2281       array->AddLast(co);
2282       delete clusterArray->RemoveAt(iCluster); 
2283     }
2284   }
2285
2286   delete clusterArray;
2287   savedir->cd();   
2288
2289 }
2290
2291 //__________________________________________________________________
2292 void AliTRDtracker::CookLabel(AliKalmanTrack* pt, Float_t wrong) const 
2293 {
2294   //
2295   // This cooks a label. Mmmmh, smells good...
2296   //
2297
2298   Int_t label=123456789, index, i, j;
2299   Int_t ncl=pt->GetNumberOfClusters();
2300   const Int_t kRange = fTrSec[0]->GetOuterTimeBin()+1;
2301
2302   Bool_t labelAdded;
2303
2304   //  Int_t s[kRange][2];
2305   Int_t **s = new Int_t* [kRange];
2306   for (i=0; i<kRange; i++) {
2307     s[i] = new Int_t[2];
2308   }
2309   for (i=0; i<kRange; i++) {
2310     s[i][0]=-1;
2311     s[i][1]=0;
2312   }
2313
2314   Int_t t0,t1,t2;
2315   for (i=0; i<ncl; i++) {
2316     index=pt->GetClusterIndex(i);
2317     AliTRDcluster *c=(AliTRDcluster*)fClusters->UncheckedAt(index);
2318     t0=c->GetLabel(0);
2319     t1=c->GetLabel(1);
2320     t2=c->GetLabel(2);
2321   }
2322
2323   for (i=0; i<ncl; i++) {
2324     index=pt->GetClusterIndex(i);
2325     AliTRDcluster *c=(AliTRDcluster*)fClusters->UncheckedAt(index);
2326     for (Int_t k=0; k<3; k++) { 
2327       label=c->GetLabel(k);
2328       labelAdded=kFALSE; j=0;
2329       if (label >= 0) {
2330         while ( (!labelAdded) && ( j < kRange ) ) {
2331           if (s[j][0]==label || s[j][1]==0) {
2332             s[j][0]=label; 
2333             s[j][1]=s[j][1]+1; 
2334             labelAdded=kTRUE;
2335           }
2336           j++;
2337         }
2338       }
2339     }
2340   }
2341
2342   Int_t max=0;
2343   label = -123456789;
2344
2345   for (i=0; i<kRange; i++) {
2346     if (s[i][1]>max) {
2347       max=s[i][1]; label=s[i][0];
2348     }
2349   }
2350
2351   for (i=0; i<kRange; i++) {
2352     delete []s[i];
2353   }        
2354
2355   delete []s;
2356
2357   if ((1.- Float_t(max)/ncl) > wrong) label=-label;   
2358
2359   pt->SetLabel(label); 
2360
2361 }
2362
2363
2364 //__________________________________________________________________
2365 void AliTRDtracker::UseClusters(const AliKalmanTrack* t, Int_t from) const 
2366 {
2367   //
2368   // Use clusters, but don't abuse them!
2369   //
2370
2371   Int_t ncl=t->GetNumberOfClusters();
2372   for (Int_t i=from; i<ncl; i++) {
2373     Int_t index = t->GetClusterIndex(i);
2374     AliTRDcluster *c=(AliTRDcluster*)fClusters->UncheckedAt(index);
2375     c->Use();
2376   }
2377 }
2378
2379
2380 //_____________________________________________________________________
2381 Double_t AliTRDtracker::ExpectedSigmaY2(Double_t , Double_t , Double_t ) const
2382 {
2383   // Parametrised "expected" error of the cluster reconstruction in Y 
2384
2385   Double_t s = 0.08 * 0.08;    
2386   return s;
2387 }
2388
2389 //_____________________________________________________________________
2390 Double_t AliTRDtracker::ExpectedSigmaZ2(Double_t , Double_t ) const
2391 {
2392   // Parametrised "expected" error of the cluster reconstruction in Z 
2393
2394   Double_t s = 9 * 9 /12.;  
2395   return s;
2396 }                  
2397
2398 //_____________________________________________________________________
2399 Double_t AliTRDtracker::GetX(Int_t sector, Int_t plane, Int_t localTB) const 
2400 {
2401   //
2402   // Returns radial position which corresponds to time bin <localTB>
2403   // in tracking sector <sector> and plane <plane>
2404   //
2405
2406   Int_t index = fTrSec[sector]->CookTimeBinIndex(plane, localTB); 
2407   Int_t pl = fTrSec[sector]->GetLayerNumber(index);
2408   return fTrSec[sector]->GetLayer(pl)->GetX();
2409
2410 }
2411
2412
2413 //_______________________________________________________
2414 AliTRDtracker::AliTRDpropagationLayer::AliTRDpropagationLayer(Double_t x, 
2415                Double_t dx, Double_t rho, Double_t radLength, Int_t tbIndex)
2416
2417   //
2418   // AliTRDpropagationLayer constructor
2419   //
2420
2421   fN = 0; fX = x; fdX = dx; fRho = rho; fX0 = radLength;
2422   fClusters = NULL; fIndex = NULL; fTimeBinIndex = tbIndex;
2423
2424
2425   for(Int_t i=0; i < (Int_t) kZones; i++) {
2426     fZc[i]=0; fZmax[i] = 0;
2427   }
2428
2429   fYmax = 0;
2430
2431   if(fTimeBinIndex >= 0) { 
2432     fClusters = new AliTRDcluster*[kMaxClusterPerTimeBin];
2433     fIndex = new UInt_t[kMaxClusterPerTimeBin];
2434   }
2435
2436   for (Int_t i=0;i<5;i++) fIsHole[i] = kFALSE;
2437   fHole = kFALSE;
2438   fHoleZc = 0;
2439   fHoleZmax = 0;
2440   fHoleYc = 0;
2441   fHoleYmax = 0;
2442   fHoleRho = 0;
2443   fHoleX0 = 0;
2444
2445 }
2446
2447 //_______________________________________________________
2448 void AliTRDtracker::AliTRDpropagationLayer::SetHole(
2449           Double_t Zmax, Double_t Ymax, Double_t rho, 
2450           Double_t radLength, Double_t Yc, Double_t Zc) 
2451 {
2452   //
2453   // Sets hole in the layer 
2454   //
2455   fHole = kTRUE;
2456   fHoleZc = Zc;
2457   fHoleZmax = Zmax;
2458   fHoleYc = Yc;
2459   fHoleYmax = Ymax;
2460   fHoleRho = rho;
2461   fHoleX0 = radLength;
2462 }
2463   
2464
2465 //_______________________________________________________
2466 AliTRDtracker::AliTRDtrackingSector::AliTRDtrackingSector(AliTRDgeometry* geo, Int_t gs, AliTRDparameter* par)
2467 {
2468   //
2469   // AliTRDtrackingSector Constructor
2470   //
2471
2472   fGeom = geo;
2473   fPar = par;
2474   fGeomSector = gs;
2475   fTzeroShift = 0.13;
2476   fN = 0;
2477   //
2478   // get holes description from geometry
2479   Bool_t holes[AliTRDgeometry::kNcham];
2480   //printf("sector\t%d\t",gs);
2481   for (Int_t icham=0; icham<AliTRDgeometry::kNcham;icham++){
2482     holes[icham] = fGeom->IsHole(0,icham,gs);
2483     //printf("%d",holes[icham]);
2484   } 
2485   //printf("\n");
2486   
2487   for(UInt_t i=0; i < kMaxTimeBinIndex; i++) fTimeBinIndex[i] = -1;
2488
2489
2490   AliTRDpropagationLayer* ppl;
2491
2492   Double_t x, xin, xout, dx, rho, radLength;
2493   Int_t    steps;
2494
2495   // set time bins in the gas of the TPC
2496
2497   xin = 246.055; xout = 254.055; steps = 20; dx = (xout-xin)/steps;
2498   rho = 0.9e-3;  radLength = 28.94;
2499
2500   for(Int_t i=0; i<steps; i++) {
2501     x = xin + i*dx + dx/2;
2502     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2503     InsertLayer(ppl);
2504   }
2505
2506   // set time bins in the outer field cage vessel
2507
2508   dx = 50e-4; xin = xout; xout = xin + dx; rho = 1.71; radLength = 44.77; // Tedlar
2509   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2510   InsertLayer(ppl);
2511
2512   dx = 0.02; xin = xout; xout = xin + dx; rho = 1.45; radLength = 44.86; // prepreg
2513   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2514   InsertLayer(ppl);
2515
2516   dx = 2.; xin = xout; xout = xin + dx; rho = 1.45*0.02; radLength = 41.28; // Nomex
2517   steps = 5; dx = (xout - xin)/steps;
2518   for(Int_t i=0; i<steps; i++) {
2519     x = xin + i*dx + dx/2;
2520     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2521     InsertLayer(ppl);
2522   }
2523
2524   dx = 0.02; xin = xout; xout = xin + dx; rho = 1.45; radLength = 44.86; // prepreg
2525   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2526   InsertLayer(ppl);
2527
2528   dx = 50e-4; xin = xout; xout = xin + dx; rho = 1.71; radLength = 44.77; // Tedlar
2529   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2530   InsertLayer(ppl);
2531
2532
2533   // set time bins in CO2
2534
2535   xin = xout; xout = 275.0; 
2536   steps = 50; dx = (xout - xin)/steps;
2537   rho = 1.977e-3;  radLength = 36.2;
2538   
2539   for(Int_t i=0; i<steps; i++) {
2540     x = xin + i*dx + dx/2;
2541     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2542     InsertLayer(ppl);
2543   }
2544
2545   // set time bins in the outer containment vessel
2546
2547   dx = 50e-4; xin = xout; xout = xin + dx; rho = 2.7; radLength = 24.01; // Al
2548   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2549   InsertLayer(ppl);
2550
2551   dx = 50e-4; xin = xout; xout = xin + dx; rho = 1.71; radLength = 44.77; // Tedlar
2552   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2553   InsertLayer(ppl);
2554
2555   dx = 0.06; xin = xout; xout = xin + dx; rho = 1.45; radLength = 44.86; // prepreg
2556   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2557   InsertLayer(ppl);
2558
2559   dx = 3.; xin = xout; xout = xin + dx; rho = 1.45*0.02; radLength = 41.28; // Nomex
2560   steps = 10; dx = (xout - xin)/steps;
2561   for(Int_t i=0; i<steps; i++) {
2562     x = xin + i*dx + dx/2;
2563     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2564     InsertLayer(ppl);
2565   }
2566
2567   dx = 0.06; xin = xout; xout = xin + dx; rho = 1.45; radLength = 44.86; // prepreg
2568   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2569   InsertLayer(ppl);
2570
2571   dx = 50e-4; xin = xout; xout = xin + dx; rho = 1.71; radLength = 44.77; // Tedlar
2572   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2573   InsertLayer(ppl);
2574   
2575   dx = 50e-4; xin = xout; xout = xin + dx; rho = 2.7; radLength = 24.01; // Al
2576   ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2577   InsertLayer(ppl);
2578
2579   Double_t xtrd = (Double_t) fGeom->Rmin();  
2580
2581   // add layers between TPC and TRD (Air temporarily)
2582   xin = xout; xout = xtrd;
2583   steps = 50; dx = (xout - xin)/steps;
2584   rho = 1.2e-3;  radLength = 36.66;
2585   
2586   for(Int_t i=0; i<steps; i++) {
2587     x = xin + i*dx + dx/2;
2588     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2589     InsertLayer(ppl);
2590   }
2591
2592
2593   //  Double_t alpha=AliTRDgeometry::GetAlpha();
2594
2595   // add layers for each of the planes
2596
2597   Double_t dxRo = (Double_t) fGeom->CroHght();    // Rohacell 
2598   Double_t dxSpace = (Double_t) fGeom->Cspace();  // Spacing between planes
2599   Double_t dxAmp = (Double_t) fGeom->CamHght();   // Amplification region
2600   Double_t dxDrift = (Double_t) fGeom->CdrHght(); // Drift region  
2601   Double_t dxRad = (Double_t) fGeom->CraHght();   // Radiator
2602   Double_t dxTEC = dxRad + dxDrift + dxAmp + dxRo; 
2603   Double_t dxPlane = dxTEC + dxSpace; 
2604
2605   Int_t tb, tbIndex;
2606   const Int_t  kNchambers = AliTRDgeometry::Ncham();
2607   Double_t  ymax = 0;
2608   //, holeYmax = 0;
2609   Double_t ymaxsensitive=0;
2610   Double_t *zc = new Double_t[kNchambers];
2611   Double_t *zmax = new Double_t[kNchambers];
2612   Double_t *zmaxsensitive = new Double_t[kNchambers];  
2613   //  Double_t  holeZmax = 1000.;   // the whole sector is missing
2614
2615   for(Int_t plane = 0; plane < AliTRDgeometry::Nplan(); plane++) {
2616     //
2617     // Radiator 
2618     xin = xtrd + plane * dxPlane; xout = xin + dxRad;
2619     steps = 12; dx = (xout - xin)/steps; rho = 0.074; radLength = 40.6; 
2620     for(Int_t i=0; i<steps; i++) {
2621       x = xin + i*dx + dx/2;
2622       ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);      
2623       InsertLayer(ppl);
2624     }
2625
2626     ymax          = fGeom->GetChamberWidth(plane)/2.;
2627     ymaxsensitive = (fPar->GetColPadSize(plane)*fPar->GetColMax(plane)-4)/2.;
2628     
2629     for(Int_t ch = 0; ch < kNchambers; ch++) {
2630       zmax[ch] = fGeom->GetChamberLength(plane,ch)/2;
2631       Float_t pad = fPar->GetRowPadSize(plane,ch,0);
2632       Float_t row0 = fPar->GetRow0(plane,ch,0);
2633       Int_t nPads = fPar->GetRowMax(plane,ch,0);
2634       zmaxsensitive[ch] = Float_t(nPads)*pad/2.;      
2635       //      zc[ch] = (pad * nPads)/2 + row0 - pad/2;
2636       zc[ch] = (pad * nPads)/2 + row0;
2637       //zc[ch] = row0+zmax[ch]-AliTRDgeometry::RpadW();
2638
2639     }
2640
2641     dx = fPar->GetTimeBinSize(); 
2642     rho = 0.00295 * 0.85; radLength = 11.0;  
2643
2644     Double_t x0 = (Double_t) fPar->GetTime0(plane);
2645     Double_t xbottom = x0 - dxDrift;
2646     Double_t xtop = x0 + dxAmp;
2647     //
2648     // Amplification region
2649     steps = (Int_t) (dxAmp/dx);
2650
2651     for(tb = 0; tb < steps; tb++) {
2652       x = x0 + tb * dx + dx/2;
2653       tbIndex = CookTimeBinIndex(plane, -tb-1);
2654       ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,tbIndex);
2655       ppl->SetYmax(ymax,ymaxsensitive);
2656       ppl->SetZ(zc, zmax, zmaxsensitive);
2657       ppl->SetHoles(holes);
2658       InsertLayer(ppl);
2659     }
2660     tbIndex = CookTimeBinIndex(plane, -steps);
2661     x = (x + dx/2 + xtop)/2;
2662     dx = 2*(xtop-x);
2663     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,tbIndex);
2664     ppl->SetYmax(ymax,ymaxsensitive);
2665     ppl->SetZ(zc, zmax,zmaxsensitive);
2666     ppl->SetHoles(holes);
2667     InsertLayer(ppl);
2668
2669     // Drift region
2670     dx = fPar->GetTimeBinSize();
2671     steps = (Int_t) (dxDrift/dx);
2672
2673     for(tb = 0; tb < steps; tb++) {
2674       x = x0 - tb * dx - dx/2;
2675       tbIndex = CookTimeBinIndex(plane, tb);
2676
2677       ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,tbIndex);
2678       ppl->SetYmax(ymax,ymaxsensitive);
2679       ppl->SetZ(zc, zmax, zmaxsensitive);
2680       ppl->SetHoles(holes);
2681       InsertLayer(ppl);
2682     }
2683     tbIndex = CookTimeBinIndex(plane, steps);
2684     x = (x - dx/2 + xbottom)/2;
2685     dx = 2*(x-xbottom);
2686     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,tbIndex);
2687     ppl->SetYmax(ymax,ymaxsensitive);
2688     ppl->SetZ(zc, zmax, zmaxsensitive);
2689     ppl->SetHoles(holes);    
2690     InsertLayer(ppl);
2691
2692     // Pad Plane
2693     xin = xtop; dx = 0.025; xout = xin + dx; rho = 1.7; radLength = 33.0;
2694     ppl = new AliTRDpropagationLayer(xin+dx/2,dx,rho,radLength,-1);
2695     ppl->SetYmax(ymax,ymaxsensitive);
2696     ppl->SetZ(zc, zmax,zmax);
2697     ppl->SetHoles(holes);         
2698     InsertLayer(ppl);
2699
2700     // Rohacell
2701     xin = xout; xout = xtrd + (plane + 1) * dxPlane - dxSpace;
2702     steps = 5; dx = (xout - xin)/steps; rho = 0.074; radLength = 40.6; 
2703     for(Int_t i=0; i<steps; i++) {
2704       x = xin + i*dx + dx/2;
2705       ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2706       ppl->SetYmax(ymax,ymaxsensitive);
2707       ppl->SetZ(zc, zmax,zmax);
2708       ppl->SetHoles(holes);
2709       InsertLayer(ppl);
2710     }
2711
2712     // Space between the chambers, air
2713     xin = xout; xout = xtrd + (plane + 1) * dxPlane;
2714     steps = 5; dx = (xout - xin)/steps; rho = 1.29e-3; radLength = 36.66; 
2715     for(Int_t i=0; i<steps; i++) {
2716       x = xin + i*dx + dx/2;
2717       ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2718       InsertLayer(ppl);
2719     }
2720   }    
2721
2722   // Space between the TRD and RICH
2723   Double_t xRICH = 500.;
2724   xin = xout; xout = xRICH;
2725   steps = 200; dx = (xout - xin)/steps; rho = 1.29e-3; radLength = 36.66; 
2726   for(Int_t i=0; i<steps; i++) {
2727     x = xin + i*dx + dx/2;
2728     ppl = new AliTRDpropagationLayer(x,dx,rho,radLength,-1);
2729     InsertLayer(ppl);
2730   }
2731
2732   MapTimeBinLayers();
2733   delete [] zc;
2734   delete [] zmax;
2735
2736 }
2737
2738 //______________________________________________________
2739
2740 Int_t  AliTRDtracker::AliTRDtrackingSector::CookTimeBinIndex(Int_t plane, Int_t localTB) const
2741 {
2742   //
2743   // depending on the digitization parameters calculates "global"
2744   // time bin index for timebin <localTB> in plane <plane>
2745   //
2746
2747   Double_t dxAmp = (Double_t) fGeom->CamHght();   // Amplification region
2748   Double_t dxDrift = (Double_t) fGeom->CdrHght(); // Drift region  
2749   Double_t dx = (Double_t) fPar->GetTimeBinSize();  
2750
2751   Int_t tbAmp = fPar->GetTimeBefore();
2752   Int_t maxAmp = (Int_t) ((dxAmp+0.000001)/dx);
2753   if(kTRUE) maxAmp = 0;   // intentional until we change parameter class 
2754   Int_t tbDrift = fPar->GetTimeMax();
2755   Int_t maxDrift = (Int_t) ((dxDrift+0.000001)/dx);
2756
2757   Int_t tbPerPlane = TMath::Min(tbAmp,maxAmp) + TMath::Min(tbDrift,maxDrift);
2758
2759   Int_t gtb = (plane+1) * tbPerPlane - localTB - 1 - TMath::Min(tbAmp,maxAmp);
2760
2761   if((localTB < 0) && 
2762      (TMath::Abs(localTB) > TMath::Min(tbAmp,maxAmp))) return -1;
2763   if(localTB >= TMath::Min(tbDrift,maxDrift)) return -1;
2764
2765   return gtb;
2766
2767
2768 }
2769
2770 //______________________________________________________
2771
2772 void AliTRDtracker::AliTRDtrackingSector::MapTimeBinLayers() 
2773 {
2774   //
2775   // For all sensitive time bins sets corresponding layer index
2776   // in the array fTimeBins 
2777   //
2778
2779   Int_t index;
2780
2781   for(Int_t i = 0; i < fN; i++) {
2782     index = fLayers[i]->GetTimeBinIndex();
2783     
2784     //    printf("gtb %d -> pl %d -> x %f \n", index, i, fLayers[i]->GetX());
2785
2786     if(index < 0) continue;
2787     if(index >= (Int_t) kMaxTimeBinIndex) {
2788       printf("*** AliTRDtracker::MapTimeBinLayers: \n");
2789       printf("    index %d exceeds allowed maximum of %d!\n",
2790              index, kMaxTimeBinIndex-1);
2791       continue;
2792     }
2793     fTimeBinIndex[index] = i;
2794   }
2795
2796   Double_t x1, dx1, x2, dx2, gap;
2797
2798   for(Int_t i = 0; i < fN-1; i++) {
2799     x1 = fLayers[i]->GetX();
2800     dx1 = fLayers[i]->GetdX();
2801     x2 = fLayers[i+1]->GetX();
2802     dx2 = fLayers[i+1]->GetdX();
2803     gap = (x2 - dx2/2) - (x1 + dx1/2);
2804     if(gap < -0.01) {
2805       printf("*** warning: layers %d and %d are overlayed:\n",i,i+1);
2806       printf("             %f + %f + %f > %f\n", x1, dx1/2, dx2/2, x2);
2807     }
2808     if(gap > 0.01) { 
2809       printf("*** warning: layers %d and %d have a large gap:\n",i,i+1);
2810       printf("             (%f - %f) - (%f + %f) = %f\n", 
2811              x2, dx2/2, x1, dx1, gap);
2812     }
2813   }
2814 }
2815   
2816
2817 //______________________________________________________
2818
2819
2820 Int_t AliTRDtracker::AliTRDtrackingSector::GetLayerNumber(Double_t x) const
2821 {
2822   // 
2823   // Returns the number of time bin which in radial position is closest to <x>
2824   //
2825
2826   if(x >= fLayers[fN-1]->GetX()) return fN-1; 
2827   if(x <= fLayers[0]->GetX()) return 0; 
2828
2829   Int_t b=0, e=fN-1, m=(b+e)/2;
2830   for (; b<e; m=(b+e)/2) {
2831     if (x > fLayers[m]->GetX()) b=m+1;
2832     else e=m;
2833   }
2834   if(TMath::Abs(x - fLayers[m]->GetX()) > 
2835      TMath::Abs(x - fLayers[m+1]->GetX())) return m+1;
2836   else return m;
2837
2838 }
2839
2840 //______________________________________________________
2841
2842 Int_t AliTRDtracker::AliTRDtrackingSector::GetInnerTimeBin() const 
2843 {
2844   // 
2845   // Returns number of the innermost SENSITIVE propagation layer
2846   //
2847
2848   return GetLayerNumber(0);
2849 }
2850
2851 //______________________________________________________
2852
2853 Int_t AliTRDtracker::AliTRDtrackingSector::GetOuterTimeBin() const 
2854 {
2855   // 
2856   // Returns number of the outermost SENSITIVE time bin
2857   //
2858
2859   return GetLayerNumber(GetNumberOfTimeBins() - 1);
2860 }
2861
2862 //______________________________________________________
2863
2864 Int_t AliTRDtracker::AliTRDtrackingSector::GetNumberOfTimeBins() const 
2865 {
2866   // 
2867   // Returns number of SENSITIVE time bins
2868   //
2869
2870   Int_t tb, layer;
2871   for(tb = kMaxTimeBinIndex-1; tb >=0; tb--) {
2872     layer = GetLayerNumber(tb);
2873     if(layer>=0) break;
2874   }
2875   return tb+1;
2876 }
2877
2878 //______________________________________________________
2879
2880 void AliTRDtracker::AliTRDtrackingSector::InsertLayer(AliTRDpropagationLayer* pl)
2881
2882   //
2883   // Insert layer <pl> in fLayers array.
2884   // Layers are sorted according to X coordinate.
2885
2886   if ( fN == ((Int_t) kMaxLayersPerSector)) {
2887     printf("AliTRDtrackingSector::InsertLayer(): Too many layers !\n");
2888     return;
2889   }
2890   if (fN==0) {fLayers[fN++] = pl; return;}
2891   Int_t i=Find(pl->GetX());
2892
2893   memmove(fLayers+i+1 ,fLayers+i,(fN-i)*sizeof(AliTRDpropagationLayer*));
2894   fLayers[i]=pl; fN++;
2895
2896 }              
2897
2898 //______________________________________________________
2899
2900 Int_t AliTRDtracker::AliTRDtrackingSector::Find(Double_t x) const 
2901 {
2902   //
2903   // Returns index of the propagation layer nearest to X 
2904   //
2905
2906   if (x <= fLayers[0]->GetX()) return 0;
2907   if (x > fLayers[fN-1]->GetX()) return fN;
2908   Int_t b=0, e=fN-1, m=(b+e)/2;
2909   for (; b<e; m=(b+e)/2) {
2910     if (x > fLayers[m]->GetX()) b=m+1;
2911     else e=m;
2912   }
2913   return m;
2914 }             
2915
2916 //______________________________________________________
2917 void AliTRDtracker::AliTRDpropagationLayer::SetZ(Double_t* center, Double_t *w, Double_t *wsensitive )
2918 {
2919   //
2920   // set centers and the width of sectors
2921   for (Int_t icham=0;icham< AliTRDgeometry::kNcham;icham++){
2922     fZc[icham] = center[icham];  
2923     fZmax[icham] = w[icham];
2924     fZmaxSensitive[icham] = wsensitive[icham];
2925     //   printf("chamber\t%d\tzc\t%f\tzmax\t%f\tzsens\t%f\n",icham,fZc[icham],fZmax[icham],fZmaxSensitive[icham]);
2926   }  
2927 }
2928 //______________________________________________________
2929
2930 void AliTRDtracker::AliTRDpropagationLayer::SetHoles(Bool_t *holes)
2931 {
2932   //
2933   // set centers and the width of sectors
2934   fHole = kFALSE;
2935   for (Int_t icham=0;icham< AliTRDgeometry::kNcham;icham++){
2936     fIsHole[icham] = holes[icham]; 
2937     if (holes[icham]) fHole = kTRUE;
2938   }  
2939 }
2940
2941
2942
2943 void AliTRDtracker::AliTRDpropagationLayer::GetPropagationParameters(
2944         Double_t y, Double_t z, Double_t &dx, Double_t &rho, Double_t &radLength, 
2945         Bool_t &lookForCluster) const
2946 {
2947   //
2948   // Returns radial step <dx>, density <rho>, rad. length <radLength>,
2949   // and sensitivity <lookForCluster> in point <y,z>  
2950   //
2951
2952   dx  = fdX;
2953   rho = fRho;
2954   radLength  = fX0;
2955   lookForCluster = kFALSE;
2956   //
2957   // check dead regions in sensitive volume 
2958   if(fTimeBinIndex >= 0) {
2959     //
2960     Int_t zone=-1;
2961     for(Int_t ch = 0; ch < (Int_t) kZones; ch++) {
2962       if  (TMath::Abs(z - fZc[ch]) < fZmaxSensitive[ch]){ 
2963         zone = ch;
2964         lookForCluster = !(fIsHole[zone]);
2965         if(TMath::Abs(y) > fYmaxSensitive){  
2966           lookForCluster = kFALSE;
2967         }
2968         if (fIsHole[zone]) {
2969           //if hole
2970           rho = 1.29e-3;
2971           radLength = 36.66;
2972         }
2973       }    
2974     }
2975     return;
2976   }
2977   //
2978   //
2979   // check hole
2980   if (fHole==kFALSE) return;
2981   //
2982   for(Int_t ch = 0; ch < (Int_t) kZones; ch++) {
2983     if  (TMath::Abs(z - fZc[ch]) < fZmax[ch]){ 
2984       if (fIsHole[ch]) {
2985         //if hole
2986         rho = 1.29e-3;
2987         radLength = 36.66;
2988       }
2989     }
2990   }
2991   return;
2992 }
2993
2994 Int_t  AliTRDtracker::AliTRDpropagationLayer::GetZone( Double_t z) const
2995 {
2996   //
2997   //
2998   if (fTimeBinIndex < 0) return -20;  //unknown 
2999   Int_t zone=-10;   // dead zone
3000   for(Int_t ch = 0; ch < (Int_t) kZones; ch++) {
3001     if(TMath::Abs(z - fZc[ch]) < fZmax[ch]) 
3002       zone = ch;
3003   }
3004   return zone;
3005 }
3006
3007
3008 //______________________________________________________
3009
3010 void AliTRDtracker::AliTRDpropagationLayer::InsertCluster(AliTRDcluster* c, 
3011                                                           UInt_t index) {
3012
3013 // Insert cluster in cluster array.
3014 // Clusters are sorted according to Y coordinate.  
3015
3016   if(fTimeBinIndex < 0) { 
3017     printf("*** attempt to insert cluster into non-sensitive time bin!\n");
3018     return;
3019   }
3020
3021   if (fN== (Int_t) kMaxClusterPerTimeBin) {
3022     printf("AliTRDpropagationLayer::InsertCluster(): Too many clusters !\n"); 
3023     return;
3024   }
3025   if (fN==0) {fIndex[0]=index; fClusters[fN++]=c; return;}
3026   Int_t i=Find(c->GetY());
3027   memmove(fClusters+i+1 ,fClusters+i,(fN-i)*sizeof(AliTRDcluster*));
3028   memmove(fIndex   +i+1 ,fIndex   +i,(fN-i)*sizeof(UInt_t)); 
3029   fIndex[i]=index; fClusters[i]=c; fN++;
3030 }  
3031
3032 //______________________________________________________
3033
3034 Int_t AliTRDtracker::AliTRDpropagationLayer::Find(Double_t y) const {
3035
3036 // Returns index of the cluster nearest in Y    
3037
3038   if (y <= fClusters[0]->GetY()) return 0;
3039   if (y > fClusters[fN-1]->GetY()) return fN;
3040   Int_t b=0, e=fN-1, m=(b+e)/2;
3041   for (; b<e; m=(b+e)/2) {
3042     if (y > fClusters[m]->GetY()) b=m+1;
3043     else e=m;
3044   }
3045   return m;
3046 }    
3047
3048 //---------------------------------------------------------
3049
3050 Double_t AliTRDtracker::GetTiltFactor(const AliTRDcluster* c) {
3051 //
3052 //  Returns correction factor for tilted pads geometry 
3053 //
3054
3055   Double_t h01 = sin(TMath::Pi() / 180.0 * fPar->GetTiltingAngle());
3056   Int_t det = c->GetDetector();    
3057   Int_t plane = fGeom->GetPlane(det);
3058
3059   if((plane == 1) || (plane == 3) || (plane == 5)) h01=-h01;
3060
3061   if(fNoTilt) h01 = 0;
3062   
3063   return h01;
3064 }
3065
3066
3067
3068
3069
3070