Geant4 11.1.1
Toolkit for the simulation of the passage of particles through matter
All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
G4DensityEffectData.cc
Go to the documentation of this file.
1//
2// ********************************************************************
3// * License and Disclaimer *
4// * *
5// * The Geant4 software is copyright of the Copyright Holders of *
6// * the Geant4 Collaboration. It is provided under the terms and *
7// * conditions of the Geant4 Software License, included in the file *
8// * LICENSE and available at http://cern.ch/geant4/license . These *
9// * include a list of copyright holders. *
10// * *
11// * Neither the authors of this software system, nor their employing *
12// * institutes,nor the agencies providing financial support for this *
13// * work make any representation or warranty, express or implied, *
14// * regarding this software system or assume any liability for its *
15// * use. Please see the license in the file LICENSE and URL above *
16// * for the full disclaimer and the limitation of liability. *
17// * *
18// * This code implementation is the result of the scientific and *
19// * technical work of the GEANT4 collaboration. *
20// * By using, copying, modifying or distributing the software (or *
21// * any work based on the software) you agree to acknowledge its *
22// * use in resulting scientific publications, and indicate your *
23// * acceptance of all terms of the Geant4 Software license. *
24// ********************************************************************
25//
26//---------------------------------------------------------------------------
27//
28// GEANT4 Class file
29//
30// Description: Data on density effect
31//
32// Authors: A.Bagulya, A.Ivanchenko 28.10.2009
33//
34//----------------------------------------------------------------------------
35//
36
37//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
38
39#include <iomanip>
40
42#include "G4SystemOfUnits.hh"
43
44//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
45
47{
48 Initialize();
49}
50
51//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
52
53void G4DensityEffectData::Initialize()
54{
55 // R.M. Sternheimer et al. Density Effect for the Ionization Loss of Charged
56 // Particles in Various Substances. Atom. Data Nucl. Data Tabl. 30 (1984) 261-271.
57 //
58 // Data[10]: Eplasma rho -C X_0 X_1 a m delta_0 DELTA_{max} I
59 // Eplasma - Plasma energy (in eV)
60 // rho - Sternheimer adjustment factor for the atomic excitation energies
61 // -C
62 // X_0, X_1, m, a - parameters in fitting formulas
63 // delta_0 - Density-effect value delta(X_0)
64 // DELTA_{max} - Upper bound for the error inherent in the fitting procedure
65 // I - Mean ionisation potential in keV used in this parameterisation
66
67 for (G4int i=0; i< NDENSELEM; ++i)
68 {
69 indexZ[i] = -1;
70 state[i] = kStateSolid;
71 }
72
73//G4_lH2 index=0
74 G4double M1[NDENSARRAY]={7.031,1.546,3.2632,0.4759,1.9215,0.13483,5.6249,0.,0.021,21.8 };
75 AddMaterial(M1,"G4_lH2");
76
77//G4_H index=1
78 G4double M0[NDENSARRAY]={0.263,1.412,9.5835,1.8639,3.2718,0.14092,5.7273,0.0,0.024,19.2 };
79 AddMaterial(M0,"G4_H");
80 indexZ[1]=1;
81 state[1]=kStateGas;
82
83//G4_He index=2
84 G4double M2[NDENSARRAY]={0.263,1.7,11.1393,2.2017,3.6122,0.13443,5.8347,0,0.024,41.8 };
85 AddMaterial(M2,"G4_He");
86 indexZ[2]=2;
87 state[2]=kStateGas;
88
89//G4_Li index=3
90 G4double M3[NDENSARRAY]={13.844,1.535,3.1221,0.1304,1.6397,0.95136,2.4993,0.14,0.062,40.0 };
91 AddMaterial(M3,"G4_Li");
92 indexZ[3]=3;
93
94//G4_Be index=4
95 G4double M4[NDENSARRAY]={26.098,1.908,2.7847,0.0392,1.6922,0.80392,2.4339,0.14,0.029,63.7 };
96 AddMaterial(M4,"G4_Be");
97 indexZ[4]=4;
98
99//G4_B index=5
100 G4double M5[NDENSARRAY]={30.17,2.32,2.8477,0.0305,1.9688,0.56224,2.4512,0.14,0.024,76.0 };
101 AddMaterial(M5,"G4_B");
102 indexZ[5]=5;
103
104//G4_C index=6
105 G4double M6[NDENSARRAY]={28.803,2.376,2.9925,-0.0351,2.486,0.2024,3.0036,0.1,0.038,78.0 };
106 AddMaterial(M6,"G4_C");
107 indexZ[6]=6;
108
109//G4_N index=7
110 G4double M7[NDENSARRAY]={0.695,1.984,10.5400,1.7378,4.1323,0.15349,3.2125,0.0,0.086,82. };
111 AddMaterial(M7,"G4_N");
112 indexZ[7]=7;
113 state[7]=kStateGas;
114
115//G4_O index=8
116 G4double M8[NDENSARRAY]={0.744,2.314,10.7004,1.7541,4.3213,0.11778,3.2913,0.0,0.101,95. };
117 AddMaterial(M8,"G4_O");
118 indexZ[8]=8;
119 state[8]=kStateGas;
120
121//G4_F index=9
122 G4double M9[NDENSARRAY]={0.788,2.450,10.9653,1.8433,4.4096,0.11083,3.2962,0.0,0.121,115. };
123 AddMaterial(M9,"G4_F");
124 indexZ[9]=9;
125 state[9]=kStateGas;
126
127//G4_Ne index=10
128 G4double M10[NDENSARRAY]={0.587,2.577,11.9041,2.0735,4.6421,0.08064,3.5771,0.0,0.110,137. };
129 AddMaterial(M10,"G4_Ne");
130 indexZ[10]=10;
131 state[10]=kStateGas;
132
133//G4_Na index=11
134 G4double M11[NDENSARRAY]={19.641,2.648,5.0526,0.2880,3.1962,0.07772,3.6452,0.08,0.098,149. };
135 AddMaterial(M11,"G4_Na");
136 indexZ[11]=11;
137
138//G4_Mg index=12
139 G4double M12[NDENSARRAY]={26.708,2.331,4.5297,0.1499,3.0668,0.08163,3.6166,0.08,0.073,156. };
140 AddMaterial(M12,"G4_Mg");
141 indexZ[12]=12;
142
143//G4_Al index=13
144 G4double M13[NDENSARRAY]={32.86,2.18,4.2395,0.1708,3.0127,0.08024,3.6345,0.12,0.061,166. };
145 AddMaterial(M13,"G4_Al");
146 indexZ[13]=13;
147
148//G4_Si index=14
149 G4double M14[NDENSARRAY]={31.055,2.103,4.4351,0.2014,2.8715,0.14921,3.2546,0.14,0.059,173. };
150 AddMaterial(M14,"G4_Si");
151 indexZ[14]=14;
152
153//G4_P index=15
154 G4double M15[NDENSARRAY]={29.743,2.056,4.5214,0.1696,2.7815,0.2361,2.9158,0.14,0.057,173. };
155 AddMaterial(M15,"G4_P");
156 indexZ[15]=15;
157
158//G4_S index=16
159 G4double M16[NDENSARRAY]={28.789,2.131,4.6659,0.158,2.7159,0.33992,2.6456,0.14,0.059,180. };
160 AddMaterial(M16,"G4_S");
161 indexZ[16]=16;
162
163//G4_Cl index=17
164 G4double M17[NDENSARRAY]={1.092,1.734,11.1421,1.5555,4.2994,0.19849,2.9702,0.0,0.041,174. };
165 AddMaterial(M17,"G4_Cl");
166 indexZ[17]=17;
167 state[17]=kStateGas;
168
169//G4_Ar index=18
170 G4double M18[NDENSARRAY]={0.789,1.753,11.9480,1.7635,4.4855,0.19714,2.9618,0.0,0.037,188. };
171 AddMaterial(M18,"G4_Ar");
172 indexZ[18]=18;
173 state[18]=kStateGas;
174
175//G4_K index=19
176 G4double M19[NDENSARRAY]={18.65,1.830,5.6423,0.3851,3.1724,0.19827,2.9233,0.10,0.035,190. };
177 AddMaterial(M19,"G4_K");
178 indexZ[19]=19;
179
180//G4_Ca index=20
181 G4double M20[NDENSARRAY]={25.342,1.666,5.0396,0.3228,3.1191,0.15643,3.0745,0.14,0.031,191. };
182 AddMaterial(M20,"G4_Ca");
183 indexZ[20]=20;
184
185//G4_Sc index=21
186 G4double M21[NDENSARRAY]={34.050,1.826,4.6949,0.1640,3.0593,0.15754,3.0517,0.10,0.027,216. };
187 AddMaterial(M21,"G4_Sc");
188 indexZ[21]=21;
189
190//G4_Ti index=22
191 G4double M22[NDENSARRAY]={41.619,1.969,4.4450,0.0957,3.0386,0.15662,3.0302,0.12,0.025,233. };
192 AddMaterial(M22,"G4_Ti");
193 indexZ[22]=22;
194
195//G4_V index=23
196 G4double M23[NDENSARRAY]={47.861,2.070,4.2659,0.0691,3.0322,0.15436,3.0163,0.14,0.024,245. };
197 AddMaterial(M23,"G4_V");
198 indexZ[23]=23;
199
200//G4_Cr index=24
201 G4double M24[NDENSARRAY]={52.458,2.181,4.1781,0.0340,3.0451,0.15419,2.9896,0.14,0.023,257. };
202 AddMaterial(M24,"G4_Cr");
203 indexZ[24]=24;
204
205//G4_Mn index=25
206 G4double M25[NDENSARRAY]={53.022,2.347,4.2702,0.0447,3.1074,0.14973,2.9796,0.14,0.021,272. };
207 AddMaterial(M25,"G4_Mn");
208 indexZ[25]=25;
209
210//G4_Fe index=26
211 G4double M26[NDENSARRAY]={55.172,2.504,4.2911,-0.0012,3.1531,0.1468,2.9632,0.12,0.021,286. };
212 AddMaterial(M26,"G4_Fe");
213 indexZ[26]=26;
214
215//G4_Co index=27
216 G4double M27[NDENSARRAY]={58.188,2.626,4.2601,-0.0187,3.1790,0.14474,2.9502,0.12,0.019,297. };
217 AddMaterial(M27,"G4_Co");
218 indexZ[27]=27;
219
220//G4_Ni index=28
221 G4double M28[NDENSARRAY]={59.385,2.889,4.3115,-0.0566,3.1851,0.16496,2.843,0.10,0.020,311. };
222 AddMaterial(M28,"G4_Ni");
223 indexZ[28]=28;
224
225//G4_Cu index=29
226 G4double M29[NDENSARRAY]={58.270,2.956,4.4190,-0.0254,3.2792,0.14339,2.9044,0.08,0.019,322. };
227 AddMaterial(M29,"G4_Cu");
228 indexZ[29]=29;
229
230//G4_Zn index=30
231 G4double M30[NDENSARRAY]={52.132,3.142,4.6906,0.0049,3.3668,0.14714,2.8652,0.08,0.019,330. };
232 AddMaterial(M30,"G4_Zn");
233 indexZ[30]=30;
234
235//G4_Ga index=31
236 G4double M31[NDENSARRAY]={46.688,2.747,4.9353,0.2267,3.5434,0.09440,3.1314,0.14,0.019,334. };
237 AddMaterial(M31,"G4_Ga");
238 indexZ[31]=31;
239
240//G4_Ge index=32
241 G4double M32[NDENSARRAY]={44.141,2.461,5.1411,0.3376,3.6096,0.07188,3.3306,0.14,0.025,350. };
242 AddMaterial(M32,"G4_Ge");
243 indexZ[32]=32;
244
245//G4_As index=33
246 G4double M33[NDENSARRAY]={45.779,2.219,5.0510,0.1767,3.5702,0.06633,3.4176,0.00,0.030,347. };
247 AddMaterial(M33,"G4_As");
248 indexZ[33]=33;
249
250//G4_Se index=34
251 G4double M34[NDENSARRAY]={40.112,2.104,5.3210,0.2258,3.6264,0.06568,3.4317,0.10,0.024,348. };
252 AddMaterial(M34,"G4_Se");
253 indexZ[34]=34;
254
255//G4_Br index=35
256 G4double M35[NDENSARRAY]={1.604,1.845,11.7307,1.5262,4.9899,0.06335,3.467,0,0.022,343. };
257 AddMaterial(M35,"G4_Br");
258 indexZ[35]=35;
259 state[35]=kStateGas;
260
261//G4_Kr index=36
262 G4double M36[NDENSARRAY]={1.114,1.77,12.5115,1.7158,5.0748,0.07446,3.4051,0,0.025,352. };
263 AddMaterial(M36,"G4_Kr");
264 indexZ[36]=36;
265 state[36]=kStateGas;
266
267//G4_Rb index=37
268 G4double M37[NDENSARRAY]={23.467,1.823,6.4776,0.5737,3.7995,0.07261,3.4177,0.14,0.026,363. };
269 AddMaterial(M37,"G4_Rb");
270 indexZ[37]=37;
271
272//G4_Sr index=38
273 G4double M38[NDENSARRAY]={30.244,1.707,5.9867,0.4585,3.6778,0.07165,3.4435,0.14,0.026,366. };
274 AddMaterial(M38,"G4_Sr");
275 indexZ[38]=38;
276
277//G4_Y index=39
278 G4double M39[NDENSARRAY]={40.346,1.649,5.4801,0.3608,3.5542,0.07138,3.4585,0.14,0.027,379. };
279 AddMaterial(M39,"G4_Y");
280 indexZ[39]=39;
281
282//G4_Zr index=40
283 G4double M40[NDENSARRAY]={48.671,1.638,5.1774,0.2957,3.489,0.07177,3.4533,0.14,0.028,393. };
284 AddMaterial(M40,"G4_Zr");
285 indexZ[40]=40;
286
287//G4_Nb index=41
288 G4double M41[NDENSARRAY]={56.039,1.734,5.0141,0.1785,3.2201,0.13883,3.093,0.14,0.036,417. };
289 AddMaterial(M41,"G4_Nb");
290 indexZ[41]=41;
291
292//G4_Mo index=42
293 G4double M42[NDENSARRAY]={60.951,1.658,4.8793,0.2267,3.2784,0.10525,3.2549,0.14,0.03,424. };
294 AddMaterial(M42,"G4_Mo");
295 indexZ[42]=42;
296
297//G4_Tc index=43
298 G4double M43[NDENSARRAY]={64.760,1.727,4.7769,0.0949,3.1253,0.16572,2.9738,0.14,0.040,428. };
299 AddMaterial(M43,"G4_Tc");
300 indexZ[43]=43;
301
302//G4_Ru index=44
303 G4double M44[NDENSARRAY]={66.978,1.780,4.7694,0.0599,3.0834,0.19342,2.8707,0.14,0.046,441. };
304 AddMaterial(M44,"G4_Ru");
305 indexZ[44]=44;
306
307//G4_Rh index=45
308 G4double M45[NDENSARRAY]={67.128,1.804,4.8008,0.0576,3.1069,0.19205,2.8633,0.14,0.046,449. };
309 AddMaterial(M45,"G4_Rh");
310 indexZ[45]=45;
311
312//G4_Pd index=46
313 G4double M46[NDENSARRAY]={65.683,1.911,4.9358,0.0563,3.0555,0.24178,2.7239,0.14,0.047,470. };
314 AddMaterial(M46,"G4_Pd");
315 indexZ[46]=46;
316
317//G4_Ag index=47
318 G4double M47[NDENSARRAY]={61.635,1.933,5.0630,0.0657,3.1074,0.24585,2.6899,0.14,0.052,470. };
319 AddMaterial(M47,"G4_Ag");
320 indexZ[47]=47;
321
322//G4_Cd index=48
323 G4double M48[NDENSARRAY]={55.381,1.895,5.2727,0.1281,3.1667,0.24609,2.6772,0.14,0.051,469. };
324 AddMaterial(M48,"G4_Cd");
325 indexZ[48]=48;
326
327//G4_In index=49
328 G4double M49[NDENSARRAY]={50.896,1.851,5.5211,0.2406,3.2032,0.23879,2.7144,0.14,0.044,488. };
329 AddMaterial(M49,"G4_In");
330 indexZ[49]=49;
331
332//G4_Sn index=50
333 G4double M50[NDENSARRAY]={50.567,1.732,5.5340,0.2879,3.2959,0.18689,2.8576,0.14,0.037,488. };
334 AddMaterial(M50,"G4_Sn");
335 indexZ[50]=50;
336
337//G4_Sb index=51
338 G4double M51[NDENSARRAY]={48.242,1.645,5.6241,0.3189,3.3489,0.16652,2.9319,0.14,0.034,487. };
339 AddMaterial(M51,"G4_Sb");
340 indexZ[51]=51;
341
342//G4_Te index=52
343 G4double M52[NDENSARRAY]={45.952,1.577,5.7131,0.3296,3.4418,0.13815,3.0354,0.14,0.033,485. };
344 AddMaterial(M52,"G4_Te");
345 indexZ[52]=52;
346
347//G4_I index=53
348 G4double M53[NDENSARRAY]={41.348,1.498,5.9488,0.0549,3.2596,0.23766,2.7276,0.0,0.045,491. };
349 AddMaterial(M53,"G4_I");
350 indexZ[53]=53;
351
352//G4_Xe index=54
353 G4double M54[NDENSARRAY]={1.369,1.435,12.7281,1.563,4.7371,0.23314,2.7414,0,0.043,482. };
354 AddMaterial(M54,"G4_Xe");
355 indexZ[54]=54;
356 state[54]=kStateGas;
357
358//G4_Cs index=55
359 G4double M55[NDENSARRAY]={25.37,1.462,6.9135,0.5473,3.5914,0.18233,2.8866,0.14,0.035,488. };
360 AddMaterial(M55,"G4_Cs");
361 indexZ[55]=55;
362
363//G4_Ba index=56
364 G4double M56[NDENSARRAY]={34.425,1.410,6.3153,0.4190,3.4547,0.18268,2.8906,0.14,0.035,491. };
365 AddMaterial(M56,"G4_Ba");
366 indexZ[56]=56;
367
368//G4_La index=57
369 G4double M57[NDENSARRAY]={45.792,1.392,5.7850,0.3161,3.3293,0.18591,2.8828,0.14,0.036,501. };
370 AddMaterial(M57,"G4_La");
371 indexZ[57]=57;
372
373//G4_Ce index=58
374 G4double M58[NDENSARRAY]={47.834,1.461,5.7837,0.2713,3.3432,0.18885,2.8592,0.14,0.040,523. };
375 AddMaterial(M58,"G4_Ce");
376 indexZ[58]=58;
377
378//G4_Pr index=59
379 G4double M59[NDENSARRAY]={48.301,1.520,5.8096,0.2333,3.2773,0.23265,2.7331,0.14,0.041,535. };
380 AddMaterial(M59,"G4_Pr");
381 indexZ[59]=59;
382
383//G4_Ne index=60
384 G4double M60[NDENSARRAY]={48.819,1.588,5.8290,0.1984,3.3063,0.23530,2.7050,0.14,0.044,546. };
385 AddMaterial(M60,"G4_Ne");
386 indexZ[60]=60;
387
388//G4_Pr index=61
389 G4double M61[NDENSARRAY]={50.236,1.672,5.8224,0.1627,3.3199,0.24280,2.6674,0.14,0.048,560. };
390 AddMaterial(M61,"G4_Pr");
391 indexZ[61]=61;
392
393//G4_Sa index=62
394 G4double M62[NDENSARRAY]={50.540,1.749,5.8597,0.1520,3.3460,0.24698,2.6403,0.14,0.053,574. };
395 AddMaterial(M62,"G4_Sa");
396 indexZ[62]=62;
397
398//G4_Eu index=63
399 G4double M63[NDENSARRAY]={42.484,1.838,6.2278,0.1888,3.4633,0.24448,2.6245,0.14,0.06,580. };
400 AddMaterial(M63,"G4_Eu");
401 indexZ[63]=63;
402
403//G4_Gd index=64
404 G4double M64[NDENSARRAY]={51.672,1.882,5.8738,0.1058,3.3932,0.25109,2.5977,0.14,0.061,591. };
405 AddMaterial(M64,"G4_Gd");
406 indexZ[64]=64;
407
408//G4_Tb index=65
409 G4double M65[NDENSARRAY]={52.865,1.993,5.9045,0.0947,3.4224,0.24453,2.6056,0.14,0.063,614. };
410 AddMaterial(M65,"G4_Tb");
411 indexZ[65]=65;
412
413//G4_Dy index=66
414 G4double M66[NDENSARRAY]={53.698,2.081,5.9183,0.0822,3.4474,0.24665,2.5849,0.14,0.061,628. };
415 AddMaterial(M66,"G4_Dy");
416 indexZ[66]=66;
417
418//G4_Ho index=67
419 G4double M67[NDENSARRAY]={54.467,2.197,5.9587,0.0761,3.4782,0.24638,2.5726,0.14,0.062,650. };
420 AddMaterial(M67,"G4_Ho");
421 indexZ[67]=67;
422
423//G4_Er index=68
424 G4double M68[NDENSARRAY]={55.322,2.26,5.9521,0.0648,3.4922,0.24823,2.5573,0.14,0.061,658. };
425 AddMaterial(M68,"G4_Er");
426 indexZ[68]=68;
427
428//G4_Tm index=69
429 G4double M69[NDENSARRAY]={56.225,2.333,5.9677,0.0812,3.5085,0.24889,2.5469,0.14,0.062,674. };
430 AddMaterial(M69,"G4_Tm");
431 indexZ[69]=69;
432
433//G4_Yb index=70
434 G4double M70[NDENSARRAY]={47.546,2.505,6.3325,0.1199,3.6246,0.25295,2.5141,0.14,0.071,684. };
435 AddMaterial(M70,"G4_Yb");
436 indexZ[70]=70;
437
438//G4_Lu index=71
439 G4double M71[NDENSARRAY]={57.581,2.348,5.9785,0.1560,3.5218,0.24033,2.5643,0.14,0.054,694. };
440 AddMaterial(M71,"G4_Lu");
441 indexZ[71]=71;
442
443//G4_Hf index=72
444 G4double M72[NDENSARRAY]={66.770,2.174,5.7139,0.1965,3.4337,0.22918,2.6155,0.14,0.035,705. };
445 AddMaterial(M72,"G4_Hf");
446 indexZ[72]=72;
447
448//G4_Ta index=73
449 G4double M73[NDENSARRAY]={74.692,2.07,5.5262,0.2117,3.4805,0.17798,2.7623,0.14,0.03,718. };
450 AddMaterial(M73,"G4_Ta");
451 indexZ[73]=73;
452
453//G4_W index=74
454 G4double M74[NDENSARRAY]={80.315,1.997,5.4059,0.2167,3.496,0.15509,2.8447,0.14,0.027,727. };
455 AddMaterial(M74,"G4_W");
456 indexZ[74]=74;
457
458//G4_Re index=75
459 G4double M75[NDENSARRAY]={83.846,1.976,5.3445,0.0559,3.4845,0.15184,2.8627,0.08,0.026,736. };
460 AddMaterial(M75,"G4_Re");
461 indexZ[75]=75;
462
463//G4_Os index=76
464 G4double M76[NDENSARRAY]={86.537,1.947,5.3083,0.0891,3.5414,0.12751,2.9608,0.10,0.023,746. };
465 AddMaterial(M76,"G4_Os");
466 indexZ[76]=76;
467
468//G4_Ir index=77
469 G4double M77[NDENSARRAY]={86.357,1.927,5.3418,0.0819,3.5480,0.12690,2.9658,0.10,0.023,757. };
470 AddMaterial(M77,"G4_Ir");
471 indexZ[77]=77;
472
473//G4_Pt index=78
474 G4double M78[NDENSARRAY]={84.389,1.965,5.4732,0.1484,3.6212,0.11128,3.0417,0.12,0.021,790. };
475 AddMaterial(M78,"G4_Pt");
476 indexZ[78]=78;
477
478//G4_Au index=79
479 G4double M79[NDENSARRAY]={80.215,1.926,5.5747,0.2021,3.6979,0.09756,3.1101,0.14,0.020,790. };
480 AddMaterial(M79,"G4_Au");
481 indexZ[79]=79;
482
483//G4_Hg index=80
484 G4double M80[NDENSARRAY]={66.977,1.904,5.9605,0.2756,3.7275,0.11014,3.0519,0.14,0.021,800. };
485 AddMaterial(M80,"G4_Hg");
486 indexZ[80]=80;
487
488//G4_Tl index=81
489 G4double M81[NDENSARRAY]={62.104,1.814,6.1365,0.3491,3.8044,0.09455,3.1450,0.14,0.019,810. };
490 AddMaterial(M81,"G4_Tl");
491 indexZ[81]=81;
492
493//G4_Pb index=82
494 G4double M82[NDENSARRAY]={61.072,1.755,6.2018,0.3776,3.8073,0.09359,3.1608,0.14,0.019,823. };
495 AddMaterial(M82,"G4_Pb");
496 indexZ[82]=82;
497
498//G4_Bi index=83
499 G4double M83[NDENSARRAY]={56.696,1.684,6.3505,0.4152,3.8248,0.0941,3.1671,0.14,0.02,823. };
500 AddMaterial(M83,"G4_Bi");
501 indexZ[83]=83;
502
503//G4_Po index=84
504 G4double M84[NDENSARRAY]={55.773,1.637,6.4003,0.4267,3.8293,0.09282,3.183,0.14,0.02,830. };
505 AddMaterial(M84,"G4_Po");
506 indexZ[84]=84;
507
508//G4_Rn index=85
509 G4double M85[NDENSARRAY]={1.708,1.458,13.2839,1.5368,4.9889,0.20798,2.7409,0,0.057,794. };
510 AddMaterial(M85,"G4_Rn");
511 indexZ[86]=85;
512 state[86]=kStateGas;
513
514//G4_Ra index=86
515 G4double M86[NDENSARRAY]={40.205,1.403,7.0452,0.5991,3.9428,0.08804,3.2454,0.14,0.022,826. };
516 AddMaterial(M86,"G4_Ra");
517 indexZ[88]=86;
518
519//G4_Ac index=87
520 G4double M87[NDENSARRAY]={57.254,1.380,6.3742,0.4559,3.7966,0.08567,3.2683,0.14,0.023,841. };
521 AddMaterial(M87,"G4_Ac");
522 indexZ[89]=87;
523
524//G4_Th index=88
525 G4double M88[NDENSARRAY]={61.438,1.363,6.2473,0.4202,3.7681,0.08655,3.2610,0.14,0.025,847. };
526 AddMaterial(M88,"G4_Th");
527 indexZ[90]=88;
528
529//G4_Pa index=89
530 G4double M89[NDENSARRAY]={70.901,1.42,6.0327,0.3144,3.5079,.14770,2.9845,0.14,0.036,878. };
531 AddMaterial(M89,"G4_Pa");
532 indexZ[91]=89;
533
534//G4_U index=90
535 G4double M90[NDENSARRAY]={77.986,1.447,5.8694,0.2260,3.3721,.19677,2.8171,0.14,0.043,890. };
536 AddMaterial(M90,"G4_U");
537 indexZ[92]=90;
538
539//G4_Np index=91
540 G4double M91[NDENSARRAY]={81.221,1.468,5.8149,0.1869,3.369,0.19741,2.8082,0.14,0.043,902. };
541 AddMaterial(M91,"G4_Np");
542 indexZ[93]=91;
543
544//G4_Pu index=92
545 G4double M92[NDENSARRAY]={80.486,1.519,5.8748,0.1557,3.3981,0.20419,2.7679,0.14,0.057,921. };
546 AddMaterial(M92,"G4_Pu");
547 indexZ[94]=92;
548
549//G4_Am index=93
550 G4double M93[NDENSARRAY]={66.607,1.552,6.2813,0.2274,3.5021,0.20308,2.7615,0.14,0.056,934. };
551 AddMaterial(M93,"G4_Am");
552 indexZ[95]=93;
553
554//G4_Cm index=94
555 G4double M94[NDENSARRAY]={66.022,1.559,6.3097,0.2484,3.516,.20257,2.7579,0.14,0.056,939. };
556 AddMaterial(M94,"G4_Cm");
557 indexZ[96]=94;
558
559//G4_Bk index=95
560 G4double M95[NDENSARRAY]={67.557,1.574,6.2912,0.2378,3.5186,.20192,2.7560,0.14,0.062,952. };
561 AddMaterial(M95,"G4_Bk");
562 indexZ[97]=95;
563
564//G4_A-150_TISSUE index=96
565 G4double M96[NDENSARRAY]={22.667,1.950,3.1100,0.1329,2.6234,0.10783,3.4442,0,0.048,65.1 };
566 AddMaterial(M96,"G4_A-150_TISSUE");
567
568//G4_ACETONE index=97
569 G4double M97[NDENSARRAY]={19.010,1.976,3.4341,0.2197,2.6928,0.11100,3.4047,0,0.069,64.2 };
570 AddMaterial(M97,"G4_ACETONE");
571
572//G4_ACETYLENE index=98
573 G4double M98[NDENSARRAY]={0.700,1.784,9.8419,1.6017,4.0074,0.12167,3.4277,0,0.080,58.2 };
574 AddMaterial(M98,"G4_ACETYLENE");
575
576//G4_ADENINE index=99
577 G4double M99[NDENSARRAY]={24.098,1.892,3.1724,0.1295,2.4219,0.20908,3.0271,0,0.052,71.4 };
578 AddMaterial(M99,"G4_ADENINE");
579
580//G4_ADIPOSE_TISSUE_ICRP index=100
581 G4double M100[NDENSARRAY]={20.655,1.987,3.2367,0.1827,2.6530,0.10278,3.4817,0,0.060,63.2 };
582 AddMaterial(M100,"G4_ADIPOSE_TISSUE_ICRP");
583
584//G4_AIR index=101
585 G4double M101[NDENSARRAY]={0.707,2.054,10.5961,1.7418,4.2759,0.10914,3.3994,0,0.090,85.7 };
586 AddMaterial(M101,"G4_AIR");
587
588//G4_ALANINE index=102
589 G4double M102[NDENSARRAY]={25.204,2.074,3.0965,0.1354,2.6336,0.11484,3.3526,0,0.056,71.9 };
590 AddMaterial(M102,"G4_ALANINE");
591
592//G4_ALUMINIM_OXIDE index=103
593 G4double M103[NDENSARRAY]={40.206,2.394,3.5682,0.0402,2.8665,0.08500,3.5458,0,0.031,145.2 };
594 AddMaterial(M103,"G4_ALUMINIM_OXIDE");
595
596//G4_AMBER index=104
597 G4double M104[NDENSARRAY]={22.450,1.946,3.0701,0.1335,2.5610,0.11934,3.4098,0,0.053,63.2 };
598 AddMaterial(M104,"G4_AMBER");
599
600//G4_AMMONIA index=105
601 G4double M105[NDENSARRAY]={0.635,1.814,9.8763,1.6822,4.1158,0.08315,3.6464,0,0.102,53.7 };
602 AddMaterial(M105,"G4_AMMONIA");
603
604//G4_ANILINE index=106
605 G4double M106[NDENSARRAY]={21.361,1.938,3.2622,0.1618,2.5805,0.13134,3.3434,0,0.052,66.2 };
606 AddMaterial(M106,"G4_ANILINE");
607
608//G4_ANTHRACENE index=107
609 G4double M107[NDENSARRAY]={23.704,1.954,3.1514,0.1146,2.5213,0.14677,3.2831,0,0.042,69.5 };
610 AddMaterial(M107,"G4_ANTHRACENE");
611
612//G4_B-100_BONE index=108
613 G4double M108[NDENSARRAY]={25.199,2.013,3.4528,0.1252,3.042,0.05268,3.7365,0,0.043,85.9 };
614 AddMaterial(M108,"G4_B-100_BONE");
615
616//G4_BAKELITE index=109
617 G4double M109[NDENSARRAY]={23.408,2.046,3.2582,0.1471,2.6055,0.12713,3.347,0,0.052,72.4 };
618 AddMaterial(M109,"G4_BAKELITE");
619
620//G4_BARIUM_FLUORIDE index=110
621 G4double M110[NDENSARRAY]={41.398,1.727,5.4122,-0.0098,3.3871,0.15991,2.8867,0,0.034,375.9 };
622 AddMaterial(M110,"G4_BARIUM_FLUORIDE");
623
624//G4_BARIUM_SULFATE index=111
625 G4double M111[NDENSARRAY]={40.805,1.893,4.8923,-0.0128,3.4069,0.11747,3.0427,0,0.03,285.7 };
626 AddMaterial(M111,"G4_BARIUM_SULFATE");
627
628//G4_BENZENE index=112
629 G4double M112[NDENSARRAY]={19.806,1.873,3.3269,0.171,2.5091,0.16519,3.2174,0,0.052,63.4 };
630 AddMaterial(M112,"G4_BENZENE");
631
632//G4_BERYLLIUM_OXIDE index=113
633 G4double M113[NDENSARRAY]={34.629,2.296,2.9801,0.0241,2.5846,0.10755,3.4927,0,0.031,93.2 };
634 AddMaterial(M113,"G4_BERYLLIUM_OXIDE");
635
636//G4_BGO index=114
637 G4double M114[NDENSARRAY]={49.904,2.121,5.7409,0.0456,3.7816,0.09569,3.0781,0,0.023,534.1 };
638 AddMaterial(M114,"G4_BGO");
639
640//G4_BLOOD_ICRP index=115
641 G4double M115[NDENSARRAY]={22.001,2.184,3.4581,0.2239,2.8017,0.08492,3.5406,0,0.088,75.2 };
642 AddMaterial(M115,"G4_BLOOD_ICRP");
643
644//G4_BONE_COMPACT_ICRU index=116
645 G4double M116[NDENSARRAY]={28.536,2.091,3.3390,0.0944,3.0201,0.05822,3.6419,0,0.042,91.9 };
646 AddMaterial(M116,"G4_BONE_COMPACT_ICRU");
647
648//G4_BONE_CORTICAL_ICRP index=117
649 G4double M117[NDENSARRAY]={28.298,2.118,3.6488,0.1161,3.0919,0.06198,3.5919,0,0.04,106.4 };
650 AddMaterial(M117,"G4_BONE_CORTICAL_ICRP");
651
652//G4_BORON_CARBIDE index=118
653 G4double M118[NDENSARRAY]={31.38,2.14,2.9859,0.0093,2.1006,0.37087,2.8076,0,0.022,84.7 };
654 AddMaterial(M118,"G4_BORON_CARBIDE");
655
656//G4_BORON_OXIDE index=119
657 G4double M119[NDENSARRAY]={27.107,2.446,3.6027,0.1843,2.7379,0.11548,3.3832,0,0.053,99.6 };
658 AddMaterial(M119,"G4_BORON_OXIDE");
659
660//G4_BRAIN_ICRP index=120
661 G4double M120[NDENSARRAY]={21.772,2.162,3.4279,0.2206,2.8021,0.08255,3.5585,0,0.086,73.3 };
662 AddMaterial(M120,"G4_BRAIN_ICRP");
663
664//G4_BUTANE index=121
665 G4double M121[NDENSARRAY]={1.101,1.727,8.5633,1.3788,3.7524,0.10852,3.4884,0,0.1,48.3 };
666 AddMaterial(M121,"G4_BUTANE");
667
668//G4_N-BUTYL_ALCOHOL index=122
669 G4double M122[NDENSARRAY]={19.52,1.942,3.2425,0.1937,2.6439,0.10081,3.5139,0,0.065,59.9 };
670 AddMaterial(M122,"G4_N-BUTYL_ALCOHOL");
671
672//G4_C-552 index=123
673 G4double M123[NDENSARRAY]={27.023,2.128,3.3338,0.151,2.7083,0.10492,3.4344,0,0.053,86.8 };
674 AddMaterial(M123,"G4_C-552");
675
676//G4_CADMIUM_TELLURIDE index=124
677 G4double M124[NDENSARRAY]={46.314,1.935,5.9096,0.0438,3.2836,0.2484,2.6665,0,0.057,539.3 };
678 AddMaterial(M124,"G4_CADMIUM_TELLURIDE");
679
680//G4_CADMIUM_TUNGSTATE index=125
681 G4double M125[NDENSARRAY]={52.954,2.289,5.3594,0.0123,3.5941,0.12861,2.915,0,0.027,468.3 };
682 AddMaterial(M125,"G4_CADMIUM_TUNGSTATE");
683
684//G4_CALCIUM_CARBONATE index=126
685 G4double M126[NDENSARRAY]={34.08,2.141,3.7738,0.0492,3.0549,0.08301,3.412,0,0.037,136.4 };
686 AddMaterial(M126,"G4_CALCIUM_CARBONATE");
687
688//G4_CALCIUM_FLUORIDE index=127
689 G4double M127[NDENSARRAY]={35.849,2.127,4.0653,0.0676,3.1683,0.06942,3.5263,0,0.044,166.0 };
690 AddMaterial(M127,"G4_CALCIUM_FLUORIDE");
691
692//G4_CALCIUM_OXIDE index=128
693 G4double M128[NDENSARRAY]={36.988,1.973,4.1209,-0.0172,3.0171,0.12128,3.1936,0,0.024,176.1 };
694 AddMaterial(M128,"G4_CALCIUM_OXIDE");
695
696//G4_CALCIUM_SULFATE index=129
697 G4double M129[NDENSARRAY]={35.038,2.179,3.9388,0.0587,3.1229,0.07708,3.4495,0,0.021,152.3 };
698 AddMaterial(M129,"G4_CALCIUM_SULFATE");
699
700//G4_CALCIUM_TUNGSTATE index=130
701 G4double M130[NDENSARRAY]={46.934,2.262,5.2603,0.0323,3.8932,0.0621,3.2649,0,0.021,395.0 };
702 AddMaterial(M130,"G4_CALCIUM_TUNGSTATE");
703
704//G4_CARBON_DIOXIDE index=131
705 G4double M131[NDENSARRAY]={0.874,2.118,10.1537,1.6294,4.1825,0.11768,3.3227,0,0.091,85.0 };
706 AddMaterial(M131,"G4_CARBON_DIOXIDE");
707
708//G4_CARBON_TETRACHLORIDE index=132
709 G4double M132[NDENSARRAY]={25.234,1.742,4.7712,0.1773,2.9165,0.19018,3.0116,0,0.041,166.3 };
710 AddMaterial(M132,"G4_CARBON_TETRACHLORIDE");
711
712//G4_CELLULOSE_CELLOPHANE index=133
713 G4double M133[NDENSARRAY]={25.008,2.17,3.2647,0.158,2.6778,0.11151,3.381,0,0.06,77.6 };
714 AddMaterial(M133,"G4_CELLULOSE_CELLOPHANE");
715
716//G4_CELLULOSE_BUTYRATE index=134
717 G4double M134[NDENSARRAY]={23.041,2.128,3.3497,0.1794,2.6809,0.11444,3.3738,0,0.056,74.6 };
718 AddMaterial(M134,"G4_CELLULOSE_BUTYRATE");
719
720//G4_CELLULOSE_NITRATE index=135
721 G4double M135[NDENSARRAY]={25.224,2.252,3.4762,0.1897,2.7253,0.11813,3.3237,0,0.063,87.0 };
722 AddMaterial(M135,"G4_CELLULOSE_NITRATE");
723
724//G4_CERIC_SULFATE index=136
725 G4double M136[NDENSARRAY]={21.743,2.205,3.5212,0.2363,2.8769,0.07666,3.5607,0,0.095,76.7 };
726 AddMaterial(M136,"G4_CERIC_SULFATE");
727
728//G4_CESIUM_FLUORIDE index=137
729 G4double M137[NDENSARRAY]={37.942,1.714,5.9046,0.0084,3.3374,0.22052,2.728,0,0.044,440.7 };
730 AddMaterial(M137,"G4_CESIUM_FLUORIDE");
731
732//G4_CESIUM_IODIDE index=138
733 G4double M138[NDENSARRAY]={39.455,1.672,6.2807,0.0395,3.3353,0.25381,2.6657,0,0.067,553.1 };
734 AddMaterial(M138,"G4_CESIUM_IODIDE");
735
736//G4_CHLOROBENZENE index=139
737 G4double M139[NDENSARRAY]={21.752,1.889,3.8201,0.1714,2.9272,0.09856,3.3797,0,0.031,89.1 };
738 AddMaterial(M139,"G4_CHLOROBENZENE");
739
740//G4_CHLOROFORM index=140
741 G4double M140[NDENSARRAY]={24.462,1.734,4.7055,0.1786,2.9581,0.16959,3.0627,0,0.038,156. };
742 AddMaterial(M140,"G4_CHLOROFORM");
743
744//G4_CONCRETE index=141
745 G4double M141[NDENSARRAY]={30.986,2.322,3.9464,0.1301,3.0466,0.07515,3.5467,0,0.024,135.2 };
746 AddMaterial(M141,"G4_CONCRETE");
747
748//G4_CYCLOHEXANE index=142
749 G4double M142[NDENSARRAY]={19.207,1.861,3.1544,0.1728,2.5549,0.12035,3.4278,0,0.057,56.4 };
750 AddMaterial(M142,"G4_CYCLOHEXANE");
751
752//G4_1,2-DICHLOROBENZENE index=143
753 G4double M143[NDENSARRAY]={23.354,1.862,4.0348,0.1587,2.8276,0.1601,3.0836,0,0.029,106.5 };
754 AddMaterial(M143,"G4_1,2-DICHLOROBENZENE");
755
756//G4_DICHLORODIETHYL_ETHER index=144
757 G4double M144[NDENSARRAY]={22.894,1.903,4.0135,0.1773,3.1586,0.06799,3.525,0,0.026,103.3 };
758 AddMaterial(M144,"G4_DICHLORODIETHYL_ETHER");
759
760//G4_1,2-DICHLOROETHANE index=145
761 G4double M145[NDENSARRAY]={22.764,1.618,4.1849,0.1375,2.9529,0.13383,3.1675,0,0.03,111.9 };
762 AddMaterial(M145,"G4_1,2-DICHLOROETHANE");
763
764//G4_DIETHYL_ETHER index=146
765 G4double M146[NDENSARRAY]={18.326,1.951,3.3721,0.2231,2.6745,0.1055,3.4586,0,0.07,60.0 };
766 AddMaterial(M146,"G4_DIETHYL_ETHER");
767
768//G4_N,N-DIMETHYL_FORMAMIDE index=147
769 G4double M147[NDENSARRAY]={20.763,2.005,3.3311,0.1977,2.6686,0.1147,3.371,0,0.065,66.6 };
770 AddMaterial(M147,"G4_N,N-DIMETHYL_FORMAMIDE");
771
772//G4_DIMETHYL_SULFOXIDE index=148
773 G4double M148[NDENSARRAY]={22.173,2.075,3.9844,0.2021,3.1263,0.06619,3.5708,0,0.03,98.6 };
774 AddMaterial(M148,"G4_DIMETHYL_SULFOXIDE");
775
776//G4_ETHANE index=149
777 G4double M149[NDENSARRAY]={0.789,1.69,9.1043,1.5107,3.8743,0.09627,3.6095,0,0.097,45.4 };
778 AddMaterial(M149,"G4_ETHANE");
779
780//G4_ETHYL_ALCOHOL index=150
781 G4double M150[NDENSARRAY]={19.232,2.013,3.3699,0.2218,2.7052,0.09878,3.4834,0,0.071,62.9 };
782 AddMaterial(M150,"G4_ETHYL_ALCOHOL");
783
784//G4_ETHYL_CELLULOSE index=151
785 G4double M151[NDENSARRAY]={22.594,2.065,3.2415,0.1683,2.6527,0.11077,3.4098,0,0.057,69.3 };
786 AddMaterial(M151,"G4_ETHYL_CELLULOSE");
787
788//G4_ETHYLENE index=152
789 G4double M152[NDENSARRAY]={0.746,1.733,9.438,1.5528,3.9327,0.10636,3.5387,0,0.085,50.7 };
790 AddMaterial(M152,"G4_ETHYLENE");
791
792//G4_EYE_LENS_ICRP index=153
793 G4double M153[NDENSARRAY]={22.388,2.154,3.372,0.207,2.7446,0.0969,3.455,0,0.077,73.3 };
794 AddMaterial(M153,"G4_EYE_LENS_ICRP");
795
796//G4_FERRIC_OXIDE index=154
797 G4double M154[NDENSARRAY]={45.331,2.747,4.2245,-0.0074,3.2573,0.10478,3.1313,0,0.026,227.3 };
798 AddMaterial(M154,"G4_FERRIC_OXIDE");
799
800//G4_FERROBORIDE index=155
801 G4double M155[NDENSARRAY]={52.546,2.726,4.2057,-0.0988,3.1749,0.12911,3.024,0,0.022,261.0 };
802 AddMaterial(M155,"G4_FERROBORIDE");
803
804//G4_FERROUS_OXIDE index=156
805 G4double M156[NDENSARRAY]={47.327,2.769,4.3175,-0.0279,3.2002,0.12959,3.0168,0,0.022,248.6 };
806 AddMaterial(M156,"G4_FERROUS_OXIDE");
807
808//G4_FERROUS_SULFATE index=157
809 G4double M157[NDENSARRAY]={21.69,2.208,3.5183,0.2378,2.8254,0.08759,3.4923,0,0.096,76.4 };
810 AddMaterial(M157,"G4_FERROUS_SULFATE");
811
812//G4_FREON-12 index=158
813 G4double M158[NDENSARRAY]={21.121,1.974,4.8251,0.3035,3.2659,0.07978,3.4626,0,0.025,143.0 };
814 AddMaterial(M158,"G4_FREON-12");
815
816//G4_FREON-12B2 index=159
817 G4double M159[NDENSARRAY]={25.877,2.195,5.7976,0.3406,3.7956,0.05144,3.5565,0,0.021,284.9 };
818 AddMaterial(M159,"G4_FREON-12B2");
819
820//G4_FREON-13 index=160
821 G4double M160[NDENSARRAY]={19.432,2.116,4.7483,0.3659,3.2337,0.07238,3.5551,0,0.05,126.6 };
822 AddMaterial(M160,"G4_FREON-13");
823
824//G4_FREON-13B1 index=161
825 G4double M161[NDENSARRAY]={23.849,2.233,5.3555,0.3522,3.7554,0.03925,3.7194,0,0.036,210.5 };
826 AddMaterial(M161,"G4_FREON-13B1");
827
828//G4_FREON-13I1 index=162
829 G4double M162[NDENSARRAY]={25.615,1.924,5.8774,0.2847,3.728,0.09112,3.1658,0,0.025,293.5 };
830 AddMaterial(M162,"G4_FREON-13I1");
831
832//G4_GADOLINIUM_OXYSULFIDE index=163
833 G4double M163[NDENSARRAY]={51.099,2.179,5.5347,-0.1774,3.4045,0.22161,2.63,0,0.056,493.3 };
834 AddMaterial(M163,"G4_GADOLINIUM_OXYSULFIDE");
835
836//G4_GALLIUM_ARSENIDE index=164
837 G4double M164[NDENSARRAY]={44.17,2.652,5.3299,0.1764,3.642,0.07152,3.3356,0,0.027,384.9 };
838 AddMaterial(M164,"G4_GALLIUM_ARSENIDE");
839
840//G4_GEL_PHOTO_EMULSION index=165
841 G4double M165[NDENSARRAY]={24.058,2.156,3.2687,0.1709,2.7058,0.10102,3.4418,0,0.06,74.8 };
842 AddMaterial(M165,"G4_GEL_PHOTO_EMULSION");
843
844//G4_Pyrex_Glass index=166
845 G4double M166[NDENSARRAY]={30.339,2.369,3.9708,0.1479,2.9933,0.0827,3.5224,0,0.022,134.0 };
846 AddMaterial(M166,"G4_Pyrex_Glass");
847
848//G4_GLASS_LEAD index=167
849 G4double M167[NDENSARRAY]={46.631,2.085,5.8476,0.0614,3.8146,0.09544,3.074,0,0.025,526.4 };
850 AddMaterial(M167,"G4_GLASS_LEAD");
851
852//G4_GLASS_PLATE index=168
853 G4double M168[NDENSARRAY]={31.481,2.329,4.0602,0.1237,3.0649,0.07678,3.5381,0,0.025,145.4 };
854 AddMaterial(M168,"G4_GLASS_PLATE");
855
856//G4_GLUCOSE index=169
857 G4double M169[NDENSARRAY]={26.153,2.174,3.1649,0.1411,2.67,0.10783,3.3946,0,0.061,77.2 };
858 AddMaterial(M169,"G4_GLUCOSE");
859
860//G4_GLUTAMINE index=170
861 G4double M170[NDENSARRAY]={25.437,2.077,3.1167,0.1347,2.6301,0.11931,3.3254,0,0.055,73.3 };
862 AddMaterial(M170,"G4_GLUTAMINE");
863
864//G4_GLYCEROL index=171
865 G4double M171[NDENSARRAY]={23.846,2.12,3.2267,0.1653,2.6862,0.10168,3.4481,0,0.067,72.6 };
866 AddMaterial(M171,"G4_GLYCEROL");
867
868//G4_GUANINE index=172
869 G4double M172[NDENSARRAY]={26.022,1.97,3.1171,0.1163,2.4296,0.2053,3.0186,0,0.069,75.0 };
870 AddMaterial(M172,"G4_GUANINE");
871
872//G4_GYPSUM index=173
873 G4double M173[NDENSARRAY]={31.379,2.187,3.8382,0.0995,3.1206,0.06949,3.5134,0,0.038,129.7 };
874 AddMaterial(M173,"G4_GYPSUM");
875
876//G4_N-HEPTANE index=174
877 G4double M174[NDENSARRAY]={18.128,1.848,3.1978,0.1928,2.5706,0.11255,3.4885,0,0.059,54.4 };
878 AddMaterial(M174,"G4_N-HEPTANE");
879
880//G4_N-HEXANE index=175
881 G4double M175[NDENSARRAY]={17.836,1.843,3.2156,0.1984,2.5757,0.11085,3.5027,0,0.061,54.0 };
882 AddMaterial(M175,"G4_N-HEXANE");
883
884//G4_KAPTON index=176
885 G4double M176[NDENSARRAY]={24.586,2.109,3.3497,0.1509,2.5631,0.15972,3.1921,0,0.05,79.6 };
886 AddMaterial(M176,"G4_KAPTON");
887
888//G4_LANTHANUM_OXYBROMIDE index=177
889 G4double M177[NDENSARRAY]={47.125,1.831,5.4666,-0.035,3.3288,0.1783,2.8457,0,0.04,439.7 };
890 AddMaterial(M177,"G4_LANTHANUM_OXYBROMIDE");
891
892//G4_LANTHANUM_OXYSULFIDE index=178
893 G4double M178[NDENSARRAY]={45.394,1.681,5.6151,-0.0934,3.2741,0.22579,2.7075,0,0.065,456.2 };
894 AddMaterial(M178,"G4_LANTHANUM_OXYSULFIDE");
895
896//G4_LEAD_OXIDE index=179
897 G4double M179[NDENSARRAY]={56.488,2.012,6.2162,0.0356,3.5456,0.19645,2.7299,0,0.039,766.7 };
898 AddMaterial(M179,"G4_LEAD_OXIDE");
899
900//G4_LITHIUM_AMIDE index=180
901 G4double M180[NDENSARRAY]={22.609,1.74,2.7961,0.0198,2.5152,0.0874,3.7534,0,0.05,55.5 };
902 AddMaterial(M180,"G4_LITHIUM_AMIDE");
903
904//G4_LITHIUM_CARBONATE index=181
905 G4double M181[NDENSARRAY]={29.217,2.246,3.2029,0.0551,2.6598,0.09936,3.5417,0,0.062,87.9 };
906 AddMaterial(M181,"G4_LITHIUM_CARBONATE");
907
908//G4_LITHIUM_FLUORIDE index=182
909 G4double M182[NDENSARRAY]={31.815,2.197,3.1667,0.0171,2.7049,0.07593,3.7478,0,0.084,94.0 };
910 AddMaterial(M182,"G4_LITHIUM_FLUORIDE");
911
912//G4_LITHIUM_HYDRIDE index=183
913 G4double M183[NDENSARRAY]={18.51,1.482,2.358,-0.0988,1.4515,0.90567,2.5849,0,0.035,36.5 };
914 AddMaterial(M183,"G4_LITHIUM_HYDRIDE");
915
916//G4_LITHIUM_IODIDE index=184
917 G4double M184[NDENSARRAY]={34.841,1.706,6.2671,0.0892,3.3702,0.23274,2.7146,0,0.043,485.1 };
918 AddMaterial(M184,"G4_LITHIUM_IODIDE");
919
920//G4_LITHIUM_OXIDE index=185
921 G4double M185[NDENSARRAY]={27.984,2.039,2.934,-0.0511,2.5874,0.08035,3.7878,0,0.043,73.6 };
922 AddMaterial(M185,"G4_LITHIUM_OXIDE");
923
924//G4_LITHIUM_TETRABORATE index=186
925 G4double M186[NDENSARRAY]={31.343,2.36,3.2093,0.0737,2.6502,0.11075,3.4389,0,0.048,94.6 };
926 AddMaterial(M186,"G4_LITHIUM_TETRABORATE");
927
928//G4_LUNG_ICRP index=187
929 G4double M187[NDENSARRAY]={21.891,2.184,3.4708,0.2261,2.8001,0.08588,3.5353,0,0.089,75.3 };
930 AddMaterial(M187,"G4_LUNG_ICRP");
931
932//G4_M3_WAX index=188
933 G4double M188[NDENSARRAY]={22,1.975,3.254,0.1523,2.7529,0.07864,3.6412,0,0.044,67.9 };
934 AddMaterial(M188,"G4_M3_WAX");
935
936//G4_MAGNESIUM_CARBONATE index=189
937 G4double M189[NDENSARRAY]={34.979,2.388,3.4319,0.086,2.7997,0.09219,3.5003,0,0.045,118.0 };
938 AddMaterial(M189,"G4_MAGNESIUM_CARBONATE");
939
940//G4_MAGNESIUM_FLUORIDE index=190
941 G4double M190[NDENSARRAY]={34.634,2.33,3.7105,0.1369,2.863,0.07934,3.6485,0,0.085,134.3 };
942 AddMaterial(M190,"G4_MAGNESIUM_FLUORIDE");
943
944//G4_MAGNESIUM_OXIDE index=191
945 G4double M191[NDENSARRAY]={38.407,2.412,3.6404,0.0575,2.858,0.08313,3.5968,0,0.055,143.8 };
946 AddMaterial(M191,"G4_MAGNESIUM_OXIDE");
947
948//G4_MAGNESIUM_TETRABORATE index=192
949 G4double M192[NDENSARRAY]={32.089,2.43,3.4328,0.1147,2.7635,0.09703,3.4893,0,0.044,108.3 };
950 AddMaterial(M192,"G4_MAGNESIUM_TETRABORATE");
951
952//G4_MERCURIC_IODIDE index=193
953 G4double M193[NDENSARRAY]={46.494,1.892,6.3787,0.104,3.4728,0.21513,2.7264,0,0.047,684.5 };
954 AddMaterial(M193,"G4_MERCURIC_IODIDE");
955
956//G4_METHANE index=194
957 G4double M194[NDENSARRAY]={0.588,1.662,9.5243,1.6263,3.9716,0.09253,3.6257,0,0.112,41.7 };
958 AddMaterial(M194,"G4_METHANE");
959
960//G4_METHANOL index=195
961 G4double M195[NDENSARRAY]={19.214,2.125,3.516,0.2529,2.7639,0.0897,3.5477,0,0.08,67.6 };
962 AddMaterial(M195,"G4_METHANOL");
963
964//G4_MIX_D_WAX index=196
965 G4double M196[NDENSARRAY]={21.547,1.905,3.078,0.1371,2.7145,0.0749,3.6823,0,0.047,60.9 };
966 AddMaterial(M196,"G4_MIX_D_WAX");
967
968//G4_MS20_TISSUE index=197
969 G4double M197[NDENSARRAY]={21.153,2.07,3.5341,0.1997,2.8033,0.08294,3.6061,0,0.053,75.1 };
970 AddMaterial(M197,"G4_MS20_TISSUE");
971
972//G4_MUSCLE_SCELETAL_ICRP index=198
973 G4double M198[NDENSARRAY]={21.781,2.185,3.4809,0.2282,2.7999,0.08636,3.533,0,0.089,75.3 };
974 AddMaterial(M198,"G4_MUSCLE_SCELETAL_ICRP");
975
976//G4_MUSCLE_STRIATED_ICRU index=199
977 G4double M199[NDENSARRAY]={21.795,2.174,3.4636,0.2249,2.8032,0.08507,3.5383,0,0.086,74.7 };
978 AddMaterial(M199,"G4_MUSCLE_STRIATED_ICRU");
979
980//G4_MUSCLE_WITH_SUCROSE index=200
981 G4double M200[NDENSARRAY]={22.48,2.169,3.391,0.2098,2.755,0.09481,3.4699,0,0.08,74.3 };
982 AddMaterial(M200,"G4_MUSCLE_WITH_SUCROSE");
983
984//G4_MUSCLE_WITHOUT_SUCROSE index=201
985 G4double M201[NDENSARRAY]={22.109,2.173,3.4216,0.2187,2.768,0.09143,3.4982,0,0.056,74.2 };
986 AddMaterial(M201,"G4_MUSCLE_WITHOUT_SUCROSE");
987
988//G4_NAPHTALENE index=202
989 G4double M202[NDENSARRAY]={22.459,1.956,3.2274,0.1374,2.5429,0.14766,3.2654,0,0.051,68.4 };
990 AddMaterial(M202,"G4_NAPHTALENE");
991
992//G4_NITROBENZENE index=203
993 G4double M203[NDENSARRAY]={22.747,2.065,3.4073,0.1777,2.663,0.12727,3.3091,0,0.051,75.8 };
994 AddMaterial(M203,"G4_NITROBENZENE");
995
996//G4_NITROUS_OXIDE index=204
997 G4double M204[NDENSARRAY]={0.872,2.059,10.1575,1.6477,4.1565,0.11992,3.3318,0,0.086,84.9 };
998 AddMaterial(M204,"G4_NITROUS_OXIDE");
999
1000//G4_NYLON-8062 index=205
1001 G4double M205[NDENSARRAY]={22.221,1.967,3.125,0.1503,2.6004,0.11513,3.4044,0,0.054,64.3 };
1002 AddMaterial(M205,"G4_NYLON-8062");
1003
1004//G4_NYLON-6/6 index=206
1005 G4double M206[NDENSARRAY]={22.774,1.931,3.0634,0.1336,2.5834,0.11818,3.3826,0,0.051,63.9 };
1006 AddMaterial(M206,"G4_NYLON-6-6");
1007
1008//G4_NYLON-6/10 index=207
1009 G4double M207[NDENSARRAY]={22.866,1.942,3.0333,0.1304,2.5681,0.11852,3.3912,0,0.05,63.2 };
1010 AddMaterial(M207,"G4_NYLON-6-10");
1011
1012//G4_NYLON-11_RILSAN index=208
1013 G4double M208[NDENSARRAY]={25.661,1.902,2.7514,0.0678,2.4281,0.14868,3.2576,0,0.044,61.6 };
1014 AddMaterial(M208,"G4_NYLON-11_RILSAN");
1015
1016//G4_OCTANE index=209
1017 G4double M209[NDENSARRAY]={18.36,1.851,3.1834,0.1882,2.5664,0.11387,3.4776,0,0.057,54.7 };
1018 AddMaterial(M209,"G4_OCTANE");
1019
1020//G4_PARAFFIN index=210
1021 G4double M210[NDENSARRAY]={21.031,1.844,2.9551,0.1289,2.5084,0.12087,3.4288,0,0.052,55.9 };
1022 AddMaterial(M210,"G4_PARAFFIN");
1023
1024//G4_N-PENTANE index=211
1025 G4double M211[NDENSARRAY]={17.398,1.842,3.2504,0.2086,2.5855,0.10809,3.5265,0,0.064,53.6 };
1026 AddMaterial(M211,"G4_N-PENTANE");
1027
1028//G4_PHOTO_EMULSION index=212
1029 G4double M212[NDENSARRAY]={37.946,2.264,5.3319,0.1009,3.4866,0.12399,3.0094,0,0.028,331.0 };
1030 AddMaterial(M212,"G4_PHOTO_EMULSION");
1031
1032//G4_PLASTIC_SC_VINYLTOLUENE index=213
1033 G4double M213[NDENSARRAY]={21.54,1.929,3.1997,0.1464,2.4855,0.16101,3.2393,0,0.05,64.7 };
1034 AddMaterial(M213,"G4_PLASTIC_SC_VINYLTOLUENE");
1035
1036//G4_PLUTONIUM_DIOXIDE index=214
1037 G4double M214[NDENSARRAY]={62.143,1.846,5.9719,-0.2311,3.5554,0.20594,2.6522,0,0.111,746.5 };
1038 AddMaterial(M214,"G4_PLUTONIUM_DIOXIDE");
1039
1040//G4_POLYACRYLONITRILE index=215
1041 G4double M215[NDENSARRAY]={22.642,1.955,3.2459,0.1504,2.5159,0.16275,3.1975,0,0.05,69.6 };
1042 AddMaterial(M215,"G4_POLYACRYLONITRILE");
1043
1044//G4_POLYCARBONATE index=216
1045 G4double M216[NDENSARRAY]={22.915,2.06,3.3201,0.1606,2.6225,0.1286,3.3288,0,0.049,73.1 };
1046 AddMaterial(M216,"G4_POLYCARBONATE");
1047
1048//G4_POLYCHLOROSTYRENE index=217
1049 G4double M217[NDENSARRAY]={23.81,1.902,3.4659,0.1238,2.9241,0.0753,3.5441,0,0.029,81.7 };
1050 AddMaterial(M217,"G4_POLYCHLOROSTYRENE");
1051
1052//G4_POLYETHYLENE index=218
1053 G4double M218[NDENSARRAY]={21.099,1.882,3.0016,0.137,2.5177,0.12108,3.4292,0,0.051,57.4 };
1054 AddMaterial(M218,"G4_POLYETHYLENE");
1055
1056//G4_MYLAR index=219
1057 G4double M219[NDENSARRAY]={24.595,2.144,3.3262,0.1562,2.6507,0.12679,3.3076,0,0.052,78.7 };
1058 AddMaterial(M219,"G4_MYLAR");
1059
1060//G4_LUCITE index=220
1061 G4double M220[NDENSARRAY]={23.086,2.173,3.3297,0.1824,2.6681,0.11433,3.3836,0,0.056,74.0 };
1062 AddMaterial(M220,"G4_LUCITE");
1063
1064//G4_POLYOXOMETHYLENE index=221
1065 G4double M221[NDENSARRAY]={25.11,2.175,3.2514,0.1584,2.6838,0.10808,3.4002,0,0.063,77.4 };
1066 AddMaterial(M221,"G4_POLYOXOMETHYLENE");
1067
1068//G4_POLYPROPYLENE index=222
1069 G4double M222[NDENSARRAY]={20.457,1.884,3.1252,0.1534,2.4822,0.15045,3.2855,0,0.055,59.2 };
1070 AddMaterial(M222,"G4_POLYPROPYLENE");
1071
1072//G4_POLYSTYRENE index=223
1073 G4double M223[NDENSARRAY]={21.754,2.027,3.2999,0.1647,2.5031,0.16454,3.2224,0,0.051,68.7 };
1074 AddMaterial(M223,"G4_POLYSTYRENE");
1075
1076//G4_TEFLON index=224
1077 G4double M224[NDENSARRAY]={29.609,2.142,3.4161,0.1648,2.7404,0.10606,3.4046,0,0.073,99.1 };
1078 AddMaterial(M224,"G4_TEFLON");
1079
1080//G4_POLYTRIFLUOROCHLOROETHYLENE index=225
1081 G4double M225[NDENSARRAY]={28.955,2.094,3.8551,0.1714,3.0265,0.07727,3.5085,0,0.035,120.7 };
1082 AddMaterial(M225,"G4_POLYTRIFLUOROCHLOROETHYLENE");
1083
1084//G4_POLYVINYL_ACETATE index=226
1085 G4double M226[NDENSARRAY]={22.978,2.116,3.3309,0.1769,2.6747,0.11442,3.3762,0,0.055,73.7 };
1086 AddMaterial(M226,"G4_POLYVINYL_ACETATE");
1087
1088//G4_PLOYVINYL_ALCOHOL index=227
1089 G4double M227[NDENSARRAY]={24.251,2.071,3.1115,0.1401,2.6315,0.11178,3.3893,0,0.056,69.7 };
1090 AddMaterial(M227,"G4_PLOYVINYL_ALCOHOL");
1091
1092//G4_POLYVINYL_BUTYRAL index=228
1093 G4double M228[NDENSARRAY]={22.521,2.021,3.1865,0.1555,2.6186,0.11544,3.3983,0,0.054,67.2 };
1094 AddMaterial(M228,"G4_POLYVINYL_BUTYRAL");
1095
1096//G4_POLYVINYL_CHLORIDE index=229
1097 G4double M229[NDENSARRAY]={23.51,1.84,4.0532,0.1559,2.9415,0.12438,3.2104,0,0.027,108.2 };
1098 AddMaterial(M229,"G4_POLYVINYL_CHLORIDE");
1099
1100//G4_POLYVINYLIDENE_CHLORIDE index=230
1101 G4double M230[NDENSARRAY]={26.437,1.814,4.2506,0.1314,2.9009,0.15466,3.102,0,0.034,134.3 };
1102 AddMaterial(M230,"G4_POLYVINYLIDENE_CHLORIDE");
1103
1104//G4_POLYVINYLIDENE_FLUORIDE index=231
1105 G4double M231[NDENSARRAY]={27.024,2.16,3.3793,0.1717,2.7375,0.10316,3.42,0,0.067,88.8 };
1106 AddMaterial(M231,"G4_POLYVINYLIDENE_FLUORIDE");
1107
1108//G4_POLYVINYL_PYRROLIDONE index=232
1109 G4double M232[NDENSARRAY]={23.671,1.989,3.1017,0.1324,2.5867,0.12504,3.3326,0,0.031,67.7 };
1110 AddMaterial(M232,"G4_POLYVINYL_PYRROLIDONE");
1111
1112//G4_POTASSIUM_IODIDE index=233
1113 G4double M233[NDENSARRAY]={33.575,1.784,6.1088,0.1044,3.3442,0.22053,2.7558,0,0.042,431.9 };
1114 AddMaterial(M233,"G4_POTASSIUM_IODIDE");
1115
1116//G4_POTASSIUM_OXIDE index=234
1117 G4double M234[NDENSARRAY]={30.672,2.065,4.6463,0.048,3.011,0.16789,3.0121,0,0.027,189.9 };
1118 AddMaterial(M234,"G4_POTASSIUM_OXIDE");
1119
1120//G4_PROPANE index=235
1121 G4double M235[NDENSARRAY]={0.959,1.708,8.7878,1.4326,3.7998,0.09916,3.592,0,0.093,47.1 };
1122 AddMaterial(M235,"G4_PROPANE");
1123
1124//G4_lPROPANE index=236
1125 G4double M236[NDENSARRAY]={14.509,1.844,3.5529,0.2861,2.6568,0.10329,3.562,0,0.068,52.0 };
1126 AddMaterial(M236,"G4_lPROPANE");
1127
1128//G4_N-PROPYL_ALCOHOL index=237
1129 G4double M237[NDENSARRAY]={19.429,1.972,3.2915,0.2046,2.6681,0.09644,3.5415,0,0.07,61.1 };
1130 AddMaterial(M237,"N-PROPYL_ALCOHOL");
1131
1132//G4_PYRIDINE index=238
1133 G4double M238[NDENSARRAY]={20.807,1.895,3.3148,0.167,2.5245,0.16399,3.1977,0,0.051,66.2 };
1134 AddMaterial(M238,"G4_PYRIDINE");
1135
1136//G4_RUBBER_BUTYL index=239
1137 G4double M239[NDENSARRAY]={20.873,1.852,2.9915,0.1347,2.5154,0.12108,3.4296,0,0.051,56.5 };
1138 AddMaterial(M239,"G4_RUBBER_BUTYL");
1139
1140//G4_RUBBER_NATURAL index=240
1141 G4double M240[NDENSARRAY]={20.644,1.889,3.1272,0.1512,2.4815,0.15058,3.2879,0,0.053,59.8 };
1142 AddMaterial(M240,"G4_RUBBER_NATURAL");
1143
1144//G4_RUBBER_NEOPRENE index=241
1145 G4double M241[NDENSARRAY]={23.036,1.874,3.7911,0.1501,2.9461,0.09763,3.3632,0,0.026,93.0 };
1146 AddMaterial(M241,"G4_RUBBER_NEOPRENE");
1147
1148//G4_SILICON_DIOXIDE index=242
1149 G4double M242[NDENSARRAY]={31.014,2.335,4.0029,0.1385,3.0025,0.08408,3.5064,0,0.018,139.2 };
1150 AddMaterial(M242,"G4_SILICON_DIOXIDE");
1151
1152//G4_SILVER_BROMIDE index=243
1153 G4double M243[NDENSARRAY]={48.448,2.271,5.6139,0.0352,3.2109,0.24582,2.682,0,0.043,486.6 };
1154 AddMaterial(M243,"G4_SILVER_BROMIDE");
1155
1156//G4_SILVER_CHLORIDE index=244
1157 G4double M244[NDENSARRAY]={45.405,2.096,5.3437,-0.0139,3.2022,0.22968,2.7041,0,0.062,398.4 };
1158 AddMaterial(M244,"G4_SILVER_CHLORIDE");
1159
1160//G4_SILVER_HALIDES index=245
1161 G4double M245[NDENSARRAY]={48.433,2.27,5.6166,0.0353,3.2117,0.24593,2.6814,0,0.043,487.1 };
1162 AddMaterial(M245,"G4_SILVER_HALIDES");
1163
1164//G4_SILVER_IODIDE index=246
1165 G4double M246[NDENSARRAY]={46.105,1.945,5.9342,0.0148,3.2908,0.25059,2.6572,0,0.071,543.5 };
1166 AddMaterial(M246,"G4_SILVER_IODIDE");
1167
1168//G4_SKIN_ICRP index=247
1169 G4double M247[NDENSARRAY]={22.4,2.14,3.3546,0.2019,2.7526,0.09459,3.4643,0,0.076,72.7 };
1170 AddMaterial(M247,"G4_SKIN_ICRP");
1171
1172//G4_SODIUM_CARBONATE index=248
1173 G4double M248[NDENSARRAY]={32.117,2.557,3.7178,0.1287,2.8591,0.08715,3.5638,0,0.074,125.0 };
1174 AddMaterial(M248,"G4_SODIUM_CARBONATE");
1175
1176//G4_SODIUM_IODIDE index=249
1177 G4double M249[NDENSARRAY]={36.057,1.857,6.0572,0.1203,3.592,0.12516,3.0398,0,0.031,452.0 };
1178 AddMaterial(M249,"G4_SODIUM_IODIDE");
1179
1180//G4_SODIUM_MONOXIDE index=250
1181 G4double M250[NDENSARRAY]={30.205,2.689,4.1892,0.1652,2.9793,0.07501,3.6943,0,0.097,148.8 };
1182 AddMaterial(M250,"G4_SODIUM_MONOXIDE");
1183
1184//G4_SODIUM_NITRATE index=251
1185 G4double M251[NDENSARRAY]={30.459,2.456,3.6502,0.1534,2.8221,0.09391,3.5097,0,0.081,114.6 };
1186 AddMaterial(M251,"G4_SODIUM_NITRATE");
1187
1188//G4_STILBENE index=252
1189 G4double M252[NDENSARRAY]={20.719,1.963,3.368,0.1734,2.5142,0.16659,3.2168,0,0.052,67.7 };
1190 AddMaterial(M252,"G4_STILBENE");
1191
1192//G4_SUCROSE index=253
1193 G4double M253[NDENSARRAY]={26.416,2.167,3.1526,0.1341,2.6558,0.11301,3.363,0,0.057,77.5 };
1194 AddMaterial(M253,"G4_SUCROSE");
1195
1196//G4_TERPHENYL index=254
1197 G4double M254[NDENSARRAY]={23.116,1.976,3.2639,0.1322,2.5429,0.14964,3.2685,0,0.043,71.7 };
1198 AddMaterial(M254,"G4_TERPHENYL");
1199
1200//G4_TESTES_ICRP index=255
1201 G4double M255[NDENSARRAY]={21.815,2.185,3.4698,0.2274,2.7988,0.08533,3.5428,0,0.091,75.0 };
1202 AddMaterial(M255,"G4_TESTES_ICRP");
1203
1204//G4_TETRACHLOROETHYLENE index=256
1205 G4double M256[NDENSARRAY]={25.513,1.79,4.6619,0.1713,2.9083,0.18595,3.0156,0,0.038,159.2 };
1206 AddMaterial(M256,"G4_TETRACHLOROETHYLENE");
1207
1208//G4_THALIUM_CHLORIDE index=257
1209 G4double M257[NDENSARRAY]={48.749,1.997,6.3009,0.0705,3.5716,0.18599,2.769,0,0.04,690.3 };
1210 AddMaterial(M257,"G4_THALIUM_CHLORIDE");
1211
1212//G4_TISSUE_SOFT_ICRP index=258
1213 G4double M258[NDENSARRAY]={21.394,2.144,3.4354,0.2211,2.7799,0.08926,3.511,0,0.077,72.3 };
1214 AddMaterial(M258,"G4_TISSUE_SOFT_ICRP");
1215
1216//G4_TISSUE_SOFT_ICRU-4 index=259
1217 G4double M259[NDENSARRAY]={21.366,2.192,3.5087,0.2377,2.7908,0.09629,3.4371,0,0.092,74.9 };
1218 AddMaterial(M259,"G4_TISSUE_SOFT_ICRU-4");
1219
1220//G4_TISSUE-METHANE index=260
1221 G4double M260[NDENSARRAY]={0.697,1.89,9.95,1.6442,4.1399,0.09946,3.4708,0,0.098,61.2 };
1222 AddMaterial(M260,"G4_TISSUE-METHANE");
1223
1224//G4_TISSUE-PROPANE index=261
1225 G4double M261[NDENSARRAY]={0.913,1.856,9.3529,1.5139,3.9916,0.09802,3.5159,0,0.092,59.5 };
1226 AddMaterial(M261,"G4_TISSUE-PROPANE");
1227
1228//G4_TITANIUM_DIOXIDE index=262
1229 G4double M262[NDENSARRAY]={41.022,2.307,3.9522,-0.0119,3.1647,0.08569,3.3267,0,0.027,179.5 };
1230 AddMaterial(M262,"G4_TITANIUM_DIOXIDE");
1231
1232//G4_TOLUENE index=263
1233 G4double M263[NDENSARRAY]={19.764,1.88,3.3026,0.1722,2.5728,0.13284,3.3558,0,0.052,62.5 };
1234 AddMaterial(M263,"G4_TOLUENE");
1235
1236//G4_TRICHLOROETHYLENE index=264
1237 G4double M264[NDENSARRAY]={24.301,1.789,4.6148,0.1803,2.914,0.18272,3.0137,0,0.036,148.1 };
1238 AddMaterial(M264,"G4_TRICHLOROETHYLENE");
1239
1240//G4_TRIETHYL_PHOSPHATE index=265
1241 G4double M265[NDENSARRAY]={21.863,2.1,3.6242,0.2054,2.9428,0.06922,3.6302,0,0.049,81.2 };
1242 AddMaterial(M265,"G4_TRIETHYL_PHOSPHATE");
1243
1244//G4_TUNGSTEN_HEXAFLUORIDE index=266
1245 G4double M266[NDENSARRAY]={29.265,2.325,5.9881,0.302,4.2602,0.03658,3.5134,0,0.055,354.4 };
1246 AddMaterial(M266,"G4_TUNGSTEN_HEXAFLUORIDE");
1247
1248//G4_URANIUM_DICARBIDE index=267
1249 G4double M267[NDENSARRAY]={60.969,1.703,6.0247,-0.2191,3.5208,0.2112,2.6577,0,0.12,752.0 };
1250 AddMaterial(M267,"G4_URANIUM_DICARBIDE");
1251
1252//G4_URANIUM_MONOCARBIDE index=268
1253 G4double M268[NDENSARRAY]={66.602,1.68,6.121,-0.2524,3.4941,0.22972,2.6169,0,0.132,862.0 };
1254 AddMaterial(M268,"G4_URANIUM_MONOCARBIDE");
1255
1256//G4_URANIUM_OXIDE index=269
1257 G4double M269[NDENSARRAY]={60.332,1.76,5.9605,-0.1938,3.5292,0.20463,2.6711,0,0.098,720.6 };
1258 AddMaterial(M269,"G4_URANIUM_OXIDE");
1259
1260//G4_UREA index=270
1261 G4double M270[NDENSARRAY]={24.194,2.022,3.2032,0.1603,2.6525,0.11609,3.3461,0,0.06,72.8 };
1262 AddMaterial(M270,"G4_UREA");
1263
1264//G4_VALINE index=271
1265 G4double M271[NDENSARRAY]={23.622,2.024,3.1059,0.1441,2.6227,0.11386,3.3774,0,0.056,67.7 };
1266 AddMaterial(M271,"G4_VALINE");
1267
1268//G4_VITON index=272
1269 G4double M272[NDENSARRAY]={26.948,2.227,3.5943,0.2106,2.7874,0.09965,3.4556,0,0.07,98.6 };
1270 AddMaterial(M272,"G4_VITON");
1271
1272//G4_WATER index=273
1273 G4double M273[NDENSARRAY]={21.469,2.203,3.5017,0.24,2.8004,0.09116,3.4773,0,0.097,75.0 };
1274 AddMaterial(M273,"G4_WATER");
1275
1276//G4_WATER_VAPOR index=274
1277 G4double M274[NDENSARRAY]={0.59,2.175,10.5962,1.7952,4.3437,0.08101,3.5901,0,0.121,71.6 };
1278 AddMaterial(M274,"G4_WATER_VAPOR");
1279
1280//G4_XYLENE index=275
1281 G4double M275[NDENSARRAY]={19.866,1.882,3.2698,0.1695,2.5675,0.13216,3.3564,0,0.051,61.8 };
1282 AddMaterial(M275,"G4_XYLENE");
1283
1284//G4_GRAPHITE index=276
1285 G4double M276[NDENSARRAY]={30.652,2.29,2.868,-0.0178,2.3415,0.26142,2.8697,0.12,0.038,78.0 };
1286 AddMaterial(M276,"G4_GRAPHITE");
1287
1288//G4_GRAPHITE_POROUS index=277
1289 G4double M277[NDENSARRAY]={26.555,2.49,3.155,0.048,2.5387,0.20762,2.9532,0.14,0.038,78.0 };
1290 AddMaterial(M277,"G4_GRAPHITE_POROUS");
1291}
1292
1294{
1295 return (Z >= 0 && Z < NDENSELEM) ? indexZ[Z] : -1;
1296}
1297
1299{
1300 G4int idx = -1;
1301
1302 for (G4int i=0; i<NDENSDATA; ++i) {
1303 if ( names[i] == matName ) {
1304 idx = i;
1305 break;
1306 }
1307 }
1308 return idx;
1309}
1310
1311void G4DensityEffectData::AddMaterial(G4double* val, const G4String& matName)
1312{
1313 for(G4int i=0; i<NDENSARRAY; ++i) {
1314 data[index][i] = val[i];
1315 }
1316 data[index][0] *= CLHEP::eV;
1317 data[index][9] *= CLHEP::eV;
1318 names.push_back( matName );
1319 ++index;
1320}
1321
1323{
1324 if(matName.empty() || "all" == matName)
1325 {
1326 DumpData();
1327 return;
1328 }
1329 G4int idx = GetIndex(matName);
1330 if(idx >= 0) {
1331 G4cout << "G4DensityEffectData for <" << matName
1332 << "> index= " << idx << G4endl;
1333 G4cout << "I(eV)= " << data[idx][9]/CLHEP::eV
1334 << "Eplasma(eV)= " << data[idx][0]/CLHEP::eV
1335 << " rho= " << data[idx][1]
1336 << " -C= " << data[idx][2]
1337 << " x0= " << data[idx][3]
1338 << " x1= " << data[idx][4]
1339 << " a= " << data[idx][5]
1340 << " m= " << data[idx][6]
1341 << " d0= " << data[idx][7]
1342 << " err= " << data[idx][8]
1343 << G4endl;
1344 } else {
1345 G4cout << "G4DensityEffectData does not have <" << matName << ">" << G4endl;
1346 }
1347}
1348
1350{
1351 G4cout << "======================================================================"
1352 << G4endl;
1353 G4cout << " Material Eplasma(eV) rho -C x0 x1 a m d0 err"
1354 << G4endl;
1355 G4cout << "======================================================================"
1356 << G4endl;
1357 for(G4int i=0; i<NDENSDATA; ++i) {
1358 G4cout << std::setw(3) << i << ". " << std::setw(25) << names[i]
1359 << std::setw(8) << data[i][0]/eV;
1360 for(G4int j=1; j<NDENSARRAY; ++j) { G4cout << std::setw(8) << data[i][j]; }
1361 G4cout << G4endl;
1362 }
1363 G4cout << "======================================================================"
1364 << G4endl;
1365}
const G4int NDENSARRAY
const G4int NDENSDATA
const G4int NDENSELEM
#define M34
#define M10
#define M41
#define M20
#define M42
#define M13
#define M33
#define M23
#define M11
#define M44
#define M31
#define M21
#define M24
#define M12
#define M22
#define M43
#define M14
#define M30
#define M40
#define M32
G4State
Definition: G4Material.hh:110
@ kStateSolid
Definition: G4Material.hh:110
@ kStateGas
Definition: G4Material.hh:110
double G4double
Definition: G4Types.hh:83
int G4int
Definition: G4Types.hh:85
const G4int Z[17]
#define G4endl
Definition: G4ios.hh:57
G4GLOB_DLL std::ostream G4cout
G4int GetElementIndex(G4int Z, G4State st=kStateUndefined) const
G4int GetIndex(const G4String &matName) const
void PrintData(const G4String &matName) const