Using the right AliITSRecPoint constructor for the correct initialization of the...
[u/mrichter/AliRoot.git] / ITS / AliITSclustererV2.cxx
1 //-------------------------------------------------------------------------
2 //            Implementation of the ITS clusterer V2 class
3 //
4 //          Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
5 //-------------------------------------------------------------------------
6 //uncomment the line below for running with V1 cluster finder classes 
7 //#define V1
8
9 #include "AliRun.h"
10
11 #include "AliITSclustererV2.h"
12 #include "AliITSclusterV2.h"
13 #include "AliITSDetTypeRec.h"
14 #include "AliRawReader.h"
15 #include "AliITSRawStreamSPD.h"
16 #include "AliITSRawStreamSDD.h"
17 #include "AliITSRawStreamSSD.h"
18
19 #include <TFile.h>
20 #include <TTree.h>
21 #include <TClonesArray.h>
22 #include "AliITSgeomTGeo.h"
23 #include "AliITSdigitSPD.h"
24 #include "AliITSdigitSDD.h"
25 #include "AliITSdigitSSD.h"
26 #include "AliMC.h"
27
28 ClassImp(AliITSclustererV2)
29
30 extern AliRun *gAlice;
31
32 AliITSclustererV2::AliITSclustererV2():
33 fNModules(0),
34 fEvent(0),
35 fI(0),
36 fLastSPD1(0),
37 fNySPD(0),
38 fNzSPD(0),
39 fYpitchSPD(0),
40 fZ1pitchSPD(0),
41 fZ2pitchSPD(0),
42 fHwSPD(0),
43 fHlSPD(0),
44 fNySDD(0),
45 fNzSDD(0),
46 fYpitchSDD(0),
47 fZpitchSDD(0),
48 fHwSDD(0),
49 fHlSDD(0),
50 fYoffSDD(0),
51 fLastSSD1(0),
52 fYpitchSSD(0),
53 fHwSSD(0),
54 fHlSSD(0),
55 fTanP(0),
56 fTanN(0){
57    //default constructor
58  }
59 AliITSclustererV2::AliITSclustererV2(const Char_t *geom):
60 fNModules(AliITSgeomTGeo::GetNModules()),
61 fEvent(0),
62 fI(0),
63 fLastSPD1(AliITSgeomTGeo::GetModuleIndex(2,1,1)-1),
64 fNySPD(256),
65 fNzSPD(160),
66 fYpitchSPD(0.0050),
67 fZ1pitchSPD(0.0425),
68 fZ2pitchSPD(0.0625),
69 fHwSPD(0.64),
70 fHlSPD(3.48),
71 fNySDD(256),
72 fNzSDD(256),
73 fYpitchSDD(0.01825),
74 fZpitchSDD(0.02940),
75 fHwSDD(3.5085),
76 fHlSDD(3.7632),
77 fYoffSDD(0.0425),
78 fLastSSD1(AliITSgeomTGeo::GetModuleIndex(6,1,1)-1),
79 fYpitchSSD(0.0095),
80 fHwSSD(3.65),
81 fHlSSD(2.00),
82 fTanP(0.0275),
83 fTanN(0.0075) {
84   //------------------------------------------------------------
85   // Standard constructor
86   //------------------------------------------------------------
87   if (geom) {
88     AliWarning("\"geom\" is actually a dummy argument !");
89   }
90   Int_t m;
91   for (m=0; m<fNModules; m++) {
92      Int_t lay,lad,det; AliITSgeomTGeo::GetModuleId(m,lay,lad,det);
93      const TGeoHMatrix *tm=AliITSgeomTGeo::GetTracking2LocalMatrix(m);
94      fYshift[m] = (tm->Inverse()).GetTranslation()[1];
95      fZshift[m] = (tm->Inverse()).GetTranslation()[2];
96      fNdet[m] = (lad-1)*AliITSgeomTGeo::GetNDetectors(lay) + (det-1);
97      fNlayer[m] = lay-1;
98   }
99
100   //SPD geometry  
101   fYSPD[0]=0.5*fYpitchSPD;
102   for (m=1; m<fNySPD; m++) fYSPD[m]=fYSPD[m-1]+fYpitchSPD; 
103   fZSPD[0]=fZ1pitchSPD;
104   for (m=1; m<fNzSPD; m++) {
105     Double_t dz=fZ1pitchSPD;
106     if (m==31 || m==32 || m==63  || m==64  || m==95 || m==96 || 
107         m==127 || m==128) dz=fZ2pitchSPD; 
108     fZSPD[m]=fZSPD[m-1]+dz;
109   }
110   for (m=0; m<fNzSPD; m++) {
111     Double_t dz=0.5*fZ1pitchSPD;
112     if (m==31 || m==32 || m==63  || m==64  || m==95 || m==96 || 
113         m==127 || m==128) dz=0.5*fZ2pitchSPD; 
114     fZSPD[m]-=dz;
115   }
116
117 }
118
119
120 Int_t AliITSclustererV2::Digits2Clusters(TTree *dTree, TTree *cTree) {
121   //------------------------------------------------------------
122   // This function creates ITS clusters
123   //------------------------------------------------------------
124   Int_t ncl=0;
125
126   if (!dTree) {
127     Error("Digits2Clusters","Can't get the tree with digits !");
128     return 1;
129   }
130
131   TClonesArray *digitsSPD=new TClonesArray("AliITSdigitSPD",3000);
132   dTree->SetBranchAddress("ITSDigitsSPD",&digitsSPD);
133   TClonesArray *digitsSDD=new TClonesArray("AliITSdigitSDD",3000);
134   dTree->SetBranchAddress("ITSDigitsSDD",&digitsSDD);
135   TClonesArray *digitsSSD=new TClonesArray("AliITSdigitSSD",3000);
136   dTree->SetBranchAddress("ITSDigitsSSD",&digitsSSD);
137
138   TClonesArray *clusters=new TClonesArray("AliITSclusterV2",1000);
139   TBranch *branch=cTree->GetBranch("Clusters");
140   if (!branch) cTree->Branch("Clusters",&clusters);
141   else branch->SetAddress(&clusters);
142
143   Int_t mmax=(Int_t)dTree->GetEntries();
144   if (mmax!=fNModules) {
145     Error("Digits2Clusters","Number of entries != number of modules !");
146     return 1;
147   }
148
149   for (fI=0; fI<mmax; fI++) {
150     dTree->GetEvent(fI);
151
152     if     (digitsSPD->GetEntriesFast()!=0) 
153       FindClustersSPD(digitsSPD,clusters);
154     else 
155       if(digitsSDD->GetEntriesFast()!=0) 
156         FindClustersSDD(digitsSDD,clusters);
157       else if(digitsSSD->GetEntriesFast()!=0) 
158         FindClustersSSD(digitsSSD,clusters);
159     
160     ncl+=clusters->GetEntriesFast();
161
162     cTree->Fill();
163
164     digitsSPD->Clear();
165     digitsSDD->Clear();
166     digitsSSD->Clear();
167     clusters->Clear();
168   }
169
170   //cTree->Write();
171
172   delete clusters;
173
174   delete digitsSPD;
175   delete digitsSDD;
176   delete digitsSSD;
177
178   //delete dTree;
179
180   Info("Digits2Clusters","Number of found clusters : %d",ncl);
181
182   return 0;
183 }
184
185 void AliITSclustererV2::Digits2Clusters(AliRawReader* rawReader) {
186   //------------------------------------------------------------
187   // This function creates ITS clusters from raw data
188   //------------------------------------------------------------
189   AliRunLoader* runLoader = AliRunLoader::GetRunLoader();
190   if (!runLoader) {
191     Error("Digits2Clusters", "no run loader found");
192     return;
193   }
194   runLoader->LoadKinematics();
195   AliLoader* itsLoader = runLoader->GetLoader("ITSLoader");
196   if (!itsLoader) {
197     Error("Digits2Clusters", "no loader for ITS found");
198     return;
199   }
200   if (!itsLoader->TreeR()) itsLoader->MakeTree("R");
201   TTree* cTree = itsLoader->TreeR();
202
203   TClonesArray *array=new TClonesArray("AliITSclusterV2",1000);
204   cTree->Branch("Clusters",&array);
205   delete array;
206
207   TClonesArray** clusters = new TClonesArray*[fNModules]; 
208   for (Int_t iModule = 0; iModule < fNModules; iModule++) {
209     clusters[iModule] = NULL;
210   }
211   // one TClonesArray per module
212
213   rawReader->Reset();
214   AliITSRawStreamSPD inputSPD(rawReader);
215   FindClustersSPD(&inputSPD, clusters);
216
217   rawReader->Reset();
218   AliITSRawStreamSDD inputSDD(rawReader);
219   FindClustersSDD(&inputSDD, clusters);
220
221   rawReader->Reset();
222   AliITSRawStreamSSD inputSSD(rawReader);
223   FindClustersSSD(&inputSSD, clusters);
224
225   // write all clusters to the tree
226   Int_t nClusters = 0;
227   for (Int_t iModule = 0; iModule < fNModules; iModule++) {
228     array = clusters[iModule];
229     if (!array) {
230       Error("Digits2Clusters", "data for module %d missing!", iModule);
231       array = new TClonesArray("AliITSclusterV2");
232     }
233     cTree->SetBranchAddress("Clusters", &array);
234     cTree->Fill();
235     nClusters += array->GetEntriesFast();
236     delete array;
237   }
238   itsLoader->WriteRecPoints("OVERWRITE");
239
240   delete[] clusters;
241
242   Info("Digits2Clusters", "total number of found clusters in ITS: %d\n", 
243        nClusters);
244 }
245
246 //**** Fast clusters *******************************
247 #include "TParticle.h"
248
249 //#include "AliITS.h"
250 #include "AliITSmodule.h"
251 #include "AliITSRecPoint.h"
252 #include "AliITSsimulationFastPoints.h"
253 #include "AliITSRecPoint.h"
254
255
256 static void CheckLabels(Int_t lab[3]) {
257   //------------------------------------------------------------
258   // Tries to find mother's labels
259   //------------------------------------------------------------
260     Int_t label=lab[0];
261     if (label>=0) {
262        TParticle *part=(TParticle*)gAlice->GetMCApp()->Particle(label);
263        label=-3;
264        while (part->P() < 0.005) {
265           Int_t m=part->GetFirstMother();
266           if (m<0) {
267              Info("CheckLabels","Primary momentum: %f",part->P()); 
268              break;
269           }
270           if (part->GetStatusCode()>0) {
271              Info("CheckLabels","Primary momentum: %f",part->P()); 
272              break;
273           }
274           label=m;
275           part=(TParticle*)gAlice->GetMCApp()->Particle(label);
276         }
277         if      (lab[1]<0) lab[1]=label;
278         else if (lab[2]<0) lab[2]=label;
279         else ;//cerr<<"CheckLabels : No empty labels !\n";
280     }
281 }
282
283 /*
284 static void CheckLabels(Int_t lab[3]) {
285   //------------------------------------------------------------
286   // Tries to find mother's labels
287   //------------------------------------------------------------
288
289   if(lab[0]<0 && lab[1]<0 && lab[2]<0) return; // In case of no labels just exit
290
291   Int_t ntracks = gAlice->GetMCApp()->GetNtrack();
292   for (Int_t i=0;i<3;i++){
293     Int_t label = lab[i];
294     if (label>=0 && label<ntracks) {
295       TParticle *part=(TParticle*)gAlice->GetMCApp()->Particle(label);
296       if (part->P() < 0.005) {
297         Int_t m=part->GetFirstMother();
298         if (m<0) {      
299           continue;
300         }
301         if (part->GetStatusCode()>0) {
302           continue;
303         }
304         lab[i]=m;       
305       }
306     }    
307   }
308   
309 }
310 */
311 static void CheckLabels2(Int_t lab[10]) {
312   //------------------------------------------------------------
313   // Tries to find mother's labels
314   //------------------------------------------------------------
315   Int_t nlabels =0; 
316   for (Int_t i=0;i<10;i++) if (lab[i]>=0) nlabels++;
317   if(nlabels == 0) return; // In case of no labels just exit
318
319   Int_t ntracks = gAlice->GetMCApp()->GetNtrack();
320
321   for (Int_t i=0;i<10;i++){
322     Int_t label = lab[i];
323     if (label>=0 && label<ntracks) {
324       TParticle *part=(TParticle*)gAlice->GetMCApp()->Particle(label);
325       if (part->P() < 0.02) {
326           Int_t m=part->GetFirstMother();
327           if (m<0) {    
328             continue;
329           }
330           if (part->GetStatusCode()>0) {
331             continue;
332           }
333           lab[i]=m;       
334       }
335       else
336         if (part->P() < 0.12 && nlabels>3) {
337           lab[i]=-2;
338           nlabels--;
339         } 
340     }
341     else{
342       if ( (label>ntracks||label <0) && nlabels>3) {
343         lab[i]=-2;
344         nlabels--;
345       } 
346     }
347   }  
348   if (nlabels>3){
349     for (Int_t i=0;i<10;i++){
350       if (nlabels>3){
351         Int_t label = lab[i];
352         if (label>=0 && label<ntracks) {
353           TParticle *part=(TParticle*)gAlice->GetMCApp()->Particle(label);
354           if (part->P() < 0.1) {
355             lab[i]=-2;
356             nlabels--;
357           }
358         }
359       }
360     }
361   }
362
363   //compress labels -- if multi-times the same
364   Int_t lab2[10];
365   for (Int_t i=0;i<10;i++) lab2[i]=-2;
366   for (Int_t i=0;i<10  ;i++){
367     if (lab[i]<0) continue;
368     for (Int_t j=0;j<10 &&lab2[j]!=lab[i];j++){
369       if (lab2[j]<0) {
370         lab2[j]= lab[i];
371         break;
372       }
373     }
374   }
375   for (Int_t j=0;j<10;j++) lab[j]=lab2[j];
376   
377 }
378
379 static void AddLabel(Int_t lab[10], Int_t label) {
380
381   if(label<0) return; // In case of no label just exit
382
383   Int_t ntracks = gAlice->GetMCApp()->GetNtrack();
384   if (label>ntracks) return;
385   for (Int_t i=0;i<10;i++){
386     //    if (label<0) break;
387     if (lab[i]==label) break;
388     if (lab[i]<0) {
389       lab[i]= label;
390       break;
391     }
392   }
393 }
394
395 void AliITSclustererV2::RecPoints2Clusters
396 (const TClonesArray *points, Int_t idx, TClonesArray *clusters) {
397   //------------------------------------------------------------
398   // Conversion AliITSRecPoint -> AliITSclusterV2 for the ITS 
399   // subdetector indexed by idx 
400   //------------------------------------------------------------
401   TClonesArray &cl=*clusters;
402   Int_t ncl=points->GetEntriesFast();
403   for (Int_t i=0; i<ncl; i++) {
404     AliITSRecPoint *p = (AliITSRecPoint *)points->UncheckedAt(i);
405     Float_t lp[5];
406     lp[0]=-(-p->GetDetLocalX()+fYshift[idx]); if (idx<=fLastSPD1) lp[0]*=-1; //SPD1
407     lp[1]=  -p->GetZ()+fZshift[idx];
408     lp[2]=p->GetSigmaDetLocX2();
409     lp[3]=p->GetSigmaZ2();
410     lp[4]=p->GetQ()*36./23333.;  //electrons -> ADC
411     Int_t lab[4]; 
412     lab[0]=p->GetLabel(0); lab[1]=p->GetLabel(1); lab[2]=p->GetLabel(2);
413     lab[3]=fNdet[idx];
414     CheckLabels(lab);
415     Int_t dummy[3]={0,0,0};
416     new (cl[i]) AliITSclusterV2(lab,lp, dummy);
417   }  
418
419
420 //***********************************
421
422 #ifndef V1
423
424 void AliITSclustererV2:: 
425 FindCluster(Int_t k,Int_t maxz,AliBin *bins,Int_t &n,Int_t *idx) {
426   //------------------------------------------------------------
427   // returns an array of indices of digits belonging to the cluster
428   // (needed when the segmentation is not regular) 
429   //------------------------------------------------------------
430   if (n<200) idx[n++]=bins[k].GetIndex();
431   bins[k].Use();
432
433   if (bins[k-maxz].IsNotUsed()) FindCluster(k-maxz,maxz,bins,n,idx);
434   if (bins[k-1   ].IsNotUsed()) FindCluster(k-1   ,maxz,bins,n,idx);
435   if (bins[k+maxz].IsNotUsed()) FindCluster(k+maxz,maxz,bins,n,idx);
436   if (bins[k+1   ].IsNotUsed()) FindCluster(k+1   ,maxz,bins,n,idx);
437   /*
438   if (bins[k-maxz-1].IsNotUsed()) FindCluster(k-maxz-1,maxz,bins,n,idx);
439   if (bins[k-maxz+1].IsNotUsed()) FindCluster(k-maxz+1,maxz,bins,n,idx);
440   if (bins[k+maxz-1].IsNotUsed()) FindCluster(k+maxz-1,maxz,bins,n,idx);
441   if (bins[k+maxz+1].IsNotUsed()) FindCluster(k+maxz+1,maxz,bins,n,idx);
442   */
443 }
444
445 void AliITSclustererV2::
446 FindClustersSPD(const TClonesArray *digits, TClonesArray *clusters) {
447   //------------------------------------------------------------
448   // Actual SPD cluster finder
449   //------------------------------------------------------------
450   Int_t kNzBins = fNzSPD + 2;
451   const Int_t kMAXBIN=kNzBins*(fNySPD+2);
452
453   Int_t ndigits=digits->GetEntriesFast();
454   AliBin *bins=new AliBin[kMAXBIN];
455
456   Int_t k;
457   AliITSdigitSPD *d=0;
458   for (k=0; k<ndigits; k++) {
459      d=(AliITSdigitSPD*)digits->UncheckedAt(k);
460      Int_t i=d->GetCoord2()+1;   //y
461      Int_t j=d->GetCoord1()+1;
462      bins[i*kNzBins+j].SetIndex(k);
463      bins[i*kNzBins+j].SetMask(1);
464   }
465    
466   Int_t n=0; TClonesArray &cl=*clusters;
467   for (k=0; k<kMAXBIN; k++) {
468      if (!bins[k].IsNotUsed()) continue;
469      Int_t ni=0, idx[200];
470      FindCluster(k,kNzBins,bins,ni,idx);
471      if (ni==200) {
472         Info("FindClustersSPD","Too big cluster !"); 
473         continue;
474      }
475      Int_t milab[10];
476      for (Int_t ilab=0;ilab<10;ilab++){
477        milab[ilab]=-2;
478      }
479
480      d=(AliITSdigitSPD*)digits->UncheckedAt(idx[0]);
481      Int_t ymin=d->GetCoord2(),ymax=ymin;
482      Int_t zmin=d->GetCoord1(),zmax=zmin;
483
484      for (Int_t l=0; l<ni; l++) {
485         d=(AliITSdigitSPD*)digits->UncheckedAt(idx[l]);
486
487         if (ymin > d->GetCoord2()) ymin=d->GetCoord2();
488         if (ymax < d->GetCoord2()) ymax=d->GetCoord2();
489         if (zmin > d->GetCoord1()) zmin=d->GetCoord1();
490         if (zmax < d->GetCoord1()) zmax=d->GetCoord1();
491         // MI addition - find all labels in cluster
492         for (Int_t dlab=0;dlab<10;dlab++){
493           Int_t digitlab = (d->GetTracks())[dlab];
494           if (digitlab<0) continue;
495           AddLabel(milab,digitlab);       
496         }
497         if (milab[9]>0) CheckLabels2(milab);
498      }
499      CheckLabels2(milab);
500      //
501      //Int_t idy = (fNlayer[fI]==0)? 2:3; 
502      //for (Int_t iz=zmin; iz<=zmax;iz+=2)
503      //Int_t idy = (ymax-ymin)/4.; // max 2 clusters
504      Int_t idy = 0; // max 2 clusters
505      if (fNlayer[fI]==0 &&idy<3) idy=3;
506      if (fNlayer[fI]==1 &&idy<4) idy=4; 
507      Int_t idz =3;
508      for (Int_t iz=zmin; iz<=zmax;iz+=idz)
509        for (Int_t iy=ymin; iy<=ymax;iy+=idy){
510          //
511          Int_t ndigits =0;
512          Float_t y=0.,z=0.,q=0.;         
513          for (Int_t l=0; l<ni; l++) {
514            d=(AliITSdigitSPD*)digits->UncheckedAt(idx[l]);
515            if (zmax-zmin>=idz || ymax-ymin>=idy){
516              if (TMath::Abs( d->GetCoord2()-iy)>0.75*idy) continue;
517              if (TMath::Abs( d->GetCoord1()-iz)>0.75*idz) continue;
518            }
519            ndigits++;
520            Float_t qq=d->GetSignal();
521            y+=qq*fYSPD[d->GetCoord2()]; z+=qq*fZSPD[d->GetCoord1()]; q+=qq;   
522           
523          }     
524          if (ndigits==0) continue;
525          y/=q; z/=q;
526          y-=fHwSPD; z-=fHlSPD;
527          
528          Float_t lp[5];
529          lp[0]=-(-y+fYshift[fI]); if (fI<=fLastSPD1) lp[0]=-lp[0];
530          lp[1]=  -z+fZshift[fI];
531          // Float_t factor=TMath::Max(double(ni-3.),1.5);
532          Float_t factory=TMath::Max(ymax-ymin,1);
533          Float_t factorz=TMath::Max(zmax-zmin,1);
534          factory*= factory;
535          factorz*= factorz;     
536          //lp[2]= (fYpitchSPD*fYpitchSPD/12.)*factory;
537          //lp[3]= (fZ1pitchSPD*fZ1pitchSPD/12.)*factorz;
538          lp[2]= (fYpitchSPD*fYpitchSPD/12.);
539          lp[3]= (fZ1pitchSPD*fZ1pitchSPD/12.);
540          //lp[4]= q;
541          lp[4]= (zmax-zmin+1)*100 + (ymax-ymin+1);
542          
543          milab[3]=fNdet[fI];
544          d=(AliITSdigitSPD*)digits->UncheckedAt(idx[0]);
545          Int_t info[3] = {ymax-ymin+1,zmax-zmin+1,fNlayer[fI]};
546          new (cl[n]) AliITSclusterV2(milab,lp,info); n++;        
547        }
548   }
549   
550   delete [] bins;
551 }
552
553 void AliITSclustererV2::FindClustersSPD(AliITSRawStream* input, 
554                                         TClonesArray** clusters) 
555 {
556   //------------------------------------------------------------
557   // Actual SPD cluster finder for raw data
558   //------------------------------------------------------------
559
560   Int_t nClustersSPD = 0;
561   Int_t kNzBins = fNzSPD + 2;
562   Int_t kNyBins = fNySPD + 2;
563   Int_t kMaxBin = kNzBins * kNyBins;
564   AliBin *binsSPD = new AliBin[kMaxBin];
565   AliBin *binsSPDInit = new AliBin[kMaxBin];
566   AliBin *bins = NULL;
567
568   // read raw data input stream
569   while (kTRUE) {
570     Bool_t next = input->Next();
571     if (!next || input->IsNewModule()) {
572       Int_t iModule = input->GetPrevModuleID();
573
574       // when all data from a module was read, search for clusters
575       if (bins) { 
576         clusters[iModule] = new TClonesArray("AliITSclusterV2");
577         Int_t nClusters = 0;
578
579         for (Int_t iBin = 0; iBin < kMaxBin; iBin++) {
580           if (bins[iBin].IsUsed()) continue;
581           Int_t nBins = 0;
582           Int_t idxBins[200];
583           FindCluster(iBin, kNzBins, bins, nBins, idxBins);
584           if (nBins == 200) {
585             Error("FindClustersSPD", "SPD: Too big cluster !\n"); 
586             continue;
587           }
588
589           Int_t label[4]; 
590           label[0] = -2;
591           label[1] = -2;
592           label[2] = -2;
593 //        label[3] = iModule;
594           label[3] = fNdet[iModule];
595
596           Int_t ymin = (idxBins[0] / kNzBins) - 1;
597           Int_t ymax = ymin;
598           Int_t zmin = (idxBins[0] % kNzBins) - 1;
599           Int_t zmax = zmin;
600           for (Int_t idx = 0; idx < nBins; idx++) {
601             Int_t iy = (idxBins[idx] / kNzBins) - 1;
602             Int_t iz = (idxBins[idx] % kNzBins) - 1;
603             if (ymin > iy) ymin = iy;
604             if (ymax < iy) ymax = iy;
605             if (zmin > iz) zmin = iz;
606             if (zmax < iz) zmax = iz;
607           }
608
609           Int_t idy = 0; // max 2 clusters
610           if ((iModule <= fLastSPD1) &&idy<3) idy=3;
611           if ((iModule > fLastSPD1) &&idy<4) idy=4; 
612           Int_t idz =3;
613           for (Int_t iiz=zmin; iiz<=zmax;iiz+=idz)
614             for (Int_t iiy=ymin; iiy<=ymax;iiy+=idy){
615               //
616               Int_t ndigits =0;
617               Float_t y=0.,z=0.,q=0.;    
618               for (Int_t idx = 0; idx < nBins; idx++) {
619                 Int_t iy = (idxBins[idx] / kNzBins) - 1;
620                 Int_t iz = (idxBins[idx] % kNzBins) - 1;
621                 if (zmax-zmin>=idz || ymax-ymin>=idy){
622                   if (TMath::Abs(iy-iiy)>0.75*idy) continue;
623                   if (TMath::Abs(iz-iiz)>0.75*idz) continue;
624                 }
625                 ndigits++;
626                 Float_t qBin = bins[idxBins[idx]].GetQ();
627                 y += qBin * fYSPD[iy]; 
628                 z += qBin * fZSPD[iz]; 
629                 q += qBin;   
630               }
631               if (ndigits==0) continue;
632               y /= q; 
633               z /= q;
634               y -= fHwSPD; 
635               z -= fHlSPD;
636
637               Float_t hit[5];  // y, z, sigma(y)^2, sigma(z)^2, charge
638               hit[0] = -(-y+fYshift[iModule]); 
639               if (iModule <= fLastSPD1) hit[0] = -hit[0];
640               hit[1] = -z+fZshift[iModule];
641               hit[2] = fYpitchSPD*fYpitchSPD/12.;
642               hit[3] = fZ1pitchSPD*fZ1pitchSPD/12.;
643               //          hit[4] = q;
644               hit[4] = (zmax-zmin+1)*100 + (ymax-ymin+1);
645               //          CheckLabels(label);
646               Int_t info[3]={ymax-ymin+1,zmax-zmin+1,fNlayer[iModule]};
647               new (clusters[iModule]->AddrAt(nClusters)) 
648                 AliITSclusterV2(label, hit,info); 
649               nClusters++;
650             }
651         }
652
653         nClustersSPD += nClusters;
654         bins = NULL;
655       }
656
657       if (!next) break;
658       bins = binsSPD;
659       memcpy(binsSPD,binsSPDInit,sizeof(AliBin)*kMaxBin);
660     }
661
662     // fill the current digit into the bins array
663     Int_t index = (input->GetCoord2()+1) * kNzBins + (input->GetCoord1()+1);
664     bins[index].SetIndex(index);
665     bins[index].SetMask(1);
666     bins[index].SetQ(1);
667   }
668
669   delete [] binsSPDInit;
670   delete [] binsSPD;
671
672   Info("FindClustersSPD", "found clusters in ITS SPD: %d", nClustersSPD);
673 }
674
675
676 Bool_t AliITSclustererV2::IsMaximum(Int_t k,Int_t max,const AliBin *bins) {
677   //------------------------------------------------------------
678   //is this a local maximum ?
679   //------------------------------------------------------------
680   UShort_t q=bins[k].GetQ();
681   if (q==1023) return kFALSE;
682   if (bins[k-max].GetQ() > q) return kFALSE;
683   if (bins[k-1  ].GetQ() > q) return kFALSE; 
684   if (bins[k+max].GetQ() > q) return kFALSE; 
685   if (bins[k+1  ].GetQ() > q) return kFALSE; 
686   if (bins[k-max-1].GetQ() > q) return kFALSE;
687   if (bins[k+max-1].GetQ() > q) return kFALSE; 
688   if (bins[k+max+1].GetQ() > q) return kFALSE; 
689   if (bins[k-max+1].GetQ() > q) return kFALSE;
690   return kTRUE; 
691 }
692
693 void AliITSclustererV2::
694 FindPeaks(Int_t k,Int_t max,AliBin *b,Int_t *idx,UInt_t *msk,Int_t& n) {
695   //------------------------------------------------------------
696   //find local maxima
697   //------------------------------------------------------------
698   if (n<31)
699   if (IsMaximum(k,max,b)) {
700     idx[n]=k; msk[n]=(2<<n);
701     n++;
702   }
703   b[k].SetMask(0);
704   if (b[k-max].GetMask()&1) FindPeaks(k-max,max,b,idx,msk,n);
705   if (b[k-1  ].GetMask()&1) FindPeaks(k-1  ,max,b,idx,msk,n);
706   if (b[k+max].GetMask()&1) FindPeaks(k+max,max,b,idx,msk,n);
707   if (b[k+1  ].GetMask()&1) FindPeaks(k+1  ,max,b,idx,msk,n);
708 }
709
710 void AliITSclustererV2::
711 MarkPeak(Int_t k, Int_t max, AliBin *bins, UInt_t m) {
712   //------------------------------------------------------------
713   //mark this peak
714   //------------------------------------------------------------
715   UShort_t q=bins[k].GetQ();
716
717   bins[k].SetMask(bins[k].GetMask()|m); 
718
719   if (bins[k-max].GetQ() <= q)
720      if ((bins[k-max].GetMask()&m) == 0) MarkPeak(k-max,max,bins,m);
721   if (bins[k-1  ].GetQ() <= q)
722      if ((bins[k-1  ].GetMask()&m) == 0) MarkPeak(k-1  ,max,bins,m);
723   if (bins[k+max].GetQ() <= q)
724      if ((bins[k+max].GetMask()&m) == 0) MarkPeak(k+max,max,bins,m);
725   if (bins[k+1  ].GetQ() <= q)
726      if ((bins[k+1  ].GetMask()&m) == 0) MarkPeak(k+1  ,max,bins,m);
727 }
728
729 void AliITSclustererV2::
730 MakeCluster(Int_t k,Int_t max,AliBin *bins,UInt_t m,AliITSclusterV2 &c) {
731   //------------------------------------------------------------
732   //make cluster using digits of this peak
733   //------------------------------------------------------------
734   Float_t q=(Float_t)bins[k].GetQ();
735   Int_t i=k/max, j=k-i*max;
736
737   c.SetQ(c.GetQ()+q);
738   c.SetY(c.GetY()+i*q); 
739   c.SetZ(c.GetZ()+j*q); 
740   c.SetSigmaY2(c.GetSigmaY2()+i*i*q);
741   c.SetSigmaZ2(c.GetSigmaZ2()+j*j*q);
742
743   bins[k].SetMask(0xFFFFFFFE);
744   
745   if (bins[k-max].GetMask() == m) MakeCluster(k-max,max,bins,m,c);
746   if (bins[k-1  ].GetMask() == m) MakeCluster(k-1  ,max,bins,m,c);
747   if (bins[k+max].GetMask() == m) MakeCluster(k+max,max,bins,m,c);
748   if (bins[k+1  ].GetMask() == m) MakeCluster(k+1  ,max,bins,m,c);
749 }
750
751 void AliITSclustererV2::
752 FindClustersSDD(AliBin* bins[2], Int_t nMaxBin, Int_t nzBins, 
753                 const TClonesArray *digits, TClonesArray *clusters) {
754   //------------------------------------------------------------
755   // Actual SDD cluster finder
756   //------------------------------------------------------------
757   Int_t ncl=0; TClonesArray &cl=*clusters;
758   for (Int_t s=0; s<2; s++)
759     for (Int_t i=0; i<nMaxBin; i++) {
760       if (bins[s][i].IsUsed()) continue;
761       Int_t idx[32]; UInt_t msk[32]; Int_t npeaks=0;
762       FindPeaks(i, nzBins, bins[s], idx, msk, npeaks);
763
764       if (npeaks>30) continue;
765       if (npeaks==0) continue;
766
767       Int_t k,l;
768       for (k=0; k<npeaks-1; k++){//mark adjacent peaks
769         if (idx[k] < 0) continue; //this peak is already removed
770         for (l=k+1; l<npeaks; l++) {
771            if (idx[l] < 0) continue; //this peak is already removed
772            Int_t ki=idx[k]/nzBins, kj=idx[k] - ki*nzBins;
773            Int_t li=idx[l]/nzBins, lj=idx[l] - li*nzBins;
774            Int_t di=TMath::Abs(ki - li);
775            Int_t dj=TMath::Abs(kj - lj);
776            if (di>1 || dj>1) continue;
777            if (bins[s][idx[k]].GetQ() > bins[s][idx[l]].GetQ()) {
778               msk[l]=msk[k];
779               idx[l]*=-1;
780            } else {
781               msk[k]=msk[l];
782               idx[k]*=-1;
783               break;
784            } 
785         }
786       }
787
788       for (k=0; k<npeaks; k++) {
789         MarkPeak(TMath::Abs(idx[k]), nzBins, bins[s], msk[k]);
790       }
791         
792       for (k=0; k<npeaks; k++) {
793          if (idx[k] < 0) continue; //removed peak
794          AliITSclusterV2 c;
795          MakeCluster(idx[k], nzBins, bins[s], msk[k], c);
796          //mi change
797          Int_t milab[10];
798          for (Int_t ilab=0;ilab<10;ilab++){
799            milab[ilab]=-2;
800          }
801          Int_t maxi=0,mini=0,maxj=0,minj=0;
802          //AliBin *bmax=&bins[s][idx[k]];
803          //Float_t max = TMath::Max(TMath::Abs(bmax->GetQ())/5.,3.);
804          Float_t max=3;
805          for (Int_t di=-2; di<=2;di++)
806            for (Int_t dj=-3;dj<=3;dj++){
807              Int_t index = idx[k]+di+dj*nzBins;
808              if (index<0) continue;
809              if (index>=nMaxBin) continue;
810              AliBin *b=&bins[s][index];
811              if (TMath::Abs(b->GetQ())>max){
812                if (di>maxi) maxi=di;
813                if (di<mini) mini=di;
814                if (dj>maxj) maxj=dj;
815                if (dj<minj) minj=dj;
816                //
817                if(digits) {
818                  if (TMath::Abs(di)<2&&TMath::Abs(dj)<2){
819                    AliITSdigitSDD* d=(AliITSdigitSDD*)digits->UncheckedAt(b->GetIndex());
820                    for (Int_t itrack=0;itrack<10;itrack++){
821                      Int_t track = (d->GetTracks())[itrack];
822                      if (track>=0) {
823                        AddLabel(milab, track); 
824                      }
825                    }
826                  }
827                }
828              }
829            }
830          
831          /* 
832             Float_t s2 = c.GetSigmaY2()/c.GetQ() - c.GetY()*c.GetY();
833             Float_t w=par->GetPadPitchWidth(sec);
834             c.SetSigmaY2(s2);
835             if (s2 != 0.) {
836             c.SetSigmaY2(c.GetSigmaY2()*0.108);
837             if (sec<par->GetNInnerSector()) c.SetSigmaY2(c.GetSigmaY2()*2.07);
838             }    
839             s2 = c.GetSigmaZ2()/c.GetQ() - c.GetZ()*c.GetZ();
840             w=par->GetZWidth();
841             c.SetSigmaZ2(s2);
842             
843             if (s2 != 0.) {
844             c.SetSigmaZ2(c.GetSigmaZ2()*0.169);
845             if (sec<par->GetNInnerSector()) c.SetSigmaZ2(c.GetSigmaZ2()*1.77);
846             }
847          */
848
849          Float_t y=c.GetY(),z=c.GetZ(), q=c.GetQ();
850          y/=q; z/=q;
851          //
852          //Float_t s2 = c.GetSigmaY2()/c.GetQ() - y*y;
853          // c.SetSigmaY2(s2);
854          //s2 = c.GetSigmaZ2()/c.GetQ() - z*z;
855          //c.SetSigmaZ2(s2);
856          //
857          y=(y-0.5)*fYpitchSDD;
858          y-=fHwSDD;
859          y-=fYoffSDD;  //delay ?
860          if (s) y=-y;
861
862          z=(z-0.5)*fZpitchSDD;
863          z-=fHlSDD;
864
865          y=-(-y+fYshift[fI]);
866          z=  -z+fZshift[fI];
867
868          q/=12.7;  //this WAS consistent with SSD. To be reassessed 
869                    // 23-MAR-2007
870          Float_t hit[5] = {y, z, 0.0030*0.0030, 0.0020*0.0020, q};
871          Int_t  info[3] = {maxj-minj+1, maxi-mini+1, fNlayer[fI]};
872
873          if (c.GetQ() < 20.) continue; //noise cluster
874          
875          if (digits) {    
876            //      AliBin *b=&bins[s][idx[k]];
877            //      AliITSdigitSDD* d=(AliITSdigitSDD*)digits->UncheckedAt(b->GetIndex());
878            {
879              //Int_t lab[3];
880              //lab[0]=(d->GetTracks())[0];
881              //lab[1]=(d->GetTracks())[1];
882              //lab[2]=(d->GetTracks())[2];
883              //CheckLabels(lab);
884              CheckLabels2(milab); 
885            }
886          }
887          milab[3]=fNdet[fI];
888
889          AliITSclusterV2 *cc = new (cl[ncl]) AliITSclusterV2(milab,hit,info);
890          cc->SetType(npeaks); 
891          ncl++;
892       }
893     }
894 }
895
896 void AliITSclustererV2::
897 FindClustersSDD(const TClonesArray *digits, TClonesArray *clusters) {
898   //------------------------------------------------------------
899   // Actual SDD cluster finder
900   //------------------------------------------------------------
901   Int_t kNzBins = fNzSDD + 2;
902   const Int_t kMAXBIN=kNzBins*(fNySDD+2);
903
904   AliBin *bins[2];
905   bins[0]=new AliBin[kMAXBIN];
906   bins[1]=new AliBin[kMAXBIN];
907
908   AliITSdigitSDD *d=0;
909   Int_t i, ndigits=digits->GetEntriesFast();
910   for (i=0; i<ndigits; i++) {
911      d=(AliITSdigitSDD*)digits->UncheckedAt(i);
912      Int_t y=d->GetCoord2()+1;   //y
913      Int_t z=d->GetCoord1()+1;   //z
914      Int_t q=d->GetSignal();
915      if (q<3) continue;
916
917      if (z <= fNzSDD) {
918        bins[0][y*kNzBins+z].SetQ(q);
919        bins[0][y*kNzBins+z].SetMask(1);
920        bins[0][y*kNzBins+z].SetIndex(i);
921      } else {
922        z-=fNzSDD; 
923        bins[1][y*kNzBins+z].SetQ(q);
924        bins[1][y*kNzBins+z].SetMask(1);
925        bins[1][y*kNzBins+z].SetIndex(i);
926      }
927   }
928   
929   FindClustersSDD(bins, kMAXBIN, kNzBins, digits, clusters);
930
931   delete[] bins[0];
932   delete[] bins[1];
933
934 }
935
936 void AliITSclustererV2::FindClustersSDD(AliITSRawStream* input, 
937                                         TClonesArray** clusters) 
938 {
939   //------------------------------------------------------------
940   // Actual SDD cluster finder for raw data
941   //------------------------------------------------------------
942   Int_t nClustersSDD = 0;
943   Int_t kNzBins = fNzSDD + 2;
944   Int_t kMaxBin = kNzBins * (fNySDD+2);
945   AliBin *binsSDDInit = new AliBin[kMaxBin];
946   AliBin *binsSDD1 = new AliBin[kMaxBin];
947   AliBin *binsSDD2 = new AliBin[kMaxBin];
948   AliBin *bins[2] = {NULL, NULL};
949
950   // read raw data input stream
951   while (kTRUE) {
952     Bool_t next = input->Next();
953     if (!next || input->IsNewModule()) {
954       Int_t iModule = input->GetPrevModuleID();
955
956       // when all data from a module was read, search for clusters
957       if (bins[0]) { 
958         clusters[iModule] = new TClonesArray("AliITSclusterV2");
959         fI = iModule;
960         FindClustersSDD(bins, kMaxBin, kNzBins, NULL, clusters[iModule]);
961         Int_t nClusters = clusters[iModule]->GetEntriesFast();
962         nClustersSDD += nClusters;
963         bins[0] = bins[1] = NULL;
964       }
965
966       if (!next) break;
967       bins[0]=binsSDD1;
968       bins[1]=binsSDD2;
969       memcpy(binsSDD1,binsSDDInit,sizeof(AliBin)*kMaxBin);
970       memcpy(binsSDD2,binsSDDInit,sizeof(AliBin)*kMaxBin);
971     }
972
973     // fill the current digit into the bins array
974     if(input->GetSignal()>=3) {
975       Int_t iz = input->GetCoord1()+1;
976       Int_t side = ((iz <= fNzSDD) ? 0 : 1);
977       iz -= side*fNzSDD;
978       Int_t index = (input->GetCoord2()+1) * kNzBins + iz;
979       bins[side][index].SetQ(input->GetSignal());
980       bins[side][index].SetMask(1);
981       bins[side][index].SetIndex(index);
982     }
983   }
984
985   delete[] binsSDD1;
986   delete[] binsSDD2;
987   delete[] binsSDDInit;
988
989   Info("FindClustersSDD", "found clusters in ITS SDD: %d", nClustersSDD);
990 }
991
992
993
994 void AliITSclustererV2::
995 FindClustersSSD(Ali1Dcluster* neg, Int_t nn, 
996                 Ali1Dcluster* pos, Int_t np,
997                 TClonesArray *clusters) {
998   //------------------------------------------------------------
999   // Actual SSD cluster finder
1000   //------------------------------------------------------------
1001   TClonesArray &cl=*clusters;
1002   //
1003   Float_t tanp=fTanP, tann=fTanN;
1004   if (fI>fLastSSD1) {tann=fTanP; tanp=fTanN;}
1005   Int_t idet=fNdet[fI];
1006   Int_t ncl=0;
1007   //
1008   Int_t negativepair[30000];
1009   Int_t cnegative[3000];  
1010   Int_t cused1[3000];
1011   Int_t positivepair[30000];
1012   Int_t cpositive[3000];
1013   Int_t cused2[3000];
1014   for (Int_t i=0;i<3000;i++) {cnegative[i]=0; cused1[i]=0;}
1015   for (Int_t i=0;i<3000;i++) {cpositive[i]=0; cused2[i]=0;}
1016   for (Int_t i=0;i<30000;i++){negativepair[i]=positivepair[i]=0;}
1017   static Short_t pairs[1000][1000];
1018   memset(pairs,0,sizeof(Short_t)*1000000);
1019 //   Short_t ** pairs = new Short_t*[1000];
1020 //   for (Int_t i=0; i<1000; i++) {
1021 //     pairs[i] = new Short_t[1000];
1022 //     memset(pairs[i],0,sizeof(Short_t)*1000);
1023 //   }  
1024   //
1025   // find available pairs
1026   //
1027   for (Int_t i=0; i<np; i++) {
1028     Float_t yp=pos[i].GetY()*fYpitchSSD; 
1029     if (pos[i].GetQ()<3) continue;
1030     for (Int_t j=0; j<nn; j++) {
1031       if (neg[j].GetQ()<3) continue;
1032       Float_t yn=neg[j].GetY()*fYpitchSSD;
1033       Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1034       Float_t yt=yn + tann*zt;
1035       zt-=fHlSSD; yt-=fHwSSD;
1036       if (TMath::Abs(yt)<fHwSSD+0.01)
1037       if (TMath::Abs(zt)<fHlSSD+0.01*(neg[j].GetNd()+pos[i].GetNd())) {
1038         negativepair[i*10+cnegative[i]] =j;  //index
1039         positivepair[j*10+cpositive[j]] =i;
1040         cnegative[i]++;  //counters
1041         cpositive[j]++; 
1042         pairs[i][j]=100;
1043       }
1044     }
1045   }
1046   //
1047   for (Int_t i=0; i<np; i++) {
1048     Float_t yp=pos[i].GetY()*fYpitchSSD; 
1049     if (pos[i].GetQ()<3) continue;
1050     for (Int_t j=0; j<nn; j++) {
1051       if (neg[j].GetQ()<3) continue;
1052       if (cpositive[j]&&cnegative[i]) continue;
1053       Float_t yn=neg[j].GetY()*fYpitchSSD;
1054       Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1055       Float_t yt=yn + tann*zt;
1056       zt-=fHlSSD; yt-=fHwSSD;
1057       if (TMath::Abs(yt)<fHwSSD+0.1)
1058       if (TMath::Abs(zt)<fHlSSD+0.15) {
1059         if (cnegative[i]==0) pos[i].SetNd(100);  // not available pair
1060         if (cpositive[j]==0) neg[j].SetNd(100);  // not available pair
1061         negativepair[i*10+cnegative[i]] =j;  //index
1062         positivepair[j*10+cpositive[j]] =i;
1063         cnegative[i]++;  //counters
1064         cpositive[j]++; 
1065         pairs[i][j]=100;
1066       }
1067     }
1068   }
1069   //
1070   Float_t lp[5];
1071   Int_t milab[10];
1072   Double_t ratio;
1073   
1074   //
1075   // sign gold tracks
1076   //
1077   for (Int_t ip=0;ip<np;ip++){
1078     Float_t ybest=1000,zbest=1000,qbest=0;
1079     //
1080     // select gold clusters
1081     if ( (cnegative[ip]==1) && cpositive[negativepair[10*ip]]==1){ 
1082       Float_t yp=pos[ip].GetY()*fYpitchSSD; 
1083       Int_t j = negativepair[10*ip];      
1084       ratio = (pos[ip].GetQ()-neg[j].GetQ())/(pos[ip].GetQ()+neg[j].GetQ());
1085       //
1086       Float_t yn=neg[j].GetY()*fYpitchSSD;
1087       Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1088       Float_t yt=yn + tann*zt;
1089       zt-=fHlSSD; yt-=fHwSSD;
1090       ybest=yt; zbest=zt; 
1091       qbest=0.5*(pos[ip].GetQ()+neg[j].GetQ());
1092       lp[0]=-(-ybest+fYshift[fI]);
1093       lp[1]=  -zbest+fZshift[fI];
1094       lp[2]=0.0025*0.0025;  //SigmaY2
1095       lp[3]=0.110*0.110;  //SigmaZ2
1096       
1097       lp[4]=qbest;        //Q
1098       for (Int_t ilab=0;ilab<10;ilab++) milab[ilab]=-2;
1099       for (Int_t ilab=0;ilab<3;ilab++){
1100         milab[ilab] = pos[ip].GetLabel(ilab);
1101         milab[ilab+3] = neg[j].GetLabel(ilab);
1102       }
1103       //
1104       CheckLabels2(milab);
1105       milab[3]=(((ip<<10) + j)<<10) + idet; // pos|neg|det
1106       Int_t info[3] = {pos[ip].GetNd(),neg[j].GetNd(),fNlayer[fI]};
1107       AliITSclusterV2 * cl2 = new (cl[ncl]) AliITSclusterV2(milab,lp,info);
1108       ncl++;
1109       cl2->SetChargeRatio(ratio);       
1110       cl2->SetType(1);
1111       pairs[ip][j]=1;
1112       if ((pos[ip].GetNd()+neg[j].GetNd())>6){ //multi cluster
1113         cl2->SetType(2);
1114         pairs[ip][j]=2;
1115       }
1116       cused1[ip]++;
1117       cused2[j]++;
1118     }
1119   }
1120     
1121   for (Int_t ip=0;ip<np;ip++){
1122     Float_t ybest=1000,zbest=1000,qbest=0;
1123     //
1124     //
1125     // select "silber" cluster
1126     if ( cnegative[ip]==1 && cpositive[negativepair[10*ip]]==2){
1127       Int_t in  = negativepair[10*ip];
1128       Int_t ip2 = positivepair[10*in];
1129       if (ip2==ip) ip2 =  positivepair[10*in+1];
1130       Float_t pcharge = pos[ip].GetQ()+pos[ip2].GetQ();
1131       if (TMath::Abs(pcharge-neg[in].GetQ())<10){
1132         //
1133         // add first pair
1134         if (pairs[ip][in]==100){  //
1135           Float_t yp=pos[ip].GetY()*fYpitchSSD; 
1136           Float_t yn=neg[in].GetY()*fYpitchSSD;
1137           Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1138           Float_t yt=yn + tann*zt;
1139           zt-=fHlSSD; yt-=fHwSSD;
1140           ybest =yt;  zbest=zt; 
1141           qbest =pos[ip].GetQ();
1142           lp[0]=-(-ybest+fYshift[fI]);
1143           lp[1]=  -zbest+fZshift[fI];
1144           lp[2]=0.0025*0.0025;  //SigmaY2
1145           lp[3]=0.110*0.110;  //SigmaZ2
1146           
1147           lp[4]=qbest;        //Q
1148           for (Int_t ilab=0;ilab<10;ilab++) milab[ilab]=-2;
1149           for (Int_t ilab=0;ilab<3;ilab++){
1150             milab[ilab] = pos[ip].GetLabel(ilab);
1151             milab[ilab+3] = neg[in].GetLabel(ilab);
1152           }
1153           //
1154           CheckLabels2(milab);
1155           ratio = (pos[ip].GetQ()-neg[in].GetQ())/(pos[ip].GetQ()+neg[in].GetQ());
1156           milab[3]=(((ip<<10) + in)<<10) + idet; // pos|neg|det
1157           Int_t info[3] = {pos[ip].GetNd(),neg[in].GetNd(),fNlayer[fI]};
1158           AliITSclusterV2 * cl2 = new (cl[ncl]) AliITSclusterV2(milab,lp,info);
1159           ncl++;
1160           cl2->SetChargeRatio(ratio);           
1161           cl2->SetType(5);
1162           pairs[ip][in] = 5;
1163           if ((pos[ip].GetNd()+neg[in].GetNd())>6){ //multi cluster
1164             cl2->SetType(6);
1165             pairs[ip][in] = 6;
1166           }
1167         }
1168         //
1169         // add second pair
1170         
1171         //      if (!(cused1[ip2] || cused2[in])){  //
1172         if (pairs[ip2][in]==100){
1173           Float_t yp=pos[ip2].GetY()*fYpitchSSD;
1174           Float_t yn=neg[in].GetY()*fYpitchSSD;
1175           Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1176           Float_t yt=yn + tann*zt;
1177           zt-=fHlSSD; yt-=fHwSSD;
1178           ybest =yt;  zbest=zt; 
1179           qbest =pos[ip2].GetQ();
1180           lp[0]=-(-ybest+fYshift[fI]);
1181           lp[1]=  -zbest+fZshift[fI];
1182           lp[2]=0.0025*0.0025;  //SigmaY2
1183           lp[3]=0.110*0.110;  //SigmaZ2
1184           
1185           lp[4]=qbest;        //Q
1186           for (Int_t ilab=0;ilab<10;ilab++) milab[ilab]=-2;
1187           for (Int_t ilab=0;ilab<3;ilab++){
1188             milab[ilab] = pos[ip2].GetLabel(ilab);
1189             milab[ilab+3] = neg[in].GetLabel(ilab);
1190           }
1191           //
1192           CheckLabels2(milab);
1193           ratio = (pos[ip2].GetQ()-neg[in].GetQ())/(pos[ip2].GetQ()+neg[in].GetQ());
1194           milab[3]=(((ip2<<10) + in)<<10) + idet; // pos|neg|det
1195           Int_t info[3] = {pos[ip2].GetNd(),neg[in].GetNd(),fNlayer[fI]};
1196           AliITSclusterV2 *cl2 = new (cl[ncl]) AliITSclusterV2(milab,lp,info);
1197           ncl++;
1198           cl2->SetChargeRatio(ratio);           
1199           cl2->SetType(5);
1200           pairs[ip2][in] =5;
1201           if ((pos[ip2].GetNd()+neg[in].GetNd())>6){ //multi cluster
1202             cl2->SetType(6);
1203             pairs[ip2][in] =6;
1204           }
1205         }       
1206         cused1[ip]++;
1207         cused1[ip2]++;
1208         cused2[in]++;
1209       }
1210     }    
1211   }
1212   
1213   //  
1214   for (Int_t jn=0;jn<nn;jn++){
1215     if (cused2[jn]) continue;
1216     Float_t ybest=1000,zbest=1000,qbest=0;
1217     // select "silber" cluster
1218     if ( cpositive[jn]==1 && cnegative[positivepair[10*jn]]==2){
1219       Int_t ip  = positivepair[10*jn];
1220       Int_t jn2 = negativepair[10*ip];
1221       if (jn2==jn) jn2 =  negativepair[10*ip+1];
1222       Float_t pcharge = neg[jn].GetQ()+neg[jn2].GetQ();
1223       //
1224       if (TMath::Abs(pcharge-pos[ip].GetQ())<10){
1225         //
1226         // add first pair
1227         //      if (!(cused1[ip]||cused2[jn])){
1228         if (pairs[ip][jn]==100){
1229           Float_t yn=neg[jn].GetY()*fYpitchSSD; 
1230           Float_t yp=pos[ip].GetY()*fYpitchSSD;
1231           Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1232           Float_t yt=yn + tann*zt;
1233           zt-=fHlSSD; yt-=fHwSSD;
1234           ybest =yt;  zbest=zt; 
1235           qbest =neg[jn].GetQ();
1236           lp[0]=-(-ybest+fYshift[fI]);
1237           lp[1]=  -zbest+fZshift[fI];
1238           lp[2]=0.0025*0.0025;  //SigmaY2
1239           lp[3]=0.110*0.110;  //SigmaZ2
1240           
1241           lp[4]=qbest;        //Q
1242           for (Int_t ilab=0;ilab<10;ilab++) milab[ilab]=-2;
1243           for (Int_t ilab=0;ilab<3;ilab++){
1244             milab[ilab] = pos[ip].GetLabel(ilab);
1245             milab[ilab+3] = neg[jn].GetLabel(ilab);
1246           }
1247           //
1248           CheckLabels2(milab);
1249           ratio = (pos[ip].GetQ()-neg[jn].GetQ())/(pos[ip].GetQ()+neg[jn].GetQ());
1250           milab[3]=(((ip<<10) + jn)<<10) + idet; // pos|neg|det
1251           Int_t info[3] = {pos[ip].GetNd(),neg[jn].GetNd(),fNlayer[fI]};
1252           AliITSclusterV2 * cl2 = new (cl[ncl]) AliITSclusterV2(milab,lp,info);
1253           ncl++;
1254           cl2->SetChargeRatio(ratio);           
1255           cl2->SetType(7);
1256           pairs[ip][jn] =7;
1257           if ((pos[ip].GetNd()+neg[jn].GetNd())>6){ //multi cluster
1258             cl2->SetType(8);
1259             pairs[ip][jn]=8;
1260           }
1261         }
1262         //
1263         // add second pair
1264         //      if (!(cused1[ip]||cused2[jn2])){
1265         if (pairs[ip][jn2]==100){
1266           Float_t yn=neg[jn2].GetY()*fYpitchSSD; 
1267           Double_t yp=pos[ip].GetY()*fYpitchSSD; 
1268           Double_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1269           Double_t yt=yn + tann*zt;
1270           zt-=fHlSSD; yt-=fHwSSD;
1271           ybest =yt;  zbest=zt; 
1272           qbest =neg[jn2].GetQ();
1273           lp[0]=-(-ybest+fYshift[fI]);
1274           lp[1]=  -zbest+fZshift[fI];
1275           lp[2]=0.0025*0.0025;  //SigmaY2
1276           lp[3]=0.110*0.110;  //SigmaZ2
1277           
1278           lp[4]=qbest;        //Q
1279           for (Int_t ilab=0;ilab<10;ilab++) milab[ilab]=-2;
1280           for (Int_t ilab=0;ilab<3;ilab++){
1281             milab[ilab] = pos[ip].GetLabel(ilab);
1282             milab[ilab+3] = neg[jn2].GetLabel(ilab);
1283           }
1284           //
1285           CheckLabels2(milab);
1286           ratio = (pos[ip].GetQ()-neg[jn2].GetQ())/(pos[ip].GetQ()+neg[jn2].GetQ());
1287           milab[3]=(((ip<<10) + jn2)<<10) + idet; // pos|neg|det
1288           Int_t info[3] = {pos[ip].GetNd(),neg[jn2].GetNd(),fNlayer[fI]};
1289           AliITSclusterV2* cl2 = new (cl[ncl]) AliITSclusterV2(milab,lp,info);
1290           ncl++;
1291           cl2->SetChargeRatio(ratio);           
1292           pairs[ip][jn2]=7;
1293           cl2->SetType(7);
1294           if ((pos[ip].GetNd()+neg[jn2].GetNd())>6){ //multi cluster
1295             cl2->SetType(8);
1296             pairs[ip][jn2]=8;
1297           }
1298         }
1299         cused1[ip]++;
1300         cused2[jn]++;
1301         cused2[jn2]++;
1302       }
1303     }    
1304   }
1305   
1306   for (Int_t ip=0;ip<np;ip++){
1307     Float_t ybest=1000,zbest=1000,qbest=0;
1308     //
1309     // 2x2 clusters
1310     //
1311     if ( (cnegative[ip]<5) && cpositive[negativepair[10*ip]]<5){ 
1312       Float_t minchargediff =4.;
1313       Int_t j=-1;
1314       for (Int_t di=0;di<cnegative[ip];di++){
1315         Int_t   jc = negativepair[ip*10+di];
1316         Float_t chargedif = pos[ip].GetQ()-neg[jc].GetQ();
1317         if (TMath::Abs(chargedif)<minchargediff){
1318           j =jc;
1319           minchargediff = TMath::Abs(chargedif);
1320         }
1321       }
1322       if (j<0) continue;  // not proper cluster      
1323       Int_t count =0;
1324       for (Int_t di=0;di<cnegative[ip];di++){
1325         Int_t   jc = negativepair[ip*10+di];
1326         Float_t chargedif = pos[ip].GetQ()-neg[jc].GetQ();
1327         if (TMath::Abs(chargedif)<minchargediff+3.) count++;
1328       }
1329       if (count>1) continue;  // more than one "proper" cluster for positive
1330       //
1331       count =0;
1332       for (Int_t dj=0;dj<cpositive[j];dj++){
1333         Int_t   ic  = positivepair[j*10+dj];
1334         Float_t chargedif = pos[ic].GetQ()-neg[j].GetQ();
1335         if (TMath::Abs(chargedif)<minchargediff+3.) count++;
1336       }
1337       if (count>1) continue;  // more than one "proper" cluster for negative
1338       
1339       Int_t jp = 0;
1340       
1341       count =0;
1342       for (Int_t dj=0;dj<cnegative[jp];dj++){
1343         Int_t   ic = positivepair[jp*10+dj];
1344         Float_t chargedif = pos[ic].GetQ()-neg[jp].GetQ();
1345         if (TMath::Abs(chargedif)<minchargediff+4.) count++;
1346       }
1347       if (count>1) continue;   
1348       if (pairs[ip][j]<100) continue;
1349       //
1350       //almost gold clusters
1351       Float_t yp=pos[ip].GetY()*fYpitchSSD; 
1352       Float_t yn=neg[j].GetY()*fYpitchSSD;
1353       Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1354       Float_t yt=yn + tann*zt;
1355       zt-=fHlSSD; yt-=fHwSSD;
1356       ybest=yt; zbest=zt; 
1357       qbest=0.5*(pos[ip].GetQ()+neg[j].GetQ());
1358       lp[0]=-(-ybest+fYshift[fI]);
1359       lp[1]=  -zbest+fZshift[fI];
1360       lp[2]=0.0025*0.0025;  //SigmaY2
1361       lp[3]=0.110*0.110;  //SigmaZ2     
1362       lp[4]=qbest;        //Q
1363       for (Int_t ilab=0;ilab<10;ilab++) milab[ilab]=-2;
1364       for (Int_t ilab=0;ilab<3;ilab++){
1365         milab[ilab] = pos[ip].GetLabel(ilab);
1366         milab[ilab+3] = neg[j].GetLabel(ilab);
1367       }
1368       //
1369       CheckLabels2(milab);
1370       ratio = (pos[ip].GetQ()-neg[j].GetQ())/(pos[ip].GetQ()+neg[j].GetQ());
1371       milab[3]=(((ip<<10) + j)<<10) + idet; // pos|neg|det
1372       Int_t info[3] = {pos[ip].GetNd(),neg[j].GetNd(),fNlayer[fI]};
1373       AliITSclusterV2 * cl2 = new (cl[ncl]) AliITSclusterV2(milab,lp,info);
1374       ncl++;
1375       cl2->SetChargeRatio(ratio);       
1376       cl2->SetType(10);
1377       pairs[ip][j]=10;
1378       if ((pos[ip].GetNd()+neg[j].GetNd())>6){ //multi cluster
1379         cl2->SetType(11);
1380         pairs[ip][j]=11;
1381       }
1382       cused1[ip]++;
1383       cused2[j]++;      
1384     }
1385
1386   }
1387   
1388   //  
1389   for (Int_t i=0; i<np; i++) {
1390     Float_t ybest=1000,zbest=1000,qbest=0;
1391     Float_t yp=pos[i].GetY()*fYpitchSSD; 
1392     if (pos[i].GetQ()<3) continue;
1393     for (Int_t j=0; j<nn; j++) {
1394     //    for (Int_t di = 0;di<cpositive[i];di++){
1395     //  Int_t j = negativepair[10*i+di];
1396       if (neg[j].GetQ()<3) continue;
1397       if (cused2[j]||cused1[i]) continue;      
1398       if (pairs[i][j]>0 &&pairs[i][j]<100) continue;
1399       ratio = (pos[i].GetQ()-neg[j].GetQ())/(pos[i].GetQ()+neg[j].GetQ());      
1400       Float_t yn=neg[j].GetY()*fYpitchSSD;
1401       Float_t zt=(2*fHlSSD*tanp + yp - yn)/(tann+tanp);
1402       Float_t yt=yn + tann*zt;
1403       zt-=fHlSSD; yt-=fHwSSD;
1404       if (TMath::Abs(yt)<fHwSSD+0.01)
1405       if (TMath::Abs(zt)<fHlSSD+0.01*(neg[j].GetNd()+pos[i].GetNd())) {
1406         ybest=yt; zbest=zt; 
1407         qbest=0.5*(pos[i].GetQ()+neg[j].GetQ());
1408         lp[0]=-(-ybest+fYshift[fI]);
1409         lp[1]=  -zbest+fZshift[fI];
1410         lp[2]=0.0025*0.0025;  //SigmaY2
1411         lp[3]=0.110*0.110;  //SigmaZ2
1412
1413         lp[4]=qbest;        //Q
1414         for (Int_t ilab=0;ilab<10;ilab++) milab[ilab]=-2;
1415         for (Int_t ilab=0;ilab<3;ilab++){
1416           milab[ilab] = pos[i].GetLabel(ilab);
1417           milab[ilab+3] = neg[j].GetLabel(ilab);
1418         }
1419         //
1420         CheckLabels2(milab);
1421         milab[3]=(((i<<10) + j)<<10) + idet; // pos|neg|det
1422         Int_t info[3] = {pos[i].GetNd(),neg[j].GetNd(),fNlayer[fI]};
1423         AliITSclusterV2 * cl2 = new (cl[ncl]) AliITSclusterV2(milab,lp,info); 
1424         ncl++;
1425         cl2->SetChargeRatio(ratio);
1426         cl2->SetType(100+cpositive[j]+cnegative[i]);
1427         //cl2->SetType(0);
1428         /*
1429           if (pairs[i][j]<100){
1430           printf("problem:- %d\n", pairs[i][j]);
1431           }
1432           if (cnegative[i]<2&&cpositive[j]<2){
1433           printf("problem:- %d\n", pairs[i][j]);
1434           }
1435         */
1436       }
1437     }
1438   }
1439
1440 //   for (Int_t i=0; i<1000; i++) delete [] pairs[i];
1441 //   delete [] pairs;
1442
1443 }
1444
1445
1446 void AliITSclustererV2::
1447 FindClustersSSD(const TClonesArray *alldigits, TClonesArray *clusters) {
1448   //------------------------------------------------------------
1449   // Actual SSD cluster finder
1450   //------------------------------------------------------------
1451   Int_t smaxall=alldigits->GetEntriesFast();
1452   if (smaxall==0) return;
1453   TObjArray *digits = new TObjArray;
1454   for (Int_t i=0;i<smaxall; i++){
1455     AliITSdigitSSD *d=(AliITSdigitSSD*)alldigits->UncheckedAt(i);
1456     if (d->GetSignal()<3) continue;
1457     digits->AddLast(d);
1458   }
1459   Int_t smax = digits->GetEntriesFast();
1460   if (smax==0) return;
1461   
1462   const Int_t MAX=1000;
1463   Int_t np=0, nn=0; 
1464   Ali1Dcluster pos[MAX], neg[MAX];
1465   Float_t y=0., q=0., qmax=0.; 
1466   Int_t lab[4]={-2,-2,-2,-2};
1467   
1468   AliITSdigitSSD *d=(AliITSdigitSSD*)digits->UncheckedAt(0);
1469   q += d->GetSignal();
1470   y += d->GetCoord2()*d->GetSignal();
1471   qmax=d->GetSignal();
1472   lab[0]=d->GetTrack(0); lab[1]=d->GetTrack(1); lab[2]=d->GetTrack(2);
1473   Int_t curr=d->GetCoord2();
1474   Int_t flag=d->GetCoord1();
1475   Int_t *n=&nn;
1476   Ali1Dcluster *c=neg;
1477   Int_t nd=1;
1478   Int_t milab[10];
1479   for (Int_t ilab=0;ilab<10;ilab++){
1480     milab[ilab]=-2;
1481   }
1482   milab[0]=d->GetTrack(0); milab[1]=d->GetTrack(1); milab[2]=d->GetTrack(2);
1483
1484   for (Int_t s=1; s<smax; s++) {
1485       d=(AliITSdigitSSD*)digits->UncheckedAt(s);      
1486       Int_t strip=d->GetCoord2();
1487       if ((strip-curr) > 1 || flag!=d->GetCoord1()) {
1488          c[*n].SetY(y/q);
1489          c[*n].SetQ(q);
1490          c[*n].SetNd(nd);
1491          CheckLabels2(milab);
1492          c[*n].SetLabels(milab);
1493          //Split suspiciously big cluster
1494          /*
1495          if (nd>10&&nd<16){
1496            c[*n].SetY(y/q-0.3*nd);
1497            c[*n].SetQ(0.5*q);
1498            (*n)++;
1499            if (*n==MAX) {
1500              Error("FindClustersSSD","Too many 1D clusters !");
1501               return;
1502            }
1503            c[*n].SetY(y/q-0.0*nd);
1504            c[*n].SetQ(0.5*q);
1505            c[*n].SetNd(nd);
1506            (*n)++;
1507            if (*n==MAX) {
1508              Error("FindClustersSSD","Too many 1D clusters !");
1509               return;
1510            }
1511            //
1512            c[*n].SetY(y/q+0.3*nd);
1513            c[*n].SetQ(0.5*q);
1514            c[*n].SetNd(nd);
1515            c[*n].SetLabels(milab);
1516          }
1517          else{
1518          */
1519          if (nd>4&&nd<25) {
1520            c[*n].SetY(y/q-0.25*nd);
1521            c[*n].SetQ(0.5*q);
1522            (*n)++;
1523            if (*n==MAX) {
1524              Error("FindClustersSSD","Too many 1D clusters !");
1525              return;
1526            }
1527            c[*n].SetY(y/q+0.25*nd);
1528            c[*n].SetQ(0.5*q);
1529            c[*n].SetNd(nd);
1530            c[*n].SetLabels(milab);
1531          }       
1532          (*n)++;
1533          if (*n==MAX) {
1534           Error("FindClustersSSD","Too many 1D clusters !");
1535           return;
1536          }
1537          y=q=qmax=0.;
1538          nd=0;
1539          lab[0]=lab[1]=lab[2]=-2;
1540          //
1541          for (Int_t ilab=0;ilab<10;ilab++){
1542            milab[ilab]=-2;
1543          }
1544          //
1545          if (flag!=d->GetCoord1()) { n=&np; c=pos; }
1546       }
1547       flag=d->GetCoord1();
1548       q += d->GetSignal();
1549       y += d->GetCoord2()*d->GetSignal();
1550       nd++;
1551       if (d->GetSignal()>qmax) {
1552          qmax=d->GetSignal();
1553          lab[0]=d->GetTrack(0); lab[1]=d->GetTrack(1); lab[2]=d->GetTrack(2);
1554       }
1555       for (Int_t ilab=0;ilab<10;ilab++) {
1556         if (d->GetTrack(ilab)>=0) AddLabel(milab, (d->GetTrack(ilab))); 
1557       }
1558       curr=strip;
1559   }
1560   c[*n].SetY(y/q);
1561   c[*n].SetQ(q);
1562   c[*n].SetNd(nd);
1563   c[*n].SetLabels(lab);
1564   //Split suspiciously big cluster
1565   if (nd>4 && nd<25) {
1566      c[*n].SetY(y/q-0.25*nd);
1567      c[*n].SetQ(0.5*q);
1568      (*n)++;
1569      if (*n==MAX) {
1570         Error("FindClustersSSD","Too many 1D clusters !");
1571         return;
1572      }
1573      c[*n].SetY(y/q+0.25*nd);
1574      c[*n].SetQ(0.5*q);
1575      c[*n].SetNd(nd);
1576      c[*n].SetLabels(lab);
1577   }
1578   (*n)++;
1579   if (*n==MAX) {
1580      Error("FindClustersSSD","Too many 1D clusters !");
1581      return;
1582   }
1583
1584   FindClustersSSD(neg, nn, pos, np, clusters);
1585 }
1586
1587 void AliITSclustererV2::FindClustersSSD(AliITSRawStream* input, 
1588                                         TClonesArray** clusters) 
1589 {
1590   //------------------------------------------------------------
1591   // Actual SSD cluster finder for raw data
1592   //------------------------------------------------------------
1593   Int_t nClustersSSD = 0;
1594   const Int_t MAX = 1000;
1595   Ali1Dcluster clusters1D[2][MAX];
1596   Int_t nClusters[2] = {0, 0};
1597   Int_t lab[3]={-2,-2,-2};
1598   Float_t q = 0.;
1599   Float_t y = 0.;
1600   Int_t nDigits = 0;
1601   Int_t prevStrip = -1;
1602   Int_t prevFlag = -1;
1603   Int_t prevModule = -1;
1604
1605   // read raw data input stream
1606   while (kTRUE) {
1607     Bool_t next = input->Next();
1608
1609     if(input->GetSignal()<3 && next) continue;
1610     // check if a new cluster starts
1611     Int_t strip = input->GetCoord2();
1612     Int_t flag = input->GetCoord1();
1613     if ((!next || (input->GetModuleID() != prevModule)||
1614          (strip-prevStrip > 1) || (flag != prevFlag)) &&
1615         (nDigits > 0)) {
1616       if (nClusters[prevFlag] == MAX) {
1617         Error("FindClustersSSD", "Too many 1D clusters !");
1618         return;
1619       }
1620       Ali1Dcluster& cluster = clusters1D[prevFlag][nClusters[prevFlag]++];
1621       cluster.SetY(y/q);
1622       cluster.SetQ(q);
1623       cluster.SetNd(nDigits);
1624       cluster.SetLabels(lab);
1625
1626       //Split suspiciously big cluster
1627       if (nDigits > 4&&nDigits < 25) {
1628         cluster.SetY(y/q - 0.25*nDigits);
1629         cluster.SetQ(0.5*q);
1630         if (nClusters[prevFlag] == MAX) {
1631           Error("FindClustersSSD", "Too many 1D clusters !");
1632           return;
1633         }
1634         Ali1Dcluster& cluster2 = clusters1D[prevFlag][nClusters[prevFlag]++];
1635         cluster2.SetY(y/q + 0.25*nDigits);
1636         cluster2.SetQ(0.5*q);
1637         cluster2.SetNd(nDigits);
1638         cluster2.SetLabels(lab);
1639       }
1640       y = q = 0.;
1641       nDigits = 0;
1642     }
1643
1644     if (!next || (input->GetModuleID() != prevModule)) {
1645       Int_t iModule = prevModule;
1646
1647       // when all data from a module was read, search for clusters
1648       if (prevFlag >= 0) {
1649         clusters[iModule] = new TClonesArray("AliITSclusterV2");
1650         fI = iModule;
1651         FindClustersSSD(&clusters1D[0][0], nClusters[0], 
1652                         &clusters1D[1][0], nClusters[1], clusters[iModule]);
1653         Int_t nClusters = clusters[iModule]->GetEntriesFast();
1654         nClustersSSD += nClusters;
1655       }
1656
1657       if (!next) break;
1658       nClusters[0] = nClusters[1] = 0;
1659       y = q = 0.;
1660       nDigits = 0;
1661     }
1662
1663     // add digit to current cluster
1664     q += input->GetSignal();
1665     y += strip * input->GetSignal();
1666     nDigits++;
1667     prevStrip = strip;
1668     prevFlag = flag;
1669     prevModule = input->GetModuleID();
1670
1671   }
1672
1673   Info("FindClustersSSD", "found clusters in ITS SSD: %d", nClustersSSD);
1674 }
1675
1676 #else   //V1
1677
1678 #include "AliITSDetType.h"
1679 #include "AliITS.h"
1680 #include "AliITSsegmentationSPD.h"
1681 #include "AliITSClusterFinderSPD.h"
1682
1683 #include "AliITSresponseSDD.h"
1684 #include "AliITSsegmentationSDD.h"
1685 #include "AliITSClusterFinderSDD.h"
1686
1687 #include "AliITSsegmentationSSD.h"
1688 #include "AliITSClusterFinderSSD.h"
1689
1690
1691 void AliITSclustererV2::
1692 FindClustersSPD(const TClonesArray *digits, TClonesArray *clusters) {
1693   //------------------------------------------------------------
1694   // Actual SPD cluster finding based on AliITSClusterFinderSPD
1695   //------------------------------------------------------------
1696   static AliITS *its=(AliITS*)gAlice->GetModule("ITS");
1697   static TClonesArray *points=its->RecPoints();
1698   static AliITSsegmentationSPD *seg=
1699          (AliITSsegmentationSPD *)its->DetType(0)->GetSegmentationModel();
1700   static AliITSClusterFinderSPD cf(seg, (TClonesArray*)digits, points);
1701
1702   cf.FindRawClusters(fI);
1703   RecPoints2Clusters(points, fI, clusters);
1704   its->ResetRecPoints();
1705
1706 }
1707
1708 void AliITSclustererV2::
1709 FindClustersSDD(const TClonesArray *digits, TClonesArray *clusters) {
1710   //------------------------------------------------------------
1711   // Actual SDD cluster finding based on AliITSClusterFinderSDD
1712   //------------------------------------------------------------
1713   static AliITS *its=(AliITS*)gAlice->GetModule("ITS");
1714   static TClonesArray *points=its->RecPoints();
1715   static AliITSresponseSDD *resp=
1716         (AliITSresponseSDD *)its->DetType(1)->GetResponseModel();
1717   static AliITSsegmentationSDD *seg=
1718          (AliITSsegmentationSDD *)its->DetType(1)->GetSegmentationModel();
1719   static AliITSClusterFinderSDD 
1720          cf(seg,resp,(TClonesArray*)digits,its->ClustersAddress(1));
1721
1722   cf.FindRawClusters(fI);
1723   Int_t nc=points->GetEntriesFast();
1724   while (nc--) { //To be consistent with the SSD cluster charges
1725      AliITSRecPoint *p=(AliITSRecPoint*)points->UncheckedAt(nc);
1726      p->SetQ(p->GetQ()/12.);
1727   }
1728   RecPoints2Clusters(points, fI, clusters);
1729   its->ResetClusters(1);
1730   its->ResetRecPoints();
1731
1732 }
1733
1734 void AliITSclustererV2::
1735 FindClustersSSD(const TClonesArray *digits, TClonesArray *clusters) {
1736   //------------------------------------------------------------
1737   // Actual SSD cluster finding based on AliITSClusterFinderSSD
1738   //------------------------------------------------------------
1739   static AliITS *its=(AliITS*)gAlice->GetModule("ITS");
1740   static TClonesArray *points=its->RecPoints();
1741   static AliITSsegmentationSSD *seg=
1742          (AliITSsegmentationSSD *)its->DetType(2)->GetSegmentationModel();
1743   static AliITSClusterFinderSSD cf(seg,(TClonesArray*)digits);
1744
1745   cf.FindRawClusters(fI);
1746   RecPoints2Clusters(points, fI, clusters);
1747   its->ResetRecPoints();
1748
1749 }
1750
1751 #endif