One instance of AliITSresponse per sensor - AliITSresponse objects read/stored from...
[u/mrichter/AliRoot.git] / ITS / AliITSsimulationSPDdubna.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 /*
17 $Id$
18 */
19 #include <Riostream.h>
20 #include <TH1.h>
21 #include <TMath.h>
22 #include <TParticle.h>
23 #include <TRandom.h>
24 #include <TString.h>
25 #include "AliITS.h"
26 #include "AliITSMapA2.h" 
27 #include "AliITSdigitSPD.h"
28 #include "AliITSgeom.h"
29 #include "AliITShit.h"
30 #include "AliITSmodule.h"
31 #include "AliITSpList.h"
32 #include "AliITSresponseSPD.h"
33 #include "AliITSsegmentationSPD.h"
34 #include "AliITSsimulationSPDdubna.h"
35 #include "AliLog.h"
36 #include "AliRun.h"
37
38 //#define DEBUG
39
40 ClassImp(AliITSsimulationSPDdubna)
41 ////////////////////////////////////////////////////////////////////////
42 // Version: 1
43 // Modified by Bjorn S. Nilsen
44 // Version: 0
45 // Written by Boris Batyunya
46 // December 20 1999
47 //
48 // AliITSsimulationSPDdubna is to do the simulation of SPDs.
49 //______________________________________________________________________
50 AliITSsimulationSPDdubna::AliITSsimulationSPDdubna():
51 AliITSsimulation(),
52 fHis(0),
53 fSPDname(),
54 fCoupling(0){
55     // Default constructor.
56     // Inputs:
57     //    none.
58     // Outputs:
59     //    none.
60     // Return:
61     //    A default constructed AliITSsimulationSPDdubna class.
62
63     AliDebug(1,Form("Calling degault constructor"));
64 }
65 //______________________________________________________________________
66 AliITSsimulationSPDdubna::AliITSsimulationSPDdubna(AliITSDetTypeSim *dettyp, Int_t cup):
67 AliITSsimulation(dettyp),
68 fHis(0),
69 fSPDname(),
70 fCoupling(cup){
71     // standard constructor
72     // Inputs:
73     //    AliITSsegmentation *seg  A pointer to the segmentation class
74     //                             to be used for this simulation
75     //    AliITSresponse     *resp A pointer to the responce class to
76     //                             be used for this simulation
77     //    Int_t              cup   The type of coupling to be used
78     //                             =1 uses SetCoupling, =2 uses SetCouplingOld
79     //                             With diffusion tured off
80     //                             =3 uses SetCoupling, =4 uses SetCouplingOld
81     //                             with diffusion on other, no coupling.
82     // Outputs:
83     //    none.
84     // Return:
85     //    A default constructed AliITSsimulationSPDdubna class.
86
87     AliDebug(1,
88              Form("Calling degault constructor cup=%d",cup));
89     if(cup==1||cup==2){ // For the moment, remove defusion if Coupling is
90         // set.
91       AliITSresponseSPD* res = (AliITSresponseSPD*)GetResponseModel(fDetType->GetITSgeom()->GetStartSPD());
92       res->SetTemperature(0.0);
93       res->SetDistanceOverVoltage(0.0);
94     } // end if
95     Init();
96 }
97 //______________________________________________________________________
98 void AliITSsimulationSPDdubna::Init(){
99     // Initilization
100     // Inputs:
101     //    none.
102     // Outputs:
103     //    none.
104     // Return:
105     //    none.
106     const Double_t kmictocm = 1.0e-4; // convert microns to cm.
107
108     SetModuleNumber(0);
109     SetEventNumber(0);
110     SetMap(new AliITSpList(GetNPixelsZ(),GetNPixelsX()));
111     AliITSresponseSPD* res = (AliITSresponseSPD*)GetResponseModel(fDetType->GetITSgeom()->GetStartSPD());
112     AliITSsegmentationSPD* seg = (AliITSsegmentationSPD*)GetSegmentationModel(0);
113     res->SetDistanceOverVoltage(kmictocm*seg->Dy(),50.0);
114 }
115 //______________________________________________________________________
116 AliITSsimulationSPDdubna::~AliITSsimulationSPDdubna(){
117     // destructor
118     // Inputs:
119     //    none.
120     // Outputs:
121     //    none.
122     // Return:
123     //     none.
124
125     if (fHis) {
126         fHis->Delete(); 
127         delete fHis;     
128     } // end if fHis
129 }
130 //______________________________________________________________________
131 AliITSsimulationSPDdubna::AliITSsimulationSPDdubna(const 
132                                                    AliITSsimulationSPDdubna 
133                                                    &s) : AliITSsimulation(s){
134     //     Copy Constructor
135     // Inputs:
136     //    AliITSsimulationSPDdubna &s The original class for which
137     //                                this class is a copy of
138     // Outputs:
139     //    none.
140     // Return:
141
142     *this = s;
143     return;
144 }
145 //______________________________________________________________________
146 AliITSsimulationSPDdubna&  AliITSsimulationSPDdubna::operator=(const 
147                                            AliITSsimulationSPDdubna &s){
148     //    Assignment operator
149     // Inputs:
150     //    AliITSsimulationSPDdubna &s The original class for which
151     //                                this class is a copy of
152     // Outputs:
153     //    none.
154     // Return:
155
156     if(&s == this) return *this;
157     this->fHis = s.fHis;
158     fCoupling  = s.fCoupling;
159     fSPDname   = s.fSPDname;
160     return *this;
161 }
162 //______________________________________________________________________
163 AliITSsimulation&  AliITSsimulationSPDdubna::operator=(const 
164                                            AliITSsimulation &s){
165     //    Assignment operator
166     // Inputs:
167     //    AliITSsimulationSPDdubna &s The original class for which
168     //                                this class is a copy of
169     // Outputs:
170     //    none.
171     // Return:
172
173     if(&s == this) return *this;
174     Error("AliITSsimulationSPDdubna","Not allowed to make a = with "
175           "AliITSsimulationSPDdubna","Using default creater instead");
176
177     return *this;
178 }
179 //______________________________________________________________________
180 void AliITSsimulationSPDdubna::InitSimulationModule(Int_t module, Int_t event){
181     //  This function creates maps to build the list of tracks for each
182     //  summable digit. Inputs defined by base class.
183     //  Inputs:
184     //    Int_t module   // Module number to be simulated
185     //    Int_t event    // Event number to be simulated
186     //  Outputs:
187     //    none
188     //  Returns:
189     //    none
190
191     AliDebug(1,Form("(module=%d,event=%d)",module,event));
192     SetModuleNumber(module);
193     SetEventNumber(event);
194     ClearMap();
195 }
196 //_____________________________________________________________________
197 void AliITSsimulationSPDdubna::SDigitiseModule(AliITSmodule *mod,Int_t,
198                                                Int_t event){
199     //  This function begins the work of creating S-Digits.  Inputs defined
200     //  by base class.
201     //  Inputs:
202     //    AliITSmodule *mod  //  module
203     //    Int_t              //  not used
204     //    Int_t event        //  Event number
205     //  Outputs:
206     //    none
207     //  Return:
208     //    test              //  test returns kTRUE if the module contained hits
209     //                      //  test returns kFALSE if it did not contain hits
210
211     AliDebug(1,Form("(mod=%p, ,event=%d)",mod,event));
212     if(!(mod->GetNhits())){
213         AliDebug(1,Form("In event %d module %d there are %d hits returning.",
214                         event, mod->GetIndex(),mod->GetNhits()));
215         return;// if module has no hits don't create Sdigits
216     } // end if
217     SetModuleNumber(mod->GetIndex());
218     SetEventNumber(event);
219     HitToSDigit(mod);
220     WriteSDigits();
221     ClearMap();
222 }
223 //______________________________________________________________________
224 void AliITSsimulationSPDdubna::WriteSDigits(){
225     //  This function adds each S-Digit to pList
226     //  Inputs:
227     //    none.
228     //  Outputs:
229     //    none.
230     //  Return:
231     //    none
232     Int_t ix, nix, iz, niz;
233     static AliITS *aliITS = (AliITS*)gAlice->GetModule("ITS");
234
235     AliDebug(1,Form("Writing SDigits for module %d",GetModuleNumber()));
236     GetMap()->GetMaxMapIndex(niz, nix);
237     for(iz=0; iz<niz; iz++)for(ix=0; ix<nix; ix++){
238         if(GetMap()->GetSignalOnly(iz,ix)>0.0){
239             aliITS->AddSumDigit(*(GetMap()->GetpListItem(iz,ix)));
240             if(AliDebugLevel()>0) {
241               AliDebug(1,Form("%d, %d",iz,ix));
242               cout << *(GetMap()->GetpListItem(iz,ix)) << endl;
243             } // end if GetDebug
244         } // end if GetMap()->GetSignalOnly(iz,ix)>0.0
245     } // end for iz,ix
246     return; 
247 }
248 //______________________________________________________________________
249 void AliITSsimulationSPDdubna::FinishSDigitiseModule(){
250     //  This function calls SDigitsToDigits which creates Digits from SDigits
251     //  Inputs:
252     //    none
253     //  Outputs:
254     //    none
255     //  Return
256     //    none
257
258     AliDebug(1,"()");
259     pListToDigits(); // Charge To Signal both adds noise and
260     ClearMap();
261     return;
262 }
263 //______________________________________________________________________
264 void AliITSsimulationSPDdubna::DigitiseModule(AliITSmodule *mod,Int_t,
265                                               Int_t){
266     //  This function creates Digits straight from the hits and then adds
267     //  electronic noise to the digits before adding them to pList
268     //  Each of the input variables is passed along to HitToSDigit
269     //  Inputs:
270     //    AliITSmodule *mod     module
271     //    Int_t                 Dummy.
272     //    Int_t                 Dummy
273     //  Outputs:
274     //     none.
275     //  Return:
276     //    none.
277
278     AliDebug(1,Form("(mod=%p,,)",mod));
279     HitToSDigit(mod);
280     pListToDigits();
281     ClearMap();
282 }
283 //______________________________________________________________________
284 void AliITSsimulationSPDdubna::HitToSDigit(AliITSmodule *mod){
285     // Does the charge distributions using Gaussian diffusion charge charing.
286     // Inputs:
287     //    AliITSmodule *mod  Pointer to this module
288     // Output:
289     //    none.
290     // Return:
291     //    none.
292     const Double_t kmictocm = 1.0e-4; // convert microns to cm.
293     TObjArray *hits = mod->GetHits();
294     Int_t nhits = hits->GetEntriesFast();
295     Int_t h,ix,iz,i;
296     Int_t idtrack;
297     Double_t x0=0.0,x1=0.0,y0=0.0,y1=0.0,z0=0.0,z1=0.0,de=0.0;
298     Double_t x,y,z,t,tp,st,dt=0.2,el,sig;
299     AliITSsegmentationSPD* seg = (AliITSsegmentationSPD*)GetSegmentationModel(0);
300     AliITSresponseSPD* res = (AliITSresponseSPD*)GetResponseModel(fDetType->GetITSgeom()->GetStartSPD());
301     Double_t thick = kmictocm*seg->Dy();
302
303     AliDebug(1,Form("(mod=%p) fCoupling=%d",mod,fCoupling));
304     if(nhits<=0) return;
305     for(h=0;h<nhits;h++){
306       if(AliDebugLevel()>0) {
307         AliDebug(1,Form("Hits, %d", h));
308         cout << *(mod->GetHit(h)) << endl;
309       } // end if GetDebug
310         if(!mod->LineSegmentL(h,x0,x1,y0,y1,z0,z1,de,idtrack)) continue;
311         st = TMath::Sqrt(x1*x1+y1*y1+z1*z1);
312         if(st>0.0){
313             st = (Double_t)((Int_t)(st/kmictocm)); // number of microns
314             if(st<=1.0) st = 1.0;
315             dt = 1.0/st;
316             for(t=0.0;t<1.0;t+=dt){ // Integrate over t
317                 tp  = t+0.5*dt;
318                 x   = x0+x1*tp;
319                 y   = y0+y1*tp;
320                 z   = z0+z1*tp;
321                 if(!(seg->LocalToDet(x,z,ix,iz))) continue; // outside
322                 el  = res->GeVToCharge((Double_t)(dt*de));
323                 if(GetDebug(1)){
324                     if(el<=0.0) cout<<"el="<<el<<" dt="<<dt
325                                     <<" de="<<de<<endl;
326                 } // end if GetDebug
327                 sig = res->SigmaDiffusion1D(thick + y);
328                 SpreadCharge(x,z,ix,iz,el,sig,idtrack,h);
329             } // end for t
330         } else { // st == 0.0 deposit it at this point
331             x   = x0;
332             y   = y0;
333             z   = z0;
334             if(!(seg->LocalToDet(x,z,ix,iz))) continue; // outside
335             el  = res->GeVToCharge((Double_t)de);
336             sig = res->SigmaDiffusion1D(thick + y);
337             SpreadCharge(x,z,ix,iz,el,sig,idtrack,h);
338         } // end if st>0.0
339         // Coupling
340         switch (fCoupling) {
341         default:
342             break;
343         case 1: case 3:
344             // x is column and z is row (see AliITSsegmentationSPD::GetPadIxz)
345             for(i=0;i<GetMap()->GetEntries();i++) 
346                 if(GetMap()->GetpListItem(i)==0) continue;
347                 else{
348                     GetMap()->GetMapIndex(
349                               GetMap()->GetpListItem(i)->GetIndex(),iz,ix);
350                     SetCoupling(iz,ix,idtrack,h);
351                 } // end for i
352             break;
353         case 2: case 4:
354             // x is column and z is row (see AliITSsegmentationSPD::GetPadIxz)
355             for(i=0;i<GetMap()->GetEntries();i++) 
356                 if(GetMap()->GetpListItem(i)==0) continue;
357                 else{
358                     GetMap()->GetMapIndex(
359                                 GetMap()->GetpListItem(i)->GetIndex(),iz,ix);
360                     SetCouplingOld(iz,ix,idtrack,h);
361                 } // end for i
362             break;
363         } // end switch
364     } // Loop over all hits h
365     if(GetDebug(2))Info("HitToSDigit","Finished fCoupling=%d",fCoupling);
366 }
367 //______________________________________________________________________
368 void AliITSsimulationSPDdubna::SpreadCharge(Double_t x0,Double_t z0,
369                                             Int_t ix0,Int_t iz0,
370                                             Double_t el,Double_t sig,Int_t t,
371                                             Int_t hi){
372     // Spreads the charge over neighboring cells. Assume charge is distributed
373     // as charge(x,z) = (el/2*pi*sig*sig)*exp(-arg)
374     // arg=((x-x0)*(x-x0)/2*sig*sig)+((z-z0*z-z0)/2*sig*sig)
375     // Defined this way, the integral over all x and z is el.
376     // Inputs:
377     //    Double_t x0   x position of point where charge is liberated
378     //    Double_t y0   y position of point where charge is liberated
379     //    Double_t z0   z position of point where charge is liberated
380     //    Int_t    ix0  row of cell corresponding to point x0
381     //    Int_t    iz0  columb of cell corresponding to point z0
382     //    Double_t el   number of electrons liberated in this step
383     //    Double_t sig  Sigma difusion for this step (y0 dependent)
384     //    Int_t    t    track number
385     //    Int_t    ti   hit track index number
386     //    Int_t    hi   hit "hit" index number
387     // Outputs:
388     //     none.
389     // Return:
390     //     none.
391     const Int_t knx = 3,knz = 2;
392     const Double_t kRoot2 = 1.414213562; // Sqrt(2).
393     const Double_t kmictocm = 1.0e-4; // convert microns to cm.
394     Int_t ix,iz,ixs,ixe,izs,ize;
395     Float_t x,z;
396     Double_t x1,x2,z1,z2,s,sp;
397     AliITSsegmentationSPD* seg = (AliITSsegmentationSPD*)GetSegmentationModel(0);
398
399
400     if(GetDebug(4)) Info("SpreadCharge","(x0=%e,z0=%e,ix0=%d,iz0=%d,el=%e,"
401                          "sig=%e,t=%d,i=%d)",x0,z0,ix0,iz0,el,sig,t,hi);
402     if(sig<=0.0) { // if sig<=0 No diffusion to simulate.
403         GetMap()->AddSignal(iz0,ix0,t,hi,GetModuleNumber(),el);
404         if(GetDebug(2)){
405             cout << "sig<=0.0=" << sig << endl;
406         } // end if GetDebug
407         return;
408     } // end if
409     sp = 1.0/(sig*kRoot2);
410     if(GetDebug(2)){
411         cout << "sig=" << sig << " sp=" << sp << endl;
412     } // end if GetDebug
413     ixs = TMath::Max(-knx+ix0,0);
414     ixe = TMath::Min(knx+ix0,seg->Npx()-1);
415     izs = TMath::Max(-knz+iz0,0);
416     ize = TMath::Min(knz+iz0,seg->Npz()-1);
417     for(ix=ixs;ix<=ixe;ix++) for(iz=izs;iz<=ize;iz++){
418         seg->DetToLocal(ix,iz,x,z); // pixel center
419         x1  = x;
420         z1  = z;
421         x2  = x1 + 0.5*kmictocm*seg->Dpx(ix); // Upper
422         x1 -= 0.5*kmictocm*seg->Dpx(ix);  // Lower
423         z2  = z1 + 0.5*kmictocm*seg->Dpz(iz); // Upper
424         z1 -= 0.5*kmictocm*seg->Dpz(iz);  // Lower
425         x1 -= x0; // Distance from where track traveled
426         x2 -= x0; // Distance from where track traveled
427         z1 -= z0; // Distance from where track traveled
428         z2 -= z0; // Distance from where track traveled
429         s   = 0.25; // Correction based on definision of Erfc
430         s  *= TMath::Erfc(sp*x1) - TMath::Erfc(sp*x2);
431         if(GetDebug(3)){
432             cout <<"el="<<el<<" ix0="<<ix0<<" ix="<<ix<<" x0="<<x<<
433                 " iz0="<<iz0<<" iz="<<iz<<" z0="<<z<< 
434                 " sp*x1="<<sp*x1<<" sp*x2="<<sp*x2<<" s="<<s;
435         } // end if GetDebug
436         s  *= TMath::Erfc(sp*z1) - TMath::Erfc(sp*z2);
437         if(GetDebug(3)){
438             cout<<" sp*z1="<<sp*z1<<" sp*z2="<<sp*z2<<" s="<<s<< endl;
439         } // end if GetDebug
440         GetMap()->AddSignal(iz,ix,t,hi,GetModuleNumber(),s*el);
441     } // end for ix, iz
442 }
443 //______________________________________________________________________
444 void AliITSsimulationSPDdubna::pListToDigits(){
445     // add noise and electronics, perform the zero suppression and add the
446     // digit to the list
447     // Inputs:
448     //    none.
449     // Outputs:
450     //    none.
451     // Return:
452     //    none.
453     static AliITS *aliITS = (AliITS*)gAlice->GetModule("ITS");
454     Int_t j,ix,iz;
455     Double_t  electronics;
456     Double_t sig;
457     const Int_t    nmaxtrk=AliITSdigitSPD::GetNTracks();
458     static AliITSdigitSPD dig;
459     AliITSresponseSPD* res = (AliITSresponseSPD*)GetResponseModel(fDetType->GetITSgeom()->GetStartSPD());
460     if(GetDebug(1)) Info("pListToDigits","()");
461     for(iz=0; iz<GetNPixelsZ(); iz++) for(ix=0; ix<GetNPixelsX(); ix++){
462         // Apply Noise/Dead channals and the like
463         if(res->IsPixelDead(GetModuleNumber(),ix,iz)) continue;
464         electronics = res->ApplyBaselineAndNoise();
465         UpdateMapNoise(ix,iz,electronics);
466         //
467         // Apply Threshold and write Digits.
468         sig = GetMap()->GetSignalOnly(iz,ix);
469         FillHistograms(ix,iz,sig+electronics);
470         if(GetDebug(3)){
471             cout<<sig<<"+"<<electronics<<">threshold("<<ix<<","<<iz
472                 <<")="<<GetThreshold(ix,iz) <<endl;
473         } // end if GetDebug
474         if (sig+electronics <= GetThreshold(ix,iz)) continue;
475         dig.SetCoord1(iz);
476         dig.SetCoord2(ix);
477         dig.SetSignal(1);
478         dig.SetSignalSPD((Int_t) GetMap()->GetSignal(iz,ix));
479         for(j=0;j<nmaxtrk;j++){
480             if (j<GetMap()->GetNEnteries()) {
481                 dig.SetTrack(j,GetMap()->GetTrack(iz,ix,j));
482                 dig.SetHit(j,GetMap()->GetHit(iz,ix,j));
483             }else { // Default values
484                 dig.SetTrack(j,-3);
485                 dig.SetHit(j,-1);
486             } // end if GetMap()
487         } // end for j
488         if(GetDebug(3)){
489             cout<<iz<<","<<ix<<","<<*(GetMap()->GetpListItem(iz,ix))<<endl;
490         } // end if GetDebug
491         aliITS->AddSimDigit(0,&dig);
492     } //  for ix/iz
493 }
494 //______________________________________________________________________
495 void AliITSsimulationSPDdubna::CreateHistograms(){
496     // create 1D histograms for tests
497     // Inputs:
498     //    none.
499     // Outputs:
500     //    none.
501     // Return:
502     //     none.
503
504     if(GetDebug(1)) Info("CreateHistograms","create histograms");
505
506     fHis = new TObjArray(GetNPixelsZ());
507     TString fSPDname("spd_");
508     for(Int_t i=0;i<GetNPixelsZ();i++) {
509         Char_t pixelz[4];
510         sprintf(pixelz,"%d",i);
511         fSPDname.Append(pixelz);
512         fHis->AddAt(new TH1F(fSPDname.Data(),"SPD maps",
513                              GetNPixelsX(),0.,(Double_t)GetNPixelsX()),i);
514     } // end for i
515 }
516 //______________________________________________________________________
517 void AliITSsimulationSPDdubna::FillHistograms(Int_t ix,Int_t iz,Double_t v){
518     // Fill the histogram
519     // Inputs:
520     //    none.
521     // Outputs:
522     //    none.
523     // Return:
524     //     none.
525
526     if(!GetHistArray()) return; // Only fill if setup.
527     if(GetDebug(2)) Info("FillHistograms","fill histograms");
528     GetHistogram(iz)->Fill(ix,v);
529 }
530 //______________________________________________________________________
531 void AliITSsimulationSPDdubna::ResetHistograms(){
532     // Reset histograms for this detector
533     // Inputs:
534     //    none.
535     // Outputs:
536     //    none.
537     // Return:
538     //     none.
539
540     if(!GetHistArray()) return; // Only fill if setup.
541     if(GetDebug(2)) Info("FillHistograms","fill histograms");
542     for ( int i=0;i<GetNPixelsZ();i++ ) {
543         if (fHis->At(i))    ((TH1F*)fHis->At(i))->Reset();
544     } // end for i
545 }
546
547 //______________________________________________________________________
548 void AliITSsimulationSPDdubna::SetCoupling(Int_t row, Int_t col, Int_t ntrack,
549                                       Int_t idhit) {
550     //  Take into account the coupling between adiacent pixels.
551     //  The parameters probcol and probrow are the probability of the
552     //  signal in one pixel shared in the two adjacent pixels along
553     //  the column and row direction, respectively.
554     //  Note pList is goten via GetMap() and module is not need any more.
555     //  Otherwise it is identical to that coded by Tiziano Virgili (BSN).
556     //Begin_Html
557     /*
558       <img src="picts/ITS/barimodel_3.gif">
559       </pre>
560       <br clear=left>
561       <font size=+2 color=red>
562       <a href="mailto:tiziano.virgili@cern.ch"></a>.
563       </font>
564       <pre>
565     */
566     //End_Html
567     // Inputs:
568     //    Int_t row            z cell index
569     //    Int_t col            x cell index
570     //    Int_t ntrack         track incex number
571     //    Int_t idhit          hit index number
572     // Outputs:
573     //    none.
574     // Return:
575     //     none.
576     Int_t j1,j2,flag=0;
577     Double_t pulse1,pulse2;
578     Double_t couplR=0.0,couplC=0.0;
579     Double_t xr=0.;
580
581     GetCouplings(couplR,couplC);
582     if(GetDebug(3)) Info("SetCoupling","(row=%d,col=%d,ntrack=%d,idhit=%d) "
583                          "Calling SetCoupling couplR=%e couplC=%e",
584                          row,col,ntrack,idhit,couplR,couplC);
585     j1 = row;
586     j2 = col;
587     pulse1 = GetMap()->GetSignalOnly(row,col);
588     pulse2 = pulse1;
589     for (Int_t isign=-1;isign<=1;isign+=2){// loop in row direction
590         do{
591             j1 += isign;
592             //   pulse1 *= couplR; 
593             xr = gRandom->Rndm();
594             //if ((j1<0)||(j1>GetNPixelsZ()-1)||(pulse1<GetThreshold(j1,col))){
595             if ((j1<0) || (j1>GetNPixelsZ()-1) || (xr>couplR)){
596                 j1 = row;
597                 flag = 1;
598             }else{
599                 UpdateMapSignal(col,j1,ntrack,idhit,pulse1);
600                 //  flag = 0;
601                 flag = 1; // only first next!!
602             } // end if
603         } while(flag == 0);
604         // loop in column direction
605         do{
606             j2 += isign;
607             // pulse2 *= couplC; 
608             xr = gRandom->Rndm();
609             //if((j2<0)||j2>(GetNPixelsX()-1)||pulse2<GetThreshold(row,j2)){
610             if ((j2<0) || (j2>GetNPixelsX()-1) || (xr>couplC)){
611                 j2 = col;
612                 flag = 1;
613             }else{
614                 UpdateMapSignal(j2,row,ntrack,idhit,pulse2);
615                 //  flag = 0;
616                 flag = 1; // only first next!!
617             } // end if
618         } while(flag == 0);
619     } // for isign
620 }
621 //______________________________________________________________________
622 void AliITSsimulationSPDdubna::SetCouplingOld(Int_t row, Int_t col,
623                 Int_t ntrack,Int_t idhit) {
624     //  Take into account the coupling between adiacent pixels.
625     //  The parameters probcol and probrow are the fractions of the
626     //  signal in one pixel shared in the two adjacent pixels along
627     //  the column and row direction, respectively.
628     //Begin_Html
629     /*
630       <img src="picts/ITS/barimodel_3.gif">
631       </pre>
632       <br clear=left>
633       <font size=+2 color=red>
634       <a href="mailto:Rocco.Caliandro@ba.infn.it"></a>.
635       </font>
636       <pre>
637     */
638     //End_Html
639     // Inputs:
640     //    Int_t row            z cell index
641     //    Int_t col            x cell index
642     //    Int_t ntrack         track incex number
643     //    Int_t idhit          hit index number
644     //    Int_t module         module number
645     // Outputs:
646     //    none.
647     // Return:
648     //     none.
649     Int_t j1,j2,flag=0;
650     Double_t pulse1,pulse2;
651     Double_t couplR=0.0,couplC=0.0;
652
653     GetCouplings(couplR,couplC);
654     if(GetDebug(3)) Info("SetCouplingOld","(row=%d,col=%d,ntrack=%d,idhit=%d) "
655                          "Calling SetCoupling couplR=%e couplC=%e",
656                          row,col,ntrack,idhit,couplR,couplC);
657     j1 = row;
658     j2 = col;
659     pulse1 = GetMap()->GetSignalOnly(row,col);
660     pulse2 = pulse1;
661     for (Int_t isign=-1;isign<=1;isign+=2){// loop in row direction
662         do{
663             j1 += isign;
664             pulse1 *= couplR;
665             if ((j1<0)||(j1>GetNPixelsZ()-1)||(pulse1<GetThreshold(j1,col))){
666                 pulse1 = GetMap()->GetSignalOnly(row,col);
667                 j1 = row;
668                 flag = 1;
669             }else{
670                 UpdateMapSignal(col,j1,ntrack,idhit,pulse1);
671                 flag = 0;
672             } // end if
673         } while(flag == 0);
674         // loop in column direction
675         do{
676             j2 += isign;
677             pulse2 *= couplC;
678             if((j2<0)||(j2>(GetNPixelsX()-1))||(pulse2<GetThreshold(row,j2))){
679                 pulse2 = GetMap()->GetSignalOnly(row,col);
680                 j2 = col;
681                 flag = 1;
682             }else{
683                 UpdateMapSignal(j2,row,ntrack,idhit,pulse2);
684                 flag = 0;
685             } // end if
686         } while(flag == 0);
687     } // for isign
688 }