| 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 // 26 //
27 // ------------------------------------------- 27 // -------------------------------------------------------------------
28 // 28 //
29 // GEANT4 Class file 29 // GEANT4 Class file
30 // 30 //
31 // 31 //
32 // File name: G4RDeBremsstrahlungSpectrum 32 // File name: G4RDeBremsstrahlungSpectrum
33 // 33 //
34 // Author: V.Ivanchenko (Vladimir.Ivanc 34 // Author: V.Ivanchenko (Vladimir.Ivanchenko@cern.ch)
35 // 35 //
36 // Creation date: 29 September 2001 36 // Creation date: 29 September 2001
37 // 37 //
38 // Modifications: 38 // Modifications:
39 // 10.10.01 MGP Revision to improve code qua 39 // 10.10.01 MGP Revision to improve code quality and consistency with design
40 // 15.11.01 VI Update spectrum model Bethe- 40 // 15.11.01 VI Update spectrum model Bethe-Haitler spectrum at high energy
41 // 30.05.02 VI Update interpolation between 41 // 30.05.02 VI Update interpolation between 2 last energy points in the
42 // parametrisation 42 // parametrisation
43 // 21.02.03 V.Ivanchenko Energy bins are d 43 // 21.02.03 V.Ivanchenko Energy bins are defined in the constructor
44 // 28.02.03 V.Ivanchenko Filename is defin 44 // 28.02.03 V.Ivanchenko Filename is defined in the constructor
45 // 45 //
46 // ------------------------------------------- 46 // -------------------------------------------------------------------
47 47
48 #include "G4RDeBremsstrahlungSpectrum.hh" 48 #include "G4RDeBremsstrahlungSpectrum.hh"
49 #include "G4RDBremsstrahlungParameters.hh" 49 #include "G4RDBremsstrahlungParameters.hh"
50 #include "Randomize.hh" 50 #include "Randomize.hh"
51 #include "G4SystemOfUnits.hh" 51 #include "G4SystemOfUnits.hh"
52 52
53 53
54 G4RDeBremsstrahlungSpectrum::G4RDeBremsstrahlu 54 G4RDeBremsstrahlungSpectrum::G4RDeBremsstrahlungSpectrum(const G4DataVector& bins,
55 const G4String& name):G4RDVEnergySpectrum(), 55 const G4String& name):G4RDVEnergySpectrum(),
56 lowestE(0.1*eV), 56 lowestE(0.1*eV),
57 xp(bins) 57 xp(bins)
58 { 58 {
59 length = xp.size(); 59 length = xp.size();
60 theBRparam = new G4RDBremsstrahlungParameter 60 theBRparam = new G4RDBremsstrahlungParameters(name,length+1);
61 61
62 verbose = 0; 62 verbose = 0;
63 } 63 }
64 64
65 65
66 G4RDeBremsstrahlungSpectrum::~G4RDeBremsstrahl 66 G4RDeBremsstrahlungSpectrum::~G4RDeBremsstrahlungSpectrum()
67 { 67 {
68 delete theBRparam; 68 delete theBRparam;
69 } 69 }
70 70
71 71
72 G4double G4RDeBremsstrahlungSpectrum::Probabil 72 G4double G4RDeBremsstrahlungSpectrum::Probability(G4int Z,
73 73 G4double tmin,
74 74 G4double tmax,
75 75 G4double e,
76 76 G4int,
77 const G 77 const G4ParticleDefinition*) const
78 { 78 {
79 G4double tm = std::min(tmax, e); 79 G4double tm = std::min(tmax, e);
80 G4double t0 = std::max(tmin, lowestE); 80 G4double t0 = std::max(tmin, lowestE);
81 if(t0 >= tm) return 0.0; 81 if(t0 >= tm) return 0.0;
82 82
83 t0 /= e; 83 t0 /= e;
84 tm /= e; 84 tm /= e;
85 85
86 G4double z0 = lowestE/e; 86 G4double z0 = lowestE/e;
87 G4DataVector p; 87 G4DataVector p;
88 88
89 // Access parameters 89 // Access parameters
90 for (size_t i=0; i<=length; i++) { 90 for (size_t i=0; i<=length; i++) {
91 p.push_back(theBRparam->Parameter(i, Z, e) 91 p.push_back(theBRparam->Parameter(i, Z, e));
92 } 92 }
93 93
94 G4double x = IntSpectrum(t0, tm, p); 94 G4double x = IntSpectrum(t0, tm, p);
95 G4double y = IntSpectrum(z0, 1.0, p); 95 G4double y = IntSpectrum(z0, 1.0, p);
96 96
97 97
98 if(1 < verbose) { 98 if(1 < verbose) {
99 G4cout << "tcut(MeV)= " << tmin/MeV 99 G4cout << "tcut(MeV)= " << tmin/MeV
100 << "; tMax(MeV)= " << tmax/MeV 100 << "; tMax(MeV)= " << tmax/MeV
101 << "; t0= " << t0 101 << "; t0= " << t0
102 << "; tm= " << tm 102 << "; tm= " << tm
103 << "; xp[0]= " << xp[0] 103 << "; xp[0]= " << xp[0]
104 << "; z= " << z0 104 << "; z= " << z0
105 << "; val= " << x 105 << "; val= " << x
106 << "; nor= " << y 106 << "; nor= " << y
107 << G4endl; 107 << G4endl;
108 } 108 }
109 p.clear(); 109 p.clear();
110 110
111 if(y > 0.0) x /= y; 111 if(y > 0.0) x /= y;
112 else x = 0.0; 112 else x = 0.0;
113 // if(x < 0.0) x = 0.0; 113 // if(x < 0.0) x = 0.0;
114 114
115 return x; 115 return x;
116 } 116 }
117 117
118 118
119 G4double G4RDeBremsstrahlungSpectrum::AverageE 119 G4double G4RDeBremsstrahlungSpectrum::AverageEnergy(G4int Z,
120 120 G4double tmin,
121 121 G4double tmax,
122 122 G4double e,
123 123 G4int,
124 const G4ParticleDefinition*) con 124 const G4ParticleDefinition*) const
125 { 125 {
126 G4double tm = std::min(tmax, e); 126 G4double tm = std::min(tmax, e);
127 G4double t0 = std::max(tmin, lowestE); 127 G4double t0 = std::max(tmin, lowestE);
128 if(t0 >= tm) return 0.0; 128 if(t0 >= tm) return 0.0;
129 129
130 t0 /= e; 130 t0 /= e;
131 tm /= e; 131 tm /= e;
132 132
133 G4double z0 = lowestE/e; 133 G4double z0 = lowestE/e;
134 134
135 G4DataVector p; 135 G4DataVector p;
136 136
137 // Access parameters 137 // Access parameters
138 for (size_t i=0; i<=length; i++) { 138 for (size_t i=0; i<=length; i++) {
139 p.push_back(theBRparam->Parameter(i, Z, 139 p.push_back(theBRparam->Parameter(i, Z, e));
140 } 140 }
141 141
142 G4double x = AverageValue(t0, tm, p); 142 G4double x = AverageValue(t0, tm, p);
143 G4double y = IntSpectrum(z0, 1.0, p); 143 G4double y = IntSpectrum(z0, 1.0, p);
144 144
145 // Add integrant over lowest energies 145 // Add integrant over lowest energies
146 G4double zmin = tmin/e; 146 G4double zmin = tmin/e;
147 if(zmin < t0) { 147 if(zmin < t0) {
148 G4double c = std::sqrt(theBRparam->Parame 148 G4double c = std::sqrt(theBRparam->ParameterC(Z));
149 x += p[0]*(t0 - zmin - c*(std::atan(t0/c) 149 x += p[0]*(t0 - zmin - c*(std::atan(t0/c) - std::atan(zmin/c)));
150 } 150 }
151 x *= e; 151 x *= e;
152 152
153 if(1 < verbose) { 153 if(1 < verbose) {
154 G4cout << "tcut(MeV)= " << tmin/MeV 154 G4cout << "tcut(MeV)= " << tmin/MeV
155 << "; tMax(MeV)= " << tmax/MeV 155 << "; tMax(MeV)= " << tmax/MeV
156 << "; e(MeV)= " << e/MeV 156 << "; e(MeV)= " << e/MeV
157 << "; t0= " << t0 157 << "; t0= " << t0
158 << "; tm= " << tm 158 << "; tm= " << tm
159 << "; y= " << y 159 << "; y= " << y
160 << "; x= " << x 160 << "; x= " << x
161 << G4endl; 161 << G4endl;
162 } 162 }
163 p.clear(); 163 p.clear();
164 164
165 if(y > 0.0) x /= y; 165 if(y > 0.0) x /= y;
166 else x = 0.0; 166 else x = 0.0;
167 // if(x < 0.0) x = 0.0; 167 // if(x < 0.0) x = 0.0;
168 168
169 return x; 169 return x;
170 } 170 }
171 171
172 172
173 G4double G4RDeBremsstrahlungSpectrum::SampleEn 173 G4double G4RDeBremsstrahlungSpectrum::SampleEnergy(G4int Z,
174 174 G4double tmin,
175 175 G4double tmax,
176 176 G4double e,
177 177 G4int,
178 const G4ParticleDefinition*) cons 178 const G4ParticleDefinition*) const
179 { 179 {
180 G4double tm = std::min(tmax, e); 180 G4double tm = std::min(tmax, e);
181 G4double t0 = std::max(tmin, lowestE); 181 G4double t0 = std::max(tmin, lowestE);
182 if(t0 >= tm) return 0.0; 182 if(t0 >= tm) return 0.0;
183 183
184 t0 /= e; 184 t0 /= e;
185 tm /= e; 185 tm /= e;
186 186
187 G4DataVector p; 187 G4DataVector p;
188 188
189 for (size_t i=0; i<=length; i++) { 189 for (size_t i=0; i<=length; i++) {
190 p.push_back(theBRparam->Parameter(i, Z, e) 190 p.push_back(theBRparam->Parameter(i, Z, e));
191 } 191 }
192 G4double amaj = std::max(p[length], 1. - (p[ 192 G4double amaj = std::max(p[length], 1. - (p[1] - p[0])*xp[0]/(xp[1] - xp[0]) );
193 193
194 G4double amax = std::log(tm); 194 G4double amax = std::log(tm);
195 G4double amin = std::log(t0); 195 G4double amin = std::log(t0);
196 G4double tgam, q, fun; 196 G4double tgam, q, fun;
197 197
198 do { 198 do {
199 G4double x = amin + G4UniformRand()*(amax 199 G4double x = amin + G4UniformRand()*(amax - amin);
200 tgam = std::exp(x); 200 tgam = std::exp(x);
201 fun = Function(tgam, p); 201 fun = Function(tgam, p);
202 202
203 if(fun > amaj) { 203 if(fun > amaj) {
204 G4cout << "WARNING in G4RDeBremsstra 204 G4cout << "WARNING in G4RDeBremsstrahlungSpectrum::SampleEnergy:"
205 << " Majoranta " << amaj 205 << " Majoranta " << amaj
206 << " < " << fun 206 << " < " << fun
207 << G4endl; 207 << G4endl;
208 } 208 }
209 209
210 q = amaj * G4UniformRand(); 210 q = amaj * G4UniformRand();
211 } while (q > fun); 211 } while (q > fun);
212 212
213 tgam *= e; 213 tgam *= e;
214 214
215 p.clear(); 215 p.clear();
216 216
217 return tgam; 217 return tgam;
218 } 218 }
219 219
220 G4double G4RDeBremsstrahlungSpectrum::IntSpect 220 G4double G4RDeBremsstrahlungSpectrum::IntSpectrum(G4double xMin,
221 221 G4double xMax,
222 const G4DataVector& p) const 222 const G4DataVector& p) const
223 { 223 {
224 G4double x1 = std::min(xMin, xp[0]); 224 G4double x1 = std::min(xMin, xp[0]);
225 G4double x2 = std::min(xMax, xp[0]); 225 G4double x2 = std::min(xMax, xp[0]);
226 G4double sum = 0.0; 226 G4double sum = 0.0;
227 227
228 if(x1 < x2) { 228 if(x1 < x2) {
229 G4double k = (p[1] - p[0])/(xp[1] - xp[0]) 229 G4double k = (p[1] - p[0])/(xp[1] - xp[0]);
230 sum += (1. - k*xp[0])*std::log(x2/x1) + k* 230 sum += (1. - k*xp[0])*std::log(x2/x1) + k*(x2 - x1);
231 } 231 }
232 232
233 for (size_t i=0; i<length-1; i++) { 233 for (size_t i=0; i<length-1; i++) {
234 x1 = std::max(xMin, xp[i]); 234 x1 = std::max(xMin, xp[i]);
235 x2 = std::min(xMax, xp[i+1]); 235 x2 = std::min(xMax, xp[i+1]);
236 if(x1 < x2) { 236 if(x1 < x2) {
237 G4double z1 = p[i]; 237 G4double z1 = p[i];
238 G4double z2 = p[i+1]; 238 G4double z2 = p[i+1];
239 sum += z2 - z1 + std::log(x2/x1)*(z1*x2 239 sum += z2 - z1 + std::log(x2/x1)*(z1*x2 - z2*x1)/(x2 - x1);
240 } 240 }
241 } 241 }
242 if(sum < 0.0) sum = 0.0; 242 if(sum < 0.0) sum = 0.0;
243 return sum; 243 return sum;
244 } 244 }
245 245
246 G4double G4RDeBremsstrahlungSpectrum::AverageV 246 G4double G4RDeBremsstrahlungSpectrum::AverageValue(G4double xMin,
247 247 G4double xMax,
248 const G4DataVector& p) const 248 const G4DataVector& p) const
249 { 249 {
250 G4double x1 = std::min(xMin, xp[0]); 250 G4double x1 = std::min(xMin, xp[0]);
251 G4double x2 = std::min(xMax, xp[0]); 251 G4double x2 = std::min(xMax, xp[0]);
252 G4double z1 = x1; 252 G4double z1 = x1;
253 G4double z2 = x2; 253 G4double z2 = x2;
254 G4double sum = 0.0; 254 G4double sum = 0.0;
255 255
256 if(x1 < x2) { 256 if(x1 < x2) {
257 G4double k = (p[1] - p[0])/(xp[1] - xp[0]) 257 G4double k = (p[1] - p[0])/(xp[1] - xp[0]);
258 sum += (z2 - z1)*(1. - k*xp[0]); 258 sum += (z2 - z1)*(1. - k*xp[0]);
259 z1 *= x1; 259 z1 *= x1;
260 z2 *= x2; 260 z2 *= x2;
261 sum += 0.5*k*(z2 - z1); 261 sum += 0.5*k*(z2 - z1);
262 } 262 }
263 263
264 for (size_t i=0; i<length-1; i++) { 264 for (size_t i=0; i<length-1; i++) {
265 x1 = std::max(xMin, xp[i]); 265 x1 = std::max(xMin, xp[i]);
266 x2 = std::min(xMax, xp[i+1]); 266 x2 = std::min(xMax, xp[i+1]);
267 if(x1 < x2) { 267 if(x1 < x2) {
268 z1 = p[i]; 268 z1 = p[i];
269 z2 = p[i+1]; 269 z2 = p[i+1];
270 sum += 0.5*(z2 - z1)*(x2 + x1) + z1*x2 - 270 sum += 0.5*(z2 - z1)*(x2 + x1) + z1*x2 - z2*x1;
271 } 271 }
272 } 272 }
273 if(sum < 0.0) sum = 0.0; 273 if(sum < 0.0) sum = 0.0;
274 return sum; 274 return sum;
275 } 275 }
276 276
277 G4double G4RDeBremsstrahlungSpectrum::Function 277 G4double G4RDeBremsstrahlungSpectrum::Function(G4double x,
278 const G4DataVector& p) const 278 const G4DataVector& p) const
279 { 279 {
280 G4double f = 0.0; 280 G4double f = 0.0;
281 281
282 if(x <= xp[0]) { 282 if(x <= xp[0]) {
283 f = p[0] + (p[1] - p[0])*(x - xp[0])/(xp[1 283 f = p[0] + (p[1] - p[0])*(x - xp[0])/(xp[1] - xp[0]);
284 284
285 } else { 285 } else {
286 286
287 for (size_t i=0; i<length-1; i++) { 287 for (size_t i=0; i<length-1; i++) {
288 288
289 if(x <= xp[i+1]) { 289 if(x <= xp[i+1]) {
290 f = p[i] + (p[i+1] - p[i])*(x - xp[i]) 290 f = p[i] + (p[i+1] - p[i])*(x - xp[i])/(xp[i+1] - xp[i]);
291 break; 291 break;
292 } 292 }
293 } 293 }
294 } 294 }
295 return f; 295 return f;
296 } 296 }
297 297
298 void G4RDeBremsstrahlungSpectrum::PrintData() 298 void G4RDeBremsstrahlungSpectrum::PrintData() const
299 { theBRparam->PrintData(); } 299 { theBRparam->PrintData(); }
300 300
301 G4double G4RDeBremsstrahlungSpectrum::Excitati 301 G4double G4RDeBremsstrahlungSpectrum::Excitation(G4int , G4double ) const
302 { 302 {
303 return 0.0; 303 return 0.0;
304 } 304 }
305 305
306 G4double G4RDeBremsstrahlungSpectrum::MaxEnerg 306 G4double G4RDeBremsstrahlungSpectrum::MaxEnergyOfSecondaries(G4double kineticEnergy,
307 G4int, // Z, 307 G4int, // Z,
308 const G4ParticleDefinition*) 308 const G4ParticleDefinition*) const
309 { 309 {
310 return kineticEnergy; 310 return kineticEnergy;
311 } 311 }
312 312