| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
>> 26 // $Id: G4mplIonisationModel.cc,v 1.7 2009/04/12 17:35:41 vnivanch Exp $
>> 27 // GEANT4 tag $Name: geant4-09-03-patch-02 $
26 // 28 //
27 // ------------------------------------------- 29 // -------------------------------------------------------------------
28 // 30 //
29 // GEANT4 Class header file 31 // GEANT4 Class header file
30 // 32 //
31 // 33 //
32 // File name: G4mplIonisationModel 34 // File name: G4mplIonisationModel
33 // 35 //
34 // Author: Vladimir Ivanchenko 36 // Author: Vladimir Ivanchenko
35 // 37 //
36 // Creation date: 06.09.2005 38 // Creation date: 06.09.2005
37 // 39 //
38 // Modifications: 40 // Modifications:
39 // 12.08.2007 Changing low energy approximatio 41 // 12.08.2007 Changing low energy approximation and extrapolation.
40 // Small bug fixing and refactoring 42 // Small bug fixing and refactoring (M. Vladymyrov)
41 // 13.11.2007 Use low-energy asymptotic from [ 43 // 13.11.2007 Use low-energy asymptotic from [3] (V.Ivanchenko)
42 // 44 //
43 // 45 //
44 // ------------------------------------------- 46 // -------------------------------------------------------------------
45 // References 47 // References
46 // [1] Steven P. Ahlen: Energy loss of relativ 48 // [1] Steven P. Ahlen: Energy loss of relativistic heavy ionizing particles,
47 // S.P. Ahlen, Rev. Mod. Phys 52(1980), p1 49 // S.P. Ahlen, Rev. Mod. Phys 52(1980), p121
48 // [2] K.A. Milton arXiv:hep-ex/0602040 50 // [2] K.A. Milton arXiv:hep-ex/0602040
49 // [3] S.P. Ahlen and K. Kinoshita, Phys. Rev. 51 // [3] S.P. Ahlen and K. Kinoshita, Phys. Rev. D26 (1982) 2347
50 52
51 53
52 //....oooOO0OOooo........oooOO0OOooo........oo 54 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
53 //....oooOO0OOooo........oooOO0OOooo........oo 55 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
54 56
55 #include "G4mplIonisationModel.hh" 57 #include "G4mplIonisationModel.hh"
56 #include "Randomize.hh" 58 #include "Randomize.hh"
57 #include "G4PhysicalConstants.hh" << 59 #include "G4LossTableManager.hh"
58 #include "G4SystemOfUnits.hh" <<
59 #include "G4ParticleChangeForLoss.hh" 60 #include "G4ParticleChangeForLoss.hh"
60 #include "G4ProductionCutsTable.hh" <<
61 #include "G4MaterialCutsCouple.hh" <<
62 #include "G4Log.hh" <<
63 #include "G4Pow.hh" <<
64 61
65 //....oooOO0OOooo........oooOO0OOooo........oo 62 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
66 63
67 std::vector<G4double>* G4mplIonisationModel::d << 64 using namespace std;
68 65
69 G4mplIonisationModel::G4mplIonisationModel(G4d 66 G4mplIonisationModel::G4mplIonisationModel(G4double mCharge, const G4String& nam)
70 : G4VEmModel(nam),G4VEmFluctuationModel(nam) 67 : G4VEmModel(nam),G4VEmFluctuationModel(nam),
71 magCharge(mCharge), 68 magCharge(mCharge),
72 twoln10(G4Log(100.0)), << 69 twoln10(log(100.0)),
73 betalow(0.01), 70 betalow(0.01),
74 betalim(0.1), 71 betalim(0.1),
75 beta2lim(betalim*betalim), 72 beta2lim(betalim*betalim),
76 bg2lim(beta2lim*(1.0 + beta2lim)) 73 bg2lim(beta2lim*(1.0 + beta2lim))
77 { 74 {
78 nmpl = G4int(std::abs(magCharge) * 2 * CLHEP << 75 nmpl = G4int(abs(magCharge) * 2 * fine_structure_const + 0.5);
79 if(nmpl > 6) { nmpl = 6; } << 76 if(nmpl > 6) nmpl = 6;
80 else if(nmpl < 1) { nmpl = 1; } << 77 else if(nmpl < 1) nmpl = 1;
81 pi_hbarc2_over_mc2 = CLHEP::pi*CLHEP::hbarc* << 78 pi_hbarc2_over_mc2 = pi * hbarc * hbarc / electron_mass_c2;
82 chargeSquare = magCharge * magCharge; 79 chargeSquare = magCharge * magCharge;
83 dedxlim = 45.*nmpl*nmpl*CLHEP::GeV*CLHEP::cm << 80 dedxlim = 45.*nmpl*nmpl*GeV*cm2/g;
>> 81 fParticleChange = 0;
84 } 82 }
85 83
86 //....oooOO0OOooo........oooOO0OOooo........oo 84 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
87 85
88 G4mplIonisationModel::~G4mplIonisationModel() 86 G4mplIonisationModel::~G4mplIonisationModel()
89 { << 87 {}
90 if(IsMaster()) { delete dedx0; } <<
91 } <<
92 <<
93 //....oooOO0OOooo........oooOO0OOooo........oo <<
94 <<
95 void G4mplIonisationModel::SetParticle(const G <<
96 { <<
97 monopole = p; <<
98 mass = monopole->GetPDGMass(); <<
99 G4double emin = <<
100 std::min(LowEnergyLimit(),0.1*mass*(1./std <<
101 G4double emax = <<
102 std::max(HighEnergyLimit(),10.*mass*(1./st <<
103 SetLowEnergyLimit(emin); <<
104 SetHighEnergyLimit(emax); <<
105 } <<
106 88
107 //....oooOO0OOooo........oooOO0OOooo........oo 89 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
108 90
109 void G4mplIonisationModel::Initialise(const G4 91 void G4mplIonisationModel::Initialise(const G4ParticleDefinition* p,
110 const G4DataVector&) 92 const G4DataVector&)
111 { 93 {
112 if(nullptr == monopole) { SetParticle(p); } << 94 monopole = p;
113 if(nullptr == fParticleChange) { fParticleCh << 95 mass = monopole->GetPDGMass();
114 if(IsMaster()) { << 96 if(!fParticleChange) fParticleChange = GetParticleChangeForLoss();
115 if(nullptr == dedx0) { dedx0 = new std::ve <<
116 G4ProductionCutsTable* theCoupleTable= <<
117 G4ProductionCutsTable::GetProductionCuts <<
118 G4int numOfCouples = (G4int)theCoupleTable <<
119 G4int n = (G4int)dedx0->size(); <<
120 if(n < numOfCouples) { dedx0->resize(numOf <<
121 <<
122 G4Pow* g4calc = G4Pow::GetInstance(); <<
123 <<
124 // initialise vector assuming low conducti <<
125 for(G4int i=0; i<numOfCouples; ++i) { <<
126 <<
127 const G4Material* material = <<
128 theCoupleTable->GetMaterialCutsCouple( <<
129 G4double eDensity = material->GetElectro <<
130 G4double vF2 = 2*electron_Compton_length <<
131 (*dedx0)[i] = pi_hbarc2_over_mc2*eDensit <<
132 (G4Log(vF2/fine_structure_const) - 0.5 <<
133 } <<
134 } <<
135 } 97 }
136 98
137 //....oooOO0OOooo........oooOO0OOooo........oo 99 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
138 100
139 G4double G4mplIonisationModel::ComputeDEDXPerV 101 G4double G4mplIonisationModel::ComputeDEDXPerVolume(const G4Material* material,
140 const G4ParticleDefinition* p, << 102 const G4ParticleDefinition*,
141 G4double kineticEnergy, 103 G4double kineticEnergy,
142 G4double) 104 G4double)
143 { 105 {
144 if(nullptr == monopole) { SetParticle(p); } <<
145 G4double tau = kineticEnergy / mass; 106 G4double tau = kineticEnergy / mass;
146 G4double gam = tau + 1.0; 107 G4double gam = tau + 1.0;
147 G4double bg2 = tau * (tau + 2.0); 108 G4double bg2 = tau * (tau + 2.0);
148 G4double beta2 = bg2 / (gam * gam); 109 G4double beta2 = bg2 / (gam * gam);
149 G4double beta = std::sqrt(beta2); << 110 G4double beta = sqrt(beta2);
150 111
151 // low-energy asymptotic formula 112 // low-energy asymptotic formula
152 //G4double dedx = dedxlim*beta*material->Ge << 113 G4double dedx = dedxlim*beta*material->GetDensity();
153 G4double dedx = (*dedx0)[CurrentCouple()->Ge <<
154 114
155 // above asymptotic 115 // above asymptotic
156 if(beta > betalow) { 116 if(beta > betalow) {
157 117
158 // high energy 118 // high energy
159 if(beta >= betalim) { 119 if(beta >= betalim) {
160 dedx = ComputeDEDXAhlen(material, bg2); 120 dedx = ComputeDEDXAhlen(material, bg2);
161 121
162 } else { 122 } else {
163 123
164 //G4double dedx1 = dedxlim*betalow*mater << 124 G4double dedx1 = dedxlim*betalow*material->GetDensity();
165 G4double dedx1 = (*dedx0)[CurrentCouple( <<
166 G4double dedx2 = ComputeDEDXAhlen(materi 125 G4double dedx2 = ComputeDEDXAhlen(material, bg2lim);
167 126
168 // extrapolation between two formula 127 // extrapolation between two formula
169 G4double kapa2 = beta - betalow; 128 G4double kapa2 = beta - betalow;
170 G4double kapa1 = betalim - beta; 129 G4double kapa1 = betalim - beta;
171 dedx = (kapa1*dedx1 + kapa2*dedx2)/(kapa 130 dedx = (kapa1*dedx1 + kapa2*dedx2)/(kapa1 + kapa2);
172 } 131 }
173 } 132 }
174 return dedx; 133 return dedx;
175 } 134 }
176 135
177 //....oooOO0OOooo........oooOO0OOooo........oo 136 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
178 137
179 G4double G4mplIonisationModel::ComputeDEDXAhle 138 G4double G4mplIonisationModel::ComputeDEDXAhlen(const G4Material* material,
180 G4double bg2) 139 G4double bg2)
181 { 140 {
182 G4double eDensity = material->GetElectronDen 141 G4double eDensity = material->GetElectronDensity();
183 G4double eexc = material->GetIonisation()-> 142 G4double eexc = material->GetIonisation()->GetMeanExcitationEnergy();
184 G4double cden = material->GetIonisation()-> 143 G4double cden = material->GetIonisation()->GetCdensity();
185 G4double mden = material->GetIonisation()-> 144 G4double mden = material->GetIonisation()->GetMdensity();
186 G4double aden = material->GetIonisation()-> 145 G4double aden = material->GetIonisation()->GetAdensity();
187 G4double x0den = material->GetIonisation()-> 146 G4double x0den = material->GetIonisation()->GetX0density();
188 G4double x1den = material->GetIonisation()-> 147 G4double x1den = material->GetIonisation()->GetX1density();
189 148
190 // Ahlen's formula for nonconductors, [1]p15 149 // Ahlen's formula for nonconductors, [1]p157, f(5.7)
191 G4double dedx = std::log(2.0 * electron_mass << 150 G4double dedx = log(2.0 * electron_mass_c2 * bg2 / eexc) - 0.5;
192 151
193 // Kazama et al. cross-section correction 152 // Kazama et al. cross-section correction
194 G4double k = 0.406; 153 G4double k = 0.406;
195 if(nmpl > 1) k = 0.346; 154 if(nmpl > 1) k = 0.346;
196 155
197 // Bloch correction 156 // Bloch correction
198 const G4double B[7] = { 0.0, 0.248, 0.672, 1 157 const G4double B[7] = { 0.0, 0.248, 0.672, 1.022, 1.243, 1.464, 1.685};
199 158
200 dedx += 0.5 * k - B[nmpl]; 159 dedx += 0.5 * k - B[nmpl];
201 160
202 // density effect correction 161 // density effect correction
203 G4double deltam; 162 G4double deltam;
204 G4double x = std::log(bg2) / twoln10; << 163 G4double x = log(bg2) / twoln10;
205 if ( x >= x0den ) { 164 if ( x >= x0den ) {
206 deltam = twoln10 * x - cden; 165 deltam = twoln10 * x - cden;
207 if ( x < x1den ) deltam += aden * std::pow << 166 if ( x < x1den ) deltam += aden * pow((x1den-x), mden);
208 dedx -= 0.5 * deltam; 167 dedx -= 0.5 * deltam;
209 } 168 }
210 169
211 // now compute the total ionization loss 170 // now compute the total ionization loss
212 dedx *= pi_hbarc2_over_mc2 * eDensity * nmp 171 dedx *= pi_hbarc2_over_mc2 * eDensity * nmpl * nmpl;
213 172
214 if (dedx < 0.0) dedx = 0.; << 173 if (dedx < 0.0) dedx = 0;
215 return dedx; 174 return dedx;
216 } 175 }
217 176
218 //....oooOO0OOooo........oooOO0OOooo........oo 177 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
219 178
220 void G4mplIonisationModel::SampleSecondaries(s 179 void G4mplIonisationModel::SampleSecondaries(std::vector<G4DynamicParticle*>*,
221 const G4MaterialCutsCouple*, 180 const G4MaterialCutsCouple*,
222 const G4DynamicParticle*, 181 const G4DynamicParticle*,
223 G4double, 182 G4double,
224 G4double) 183 G4double)
225 {} 184 {}
226 185
227 //....oooOO0OOooo........oooOO0OOooo........oo 186 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
228 187
229 G4double G4mplIonisationModel::SampleFluctuati 188 G4double G4mplIonisationModel::SampleFluctuations(
230 const G4MaterialCutsCouple* cou << 189 const G4Material* material,
231 const G4DynamicParticle* dp, 190 const G4DynamicParticle* dp,
232 const G << 191 G4double& tmax,
233 const G << 192 G4double& length,
234 const G4double length, << 193 G4double& meanLoss)
235 const G4double meanLoss) <<
236 { 194 {
237 G4double siga = Dispersion(couple->GetMateri << 195 G4double siga = Dispersion(material,dp,tmax,length);
238 G4double loss = meanLoss; 196 G4double loss = meanLoss;
239 siga = std::sqrt(siga); << 197 siga = sqrt(siga);
240 G4double twomeanLoss = meanLoss + meanLoss; 198 G4double twomeanLoss = meanLoss + meanLoss;
241 199
242 if(twomeanLoss < siga) { 200 if(twomeanLoss < siga) {
243 G4double x; 201 G4double x;
244 do { 202 do {
245 loss = twomeanLoss*G4UniformRand(); 203 loss = twomeanLoss*G4UniformRand();
246 x = (loss - meanLoss)/siga; 204 x = (loss - meanLoss)/siga;
247 // Loop checking, 07-Aug-2015, Vladimir <<
248 } while (1.0 - 0.5*x*x < G4UniformRand()); 205 } while (1.0 - 0.5*x*x < G4UniformRand());
249 } else { 206 } else {
250 do { 207 do {
251 loss = G4RandGauss::shoot(meanLoss,siga) 208 loss = G4RandGauss::shoot(meanLoss,siga);
252 // Loop checking, 07-Aug-2015, Vladimir <<
253 } while (0.0 > loss || loss > twomeanLoss) 209 } while (0.0 > loss || loss > twomeanLoss);
254 } 210 }
255 return loss; 211 return loss;
256 } 212 }
257 213
258 //....oooOO0OOooo........oooOO0OOooo........oo 214 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
259 215
260 G4double G4mplIonisationModel::Dispersion(cons 216 G4double G4mplIonisationModel::Dispersion(const G4Material* material,
261 const G4DynamicParticle* dp, 217 const G4DynamicParticle* dp,
262 const G4double tcut, << 218 G4double& tmax,
263 const G4double tmax, << 219 G4double& length)
264 const G4double length) <<
265 { 220 {
266 G4double siga = 0.0; 221 G4double siga = 0.0;
267 G4double tau = dp->GetKineticEnergy()/mass 222 G4double tau = dp->GetKineticEnergy()/mass;
268 if(tau > 0.0) { 223 if(tau > 0.0) {
269 const G4double beta = dp->GetBeta(); << 224 G4double electronDensity = material->GetElectronDensity();
270 siga = (tmax/(beta*beta) - 0.5*tcut) * tw << 225 G4double gam = tau + 1.0;
271 * material->GetElectronDensity() * charg << 226 G4double invbeta2 = (gam*gam)/(tau * (tau+2.0));
>> 227 siga = (invbeta2 - 0.5) * twopi_mc2_rcl2 * tmax * length
>> 228 * electronDensity * chargeSquare;
272 } 229 }
273 return siga; 230 return siga;
274 } 231 }
275 232
276 //....oooOO0OOooo........oooOO0OOooo........oo 233 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
277 234