204{
207 if(i < 0) i = 0 ;
208 if(i > 91) i = 91 ;
209
210
211
212
213
214
215 G4double T = kineticEnergy*rateMass/MeV ;
216
218 {0.35485, 0.6456, 6.01525, 20.8933, 4.3515
219 },{ 0.58, 0.59, 6.3, 130.0, 44.07
220 },{ 1.42, 0.49, 12.25, 32.0, 9.161
221 },{ 2.1895, 0.47183,7.2362, 134.30, 197.96
222 },{ 3.691, 0.4128, 18.48, 50.72, 9.0
223 },{ 3.83523, 0.42993,12.6125, 227.41, 188.97
224 },{ 1.9259, 0.5550, 27.15125, 26.0665, 6.2768
225 },{ 2.81015, 0.4759, 50.0253, 10.556, 1.0382
226 },{ 1.533, 0.531, 40.44, 18.41, 2.718
227 },{ 2.303, 0.4861, 37.01, 37.96, 5.092
228 },{ 9.894, 0.3081, 23.65, 0.384, 92.93
229 },{ 4.3, 0.47, 34.3, 3.3, 12.74
230 },{ 2.5, 0.625, 45.7, 0.1, 4.359
231 },{ 2.1, 0.65, 49.34, 1.788, 4.133
232 },{ 1.729, 0.6562, 53.41, 2.405, 3.845
233 },{ 1.402, 0.6791, 58.98, 3.528, 3.211
234 },{ 1.117, 0.7044, 69.69, 3.705, 2.156
235 },{ 2.291, 0.6284, 73.88, 4.478, 2.066
236 },{ 8.554, 0.3817, 83.61, 11.84, 1.875
237 },{ 6.297, 0.4622, 65.39, 10.14, 5.036
238 },{ 5.307, 0.4918, 61.74, 12.4, 6.665
239 },{ 4.71, 0.5087, 65.28, 8.806, 5.948
240 },{ 6.151, 0.4524, 83.0, 18.31, 2.71
241 },{ 6.57, 0.4322, 84.76, 15.53, 2.779
242 },{ 5.738, 0.4492, 84.6, 14.18, 3.101
243 },{ 5.013, 0.4707, 85.8, 16.55, 3.211
244 },{ 4.32, 0.4947, 76.14, 10.85, 5.441
245 },{ 4.652, 0.4571, 80.73, 22.0, 4.952
246 },{ 3.114, 0.5236, 76.67, 7.62, 6.385
247 },{ 3.114, 0.5236, 76.67, 7.62, 7.502
248 },{ 3.114, 0.5236, 76.67, 7.62, 8.514
249 },{ 5.746, 0.4662, 79.24, 1.185, 7.993
250 },{ 2.792, 0.6346, 106.1, 0.2986, 2.331
251 },{ 4.667, 0.5095, 124.3, 2.102, 1.667
252 },{ 2.44, 0.6346, 105.0, 0.83, 2.851
253 },{ 1.413, 0.7377, 147.9, 1.466, 1.016
254 },{ 11.72, 0.3826, 102.8, 9.231, 4.371
255 },{ 7.126, 0.4804, 119.3, 5.784, 2.454
256 },{ 11.61, 0.3955, 146.7, 7.031, 1.423
257 },{ 10.99, 0.41, 163.9, 7.1, 1.052
258 },{ 9.241, 0.4275, 163.1, 7.954, 1.102
259 },{ 9.276, 0.418, 157.1, 8.038, 1.29
260 },{ 3.999, 0.6152, 97.6, 1.297, 5.792
261 },{ 4.306, 0.5658, 97.99, 5.514, 5.754
262 },{ 3.615, 0.6197, 86.26, 0.333, 8.689
263 },{ 5.8, 0.49, 147.2, 6.903, 1.289
264 },{ 5.6, 0.49, 130.0, 10.0, 2.844
265 },{ 3.55, 0.6068, 124.7, 1.112, 3.119
266 },{ 3.6, 0.62, 105.8, 0.1692, 6.026
267 },{ 5.4, 0.53, 103.1, 3.931, 7.767
268 },{ 3.97, 0.6459, 131.8, 0.2233, 2.723
269 },{ 3.65, 0.64, 126.8, 0.6834, 3.411
270 },{ 3.118, 0.6519, 164.9, 1.208, 1.51
271 },{ 3.949, 0.6209, 200.5, 1.878, 0.9126
272 },{ 14.4, 0.3923, 152.5, 8.354, 2.597
273 },{ 10.99, 0.4599, 138.4, 4.811, 3.726
274 },{ 16.6, 0.3773, 224.1, 6.28, 0.9121
275 },{ 10.54, 0.4533, 159.3, 4.832, 2.529
276 },{ 10.33, 0.4502, 162.0, 5.132, 2.444
277 },{ 10.15, 0.4471, 165.6, 5.378, 2.328
278 },{ 9.976, 0.4439, 168.0, 5.721, 2.258
279 },{ 9.804, 0.4408, 176.2, 5.675, 1.997
280 },{ 14.22, 0.363, 228.4, 7.024, 1.016
281 },{ 9.952, 0.4318, 233.5, 5.065, 0.9244
282 },{ 9.272, 0.4345, 210.0, 4.911, 1.258
283 },{ 10.13, 0.4146, 225.7, 5.525, 1.055
284 },{ 8.949, 0.4304, 213.3, 5.071, 1.221
285 },{ 11.94, 0.3783, 247.2, 6.655, 0.849
286 },{ 8.472, 0.4405, 195.5, 4.051, 1.604
287 },{ 8.301, 0.4399, 203.7, 3.667, 1.459
288 },{ 6.567, 0.4858, 193.0, 2.65, 1.66
289 },{ 5.951, 0.5016, 196.1, 2.662, 1.589
290 },{ 7.495, 0.4523, 251.4, 3.433, 0.8619
291 },{ 6.335, 0.4825, 255.1, 2.834, 0.8228
292 },{ 4.314, 0.5558, 214.8, 2.354, 1.263
293 },{ 4.02, 0.5681, 219.9, 2.402, 1.191
294 },{ 3.836, 0.5765, 210.2, 2.742, 1.305
295 },{ 4.68, 0.5247, 244.7, 2.749, 0.8962
296 },{ 3.223, 0.5883, 232.7, 2.954, 1.05
297 },{ 2.892, 0.6204, 208.6, 2.415, 1.416
298 },{ 4.728, 0.5522, 217.0, 3.091, 1.386
299 },{ 6.18, 0.52, 170.0, 4.0, 3.224
300 },{ 9.0, 0.47, 198.0, 3.8, 2.032
301 },{ 2.324, 0.6997, 216.0, 1.599, 1.399
302 },{ 1.961, 0.7286, 223.0, 1.621, 1.296
303 },{ 1.75, 0.7427, 350.1, 0.9789, 0.5507
304 },{ 10.31, 0.4613, 261.2, 4.738, 0.9899
305 },{ 7.962, 0.519, 235.7, 4.347, 1.313
306 },{ 6.227, 0.5645, 231.9, 3.961, 1.379
307 },{ 5.246, 0.5947, 228.6, 4.027, 1.432
308 },{ 5.408, 0.5811, 235.7, 3.961, 1.358
309 },{ 5.218, 0.5828, 245.0, 3.838, 1.25}
310 };
311
312
313 if ( T < 0.001 ) {
315 G4double shigh = std::log( 1.0 + a[i][3]*1000.0 + a[i][4]*0.001 )
316 * a[i][2]*1000.0 ;
317 ionloss = slow*shigh / (slow + shigh) ;
318 ionloss *= std::sqrt(T*1000.0) ;
319
320
321 } else {
322 G4double slow = a[i][0] * std::pow((T*1000.0), a[i][1]) ;
323 G4double shigh = std::log( 1.0 + a[i][3]/T + a[i][4]*T ) * a[i][2]/T ;
324 ionloss = slow*shigh / (slow + shigh) ;
325
326 }
327 if ( ionloss < 0.0) ionloss = 0.0 ;
328
329
331
332 return ionloss;
333}
G4double HeEffChargeSquare(const G4double z, const G4double kineticEnergyHe) const