GetClusterFast function implemented (No getter before) (Marian)
[u/mrichter/AliRoot.git] / TPC / AliTPCParamSR.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 //  Manager and of geomety  classes for set: TPC                     //
20 //                                                                   //
21 //  !sectors are numbered from  0                                     //
22 //  !pad rows are numbered from 0                                     //
23 //  
24 //  27.7.   - AliTPCPaaramSr object for TPC 
25 //            TPC with straight pad rows 
26 //  Origin:  Marian Ivanov, Uni. of Bratislava, ivanov@fmph.uniba.sk // 
27 //                                                                   //  
28 ///////////////////////////////////////////////////////////////////////
29
30 //#include <Riostream.h>
31 #include <TMath.h>
32
33 #include "AliTPCPRF2D.h"
34 #include "AliTPCParamSR.h"
35 #include "AliTPCRF1D.h"
36 #include "TH1.h"
37 #include "AliTPCROC.h"
38 #include "TGeoManager.h"
39
40 ClassImp(AliTPCParamSR)
41 static const  Int_t kMaxRows=600;
42 static const  Float_t  kEdgeSectorSpace = 2.5;
43 static const Float_t kFacSigmaPadRow=3.;
44 static const Float_t kFacSigmaPad=3.;
45 static const Float_t kFacSigmaTime=3.;
46
47
48 AliTPCParamSR::AliTPCParamSR()
49 {   
50   //
51   //constructor set the default parameters
52   fInnerPRF=0;
53   fOuter1PRF=0;
54   fOuter2PRF=0;
55   fTimeRF = 0;
56   fFacSigmaPadRow = Float_t(kFacSigmaPadRow);
57   fFacSigmaPad = Float_t(kFacSigmaPad);
58   fFacSigmaTime = Float_t(kFacSigmaTime);
59   SetDefault();
60   Update();
61 }
62
63 AliTPCParamSR::~AliTPCParamSR()
64 {
65   //
66   //destructor destroy some dynmicaly alocated variables
67   if (fInnerPRF != 0) delete fInnerPRF;
68   if (fOuter1PRF != 0) delete fOuter1PRF;
69   if (fOuter2PRF != 0) delete fOuter2PRF;
70   if (fTimeRF != 0) delete fTimeRF;
71 }
72
73 void AliTPCParamSR::SetDefault()
74 {
75   //set default TPC param   
76   fbStatus = kFALSE;
77   AliTPCParam::SetDefault();  
78 }  
79
80 Int_t  AliTPCParamSR::CalcResponse(Float_t* xyz, Int_t * index, Int_t row)
81 {
82   //
83   //calculate bin response as function of the input position -x 
84   //return number of valid response bin
85   //
86   //we suppose that coordinate is expressed in float digits 
87   // it's mean coordinate system 8
88   //xyz[0] - float padrow xyz[1] is float pad  (center pad is number 0) and xyz[2] is float time bin
89   //xyz[3] - electron time in float time bin format
90   if ( (fInnerPRF==0)||(fOuter1PRF==0)||(fOuter2PRF==0) ||(fTimeRF==0) ){ 
91     Error("AliTPCParamSR", "response function was not adjusted");
92     return -1;
93   }
94   
95   Float_t sfpadrow;   // sigma of response function
96   Float_t sfpad;      // sigma  of 
97   Float_t sftime= fFacSigmaTime*fTimeRF->GetSigma()/fZWidth;     //3 sigma of time response
98   if (index[1]<fNInnerSector){
99     sfpadrow =fFacSigmaPadRow*fInnerPRF->GetSigmaY()/fInnerPadPitchLength;
100     sfpad    =fFacSigmaPad*fInnerPRF->GetSigmaX()/fInnerPadPitchWidth;
101   }
102   else{
103   if(row<fNRowUp1){
104     sfpadrow =fFacSigmaPadRow*fOuter1PRF->GetSigmaY()/fOuter1PadPitchLength;
105     sfpad    =fFacSigmaPad*fOuter1PRF->GetSigmaX()/fOuterPadPitchWidth;}
106     else{
107       sfpadrow =fFacSigmaPadRow*fOuter2PRF->GetSigmaY()/fOuter2PadPitchLength;
108       sfpad    =fFacSigmaPad*fOuter2PRF->GetSigmaX()/fOuterPadPitchWidth;
109     }   
110   }
111
112   Int_t fpadrow = TMath::Max(TMath::Nint(index[2]+xyz[0]-sfpadrow),0);  //"first" padrow
113   Int_t fpad    = TMath::Nint(xyz[1]-sfpad);     //first pad
114   Int_t ftime   = TMath::Max(TMath::Nint(xyz[2]+xyz[3]+GetZOffset()/GetZWidth()-sftime-GetNTBinsL1()),0);  // first time
115   Int_t lpadrow = TMath::Min(TMath::Nint(index[2]+xyz[0]+sfpadrow),fpadrow+19);  //"last" padrow
116   lpadrow       = TMath::Min(GetNRow(index[1])-1,lpadrow);
117   Int_t lpad    = TMath::Min(TMath::Nint(xyz[1]+sfpad),fpad+19);     //last pad
118   Int_t ltime   = TMath::Min(TMath::Nint(xyz[2]+xyz[3]+GetZOffset()/GetZWidth()+sftime-GetNTBinsL1()),ftime+19);    // last time
119   ltime         = TMath::Min(ltime,GetMaxTBin()-1); 
120   // 
121   Int_t npads = GetNPads(index[1],row);
122   if (fpad<-npads/2) 
123     fpad = -npads/2;
124   if (lpad>npads/2) 
125     lpad= npads/2;
126   if (ftime<0) ftime=0;
127   // 
128   if (row>=0) { //if we are interesting about given pad row
129     if (fpadrow<=row) fpadrow =row;
130     else 
131       return 0;
132     if (lpadrow>=row) lpadrow = row;
133     else 
134       return 0;
135   }
136
137  
138   Float_t  padres[20][20];  //I don't expect bigger number of bins
139   Float_t  timeres[20];     
140   Int_t cindex3=0;
141   Int_t cindex=0;
142   Float_t cweight = 0;
143   if (fpadrow>=0) {
144   //calculate padresponse function    
145   Int_t padrow, pad;
146   for (padrow = fpadrow;padrow<=lpadrow;padrow++)
147     for (pad = fpad;pad<=lpad;pad++){
148       Float_t dy = (xyz[0]+Float_t(index[2]-padrow));
149       Float_t dx = (xyz[1]+Float_t(pad));
150       if (index[1]<fNInnerSector)
151         padres[padrow-fpadrow][pad-fpad]=fInnerPRF->GetPRF(dx*fInnerPadPitchWidth,dy*fInnerPadPitchLength);
152       else{
153         if(row<fNRowUp1){
154         padres[padrow-fpadrow][pad-fpad]=fOuter1PRF->GetPRF(dx*fOuterPadPitchWidth,dy*fOuter1PadPitchLength);}
155         else{
156           padres[padrow-fpadrow][pad-fpad]=fOuter2PRF->GetPRF(dx*fOuterPadPitchWidth,dy*fOuter2PadPitchLength);}}}
157   //calculate time response function
158   Int_t time;
159   for (time = ftime;time<=ltime;time++) 
160     timeres[time-ftime]= fTimeRF->GetRF((-xyz[2]-xyz[3]+Float_t(time))*fZWidth+GetNTBinsL1());     
161   //write over threshold values to stack
162   for (padrow = fpadrow;padrow<=lpadrow;padrow++)
163     for (pad = fpad;pad<=lpad;pad++)
164       for (time = ftime;time<=ltime;time++){
165         cweight = timeres[time-ftime]*padres[padrow-fpadrow][pad-fpad];
166         if (cweight>fResponseThreshold) {
167           fResponseBin[cindex3]=padrow;
168           fResponseBin[cindex3+1]=pad;
169           fResponseBin[cindex3+2]=time;
170           cindex3+=3;  
171           fResponseWeight[cindex]=cweight;
172           cindex++;
173         }
174       }
175   }
176   fCurrentMax=cindex;   
177   return fCurrentMax;
178 }
179
180 void AliTPCParamSR::TransformTo8(Float_t *xyz, Int_t *index) const
181 {
182   //
183   // transformate point to digit coordinate
184   //
185   if (index[0]==0) Transform0to1(xyz,index);
186   if (index[0]==1) Transform1to2(xyz,index);
187   if (index[0]==2) Transform2to3(xyz,index);
188   if (index[0]==3) Transform3to4(xyz,index);
189   if (index[0]==4) Transform4to8(xyz,index);
190 }
191
192 void AliTPCParamSR::TransformTo2(Float_t *xyz, Int_t *index) const
193 {
194   //
195   //transformate point to rotated coordinate
196   //
197   //we suppose that   
198   if (index[0]==0) Transform0to1(xyz,index);
199   if (index[0]==1) Transform1to2(xyz,index);
200   if (index[0]==4) Transform4to3(xyz,index);
201   if (index[0]==8) {  //if we are in digit coordinate system transform to global
202     Transform8to4(xyz,index);
203     Transform4to3(xyz,index);  
204   }
205 }
206
207 void AliTPCParamSR::CRXYZtoXYZ(Float_t *xyz,
208                const Int_t &sector, const Int_t & padrow, Int_t option) const  
209 {  
210   //transform relative coordinates to absolute
211   Bool_t rel = ( (option&2)!=0);
212   Int_t index[2]={sector,padrow};
213   if (rel==kTRUE)      Transform4to3(xyz,index);//if the position is relative to pad row  
214   Transform2to1(xyz,index);
215 }
216
217 void AliTPCParamSR::XYZtoCRXYZ(Float_t *xyz,
218                              Int_t &sector, Int_t & padrow, Int_t option) const
219 {
220    //transform global position to the position relative to the sector padrow
221   //if option=0  X calculate absolute            calculate sector
222   //if option=1  X           absolute            use input sector
223   //if option=2  X           relative to pad row calculate sector
224   //if option=3  X           relative            use input sector
225   //!!!!!!!!! WE start to calculate rows from row = 0
226   Int_t index[2];
227   Bool_t rel = ( (option&2)!=0);  
228
229   //option 0 and 2  means that we don't have information about sector
230   if ((option&1)==0)   Transform0to1(xyz,index);  //we calculate sector number 
231   else
232     index[0]=sector;
233   Transform1to2(xyz,index);
234   Transform2to3(xyz,index);
235   //if we store relative position calculate position relative to pad row
236   if (rel==kTRUE) Transform3to4(xyz,index);
237   sector = index[0];
238   padrow = index[1];
239 }
240
241 Float_t AliTPCParamSR::GetPrimaryLoss(Float_t */*x*/, Int_t *index, Float_t *angle)
242 {
243   //
244   //
245   Float_t padlength=GetPadPitchLength(index[1]);
246   Float_t a1=TMath::Sin(angle[0]);
247   a1*=a1;
248   Float_t a2=TMath::Sin(angle[1]);
249   a2*=a2;
250   Float_t length =padlength*TMath::Sqrt(1+a1+a2);
251   return length*fNPrimLoss;
252 }
253
254 Float_t AliTPCParamSR::GetTotalLoss(Float_t */*x*/, Int_t *index, Float_t *angle)
255 {
256   //
257   //
258   Float_t padlength=GetPadPitchLength(index[1]);
259   Float_t a1=TMath::Sin(angle[0]);
260   a1*=a1;
261   Float_t a2=TMath::Sin(angle[1]);
262   a2*=a2;
263   Float_t length =padlength*TMath::Sqrt(1+a1+a2);
264   return length*fNTotalLoss;
265   
266 }
267
268
269 void AliTPCParamSR::GetClusterSize(Float_t *x, Int_t *index, Float_t */*angle*/, Int_t /*mode*/, Float_t *sigma)
270 {
271   //
272   //return cluster sigma2 (x,y) for particle at position x
273   // in this case x coordinata is in drift direction
274   //and y in pad row direction
275   //we suppose that input coordinate system is digit system
276    
277   Float_t  xx;
278   Float_t lx[3] = {x[0],x[1],x[2]};
279   Int_t   li[3] = {index[0],index[1],index[2]};
280   TransformTo2(lx,li);
281   //  Float_t  sigmadiff;
282   sigma[0]=0;
283   sigma[1]=0;
284   
285   xx = lx[2];  //calculate drift length in cm
286   if (xx>0) {
287     sigma[0]+= xx*GetDiffL()*GetDiffL();
288     sigma[1]+= xx*GetDiffT()*GetDiffT(); 
289   }
290
291
292   //sigma[0]=sigma[1]=0;
293   if (GetTimeRF()!=0) sigma[0]+=GetTimeRF()->GetSigma()*GetTimeRF()->GetSigma();
294   if ( (index[1]<fNInnerSector) &&(GetInnerPRF()!=0))   
295     sigma[1]+=GetInnerPRF()->GetSigmaX()*GetInnerPRF()->GetSigmaX();
296   if ( (index[1]>=fNInnerSector) &&(index[2]<fNRowUp1) && (GetOuter1PRF()!=0))
297     sigma[1]+=GetOuter1PRF()->GetSigmaX()*GetOuter1PRF()->GetSigmaX();
298   if( (index[1]>=fNInnerSector) &&(index[2]>=fNRowUp1) && (GetOuter2PRF()!=0))
299     sigma[1]+=GetOuter2PRF()->GetSigmaX()*GetOuter2PRF()->GetSigmaX();
300
301
302   sigma[0]/= GetZWidth()*GetZWidth();
303   sigma[1]/=GetPadPitchWidth(index[0])*GetPadPitchWidth(index[0]);
304 }
305
306
307
308
309 void AliTPCParamSR::GetSpaceResolution(Float_t */*x*/, Int_t */*index*/, Float_t */*angle*/, 
310                                        Float_t /*amplitude*/, Int_t /*mode*/, Float_t */*sigma*/)
311 {
312   //
313   //
314   //
315   
316 }
317 Float_t  AliTPCParamSR::GetAmp(Float_t */*x*/, Int_t */*index*/, Float_t */*angle*/)
318 {
319   //
320   //
321   //
322   return 0;
323 }
324
325 Float_t * AliTPCParamSR::GetAnglesAccMomentum(Float_t *x, Int_t * index, Float_t* momentum, Float_t *angle)
326 {
327   //
328   //calculate angle of track to padrow at given position
329   // for given magnetic field and momentum of the particle
330   //
331
332   TransformTo2(x,index);
333   AliDetectorParam::GetAnglesAccMomentum(x,index,momentum,angle);    
334   Float_t addangle = TMath::ASin(x[1]/GetPadRowRadii(index[1],index[2]));
335   angle[1] +=addangle;
336   return angle;                          
337 }
338
339          
340 Bool_t AliTPCParamSR::Update()
341 {
342   Int_t i;
343   if (AliTPCParam::Update()==kFALSE) return kFALSE;
344   fbStatus = kFALSE;
345
346  Float_t firstrow = fInnerRadiusLow + 1.575;   
347  for( i= 0;i<fNRowLow;i++)
348    {
349      Float_t x = firstrow + fInnerPadPitchLength*(Float_t)i;  
350      fPadRowLow[i]=x;
351      // number of pads per row
352      //     Float_t y = (x-0.5*fInnerPadPitchLength)*tan(fInnerAngle/2.)-fInnerWireMount-
353      //  fInnerPadPitchWidth/2.;
354      // 0 and fNRowLow+1 reserved for cross talk rows
355      fYInner[i+1]  = x*tan(fInnerAngle/2.)-fInnerWireMount;
356      //fNPadsLow[i] = 1+2*(Int_t)(y/fInnerPadPitchWidth) ;
357      fNPadsLow[i] = AliTPCROC::Instance()->GetNPads(0,i) ;     // ROC implement     
358    }
359  // cross talk rows
360  fYInner[0]=(fPadRowLow[0]-fInnerPadPitchLength)*tan(fInnerAngle/2.)-fInnerWireMount;
361  fYInner[fNRowLow+1]=(fPadRowLow[fNRowLow-1]+fInnerPadPitchLength)*tan(fInnerAngle/2.)-fInnerWireMount; 
362  firstrow = fOuterRadiusLow + 1.6;
363  for(i=0;i<fNRowUp;i++)
364    {
365      if(i<fNRowUp1){
366        Float_t x = firstrow + fOuter1PadPitchLength*(Float_t)i; 
367        fPadRowUp[i]=x;
368 //     Float_t y =(x-0.5*fOuter1PadPitchLength)*tan(fOuterAngle/2.)-fOuterWireMount-
369 //        fOuterPadPitchWidth/2.;
370      fYOuter[i+1]= x*tan(fOuterAngle/2.)-fOuterWireMount;
371      //fNPadsUp[i] = 1+2*(Int_t)(y/fOuterPadPitchWidth) ;
372      fNPadsUp[i] =  AliTPCROC::Instance()->GetNPads(36,i) ;     // ROC implement      
373      if(i==fNRowUp1-1) {
374        fLastWireUp1=fPadRowUp[i] +0.625;
375        firstrow = fPadRowUp[i] + 0.5*(fOuter1PadPitchLength+fOuter2PadPitchLength);
376      }
377      }
378      else
379        {
380          Float_t x = firstrow + fOuter2PadPitchLength*(Float_t)(i-64);
381          fPadRowUp[i]=x;
382          //Float_t y =(x-0.5*fOuter2PadPitchLength)*tan(fOuterAngle/2.)-fOuterWireMount-
383          //  fOuterPadPitchWidth/2.;
384          //fNPadsUp[i] = 1+2*(Int_t)(y/fOuterPadPitchWidth) ; 
385          fNPadsUp[i] =  AliTPCROC::Instance()->GetNPads(36,i) ;     // ROC implement
386        }
387      fYOuter[i+1]  = fPadRowUp[i]*tan(fOuterAngle/2.)-fOuterWireMount;
388    }
389  // cross talk rows
390  fYOuter[0]=(fPadRowUp[0]-fOuter1PadPitchLength)*tan(fOuterAngle/2.)-fOuterWireMount;
391  fYOuter[fNRowUp+1]=(fPadRowUp[fNRowUp-1]+fOuter2PadPitchLength)*tan(fOuterAngle/2.)-fOuterWireMount;
392  fNtRows = fNInnerSector*fNRowLow+fNOuterSector*fNRowUp;
393  fbStatus = kTRUE;
394  return kTRUE;
395 }
396 Float_t AliTPCParamSR::GetYInner(Int_t irow) const
397 {
398   return fYInner[irow];
399 }
400 Float_t AliTPCParamSR::GetYOuter(Int_t irow) const
401 {
402   return fYOuter[irow];
403 }
404
405 void AliTPCParamSR::Streamer(TBuffer &R__b)
406 {
407    // Stream an object of class AliTPC.
408
409    if (R__b.IsReading()) {
410       Version_t R__v = R__b.ReadVersion(); if (R__v) { }
411       //      TObject::Streamer(R__b);
412       AliTPCParam::Streamer(R__b);
413       //      if (R__v < 2) return;
414        Update();
415        if (gGeoManager) ReadGeoMatrices();
416    } else {
417       R__b.WriteVersion(AliTPCParamSR::IsA());
418       //TObject::Streamer(R__b);  
419       AliTPCParam::Streamer(R__b);    
420    }
421 }
422 Int_t  AliTPCParamSR::CalcResponseFast(Float_t* xyz, Int_t * index, Int_t row)
423 {
424   //
425   //calculate bin response as function of the input position -x 
426   //return number of valid response bin
427   //
428   //we suppose that coordinate is expressed in float digits 
429   // it's mean coordinate system 8
430   //xyz[0] - electron position w.r.t. pad center, normalized to pad length,
431   //xyz[1] is float pad  (center pad is number 0) and xyz[2] is float time bin
432   //xyz[3] - electron time in float time bin format
433   if ( (fInnerPRF==0)||(fOuter1PRF==0)||(fOuter2PRF==0) ||(fTimeRF==0) ){ 
434     Error("AliTPCParamSR", "response function was not adjusted");
435     return -1;
436   }
437   
438   const Int_t kpadn =  500;
439   const Float_t kfpadn =  500.;
440   const Int_t ktimen = 500;
441   const Float_t kftimen = 500.;
442   const Int_t kpadrn = 500;
443   const Float_t kfpadrn = 500.;
444
445  
446
447   static Float_t prfinner[2*kpadrn][5*kpadn];  //pad divided by 50
448   static Float_t prfouter1[2*kpadrn][5*kpadn];  //prfouter division
449   static Float_t prfouter2[2*kpadrn][5*kpadn];
450   static Float_t kTanMax =0;  
451
452   static Float_t rftime[5*ktimen];         //time division
453   static Int_t blabla=0;
454   static Float_t zoffset=0;
455   static Float_t zwidth=0;
456   static Float_t zoffset2=0;
457   static TH1F * hdiff=0;
458   static TH1F * hdiff1=0;
459   static TH1F * hdiff2=0;
460   
461   if (blabla==0) {  //calculate Response function - only at the begginning
462     kTanMax = TMath::ATan(10.*TMath::DegToRad());
463     hdiff =new TH1F("prf_diff","prf_diff",10000,-1,1);
464     hdiff1 =new TH1F("no_repsonse1","no_response1",10000,-1,1);
465     hdiff2 =new TH1F("no_response2","no_response2",10000,-1,1);
466     
467     blabla=1;
468     zoffset = GetZOffset();
469     zwidth  = fZWidth;
470     zoffset2 = zoffset/zwidth;
471     for (Int_t i=0;i<5*ktimen;i++){
472       rftime[i] = fTimeRF->GetRF(((i-2.5*kftimen)/kftimen)*zwidth+zoffset);
473     }
474     for (Int_t i=0;i<5*kpadn;i++){    
475       for (Int_t j=0;j<2*kpadrn;j++){
476         prfinner[j][i] =
477           fInnerPRF->GetPRF((i-2.5*kfpadn)/kfpadn
478                             *fInnerPadPitchWidth,(j-kfpadrn)/kfpadrn*fInnerPadPitchLength);
479         prfouter1[j][i] =
480           fOuter1PRF->GetPRF((i-2.5*kfpadn)/kfpadn
481                             *fOuterPadPitchWidth,(j-kfpadrn)/kfpadrn*fOuter1PadPitchLength);
482
483         //
484         prfouter2[j][i] =
485           fOuter2PRF->GetPRF((i-2.5*kfpadn)/kfpadn
486                             *fOuterPadPitchWidth,(j-kfpadrn)/kfpadrn*fOuter2PadPitchLength);
487       }
488     }      
489   } // the above is calculated only once
490
491   // calculate central padrow, pad, time
492   Int_t npads = GetNPads(index[1],index[3]-1);
493   Int_t cpadrow = index[2]; // electrons are here
494   Int_t cpad    = TMath::Nint(xyz[1]);
495   Int_t ctime   = TMath::Nint(xyz[2]+zoffset2+xyz[3]-GetNTBinsL1());
496   //calulate deviation
497   Float_t dpadrow = xyz[0];
498   Float_t dpad    = xyz[1]-cpad;
499   Float_t dtime   = xyz[2]+zoffset2+xyz[3]-ctime-GetNTBinsL1();
500   Int_t cindex =0;
501   Int_t cindex3 =0;
502   Int_t maxt =GetMaxTBin();
503
504   Int_t fpadrow;
505   Int_t lpadrow;
506
507   if (row>=0) { //if we are interesting about given pad row
508     fpadrow = row-cpadrow;
509     lpadrow = row-cpadrow;
510   }else{
511     fpadrow = (index[2]>1) ? -1 :0;
512     lpadrow = (index[2]<GetNRow(index[1])-1) ? 1:0;
513   }
514
515   Int_t fpad =  (cpad > -npads/2+1) ? -2: -npads/2-cpad;
516   Int_t lpad =  (cpad < npads/2-2)  ?  2: npads/2-1-cpad;
517   Int_t ftime =  (ctime>1) ? -2: -ctime;
518   Int_t ltime =  (ctime<maxt-2) ? 2: maxt-ctime-1;
519
520   // cross talk from long pad to short one
521   if(row==fNRowUp1 && fpadrow==-1) {
522     dpadrow *= fOuter2PadPitchLength;
523     dpadrow += fOuterWWPitch;
524     dpadrow /= fOuter1PadPitchLength;
525   }    
526   // cross talk from short pad to long one
527   if(row==fNRowUp1+1 && fpadrow==1){ 
528     dpadrow *= fOuter1PadPitchLength;
529     if(dpadrow < 0.) dpadrow = -1.; //protection against 3rd wire
530     dpadrow += fOuterWWPitch;
531     dpadrow /= fOuter2PadPitchLength;
532     
533   }
534
535   // "normal"
536   Int_t apadrow = TMath::Nint((dpadrow-fpadrow)*kfpadrn+kfpadrn);
537   for (Int_t ipadrow = fpadrow; ipadrow<=lpadrow;ipadrow++){
538     if ( (apadrow<0) || (apadrow>=2*kpadrn)) 
539       continue;
540     // pad angular correction
541     Float_t angle = kTanMax*2.*(cpad+0.5)/Float_t(npads);
542     Float_t dpadangle =0;
543     if (index[1]<fNInnerSector){
544       dpadangle = angle*dpadrow*fInnerPadPitchLength/fInnerPadPitchWidth;
545     }
546     else{
547       if(row < fNRowUp1+1){
548         dpadangle    = angle*dpadrow*fOuter1PadPitchLength/fOuterPadPitchWidth;
549       }
550       else {
551         dpadangle    = angle*dpadrow*fOuter2PadPitchLength/fOuterPadPitchWidth;
552       }
553     }
554     if (ipadrow==0) dpadangle *=-1;
555     //
556     //    Int_t apad= TMath::Nint((dpad-fpad)*kfpadn+2.5*kfpadn);
557     Int_t apad= TMath::Nint((dpad+dpadangle-fpad)*kfpadn+2.5*kfpadn);
558     for (Int_t ipad = fpad; ipad<=lpad;ipad++){
559         Float_t cweight;
560         if (index[1]<fNInnerSector){
561           cweight=prfinner[apadrow][apad];
562         }
563         else{
564           if(row < fNRowUp1+1){
565             cweight=prfouter1[apadrow][apad];
566           }
567           else {
568             cweight=prfouter2[apadrow][apad];
569           }
570         }
571         //      if (cweight<fResponseThreshold) continue;
572         Int_t atime = TMath::Nint((dtime-ftime)*kftimen+2.5*kftimen);
573         for (Int_t itime = ftime;itime<=ltime;itime++){ 
574           Float_t cweight2 = cweight*rftime[atime];
575           if (cweight2>fResponseThreshold) {
576             fResponseBin[cindex3++]=cpadrow+ipadrow;
577             fResponseBin[cindex3++]=cpad+ipad;
578             fResponseBin[cindex3++]=ctime+itime;
579             fResponseWeight[cindex++]=cweight2;             
580           }
581           atime-=ktimen;
582         }
583         apad-= kpadn;   
584     }
585     apadrow-=kpadrn;
586   }
587   fCurrentMax=cindex;   
588   return fCurrentMax;    
589   
590 }
591
592
593
594
595
596
597