Bug fix (F. Prino and E. Fragiacomo)
[u/mrichter/AliRoot.git] / ITS / AliITSsimulationSSD.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 #include <stdio.h>
19 #include <stdlib.h>
20 #include <Riostream.h>
21 #include <TObjArray.h>
22 #include <TRandom.h>
23
24 #include "AliITSmodule.h"
25 #include "AliITSMapA2.h"
26 #include "AliITSpList.h"
27 #include "AliITSCalibrationSSD.h"
28 #include "AliITSsegmentationSSD.h"
29 //#include "AliITSdcsSSD.h"
30 #include "AliITS.h"
31 #include "AliITShit.h"
32 #include "AliITSdigitSSD.h"
33 #include "AliRun.h"
34 #include "AliITSgeom.h"
35 #include "AliITSsimulationSSD.h"
36 #include "AliITSTableSSD.h"
37 #include <TF1.h>
38
39
40 ClassImp(AliITSsimulationSSD)
41 ////////////////////////////////////////////////////////////////////////
42 //                                                                    //
43 // Author: Enrico Fragiacomo                                          //
44 //         enrico.fragiacomo@ts.infn.it                               //
45 // Last revised: june 2008                                            // 
46 //                                                                    //
47 // AliITSsimulationSSD is the simulation of SSD.                     //
48 ////////////////////////////////////////////////////////////////////////
49
50 //----------------------------------------------------------------------
51 AliITSsimulationSSD::AliITSsimulationSSD():AliITSsimulation(),
52                                            //fDCS(0),
53 fMapA2(0),
54 fIonE(0.0),
55 fDifConst(),
56 fDriftVel(),
57 fTimeResponse(NULL){
58     //default Constructor
59     //Inputs:
60     // none.
61     // Outputs:
62     // none.
63     // Return:
64     //  A default construction AliITSsimulationSSD class
65 }
66 //----------------------------------------------------------------------
67 AliITSsimulationSSD::AliITSsimulationSSD(AliITSDetTypeSim* dettyp):
68 AliITSsimulation(dettyp),
69 //fDCS(0),
70 fMapA2(0),
71 fIonE(0.0),
72 fDifConst(),
73 fDriftVel(),
74 fTimeResponse(NULL){
75     // Constructor 
76     // Input:
77     //   AliITSDetTypeSim    Pointer to the SSD dettype to be used
78     // Outputs:
79     //   none.
80     // Return
81     //   A standard constructed AliITSsimulationSSD class
82
83   fTimeResponse = new TF1("ftimeresponse",".5*x*exp(1.-.5*x)");
84     Init();
85 }
86 //----------------------------------------------------------------------
87 void AliITSsimulationSSD::Init(){
88   // Inilizer, Inilizes all of the variable as needed in a standard place.
89   // Input:
90   //   AliITSsegmentationSSD *seg  Pointer to the SSD segmentation to be used
91   //   AliITSCalibrationSSD   *resp Pointer to the SSD responce class to be used
92   // Outputs:
93   //   none.
94   // Return
95   //   none.
96   AliITSsegmentationSSD* seg = (AliITSsegmentationSSD*)GetSegmentationModel(2);
97   
98   SetDriftVelocity(); // use default values in .h file
99   SetIonizeE();       // use default values in .h file
100   SetDiffConst();     // use default values in .h file
101   fpList           = new AliITSpList(2,GetNStrips());
102   fMapA2           = new AliITSMapA2(seg);
103 }
104 //______________________________________________________________________
105 AliITSsimulationSSD& AliITSsimulationSSD::operator=(
106                                          const AliITSsimulationSSD &s){
107   // Operator =
108
109   if(this==&s) return *this;
110
111   //  this->fDCS         = new AliITSdcsSSD(*(s.fDCS));
112   this->fMapA2       = s.fMapA2;
113   this->fIonE        = s.fIonE;
114   this->fDifConst[0] = s.fDifConst[0];
115   this->fDifConst[1] = s.fDifConst[1];
116   this->fDriftVel[0] = s.fDriftVel[0];
117   this->fDriftVel[1] = s.fDriftVel[1];
118   this->fTimeResponse = s.fTimeResponse;
119   return *this;
120 }
121 /*
122 //______________________________________________________________________
123 AliITSsimulation& AliITSsimulationSSD::operator=(
124                                          const AliITSsimulation &s){
125   // Operator =
126
127   if(this==&s) return *this;
128   Error("AliITSsimulationSSD","Not allowed to make a = with "
129         "AliITSsimulationSSD Using default creater instead");
130   
131   return *this;
132 }
133 */
134 //______________________________________________________________________
135 AliITSsimulationSSD::AliITSsimulationSSD(const AliITSsimulationSSD &source):
136     AliITSsimulation(source),
137 fMapA2(source.fMapA2),
138 fIonE(source.fIonE),
139 fDifConst(),
140 fDriftVel(),
141 fTimeResponse(source.fTimeResponse){
142   // copy constructor
143   fDifConst[0] = source.fDifConst[0];
144   fDifConst[1] = source.fDifConst[1];
145   fDriftVel[0] = source.fDriftVel[0];
146   fDriftVel[1] = source.fDriftVel[1];
147 }
148 //______________________________________________________________________
149 AliITSsimulationSSD::~AliITSsimulationSSD() {
150   // destructor
151   delete fMapA2;
152   delete fTimeResponse;
153   //delete fDCS;
154 }
155 //______________________________________________________________________
156 void AliITSsimulationSSD::InitSimulationModule(Int_t module,Int_t event){
157     // Creates maps to build the list of tracks for each sumable digit
158     // Inputs:
159     //   Int_t module    // Module number to be simulated
160     //   Int_t event     // Event number to be simulated
161     // Outputs:
162     //   none.
163     // Return
164     //    none.
165
166     SetModuleNumber(module);
167     SetEventNumber(event);
168     fMapA2->ClearMap();
169     fpList->ClearMap();
170 }
171 //______________________________________________________________________
172 void AliITSsimulationSSD::FinishSDigitiseModule(){
173     // Does the Sdigits to Digits work
174     // Inputs:
175     //   none.
176     // Outputs:
177     //   none.
178     // Return:
179     //   none.
180
181   FillMapFrompList(fpList);  // need to check if needed here or not????
182   SDigitToDigit(fModule,fpList);
183   fpList->ClearMap();
184   fMapA2->ClearMap();
185 }
186 //______________________________________________________________________
187 void AliITSsimulationSSD::DigitiseModule(AliITSmodule *mod,Int_t,Int_t) {
188   // Digitizes hits for one SSD module
189   SetModuleNumber(mod->GetIndex());
190   
191   HitsToAnalogDigits(mod,fpList);
192   SDigitToDigit(GetModuleNumber(),fpList);
193   
194   fpList->ClearMap();
195   fMapA2->ClearMap();
196 }
197 //______________________________________________________________________
198 void AliITSsimulationSSD::SDigitiseModule(AliITSmodule *mod,Int_t,Int_t) {
199   // Produces Summable/Analog digits and writes them to the SDigit tree. 
200
201     HitsToAnalogDigits(mod,fpList);
202
203     WriteSDigits(fpList);
204     
205     fpList->ClearMap();
206     fMapA2->ClearMap();
207 }
208 //______________________________________________________________________
209 void AliITSsimulationSSD::SDigitToDigit(Int_t module,AliITSpList *pList){
210   // Takes the pList and finishes the digitization.
211   
212   ApplyNoise(pList,module);
213   ApplyCoupling(pList,module);
214   ApplyDeadChannels(module);
215   
216   ChargeToSignal(module,pList);
217 }
218 //______________________________________________________________________
219 void AliITSsimulationSSD::HitsToAnalogDigits(AliITSmodule *mod,
220                                              AliITSpList *pList){
221     // Loops over all hits to produce Analog/floating point digits. This
222     // is also the first task in producing standard digits.
223   Int_t lasttrack     = -2;
224   Int_t idtrack       = -2;
225   Double_t x0=0.0, y0=0.0, z0=0.0;
226   Double_t x1=0.0, y1=0.0, z1=0.0;
227   Double_t de=0.0;
228   Int_t module = mod->GetIndex();
229   Double_t tof = 0.;
230   
231   
232   AliITSsegmentationSSD* seg = (AliITSsegmentationSSD*)GetSegmentationModel(2);
233   
234   TObjArray *hits = mod->GetHits();
235   Int_t nhits     = hits->GetEntriesFast();
236   if (nhits<=0) return;
237   AliITSTableSSD * tav = new AliITSTableSSD(GetNStrips());
238   module = mod->GetIndex();
239   if ( mod->GetLayer() == 6 ) seg->SetLayer(6);
240   if ( mod->GetLayer() == 5 ) seg->SetLayer(5);
241   for(Int_t i=0; i<nhits; i++) {    
242     // LineSegmentL returns 0 if the hit is entering
243     // If hits is exiting returns positions of entering and exiting hits
244     // Returns also energy loss
245     if(GetDebug(4)){
246       cout << i << " ";
247       cout << mod->GetHit(i)->GetXL() << " "<<mod->GetHit(i)->GetYL();
248       cout << " " << mod->GetHit(i)->GetZL();
249       cout << endl;
250     } // end if
251     if (mod->LineSegmentL(i, x0, x1, y0, y1, z0, z1, de, idtrack)) {
252
253       // Scale down dE/dx according to the hit's TOF wrt to the trigger
254       // Necessary for pileup simulation
255       // EF - 21/04/09
256       tof = mod->GetHit(i)->GetTOF();
257       tof *= 1.E+6; // convert time in microsecond
258       if(tof<2.) de = de * fTimeResponse->Eval(-1.*tof+2.);
259       else de = 0.;
260       //
261
262       HitToDigit(module, x0, y0, z0, x1, y1, z1, de,tav);
263       if (lasttrack != idtrack || i==(nhits-1)) {
264         GetList(idtrack,i,module,pList,tav);
265       } // end if
266       lasttrack=idtrack;
267     } // end if
268   }  // end loop over hits
269   delete tav; tav=0;
270   return;
271 }
272 //----------------------------------------------------------------------
273 void AliITSsimulationSSD::HitToDigit(Int_t module, Double_t x0, Double_t y0, 
274                                      Double_t z0, Double_t x1, Double_t y1, 
275                                      Double_t z1, Double_t de,
276                                      AliITSTableSSD *tav) {
277   
278   // hit to digit conversion
279   
280   AliITSsegmentationSSD* seg = (AliITSsegmentationSSD*)GetSegmentationModel(2);
281   // Turns hits in SSD module into one or more digits.
282   //Float_t tang[2] = {0.0,0.0};
283   //seg->Angles(tang[0], tang[1]);//stereo<<->tan(stereo)~=stereo
284   Double_t x, y, z;
285   Double_t dex=0.0, dey=0.0, dez=0.0; 
286   Double_t pairs; // pair generation energy per step.
287   Double_t sigma[2] = {0.,0.};// standard deviation of the diffusion gaussian
288   Double_t tdrift[2] = {0.,0.}; // time of drift
289   Double_t w;
290   Double_t inf[2], sup[2], par0[2];                 
291   
292   // Steps in the module are determined "manually" (i.e. No Geant)
293   // NumOfSteps divide path between entering and exiting hits in steps 
294   Int_t numOfSteps = NumOfSteps(x1, y1, z1, dex, dey, dez);
295   // Enery loss is equally distributed among steps
296   de    = de/numOfSteps;
297   pairs = de/GetIonizeE(); // e-h pairs generated
298
299   //-----------------------------------------------------
300   // stepping
301   //-----------------------------------------------------
302   for(Int_t j=0; j<numOfSteps; j++) {     // stepping
303
304     x = x0 + (j+0.5)*dex;
305     y = y0 + (j+0.5)*dey;
306     if ( y > (seg->Dy()/2+10)*1.0E-4 ) {
307       // check if particle is within the detector
308       Warning("HitToDigit",
309               "hit out of detector y0=%e,y=%e,dey=%e,j =%d module=%d,  exceed=%e",
310               y0,y,dey,j,module, y-(seg->Dy()/2+10)*1.0E-4);
311       return;
312     } // end if
313     z = z0 + (j+0.5)*dez;
314
315     if(GetDebug(4)) cout <<"HitToDigit "<<x<<" "<<y<<" "<<z<< " "
316                          <<dex<<" "<<dey<<" "<<dez<<endl;
317
318     if(seg->GetLayer()==6) {
319       y=-y; // Lay6 module has sensor up-side-down!!!
320     }
321     
322     // w is the coord. perpendicular to the strips
323     //    Float_t xp=x*1.e+4,zp=z*1.e+4; // microns    
324     Float_t xp=x,zp=z; 
325     seg->GetPadTxz(xp,zp);
326
327     Int_t k;
328     //---------------------------------------------------------
329     // Pside
330     //------------------------------------------------------------
331     k=0;
332     
333     // calculate drift time
334     // y is the minimum path
335     tdrift[0] = (y+(seg->Dy()*1.0E-4)/2)/GetDriftVelocity(0);
336     
337     w = xp; // P side strip number
338     
339     if((w<(-0.5)) || (w>(GetNStrips()-0.5))) {
340       // this check rejects hits in regions not covered by strips
341       // 0.5 takes into account boundaries 
342       if(GetDebug(4)) cout << "Dead SSD region, x,z="<<x<<","<<z<<endl;
343       return; // There are dead region on the SSD sensitive volume!!!
344     } // end if
345     
346       // sigma is the standard deviation of the diffusion gaussian
347     if(tdrift[k]<0) return;
348     
349     sigma[k] = TMath::Sqrt(2*GetDiffConst(k)*tdrift[k]);
350     sigma[k] /= (GetStripPitch()*1.0E-4);  //units of Pitch
351     
352     if(sigma[k]==0.0) {         
353       Error("HitToDigit"," sigma[%d]=0",k);
354       exit(0);
355     } // end if
356     
357     par0[k] = pairs;
358     // we integrate the diffusion gaussian from -3sigma to 3sigma 
359     inf[k] = w - 3*sigma[k]; // 3 sigma from the gaussian average  
360     sup[k] = w + 3*sigma[k]; // 3 sigma from the gaussian average
361     // IntegrateGaussian does the actual
362     // integration of diffusion gaussian
363     IntegrateGaussian(k, par0[k], w, sigma[k], inf[k], sup[k],tav);
364     
365     //------------------------------------------------------
366     // end Pside
367     //-------------------------------------------------------
368     
369     //------------------------------------------------------
370     // Nside
371     //-------------------------------------------------------
372     k=1;
373     tdrift[1] = ((seg->Dy()*1.0E-4)/2-y)/GetDriftVelocity(1);
374     
375     //tang[k]=TMath::Tan(tang[k]);
376     
377     w = zp; // N side strip number
378     
379     if((w<(-0.5)) || (w>(GetNStrips()-0.5))) {
380       // this check rejects hits in regions not covered by strips
381       // 0.5 takes into account boundaries 
382       if(GetDebug(4)) cout << "Dead SSD region, x,z="<<x<<","<<z<<endl;
383       return; // There are dead region on the SSD sensitive volume.
384     } // end if
385     
386       // sigma is the standard deviation of the diffusion gaussian
387     if(tdrift[k]<0) return;
388     
389     sigma[k] = TMath::Sqrt(2*GetDiffConst(k)*tdrift[k]);
390     sigma[k] /= (GetStripPitch()*1.0E-4);  //units of Pitch
391     
392     if(sigma[k]==0.0) {         
393       Error("HitToDigit"," sigma[%d]=0",k);
394       exit(0);
395     } // end if
396     
397     par0[k] = pairs;
398     // we integrate the diffusion gaussian from -3sigma to 3sigma 
399     inf[k] = w - 3*sigma[k]; // 3 sigma from the gaussian average  
400     sup[k] = w + 3*sigma[k]; // 3 sigma from the gaussian average
401     // IntegrateGaussian does the actual
402     // integration of diffusion gaussian
403     IntegrateGaussian(k, par0[k], w, sigma[k], inf[k], sup[k],tav);
404     
405     //-------------------------------------------------
406     // end Nside
407     //-------------------------------------------------
408     
409     
410   } // end stepping
411 }
412
413 //______________________________________________________________________
414 void AliITSsimulationSSD::ApplyNoise(AliITSpList *pList,Int_t module){
415   // Apply Noise.
416   Int_t ix;
417   Double_t signal,noise;
418   AliITSCalibrationSSD* res =(AliITSCalibrationSSD*)GetCalibrationModel(module);
419    
420   // Pside
421   for(ix=0;ix<GetNStrips();ix++){      // loop over strips
422     
423     // noise is gaussian
424     noise  = (Double_t) gRandom->Gaus(0,res->GetNoiseP(ix));
425     
426     // need to calibrate noise 
427     // NOTE. noise from the calibration database comes uncalibrated, 
428     // it needs to be calibrated in order to be added
429     // to the signal. It will be decalibrated later on together with the noise    
430     noise *= (Double_t) res->GetGainP(ix); 
431     
432     // noise comes in ADC channels from the calibration database
433     // It needs to be converted back to electronVolts
434     noise /= res->GetSSDDEvToADC(1.);
435     
436     // Finally, noise is added to the signal
437     signal = noise + fMapA2->GetSignal(0,ix);//get signal from map
438     fMapA2->SetHit(0,ix,signal); // give back signal to map
439     if(signal>0.0) pList->AddNoise(0,ix,module,noise);
440   } // loop over strip 
441   
442     // Nside
443   for(ix=0;ix<GetNStrips();ix++){      // loop over strips
444     noise  = (Double_t) gRandom->Gaus(0,res->GetNoiseN(ix));// give noise to signal
445     noise *= (Double_t) res->GetGainN(ix); 
446     noise /= res->GetSSDDEvToADC(1.);
447     signal = noise + fMapA2->GetSignal(1,ix);//get signal from map
448     fMapA2->SetHit(1,ix,signal); // give back signal to map
449     if(signal>0.0) pList->AddNoise(1,ix,module,noise);
450   } // loop over strip 
451   
452 }
453 //______________________________________________________________________
454 void AliITSsimulationSSD::ApplyCoupling(AliITSpList *pList,Int_t module) {
455   // Apply the effect of electronic coupling between channels
456   Int_t ix;
457   Double_t signal=0;
458   //AliITSCalibrationSSD* res =(AliITSCalibrationSSD*)GetCalibrationModel(module);
459   AliITSSimuParam* res = fDetType->GetSimuParam();
460     
461   Double_t *contrLeft  = new Double_t[GetNStrips()];
462   Double_t *contrRight = new Double_t[GetNStrips()];
463   
464   // P side coupling
465   for(ix=0;ix<GetNStrips();ix++){
466     if(ix>0) contrLeft[ix] = fMapA2->GetSignal(0,ix-1)*res->GetSSDCouplingPL();
467     else contrLeft[ix] = 0.0;
468     if(ix<(GetNStrips()-1)) contrRight[ix] = fMapA2->GetSignal(0,ix+1)*res->GetSSDCouplingPR();
469     else contrRight[ix] = 0.0;
470   } // loop over strips 
471   
472   for(ix=0;ix<GetNStrips();ix++){
473     signal = contrLeft[ix] + contrRight[ix] - res->GetSSDCouplingPL() * fMapA2->GetSignal(0,ix)
474       - res->GetSSDCouplingPR() * fMapA2->GetSignal(0,ix);
475     fMapA2->AddSignal(0,ix,signal);
476     if(signal>0.0) pList->AddNoise(0,ix,module,signal);
477   } // loop over strips 
478   
479   // N side coupling
480   for(ix=0;ix<GetNStrips();ix++){
481     if(ix>0) contrLeft[ix] = fMapA2->GetSignal(1,ix-1)*res->GetSSDCouplingNL();
482     else contrLeft[ix] = 0.0;
483     if(ix<(GetNStrips()-1)) contrRight[ix] = fMapA2->GetSignal(1,ix+1)*res->GetSSDCouplingNR();
484     else contrRight[ix] = 0.0;
485   } // loop over strips 
486   
487   for(ix=0;ix<GetNStrips();ix++){
488     signal = contrLeft[ix] + contrRight[ix] - res->GetSSDCouplingNL() * fMapA2->GetSignal(0,ix)
489       - res->GetSSDCouplingNR() * fMapA2->GetSignal(0,ix);
490     fMapA2->AddSignal(1,ix,signal);
491     if(signal>0.0) pList->AddNoise(1,ix,module,signal);
492   } // loop over strips 
493   
494
495   delete [] contrLeft;
496   delete [] contrRight; 
497 }
498
499 //______________________________________________________________________
500 void AliITSsimulationSSD::ApplyDeadChannels(Int_t module) {
501   // Kill dead channels setting gain to zero
502
503   AliITSCalibrationSSD* res = (AliITSCalibrationSSD*)GetCalibrationModel(module);
504
505   for(Int_t i=0;i<GetNStrips();i++){
506
507     if(res->IsPChannelBad(i)) res->SetGainP(i,0.0);
508     if(res->IsNChannelBad(i)) res->SetGainN(i,0.0);
509
510   } // loop over strips 
511
512 }
513
514 //______________________________________________________________________
515 Float_t AliITSsimulationSSD::F(Float_t av, Float_t x, Float_t s) {
516     // Computes the integral of a gaussian using Error Function
517     Float_t sqrt2 = TMath::Sqrt(2.0);
518     Float_t sigm2 = sqrt2*s;
519     Float_t integral;
520
521     integral = 0.5 * TMath::Erf( (x - av) / sigm2);
522     return integral;
523 }
524 //______________________________________________________________________
525 void AliITSsimulationSSD::IntegrateGaussian(Int_t k,Double_t par, Double_t w,
526                                             Double_t sigma, 
527                                             Double_t inf, Double_t sup,
528                                             AliITSTableSSD *tav) {
529     // integrate the diffusion gaussian
530     // remind: inf and sup are w-3sigma and w+3sigma
531     //         we could define them here instead of passing them
532     //         this way we are free to introduce asimmetry
533
534     Double_t a=0.0, b=0.0;
535     Double_t dXCharge1 = 0.0, dXCharge2 = 0.0;
536     // dXCharge1 and 2 are the charge to two neighbouring strips
537     // Watch that we only involve at least two strips
538     // Numbers greater than 2 of strips in a cluster depend on
539     //  geometry of the track and delta rays, not charge diffusion!   
540
541     Double_t strip = TMath::Floor(w);         // closest strip on the left
542
543     if ( TMath::Abs((strip - w)) < 0.5) { 
544         // gaussian mean is closer to strip on the left
545         a = inf;                         // integration starting point
546         if((strip+0.5)<=sup) {
547             // this means that the tail of the gaussian goes beyond
548             // the middle point between strips ---> part of the signal
549             // is given to the strip on the right
550             b = strip + 0.5;               // integration stopping point
551             dXCharge1 = F( w, b, sigma) - F(w, a, sigma);
552             dXCharge2 = F( w, sup, sigma) - F(w ,b, sigma); 
553         }else { 
554             // this means that all the charge is given to the strip on the left
555             b = sup;
556             dXCharge1 = 0.9973;   // gaussian integral at 3 sigmas
557             dXCharge2 = 0.0;
558         } // end if
559         dXCharge1 = par * dXCharge1;// normalize by mean of number of carriers
560         dXCharge2 = par * dXCharge2;
561
562         // for the time being, signal is the charge
563         // in ChargeToSignal signal is converted in ADC channel
564         fMapA2->AddSignal(k,(Int_t)strip,dXCharge1);
565         tav->Add(k,(Int_t)strip);
566         if(((Int_t) strip) < (GetNStrips()-1)) {
567             // strip doesn't have to be the last (remind: last=GetNStrips()-1)
568             // otherwise part of the charge is lost
569             fMapA2->AddSignal(k,((Int_t)strip+1),dXCharge2);
570             tav->Add(k,((Int_t)(strip+1)));
571         } // end if
572     }else{
573         // gaussian mean is closer to strip on the right
574         strip++;     // move to strip on the rigth
575         b = sup;     // now you know where to stop integrating
576         if((strip-0.5)>=inf) { 
577             // tail of diffusion gaussian on the left goes left of
578             // middle point between strips
579             a = strip - 0.5;        // integration starting point
580             dXCharge1 = F(w, b, sigma) - F(w, a, sigma);
581             dXCharge2 = F(w, a, sigma) - F(w, inf, sigma);
582         }else {
583             a = inf;
584             dXCharge1 = 0.9973;   // gaussian integral at 3 sigmas
585             dXCharge2 = 0.0;
586         } // end if
587         dXCharge1 = par * dXCharge1;    // normalize by means of carriers
588         dXCharge2 = par * dXCharge2;
589         // for the time being, signal is the charge
590         // in ChargeToSignal signal is converted in ADC channel
591         fMapA2->AddSignal(k,(Int_t)strip,dXCharge1);
592         tav->Add(k,(Int_t)strip);
593         if(((Int_t) strip) > 0) {
594             // strip doesn't have to be the first
595             // otherwise part of the charge is lost
596             fMapA2->AddSignal(k,((Int_t)strip-1),dXCharge2);
597             tav->Add(k,((Int_t)(strip-1)));
598         } // end if
599     } // end if
600 }
601 //______________________________________________________________________
602 Int_t AliITSsimulationSSD::NumOfSteps(Double_t x, Double_t y, Double_t z,
603                                       Double_t &dex,Double_t &dey,
604                                       Double_t &dez){
605     // number of steps
606     // it also returns steps for each coord
607     //AliITSsegmentationSSD *seg = new AliITSsegmentationSSD();
608
609     Double_t step = 25E-4;
610     //step = (Double_t) seg->GetStepSize();  // step size (cm)
611     Int_t numOfSteps = (Int_t) (TMath::Sqrt(x*x+y*y+z*z)/step); 
612
613     if (numOfSteps < 1) numOfSteps = 1;       // one step, at least
614     //numOfSteps=1;
615
616     // we could condition the stepping depending on the incident angle
617     // of the track
618     dex = x/numOfSteps;
619     dey = y/numOfSteps;
620     dez = z/numOfSteps;
621     
622     return numOfSteps;
623 }
624 //----------------------------------------------------------------------
625 void AliITSsimulationSSD::GetList(Int_t label,Int_t hit,Int_t mod,
626                                   AliITSpList *pList,AliITSTableSSD *tav) {
627     // loop over nonzero digits
628     Int_t ix,i;
629     Double_t signal=0.;
630
631     for(Int_t k=0; k<2; k++) {
632         ix=tav->Use(k);
633         while(ix>-1){
634             signal = fMapA2->GetSignal(k,ix);
635             if(signal==0.0) {
636                 ix=tav->Use(k);
637                 continue;
638             } // end if signal==0.0
639             // check the signal magnitude
640             for(i=0;i<pList->GetNSignals(k,ix);i++){
641                 signal -= pList->GetTSignal(k,ix,i);
642             } // end for i
643             //  compare the new signal with already existing list
644             if(signal>0)pList->AddSignal(k,ix,label,hit,mod,signal);
645             ix=tav->Use(k);
646         } // end of loop on strips
647     } // end of loop on P/N side
648     tav->Clear();
649 }
650 //----------------------------------------------------------------------
651 void AliITSsimulationSSD::ChargeToSignal(Int_t module,AliITSpList *pList) {
652     // charge to signal
653     static AliITS *aliITS = (AliITS*)gAlice->GetModule("ITS");
654     Float_t threshold = 0.;
655     Int_t size = AliITSdigitSSD::GetNTracks();
656     Int_t * digits = new Int_t[size];
657     Int_t * tracks = new Int_t[size];
658     Int_t * hits = new Int_t[size];
659     Int_t j1;
660     Float_t charges[3] = {0.0,0.0,0.0};
661     Float_t signal;
662     AliITSCalibrationSSD* res =(AliITSCalibrationSSD*)GetCalibrationModel(module);
663     AliITSSimuParam* simpar = fDetType->GetSimuParam();
664
665     for(Int_t k=0;k<2;k++){         // both sides (0=Pside, 1=Nside)
666       for(Int_t ix=0;ix<GetNStrips();ix++){     // loop over strips
667
668         // if strip is dead -> gain=0
669         if( ((k==0)&&(res->GetGainP(ix)==0)) || ((k==1)&&(res->GetGainN(ix)==0))) continue;
670         
671         signal = fMapA2->GetSignal(k,ix);
672         // signal has to be uncalibrated
673         // In real life, gains are supposed to be calculated from calibration runs,
674         // stored in the calibration DB and used in the reconstruction
675         // (see AliITSClusterFinderSSD.cxx)
676         if(k==0) signal /= res->GetGainP(ix);
677         else signal /= res->GetGainN(ix);
678
679         // signal is converted in unit of ADC
680         signal = res->GetSSDDEvToADC(signal);
681         if(signal>4095.) signal = 4095.;//if exceeding, accumulate last one
682
683         // threshold for zero suppression is set on the basis of the noise
684         // A good value is 3*sigma_noise
685         if(k==0) threshold = res->GetNoiseP(ix);
686         else threshold = res->GetNoiseN(ix);
687
688         threshold *= simpar->GetSSDZSThreshold(); // threshold at 3 sigma noise
689
690         if(signal < threshold) continue;
691         //cout<<signal<<" "<<threshold<<endl;
692
693         digits[0] = k;
694         digits[1] = ix;
695         digits[2] = TMath::Nint(signal);
696         for(j1=0;j1<size;j1++)if(j1<pList->GetNEntries()){
697           // only three in digit.
698           tracks[j1]  = pList->GetTrack(k,ix,j1);
699           hits[j1]    = pList->GetHit(k,ix,j1);
700         }else{
701           tracks[j1]  = -3;
702           hits[j1]    = -1;
703         } // end for j1
704         // finally add digit
705         aliITS->AddSimDigit(2,0,digits,tracks,hits,charges);
706       } // end for ix
707     } // end for k
708     delete [] digits;
709     delete [] tracks;
710     delete [] hits;
711 }
712 //______________________________________________________________________
713 void AliITSsimulationSSD::WriteSDigits(AliITSpList *pList){
714     // Fills the Summable digits Tree
715     Int_t i,ni,j,nj;
716     static AliITS *aliITS = (AliITS*)gAlice->GetModule("ITS");
717
718     pList->GetMaxMapIndex(ni,nj);
719     for(i=0;i<ni;i++)for(j=0;j<nj;j++){
720         if(pList->GetSignalOnly(i,j)>0.0){
721             aliITS->AddSumDigit(*(pList->GetpListItem(i,j)));
722             if(GetDebug(4)) cout << "pListSSD: "<<*(pList->GetpListItem(i,j))
723                                 << endl;
724         } // end if
725     } // end for i,j
726   return;
727 }
728 //______________________________________________________________________
729 void AliITSsimulationSSD::FillMapFrompList(AliITSpList *pList){
730     // Fills fMap2A from the pList of Summable digits
731     Int_t k,ix;
732
733     for(k=0;k<2;k++)for(ix=0;ix<GetNStrips();ix++) 
734         fMapA2->AddSignal(k,ix,pList->GetSignal(k,ix));
735     return;
736 }
737 //______________________________________________________________________
738 void AliITSsimulationSSD::Print(ostream *os){
739     //Standard output format for this class
740
741     //AliITSsimulation::Print(os);
742     *os << fIonE <<",";
743     *os << fDifConst[0] <<","<< fDifConst[1] <<",";
744     *os << fDriftVel[0] <<","<< fDriftVel[1];
745     //*os <<","; fDCS->Print(os);
746     //*os <<","; fMapA2->Print(os);
747 }
748 //______________________________________________________________________
749 void AliITSsimulationSSD::Read(istream *is){
750     // Standard output streaming function.
751
752     //AliITSsimulation::Read(is);
753     *is >> fIonE;
754     *is >> fDifConst[0] >> fDifConst[1];
755     *is >> fDriftVel[0] >> fDriftVel[1];
756     //fDCS->Read(is);
757     //fMapA2->Read(is);
758 }
759 //______________________________________________________________________
760 ostream &operator<<(ostream &os,AliITSsimulationSSD &source){
761     // Standard output streaming function.
762
763     source.Print(&os);
764     return os;
765 }
766 //______________________________________________________________________
767 istream &operator>>(istream &os,AliITSsimulationSSD &source){
768     // Standard output streaming function.
769
770     source.Read(&os);
771     return os;
772 }
773 //______________________________________________________________________
774
775
776