]>
Commit | Line | Data |
---|---|---|
7587f5a5 | 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 | ||
b2a60966 | 16 | /* $Id$ */ |
5f20d3fb | 17 | |
7587f5a5 | 18 | //_________________________________________________________________________ |
5f20d3fb | 19 | // Implementation version v1 of PHOS Manager class |
a3dfe79c | 20 | //--- |
21 | // Layout EMC + PPSD has name GPS2: | |
ed4205d8 | 22 | // Produces cumulated hits |
a3dfe79c | 23 | //--- |
24 | // Layout EMC + CPV has name IHEP: | |
ed4205d8 | 25 | // Produces hits for CPV, cumulated hits |
26 | //--- | |
27 | // Layout EMC + CPV + PPSD has name GPS: | |
28 | // Produces hits for CPV, cumulated hits | |
29 | //--- | |
5f20d3fb | 30 | //*-- Author: Yves Schutz (SUBATECH) |
b2a60966 | 31 | |
7587f5a5 | 32 | |
33 | // --- ROOT system --- | |
bea63bea | 34 | |
35 | #include "TBRIK.h" | |
36 | #include "TNode.h" | |
7587f5a5 | 37 | #include "TRandom.h" |
94de3818 | 38 | #include "TTree.h" |
7587f5a5 | 39 | |
5f20d3fb | 40 | |
7587f5a5 | 41 | // --- Standard library --- |
42 | ||
de9ec31b | 43 | #include <stdio.h> |
44 | #include <string.h> | |
45 | #include <stdlib.h> | |
46 | #include <strstream.h> | |
7587f5a5 | 47 | |
48 | // --- AliRoot header files --- | |
49 | ||
50 | #include "AliPHOSv1.h" | |
51 | #include "AliPHOSHit.h" | |
97cee223 | 52 | #include "AliPHOSCPVDigit.h" |
7587f5a5 | 53 | #include "AliRun.h" |
54 | #include "AliConst.h" | |
94de3818 | 55 | #include "AliMC.h" |
97cee223 | 56 | #include "AliPHOSGeometry.h" |
7b326aac | 57 | #include "AliPHOSQAIntCheckable.h" |
58 | #include "AliPHOSQAFloatCheckable.h" | |
59 | #include "AliPHOSQAMeanChecker.h" | |
7587f5a5 | 60 | |
61 | ClassImp(AliPHOSv1) | |
62 | ||
bea63bea | 63 | //____________________________________________________________________________ |
02ab1add | 64 | AliPHOSv1::AliPHOSv1(): |
65 | AliPHOSv0() | |
bea63bea | 66 | { |
735e58f1 | 67 | // default ctor: initialze data memebers |
68 | fQAHitsMul = 0 ; | |
69 | fQAHitsMulB = 0 ; | |
70 | fQATotEner = 0 ; | |
71 | fQATotEnerB = 0 ; | |
9688c1dd | 72 | |
73 | fLightYieldMean = 0. ; | |
74 | fIntrinsicPINEfficiency = 0. ; | |
75 | fLightYieldAttenuation = 0. ; | |
76 | fRecalibrationFactor = 0. ; | |
77 | fElectronsPerGeV = 0. ; | |
27f33ee5 | 78 | fAPDGain = 0. ; |
79 | fLightFactor = 0. ; | |
80 | fAPDFactor = 0. ; | |
9688c1dd | 81 | |
bea63bea | 82 | } |
83 | ||
7587f5a5 | 84 | //____________________________________________________________________________ |
85 | AliPHOSv1::AliPHOSv1(const char *name, const char *title): | |
7b326aac | 86 | AliPHOSv0(name,title) |
7587f5a5 | 87 | { |
5f20d3fb | 88 | // |
ed4205d8 | 89 | // We store hits : |
5f20d3fb | 90 | // - fHits (the "normal" one), which retains the hits associated with |
91 | // the current primary particle being tracked | |
92 | // (this array is reset after each primary has been tracked). | |
93 | // | |
fa412d9b | 94 | |
037cc66d | 95 | |
5f20d3fb | 96 | |
97 | // We do not want to save in TreeH the raw hits | |
98 | // But save the cumulated hits instead (need to create the branch myself) | |
99 | // It is put in the Digit Tree because the TreeH is filled after each primary | |
7b326aac | 100 | // and the TreeD at the end of the event (branch is set in FinishEvent() ). |
5f20d3fb | 101 | |
ed4205d8 | 102 | fHits= new TClonesArray("AliPHOSHit",1000) ; |
5f20d3fb | 103 | |
ed4205d8 | 104 | fNhits = 0 ; |
5f20d3fb | 105 | |
5f20d3fb | 106 | fIshunt = 1 ; // All hits are associated with primary particles |
7b326aac | 107 | |
9688c1dd | 108 | //Photoelectron statistics: |
109 | // The light yield is a poissonian distribution of the number of | |
110 | // photons created in the PbWo4 crystal, calculated using following formula | |
111 | // NumberOfPhotons = EnergyLost * LightYieldMean* APDEfficiency * | |
112 | // exp (-LightYieldAttenuation * DistanceToPINdiodeFromTheHit); | |
113 | // LightYieldMean is parameter calculated to be over 47000 photons per GeV | |
114 | // APDEfficiency is 0.02655 | |
115 | // k_0 is 0.0045 from Valery Antonenko | |
116 | // The number of electrons created in the APD is | |
117 | // NumberOfElectrons = APDGain * LightYield | |
118 | // The APD Gain is 300 | |
119 | fLightYieldMean = 47000; | |
120 | fIntrinsicPINEfficiency = 0.02655 ; //APD= 0.1875/0.1271 * 0.018 (PIN) | |
27f33ee5 | 121 | fLightYieldAttenuation = 0.0045 ; |
122 | fRecalibrationFactor = 13.418/ fLightYieldMean ; | |
123 | fElectronsPerGeV = 2.77e+8 ; | |
124 | fAPDGain = 300. ; | |
125 | fLightFactor = fLightYieldMean * fIntrinsicPINEfficiency ; | |
126 | fAPDFactor = (fRecalibrationFactor/100.) * fAPDGain ; | |
127 | ||
9688c1dd | 128 | |
fa7cce36 | 129 | Int_t nb = GetGeometry()->GetNModules() ; |
fa412d9b | 130 | |
7b326aac | 131 | // create checkables |
132 | fQAHitsMul = new AliPHOSQAIntCheckable("HitsM") ; | |
133 | fQATotEner = new AliPHOSQAFloatCheckable("TotEn") ; | |
134 | fQAHitsMulB = new TClonesArray("AliPHOSQAIntCheckable",nb) ; | |
135 | fQATotEnerB = new TClonesArray("AliPHOSQAFloatCheckable", nb); | |
136 | char tempo[20] ; | |
137 | Int_t i ; | |
138 | for ( i = 0 ; i < nb ; i++ ) { | |
139 | sprintf(tempo, "HitsMB%d", i+1) ; | |
140 | new( (*fQAHitsMulB)[i]) AliPHOSQAIntCheckable(tempo) ; | |
141 | sprintf(tempo, "TotEnB%d", i+1) ; | |
142 | new( (*fQATotEnerB)[i] ) AliPHOSQAFloatCheckable(tempo) ; | |
143 | } | |
144 | ||
7b326aac | 145 | AliPHOSQAMeanChecker * hmc = new AliPHOSQAMeanChecker("HitsMul", 100. ,25.) ; |
146 | AliPHOSQAMeanChecker * emc = new AliPHOSQAMeanChecker("TotEner", 10. ,5.) ; | |
147 | AliPHOSQAMeanChecker * bhmc = new AliPHOSQAMeanChecker("HitsMulB", 100. ,5.) ; | |
148 | AliPHOSQAMeanChecker * bemc = new AliPHOSQAMeanChecker("TotEnerB", 2. ,.5) ; | |
149 | ||
150 | // associate checkables and checkers | |
151 | fQAHitsMul->AddChecker(hmc) ; | |
152 | fQATotEner->AddChecker(emc) ; | |
153 | for ( i = 0 ; i < nb ; i++ ) { | |
29b077b5 | 154 | (static_cast<AliPHOSQAIntCheckable*>((*fQAHitsMulB)[i]))->AddChecker(bhmc) ; |
155 | (static_cast<AliPHOSQAFloatCheckable*>((*fQATotEnerB)[i]))->AddChecker(bemc) ; | |
7b326aac | 156 | } |
7b7c1533 | 157 | |
5f20d3fb | 158 | } |
159 | ||
7587f5a5 | 160 | //____________________________________________________________________________ |
bea63bea | 161 | AliPHOSv1::~AliPHOSv1() |
b2a60966 | 162 | { |
bea63bea | 163 | // dtor |
5f20d3fb | 164 | |
ed4205d8 | 165 | if ( fHits) { |
166 | fHits->Delete() ; | |
167 | delete fHits ; | |
168 | fHits = 0 ; | |
8dfa469d | 169 | } |
7b7c1533 | 170 | if (fTreeQA) |
171 | delete fTreeQA ; | |
7587f5a5 | 172 | } |
173 | ||
7587f5a5 | 174 | //____________________________________________________________________________ |
b37750a6 | 175 | void AliPHOSv1::AddHit(Int_t shunt, Int_t primary, Int_t tracknumber, Int_t Id, Float_t * hits) |
bea63bea | 176 | { |
177 | // Add a hit to the hit list. | |
9688c1dd | 178 | // A PHOS hit is the sum of all hits in a single crystal from one primary and within soem taime gate |
bea63bea | 179 | |
5f20d3fb | 180 | Int_t hitCounter ; |
bea63bea | 181 | AliPHOSHit *newHit ; |
5f20d3fb | 182 | AliPHOSHit *curHit ; |
183 | Bool_t deja = kFALSE ; | |
fa7cce36 | 184 | AliPHOSGeometry * geom = GetGeometry() ; |
bea63bea | 185 | |
b37750a6 | 186 | newHit = new AliPHOSHit(shunt, primary, tracknumber, Id, hits) ; |
bea63bea | 187 | |
7854a24a | 188 | for ( hitCounter = fNhits-1 ; hitCounter >= 0 && !deja ; hitCounter-- ) { |
29b077b5 | 189 | curHit = dynamic_cast<AliPHOSHit*>((*fHits)[hitCounter]) ; |
9688c1dd | 190 | if(curHit->GetPrimary() != primary) break ; |
191 | // We add hits with the same primary, while GEANT treats primaries succesively | |
ed4205d8 | 192 | if( *curHit == *newHit ) { |
f15a01eb | 193 | *curHit + *newHit ; |
ed4205d8 | 194 | deja = kTRUE ; |
5f20d3fb | 195 | } |
196 | } | |
197 | ||
198 | if ( !deja ) { | |
ed4205d8 | 199 | new((*fHits)[fNhits]) AliPHOSHit(*newHit) ; |
7b326aac | 200 | // get the block Id number |
9688c1dd | 201 | Int_t relid[4] ; |
fa7cce36 | 202 | geom->AbsToRelNumbering(Id, relid) ; |
7b326aac | 203 | // and fill the relevant QA checkable (only if in PbW04) |
204 | if ( relid[1] == 0 ) { | |
205 | fQAHitsMul->Update(1) ; | |
29b077b5 | 206 | (static_cast<AliPHOSQAIntCheckable*>((*fQAHitsMulB)[relid[0]-1]))->Update(1) ; |
7b326aac | 207 | } |
ed4205d8 | 208 | fNhits++ ; |
5f20d3fb | 209 | } |
210 | ||
bea63bea | 211 | delete newHit; |
bea63bea | 212 | } |
213 | ||
7b326aac | 214 | //____________________________________________________________________________ |
215 | void AliPHOSv1::FinishPrimary() | |
216 | { | |
217 | // called at the end of each track (primary) by AliRun | |
218 | // hits are reset for each new track | |
219 | // accumulate the total hit-multiplicity | |
220 | // if ( fQAHitsMul ) | |
221 | // fQAHitsMul->Update( fHits->GetEntriesFast() ) ; | |
222 | ||
223 | } | |
224 | ||
225 | //____________________________________________________________________________ | |
226 | void AliPHOSv1::FinishEvent() | |
227 | { | |
228 | // called at the end of each event by AliRun | |
229 | // accumulate the hit-multiplicity and total energy per block | |
230 | // if the values have been updated check it | |
231 | ||
232 | if ( fQATotEner ) { | |
233 | if ( fQATotEner->HasChanged() ) { | |
234 | fQATotEner->CheckMe() ; | |
235 | fQATotEner->Reset() ; | |
236 | } | |
237 | } | |
238 | ||
239 | Int_t i ; | |
240 | if ( fQAHitsMulB && fQATotEnerB ) { | |
fa7cce36 | 241 | for (i = 0 ; i < GetGeometry()->GetNModules() ; i++) { |
29b077b5 | 242 | AliPHOSQAIntCheckable * ci = static_cast<AliPHOSQAIntCheckable*>((*fQAHitsMulB)[i]) ; |
243 | AliPHOSQAFloatCheckable* cf = static_cast<AliPHOSQAFloatCheckable*>((*fQATotEnerB)[i]) ; | |
7b326aac | 244 | if ( ci->HasChanged() ) { |
245 | ci->CheckMe() ; | |
246 | ci->Reset() ; | |
247 | } | |
248 | if ( cf->HasChanged() ) { | |
249 | cf->CheckMe() ; | |
250 | cf->Reset() ; | |
251 | } | |
252 | } | |
253 | } | |
254 | ||
255 | // check the total multiplicity | |
256 | ||
257 | if ( fQAHitsMul ) { | |
258 | if ( fQAHitsMul->HasChanged() ) { | |
259 | fQAHitsMul->CheckMe() ; | |
260 | fQAHitsMul->Reset() ; | |
261 | } | |
262 | } | |
263 | } | |
5f20d3fb | 264 | //____________________________________________________________________________ |
7587f5a5 | 265 | void AliPHOSv1::StepManager(void) |
266 | { | |
9688c1dd | 267 | // Accumulates hits as long as the track stays in a single crystal or CPV gas Cell |
b2a60966 | 268 | |
4f5bbbd4 | 269 | Int_t relid[4] ; // (box, layer, row, column) indices |
270 | Int_t absid ; // absolute cell ID number | |
9688c1dd | 271 | Float_t xyze[5]={-1000,-1000,-1000,0,0} ; // position wrt MRS, time and energy deposited |
4f5bbbd4 | 272 | TLorentzVector pos ; // Lorentz vector of the track current position |
fa412d9b | 273 | Int_t copy ; |
7587f5a5 | 274 | |
bea63bea | 275 | Int_t tracknumber = gAlice->CurrentTrack() ; |
fa412d9b | 276 | Int_t primary = gAlice->GetPrimary( gAlice->CurrentTrack() ); |
fa7cce36 | 277 | TString name = GetGeometry()->GetName() ; |
037cc66d | 278 | |
9688c1dd | 279 | Int_t moduleNumber ; |
280 | ||
281 | if( gMC->CurrentVolID(copy) == gMC->VolId("PCPQ") && | |
282 | (gMC->IsTrackEntering() ) && | |
283 | gMC->TrackCharge() != 0) { | |
b37750a6 | 284 | |
9688c1dd | 285 | gMC -> TrackPosition(pos); |
286 | ||
287 | Float_t xyzm[3], xyzd[3] ; | |
288 | Int_t i; | |
289 | for (i=0; i<3; i++) xyzm[i] = pos[i]; | |
290 | gMC -> Gmtod (xyzm, xyzd, 1); // transform coordinate from master to daughter system | |
291 | ||
292 | Float_t xyd[3]={0,0,0} ; //local posiiton of the entering | |
293 | xyd[0] = xyzd[0]; | |
306c9d69 | 294 | xyd[1] =-xyzd[1]; |
295 | xyd[2] =-xyzd[2]; | |
9688c1dd | 296 | |
297 | // Current momentum of the hit's track in the local ref. system | |
298 | TLorentzVector pmom ; //momentum of the particle initiated hit | |
299 | gMC -> TrackMomentum(pmom); | |
300 | Float_t pm[3], pd[3]; | |
301 | for (i=0; i<3; i++) | |
302 | pm[i] = pmom[i]; | |
303 | ||
304 | gMC -> Gmtod (pm, pd, 2); // transform 3-momentum from master to daughter system | |
305 | pmom[0] = pd[0]; | |
306c9d69 | 306 | pmom[1] =-pd[1]; |
307 | pmom[2] =-pd[2]; | |
fa412d9b | 308 | |
9688c1dd | 309 | // Digitize the current CPV hit: |
310 | ||
311 | // 1. find pad response and | |
312 | gMC->CurrentVolOffID(3,moduleNumber); | |
313 | moduleNumber--; | |
314 | ||
315 | TClonesArray *cpvDigits = new TClonesArray("AliPHOSCPVDigit",0); // array of digits for current hit | |
316 | CPVDigitize(pmom,xyd,moduleNumber,cpvDigits); | |
fa412d9b | 317 | |
9688c1dd | 318 | Float_t xmean = 0; |
319 | Float_t zmean = 0; | |
320 | Float_t qsum = 0; | |
321 | Int_t idigit,ndigits; | |
322 | ||
323 | // 2. go through the current digit list and sum digits in pads | |
324 | ||
325 | ndigits = cpvDigits->GetEntriesFast(); | |
326 | for (idigit=0; idigit<ndigits-1; idigit++) { | |
29b077b5 | 327 | AliPHOSCPVDigit *cpvDigit1 = dynamic_cast<AliPHOSCPVDigit*>(cpvDigits->UncheckedAt(idigit)); |
9688c1dd | 328 | Float_t x1 = cpvDigit1->GetXpad() ; |
329 | Float_t z1 = cpvDigit1->GetYpad() ; | |
330 | for (Int_t jdigit=idigit+1; jdigit<ndigits; jdigit++) { | |
29b077b5 | 331 | AliPHOSCPVDigit *cpvDigit2 = dynamic_cast<AliPHOSCPVDigit*>(cpvDigits->UncheckedAt(jdigit)); |
9688c1dd | 332 | Float_t x2 = cpvDigit2->GetXpad() ; |
333 | Float_t z2 = cpvDigit2->GetYpad() ; | |
334 | if (x1==x2 && z1==z2) { | |
335 | Float_t qsum = cpvDigit1->GetQpad() + cpvDigit2->GetQpad() ; | |
336 | cpvDigit2->SetQpad(qsum) ; | |
337 | cpvDigits->RemoveAt(idigit) ; | |
fa412d9b | 338 | } |
339 | } | |
9688c1dd | 340 | } |
341 | cpvDigits->Compress() ; | |
342 | ||
343 | // 3. add digits to temporary hit list fTmpHits | |
344 | ||
345 | ndigits = cpvDigits->GetEntriesFast(); | |
346 | for (idigit=0; idigit<ndigits; idigit++) { | |
29b077b5 | 347 | AliPHOSCPVDigit *cpvDigit = dynamic_cast<AliPHOSCPVDigit*>(cpvDigits->UncheckedAt(idigit)); |
9688c1dd | 348 | relid[0] = moduleNumber + 1 ; // CPV (or PHOS) module number |
349 | relid[1] =-1 ; // means CPV | |
350 | relid[2] = cpvDigit->GetXpad() ; // column number of a pad | |
351 | relid[3] = cpvDigit->GetYpad() ; // row number of a pad | |
352 | ||
353 | // get the absolute Id number | |
354 | GetGeometry()->RelToAbsNumbering(relid, absid) ; | |
355 | ||
356 | // add current digit to the temporary hit list | |
357 | ||
358 | xyze[3] = gMC->TrackTime() ; | |
359 | xyze[4] = cpvDigit->GetQpad() ; // amplitude in a pad | |
360 | primary = -1; // No need in primary for CPV | |
361 | AddHit(fIshunt, primary, tracknumber, absid, xyze); | |
362 | ||
363 | if (cpvDigit->GetQpad() > 0.02) { | |
364 | xmean += cpvDigit->GetQpad() * (cpvDigit->GetXpad() + 0.5); | |
365 | zmean += cpvDigit->GetQpad() * (cpvDigit->GetYpad() + 0.5); | |
366 | qsum += cpvDigit->GetQpad(); | |
fa412d9b | 367 | } |
fa412d9b | 368 | } |
e534a69d | 369 | if (cpvDigits) { |
370 | cpvDigits->Delete(); | |
371 | delete cpvDigits; | |
372 | cpvDigits=0; | |
373 | } | |
9688c1dd | 374 | } |
037cc66d | 375 | |
9688c1dd | 376 | |
377 | ||
fa412d9b | 378 | if(gMC->CurrentVolID(copy) == gMC->VolId("PXTL") ) { // We are inside a PBWO crystal |
9688c1dd | 379 | |
fa412d9b | 380 | gMC->TrackPosition(pos) ; |
381 | xyze[0] = pos[0] ; | |
382 | xyze[1] = pos[1] ; | |
383 | xyze[2] = pos[2] ; | |
9688c1dd | 384 | Float_t global[3], local[3] ; |
385 | global[0] = pos[0] ; | |
386 | global[1] = pos[1] ; | |
387 | global[2] = pos[2] ; | |
388 | Float_t lostenergy = gMC->Edep(); | |
037cc66d | 389 | |
9688c1dd | 390 | if ( lostenergy != 0 ) { // Track is inside the crystal and deposits some energy |
391 | ||
392 | xyze[3] = gMC->TrackTime() ; | |
ed4205d8 | 393 | |
9688c1dd | 394 | gMC->CurrentVolOffID(10, moduleNumber) ; // get the PHOS module number ; |
7b326aac | 395 | |
9688c1dd | 396 | Int_t strip ; |
397 | gMC->CurrentVolOffID(3, strip); | |
398 | Int_t cell ; | |
399 | gMC->CurrentVolOffID(2, cell); | |
ed4205d8 | 400 | |
9688c1dd | 401 | Int_t row = 1 + GetGeometry()->GetNZ() - strip % GetGeometry()->GetNZ() ; |
402 | Int_t col = (Int_t) TMath::Ceil((Double_t) strip/GetGeometry()->GetNZ()) -1 ; | |
037cc66d | 403 | |
9688c1dd | 404 | absid = (moduleNumber-1)*GetGeometry()->GetNCristalsInModule() + |
405 | row + (col*GetGeometry()->GetEMCAGeometry()->GetNCellsInStrip() + cell-1)*GetGeometry()->GetNZ() ; | |
ed4205d8 | 406 | |
9688c1dd | 407 | gMC->Gmtod(global, local, 1) ; |
408 | ||
409 | //Calculates the light yield, the number of photns produced in the | |
410 | //crystal | |
27f33ee5 | 411 | Float_t lightYield = gRandom->Poisson(fLightFactor * lostenergy * |
9688c1dd | 412 | exp(-fLightYieldAttenuation * |
413 | (local[1]+GetGeometry()->GetCrystalSize(1)/2.0 )) | |
414 | ) ; | |
415 | //Calculates de energy deposited in the crystal | |
27f33ee5 | 416 | xyze[4] = fAPDFactor * lightYield ; |
9688c1dd | 417 | |
418 | // add current hit to the hit list | |
419 | AddHit(fIshunt, primary,tracknumber, absid, xyze); | |
420 | ||
94de8339 | 421 | // fill the relevant QA Checkables |
422 | fQATotEner->Update( xyze[4] ) ; // total energy in PHOS | |
423 | (static_cast<AliPHOSQAFloatCheckable*>((*fQATotEnerB)[moduleNumber-1]))->Update( xyze[4] ) ; // energy in this block | |
424 | ||
fa412d9b | 425 | } // there is deposited energy |
426 | } // we are inside a PHOS Xtal | |
9688c1dd | 427 | |
fa412d9b | 428 | } |
429 | ||
430 | //____________________________________________________________________________ | |
431 | void AliPHOSv1::CPVDigitize (TLorentzVector p, Float_t *zxhit, Int_t moduleNumber, TClonesArray *cpvDigits) | |
432 | { | |
433 | // ------------------------------------------------------------------------ | |
434 | // Digitize one CPV hit: | |
435 | // On input take exact 4-momentum p and position zxhit of the hit, | |
436 | // find the pad response around this hit and | |
437 | // put the amplitudes in the pads into array digits | |
438 | // | |
439 | // Author: Yuri Kharlov (after Serguei Sadovsky) | |
440 | // 2 October 2000 | |
441 | // ------------------------------------------------------------------------ | |
442 | ||
fa7cce36 | 443 | const Float_t kCelWr = GetGeometry()->GetPadSizePhi()/2; // Distance between wires (2 wires above 1 pad) |
a3dfe79c | 444 | const Float_t kDetR = 0.1; // Relative energy fluctuation in track for 100 e- |
445 | const Float_t kdEdx = 4.0; // Average energy loss in CPV; | |
446 | const Int_t kNgamz = 5; // Ionization size in Z | |
447 | const Int_t kNgamx = 9; // Ionization size in Phi | |
448 | const Float_t kNoise = 0.03; // charge noise in one pad | |
fa412d9b | 449 | |
450 | Float_t rnor1,rnor2; | |
451 | ||
452 | // Just a reminder on axes notation in the CPV module: | |
453 | // axis Z goes along the beam | |
454 | // axis X goes across the beam in the module plane | |
455 | // axis Y is a normal to the module plane showing from the IP | |
456 | ||
457 | Float_t hitX = zxhit[0]; | |
458 | Float_t hitZ =-zxhit[1]; | |
459 | Float_t pX = p.Px(); | |
460 | Float_t pZ =-p.Pz(); | |
461 | Float_t pNorm = p.Py(); | |
a3dfe79c | 462 | Float_t eloss = kdEdx; |
3d402178 | 463 | |
7b326aac | 464 | // cout << "CPVDigitize: YVK : "<<hitX<<" "<<hitZ<<" | "<<pX<<" "<<pZ<<" "<<pNorm<<endl; |
465 | ||
fa7cce36 | 466 | Float_t dZY = pZ/pNorm * GetGeometry()->GetCPVGasThickness(); |
467 | Float_t dXY = pX/pNorm * GetGeometry()->GetCPVGasThickness(); | |
fa412d9b | 468 | gRandom->Rannor(rnor1,rnor2); |
a3dfe79c | 469 | eloss *= (1 + kDetR*rnor1) * |
fa7cce36 | 470 | TMath::Sqrt((1 + ( pow(dZY,2) + pow(dXY,2) ) / pow(GetGeometry()->GetCPVGasThickness(),2))); |
471 | Float_t zhit1 = hitZ + GetGeometry()->GetCPVActiveSize(1)/2 - dZY/2; | |
472 | Float_t xhit1 = hitX + GetGeometry()->GetCPVActiveSize(0)/2 - dXY/2; | |
fa412d9b | 473 | Float_t zhit2 = zhit1 + dZY; |
474 | Float_t xhit2 = xhit1 + dXY; | |
475 | ||
a3dfe79c | 476 | Int_t iwht1 = (Int_t) (xhit1 / kCelWr); // wire (x) coordinate "in" |
477 | Int_t iwht2 = (Int_t) (xhit2 / kCelWr); // wire (x) coordinate "out" | |
fa412d9b | 478 | |
479 | Int_t nIter; | |
480 | Float_t zxe[3][5]; | |
481 | if (iwht1==iwht2) { // incline 1-wire hit | |
482 | nIter = 2; | |
483 | zxe[0][0] = (zhit1 + zhit2 - dZY*0.57735) / 2; | |
a3dfe79c | 484 | zxe[1][0] = (iwht1 + 0.5) * kCelWr; |
485 | zxe[2][0] = eloss/2; | |
fa412d9b | 486 | zxe[0][1] = (zhit1 + zhit2 + dZY*0.57735) / 2; |
a3dfe79c | 487 | zxe[1][1] = (iwht1 + 0.5) * kCelWr; |
488 | zxe[2][1] = eloss/2; | |
fa412d9b | 489 | } |
490 | else if (TMath::Abs(iwht1-iwht2) != 1) { // incline 3-wire hit | |
491 | nIter = 3; | |
492 | Int_t iwht3 = (iwht1 + iwht2) / 2; | |
a3dfe79c | 493 | Float_t xwht1 = (iwht1 + 0.5) * kCelWr; // wire 1 |
494 | Float_t xwht2 = (iwht2 + 0.5) * kCelWr; // wire 2 | |
495 | Float_t xwht3 = (iwht3 + 0.5) * kCelWr; // wire 3 | |
fa412d9b | 496 | Float_t xwr13 = (xwht1 + xwht3) / 2; // center 13 |
497 | Float_t xwr23 = (xwht2 + xwht3) / 2; // center 23 | |
498 | Float_t dxw1 = xhit1 - xwr13; | |
499 | Float_t dxw2 = xhit2 - xwr23; | |
a3dfe79c | 500 | Float_t egm1 = TMath::Abs(dxw1) / ( TMath::Abs(dxw1) + TMath::Abs(dxw2) + kCelWr ); |
501 | Float_t egm2 = TMath::Abs(dxw2) / ( TMath::Abs(dxw1) + TMath::Abs(dxw2) + kCelWr ); | |
502 | Float_t egm3 = kCelWr / ( TMath::Abs(dxw1) + TMath::Abs(dxw2) + kCelWr ); | |
fa412d9b | 503 | zxe[0][0] = (dXY*(xwr13-xwht1)/dXY + zhit1 + zhit1) / 2; |
504 | zxe[1][0] = xwht1; | |
a3dfe79c | 505 | zxe[2][0] = eloss * egm1; |
fa412d9b | 506 | zxe[0][1] = (dXY*(xwr23-xwht1)/dXY + zhit1 + zhit2) / 2; |
507 | zxe[1][1] = xwht2; | |
a3dfe79c | 508 | zxe[2][1] = eloss * egm2; |
fa412d9b | 509 | zxe[0][2] = dXY*(xwht3-xwht1)/dXY + zhit1; |
510 | zxe[1][2] = xwht3; | |
a3dfe79c | 511 | zxe[2][2] = eloss * egm3; |
fa412d9b | 512 | } |
513 | else { // incline 2-wire hit | |
514 | nIter = 2; | |
a3dfe79c | 515 | Float_t xwht1 = (iwht1 + 0.5) * kCelWr; |
516 | Float_t xwht2 = (iwht2 + 0.5) * kCelWr; | |
fa412d9b | 517 | Float_t xwr12 = (xwht1 + xwht2) / 2; |
518 | Float_t dxw1 = xhit1 - xwr12; | |
519 | Float_t dxw2 = xhit2 - xwr12; | |
520 | Float_t egm1 = TMath::Abs(dxw1) / ( TMath::Abs(dxw1) + TMath::Abs(dxw2) ); | |
521 | Float_t egm2 = TMath::Abs(dxw2) / ( TMath::Abs(dxw1) + TMath::Abs(dxw2) ); | |
522 | zxe[0][0] = (zhit1 + zhit2 - dZY*egm1) / 2; | |
523 | zxe[1][0] = xwht1; | |
a3dfe79c | 524 | zxe[2][0] = eloss * egm1; |
fa412d9b | 525 | zxe[0][1] = (zhit1 + zhit2 + dZY*egm2) / 2; |
526 | zxe[1][1] = xwht2; | |
a3dfe79c | 527 | zxe[2][1] = eloss * egm2; |
fa412d9b | 528 | } |
bea63bea | 529 | |
fa412d9b | 530 | // Finite size of ionization region |
531 | ||
fa7cce36 | 532 | Int_t nCellZ = GetGeometry()->GetNumberOfCPVPadsZ(); |
533 | Int_t nCellX = GetGeometry()->GetNumberOfCPVPadsPhi(); | |
a3dfe79c | 534 | Int_t nz3 = (kNgamz+1)/2; |
535 | Int_t nx3 = (kNgamx+1)/2; | |
536 | cpvDigits->Expand(nIter*kNgamx*kNgamz); | |
29b077b5 | 537 | TClonesArray &ldigits = *(static_cast<TClonesArray *>(cpvDigits)); |
fa412d9b | 538 | |
539 | for (Int_t iter=0; iter<nIter; iter++) { | |
540 | ||
541 | Float_t zhit = zxe[0][iter]; | |
542 | Float_t xhit = zxe[1][iter]; | |
543 | Float_t qhit = zxe[2][iter]; | |
fa7cce36 | 544 | Float_t zcell = zhit / GetGeometry()->GetPadSizeZ(); |
545 | Float_t xcell = xhit / GetGeometry()->GetPadSizePhi(); | |
fa412d9b | 546 | if ( zcell<=0 || xcell<=0 || |
547 | zcell>=nCellZ || xcell>=nCellX) return; | |
548 | Int_t izcell = (Int_t) zcell; | |
549 | Int_t ixcell = (Int_t) xcell; | |
550 | Float_t zc = zcell - izcell - 0.5; | |
551 | Float_t xc = xcell - ixcell - 0.5; | |
a3dfe79c | 552 | for (Int_t iz=1; iz<=kNgamz; iz++) { |
fa412d9b | 553 | Int_t kzg = izcell + iz - nz3; |
554 | if (kzg<=0 || kzg>nCellZ) continue; | |
555 | Float_t zg = (Float_t)(iz-nz3) - zc; | |
a3dfe79c | 556 | for (Int_t ix=1; ix<=kNgamx; ix++) { |
fa412d9b | 557 | Int_t kxg = ixcell + ix - nx3; |
558 | if (kxg<=0 || kxg>nCellX) continue; | |
559 | Float_t xg = (Float_t)(ix-nx3) - xc; | |
560 | ||
561 | // Now calculate pad response | |
562 | Float_t qpad = CPVPadResponseFunction(qhit,zg,xg); | |
a3dfe79c | 563 | qpad += kNoise*rnor2; |
fa412d9b | 564 | if (qpad<0) continue; |
565 | ||
566 | // Fill the array with pad response ID and amplitude | |
3d402178 | 567 | new(ldigits[cpvDigits->GetEntriesFast()]) AliPHOSCPVDigit(kxg,kzg,qpad); |
fa412d9b | 568 | } |
fa412d9b | 569 | } |
fa412d9b | 570 | } |
571 | } | |
572 | ||
573 | //____________________________________________________________________________ | |
574 | Float_t AliPHOSv1::CPVPadResponseFunction(Float_t qhit, Float_t zhit, Float_t xhit) { | |
575 | // ------------------------------------------------------------------------ | |
576 | // Calculate the amplitude in one CPV pad using the | |
577 | // cumulative pad response function | |
578 | // Author: Yuri Kharlov (after Serguei Sadovski) | |
579 | // 3 October 2000 | |
580 | // ------------------------------------------------------------------------ | |
581 | ||
fa7cce36 | 582 | Double_t dz = GetGeometry()->GetPadSizeZ() / 2; |
583 | Double_t dx = GetGeometry()->GetPadSizePhi() / 2; | |
584 | Double_t z = zhit * GetGeometry()->GetPadSizeZ(); | |
585 | Double_t x = xhit * GetGeometry()->GetPadSizePhi(); | |
fa412d9b | 586 | Double_t amplitude = qhit * |
587 | (CPVCumulPadResponse(z+dz,x+dx) - CPVCumulPadResponse(z+dz,x-dx) - | |
588 | CPVCumulPadResponse(z-dz,x+dx) + CPVCumulPadResponse(z-dz,x-dx)); | |
589 | return (Float_t)amplitude; | |
7587f5a5 | 590 | } |
591 | ||
fa412d9b | 592 | //____________________________________________________________________________ |
593 | Double_t AliPHOSv1::CPVCumulPadResponse(Double_t x, Double_t y) { | |
594 | // ------------------------------------------------------------------------ | |
595 | // Cumulative pad response function | |
596 | // It includes several terms from the CF decomposition in electrostatics | |
597 | // Note: this cumulative function is wrong since omits some terms | |
598 | // but the cell amplitude obtained with it is correct because | |
599 | // these omitting terms cancel | |
600 | // Author: Yuri Kharlov (after Serguei Sadovski) | |
601 | // 3 October 2000 | |
602 | // ------------------------------------------------------------------------ | |
603 | ||
a3dfe79c | 604 | const Double_t kA=1.0; |
605 | const Double_t kB=0.7; | |
fa412d9b | 606 | |
607 | Double_t r2 = x*x + y*y; | |
608 | Double_t xy = x*y; | |
609 | Double_t cumulPRF = 0; | |
610 | for (Int_t i=0; i<=4; i++) { | |
a3dfe79c | 611 | Double_t b1 = (2*i + 1) * kB; |
fa412d9b | 612 | cumulPRF += TMath::Power(-1,i) * TMath::ATan( xy / (b1*TMath::Sqrt(b1*b1 + r2)) ); |
613 | } | |
a3dfe79c | 614 | cumulPRF *= kA/(2*TMath::Pi()); |
fa412d9b | 615 | return cumulPRF; |
616 | } | |
7eb9d12d | 617 |