6 #if defined __cplusplus
10 #define e_Mass 5.4857990943e-4
12 #define Al26_Mass 25.986891692
13 #define Al26_e1Level_Mass 2.45095e-4
15 #define Cl34_Mass 33.973762819
16 #define Cl34_e1Level_Mass 1.57124e-4
18 #define Co58_Mass 5.7935752814e+01
19 #define Co58_e1Level_Mass 2.67205e-05
21 #define Ag110_Mass 1.09906107231e+02
22 #define Ag110_e2Level_Mass 1.2624e-04
24 #define Cd115_Mass 1.14905430969e+02
25 #define Cd115_e1Level_Mass 1.9431e-04
27 #define Te127_Mass 1.26905226336e+02
28 #define Te127_e2Level_Mass 9.4751e-05
30 #define Te129_Mass 1.28906598238e+02
31 #define Te129_e1Level_Mass 1.1302e-04
33 #define Pm148_Mass 1.47917474618e+02
34 #define Pm148_e2Level_Mass 1.4804e-04
36 #define Ho166_Mass 1.65932284162e+02
37 #define Ho166_e1Level_Mass 6.4252e-06
40 #define Am242_Mass 2.42059549159e+02
41 #define Am242_e2Level_Mass 5.153e-05
43 #define Am244_Mass 2.44064284847e+02
44 #define Am244_e1Level_Mass 9.4472e-05
46 #define Es254_Mass 2.54088022021e+02
47 #define Es254_e2Level_Mass 9.0392e-05
49 #define Na24_Mass 23.990962782
50 #define Na24_e1Level_Mass 5.07024e-04
52 #define Sc46_Mass 45.95517189
53 #define Sc46_e1Level_Mass 1.52980e-04
55 #define Mn52_Mass 51.945565464
56 #define Mn52_e1Level_Mass 4.05478e-04
58 #define Pb187_Mass 186.98391837
59 #define Pb187_e1Level_Mass 8.69571e-05
60 #define Pb191_Mass 190.978265
61 #define Pb191_e1Level_Mass 1.48149e-04
62 #define Pb193_Mass 192.976173234
63 #define Pb193_e1Level_Mass 1.07354e-06
64 #define Pb195_Mass 194.97454205
65 #define Pb195_e2Level_Mass 2.17822e-04
66 #define Pb197_Mass 196.973431124
67 #define Pb197_e2Level_Mass 3.42793e-04
68 #define Pb199_Mass 198.97291665
69 #define Pb199_e1Level_Mass 1.07354e-06
70 #define Pb201_Mass 200.972884511
71 #define Pb201_e4Level_Mass 6.75366e-04
72 #define Pb202_Mass 201.972159133
73 #define Pb202_e13Level_Mass 2.32938e-03
74 #define Pb203_Mass 202.973390521
75 #define Pb203_e6Level_Mass 8.85888e-04
76 #define Pb204_Mass 203.973043589
77 #define Pb204_e21Level_Mass 2.34654e-03
78 #define Pb207_Mass 206.975896887
79 #define Pb207_e3Level_Mass 1.75353e-03
81 #define Tl186_Mass 185.978325
82 #define Tl186_e1Level_Mass 1.07354e-06
83 #define Tl187_Mass 186.975905897
84 #define Tl187_e2Level_Mass 3.59647e-04
85 #define Tl188_Mass 187.976009782
86 #define Tl188_e1Level_Mass 1.07354e-06
87 #define Tl189_Mass 188.973588428
88 #define Tl189_e1Level_Mass 2.76545e-04
89 #define Tl190_Mass 189.973877149
90 #define Tl190_e1Level_Mass 1.07354e-06
91 #define Tl191_Mass 190.971786154
92 #define Tl191_e1Level_Mass 1.07354e-06
93 #define Tl192_Mass 191.972225
94 #define Tl192_e1Level_Mass 1.67473e-04
95 #define Tl193_Mass 192.970672
96 #define Tl193_e1Level_Mass 1.07354e-06
97 #define Tl194_Mass 193.9712
98 #define Tl194_e1Level_Mass 1.07354e-06
99 #define Tl195_Mass 194.969774335
100 #define Tl195_e2Level_Mass 5.18124e-04
101 #define Tl196_Mass 195.970481151
102 #define Tl196_e6Level_Mass 4.23191e-04
103 #define Tl198_Mass 197.970483495
104 #define Tl198_e7Level_Mass 5.83471e-04
105 #define Tl207_Mass 206.977419429
106 #define Tl207_e2Level_Mass 1.44724e-03
108 #define Hg185_Mass 184.971899086
109 #define Hg185_e4Level_Mass 1.06603e-04
110 #define Hg187_Mass 186.969814236
111 #define Hg187_e1Level_Mass 1.07354e-06
112 #define Hg189_Mass 188.968190034
113 #define Hg189_e2Level_Mass 1.07354e-06
114 #define Hg191_Mass 190.967157105
115 #define Hg191_e1Level_Mass 1.07354e-06
116 #define Hg193_Mass 192.966665421
117 #define Hg193_e3Level_Mass 1.51112e-04
118 #define Hg195_Mass 194.966720113
119 #define Hg195_e3Level_Mass 1.89019e-04
120 #define Hg197_Mass 196.967212908
121 #define Hg197_e4Level_Mass 3.20914e-04
122 #define Hg199_Mass 198.968279932
123 #define Hg199_e7Level_Mass 5.71641e-04
125 #define Au185_Mass 184.965789411
126 #define Au185_e1Level_Mass 1.07354e-06
127 #define Au187_Mass 186.964567541
128 #define Au187_e2Level_Mass 1.29373e-04
129 #define Au189_Mass 188.963948286
130 #define Au189_e3Level_Mass 2.65412e-04
131 #define Au193_Mass 192.964149715
132 #define Au193_e4Level_Mass 3.11532e-04
133 #define Au195_Mass 194.96503464
134 #define Au195_e4Level_Mass 3.42010e-04
135 #define Au196_Mass 195.966569813
136 #define Au196_e3Level_Mass 9.08819e-05
137 #define Au197_Mass 196.966568662
138 #define Au197_e4Level_Mass 4.39240e-04
139 #define Au200_Mass 199.970725647
140 #define Au200_e11Level_Mass 1.03275e-03
142 #define Pt183_Mass 182.961596703
143 #define Pt183_e1Level_Mass 3.70373e-05
144 #define Pt185_Mass 184.960619
145 #define Pt185_e2Level_Mass 1.11015e-04
146 #define Pt193_Mass 192.962987401
147 #define Pt193_e5Level_Mass 1.60795e-04
148 #define Pt195_Mass 194.964791134
149 #define Pt195_e7Level_Mass 2.78370e-04
150 #define Pt197_Mass 196.967340182
151 #define Pt197_e9Level_Mass 4.28977e-04
152 #define Pt199_Mass 198.970593094
153 #define Pt199_e8Level_Mass 4.55183e-04
155 #define Os181_Mass 180.953244
156 #define Os181_e1Level_Mass 5.28184e-05
157 #define Os183_Mass 182.953126102
158 #define Os183_e2Level_Mass 1.83265e-04
159 #define Os189_Mass 188.95814747
160 #define Os189_e1Level_Mass 3.30780e-05
161 #define Os191_Mass 190.960929718
162 #define Os191_e1Level_Mass 7.98523e-05
164 #define Np236_Mass 236.0465696
165 #define Np236_e2Level_Mass 1.98606e-04
182 int Z,
N, nuclearLevel;
189 #define Zn69_Mass 68.926550281
190 #define Zn69_e1Level_Mass 4.68685e-04
192 #define Y88_Mass 87.909501146
193 #define Y88_e2Level_Mass 4.20829e-04
194 #define Y88_e3Level_Mass 7.24642e-04
195 #define Y89_Mass 88.905848295
196 #define Y89_e1Level_Mass 9.75808e-04
197 #define Y90_Mass 89.907151886
198 #define Y90_e1Level_Mass 7.31803e-04
200 #define Rb86_Mass 85.911167419
201 #define Rb86_e1Level_Mass 5.96890e-04
203 #define Zr89_Mass 8.89088895e+01
204 #define Zr89_e1Level_Mass 6.31244e-04
206 #define Sr87_Mass 86.908877124
207 #define Sr87_e1Level_Mass 4.17107e-04
209 #define Rb90_Mass 89.914801694
210 #define Rb90_e1Level_Mass 1.14869e-04
212 #define Nb93_Mass 92.906378058
213 #define Nb93_e1Level_Mass 3.29900e-05
215 #define In116_Mass 115.905259703
216 #define In116_e1Level_Mass 1.36630e-04
218 #define Sb124_Mass 123.905935743
219 #define Sb124_e1Level_Mass 1.16619e-05
220 #define Sb124_e2Level_Mass 3.95558e-05
222 #define Ho163_Mass 162.928733903
223 #define Ho163_e1Level_Mass 3.19809e-04
224 #define Ho164_Mass 163.930233507
225 #define Ho164_e1Level_Mass 1.50081e-04
226 #define Er167_Mass 166.932048159
227 #define Er167_e1Level_Mass 2.23082e-04
229 #define Dy165_Mass 164.931703333
230 #define Dy165_e1Level_Mass 1.16157e-04
233 #define Yb169_Mass 168.935189802
234 #define Yb169_e1Level_Mass 2.59798e-05
235 #define Yb176_Mass 175.942571683
236 #define Yb176_e1Level_Mass 1.12722e-03
237 #define Yb177_Mass 176.945260822
238 #define Yb177_e1Level_Mass 3.55880e-04
240 #define Lu169_Mass 168.937651439
241 #define Lu169_e1Level_Mass 3.11328e-05
242 #define Lu171_Mass 170.937913136
243 #define Lu171_e1Level_Mass 7.64363e-05
244 #define Lu172_Mass 171.939085669
245 #define Lu172_e1Level_Mass 4.49815e-05
246 #define Lu174_Mass 173.94033748
247 #define Lu174_e1Level_Mass 1.83361e-04
248 #define Lu176_Mass 175.94268631
249 #define Lu176_e1Level_Mass 1.32046e-04
250 #define Lu177_Mass 176.943758055
251 #define Lu177_e1Level_Mass 1.04155e-03
252 #define Lu178_Mass 177.945954559
253 #define Lu178_e1Level_Mass 1.28825e-04
255 #define Hf178_Mass 177.943698766
256 #define Hf178_e1Level_Mass 1.23178e-03
257 #define Hf179_Mass 178.945816145
258 #define Hf179_e1Level_Mass 4.02579e-04
259 #define Hf180_Mass 179.946549953
260 #define Hf180_e1Level_Mass 1.22545e-03
261 #define Hf182_Mass 181.950554096
262 #define Hf182_e1Level_Mass 1.25916e-03
264 #define Ta180_Mass 179.947464831
265 #define Ta180_e2Level_Mass 8.08379e-05
266 #define Ta182_Mass 181.950151849
267 #define Ta182_e26Level_Mass 5.57781e-04
269 #define W179_Mass 178.947070447
270 #define W179_e1Level_Mass 2.38219e-04
271 #define W183_Mass 182.950222951
272 #define W183_e1Level_Mass 3.32262e-04
273 #define W185_Mass 184.953419264
274 #define W185_e1Level_Mass 2.11918e-04
276 #define Tm176_Mass 175.946994685
277 #define Tm176_e1Level_Mass 1.12722e-03
279 #define Ir186_Mass 185.957946104
280 #define Ir186_e1Level_Mass 1.07354e-06
281 #define Ir190_Mass 189.960545968
282 #define Ir190_e1Level_Mass 2.79121e-05
283 #define Ir190_e2Level_Mass 3.88086e-05
284 #define Ir190_e3Level_Mass 4.04082e-04
285 #define Ir190_e37Level_Mass 4.04082e-04
286 #define Ir191_Mass 190.960594046
287 #define Ir191_e3Level_Mass 1.83834e-04
288 #define Ir192_Mass 191.962605012
289 #define Ir192_e3Level_Mass 6.08914e-05
290 #define Ir192_e7Level_Mass 1.80506e-04
291 #define Ir192_e16Level_Mass 1.80506e-04
292 #define Ir193_Mass 192.96292643
293 #define Ir193_e2Level_Mass 8.61197e-05
294 #define Ir194_Mass 193.965078378
295 #define Ir194_e7Level_Mass 1.57888e-04
296 #define Ir195_Mass 194.965979573
297 #define Ir195_e2Level_Mass 1.07354e-04
298 #define Ir196_Mass 195.968396542
299 #define Ir196_e4Level_Mass 4.40153e-04
300 #define Ir197_Mass 196.969653285
301 #define Ir197_e2Level_Mass 1.23458e-04
303 #define Re182_Mass 181.95121008
304 #define Re182_e1Level_Mass 1.07354e-06
305 #define Re184_Mass 183.952520756
306 #define Re184_e5Level_Mass 2.01837e-04
307 #define Re186_Mass 185.954986084
308 #define Re186_e4Level_Mass 1.59958e-04
309 #define Re188_Mass 187.958114438
310 #define Re188_e7Level_Mass 1.84724e-04
311 #define Re190_Mass 189.961817977
312 #define Re190_e3Level_Mass 2.25444e-04
3764 #if defined __cplusplus