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