20 #include "./base/base_uses.f90"
29 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g2_rc = 1.30_dp
30 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g2_a1 = 0.121492_dp,
g2_b1 = 3.85695_dp
31 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g2_a2 = 0.104509_dp,
g2_b2 = 2.72971_dp
33 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g3_rc = 1.17_dp
34 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g3_a1 = 0.1142400_dp,
g3_b1 = 3.08635_dp
35 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g3_a2 = 0.0867876_dp,
g3_b2 = 2.38345_dp
36 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g3_a3 = 0.0971514_dp,
g3_b3 = 4.35065_dp
38 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g4_rc = 1.05_dp
39 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g4_a1 = 0.0776927_dp,
g4_b1 = 2.10429_dp
40 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g4_a2 = 0.1123350_dp,
g4_b2 = 2.59523_dp
41 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g4_a3 = 0.0812506_dp,
g4_b3 = 4.73860_dp
42 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g4_a4 = 0.0989222_dp,
g4_b4 = 3.44579_dp
44 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g5_rc = 0.9_dp
45 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g5_a1 = 0.0728205_dp,
g5_b1 = 4.98419_dp
46 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g5_a2 = 0.0797713_dp,
g5_b2 = 1.78985_dp
47 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g5_a3 = 0.0885763_dp,
g5_b3 = 3.68614_dp
48 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g5_a4 = 0.1104310_dp,
g5_b4 = 2.78214_dp
49 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g5_a5 = 0.1211280_dp,
g5_b5 = 2.15508_dp
51 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g6_rc = 0.9_dp
52 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g6_a1 = 0.0863850_dp,
g6_b1 = 3.20872_dp
53 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g6_a2 = 0.0704031_dp,
g6_b2 = 4.12508_dp
54 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g6_a3 = 0.0604464_dp,
g6_b3 = 5.40108_dp
55 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g6_a4 = 0.1029610_dp,
g6_b4 = 2.04751_dp
56 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g6_a5 = 0.1020950_dp,
g6_b5 = 2.52820_dp
57 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g6_a6 = 0.0621064_dp,
g6_b6 = 1.76831_dp
59 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_rc = 0.85_dp
60 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_a1 = 0.0969005_dp,
g7_b1 = 1.88076_dp
61 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_a2 = 0.0556821_dp,
g7_b2 = 1.65955_dp
62 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_a3 = 0.0607934_dp,
g7_b3 = 4.42485_dp
63 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_a4 = 0.0888440_dp,
g7_b4 = 2.79941_dp
64 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_a5 = 0.0535919_dp,
g7_b5 = 5.68373_dp
65 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_a6 = 0.0736222_dp,
g7_b6 = 3.50534_dp
66 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g7_a7 = 0.1011310_dp,
g7_b7 = 2.26261_dp
68 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_rc = 0.80_dp
69 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a1 = 0.0557370_dp,
g8_b1 = 1.55883_dp
70 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a2 = 0.0450800_dp,
g8_b2 = 6.02024_dp
71 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a3 = 0.0496262_dp,
g8_b3 = 4.82212_dp
72 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a4 = 0.0757863_dp,
g8_b4 = 3.16120_dp
73 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a5 = 0.0608617_dp,
g8_b5 = 3.90652_dp
74 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a6 = 0.1040810_dp,
g8_b6 = 2.09075_dp
75 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a7 = 0.0983610_dp,
g8_b7 = 1.75423_dp
76 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g8_a8 = 0.0920273_dp,
g8_b8 = 2.55933_dp
78 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_rc = 0.70_dp
79 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a1 = 0.1152140_dp,
g9_b1 = 1.54224_dp
80 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a2 = 0.0280838_dp,
g9_b2 = 5.91022_dp
81 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a3 = 0.0718097_dp,
g9_b3 = 3.54224_dp
82 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a4 = 0.0585113_dp,
g9_b4 = 4.44860_dp
83 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a5 = 0.1068470_dp,
g9_b5 = 2.27491_dp
84 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a6 = 0.0883974_dp,
g9_b6 = 2.83230_dp
85 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a7 = 0.1211100_dp,
g9_b7 = 1.84735_dp
86 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a8 = 0.0273353_dp,
g9_b8 = 5.52297_dp
87 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g9_a9 = 0.0657478_dp,
g9_b9 = 1.36539_dp
89 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_rc = 0.60_dp
90 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a1 = 0.1005460_dp,
g10_b1 = 2.49407_dp
91 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a2 = 0.1246370_dp,
g10_b2 = 1.99718_dp
92 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a3 = 0.0492434_dp,
g10_b3 = 4.70767_dp
93 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a4 = 0.0785904_dp,
g10_b4 = 3.10735_dp
94 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a5 = 0.0242791_dp,
g10_b5 = 5.81268_dp
95 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a6 = 0.0229056_dp,
g10_b6 = 5.92886_dp
96 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a7 = 0.0606229_dp,
g10_b7 = 3.83892_dp
97 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a8 = 0.1442920_dp,
g10_b8 = 1.61113_dp
98 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g10_a9 = 0.0814189_dp,
g10_b9 = 1.17276_dp
101 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g11_rc = 0.50_dp
114 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g12_rc = 0.40_dp
128 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g13_rc = 0.30_dp
143 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g14_rc = 0.20_dp
159 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g15_rc = 0.10_dp
176 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g16_rc = 0.10_dp
194 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g17_rc = 0.10_dp
213 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
g18_rc = 0.10_dp
235 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s2_rc = 1.2_dp
236 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s2_a1 = 0.1167720_dp,
s2_b1 = 3.15760_dp
237 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s2_a2 = 0.0537459_dp,
s2_b2 = 1.66713_dp
239 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s3_rc = 1.05_dp
240 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s3_a1 = 0.1258370_dp,
s3_b1 = 3.54518_dp
241 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s3_a2 = 0.0920562_dp,
s3_b2 = 2.17201_dp
242 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s3_a3 = 0.0354098_dp,
s3_b3 = 1.16797_dp
244 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s4_rc = 0.90_dp
245 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s4_a1 = 0.1237040_dp,
s4_b1 = 3.82356_dp
246 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s4_a2 = 0.0263957_dp,
s4_b2 = 0.84445_dp
247 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s4_a3 = 0.0773548_dp,
s4_b3 = 1.56300_dp
248 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s4_a4 = 0.1243300_dp,
s4_b4 = 2.49568_dp
250 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s5_rc = 0.80_dp
251 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s5_a1 = 0.0601509_dp,
s5_b1 = 1.169940_dp
252 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s5_a2 = 0.1133640_dp,
s5_b2 = 1.853660_dp
253 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s5_a3 = 0.1120710_dp,
s5_b3 = 4.084220_dp
254 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s5_a4 = 0.1334100_dp,
s5_b4 = 2.762410_dp
255 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s5_a5 = 0.0186655_dp,
s5_b5 = 0.633305_dp
257 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s6_rc = 0.70_dp
258 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s6_a1 = 0.0494163_dp,
s6_b1 = 0.889897_dp
259 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s6_a2 = 0.1415590_dp,
s6_b2 = 2.073620_dp
260 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s6_a3 = 0.1311110_dp,
s6_b3 = 2.977960_dp
261 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s6_a4 = 0.1012530_dp,
s6_b4 = 4.306440_dp
262 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s6_a5 = 0.1037040_dp,
s6_b5 = 1.405500_dp
263 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s6_a6 = 0.0144409_dp,
s6_b6 = 0.482098_dp
265 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_rc = 0.65_dp
266 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_a1 = 0.08156290_dp,
s7_b1 = 1.104000_dp
267 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_a2 = 0.00971659_dp,
s7_b2 = 0.379602_dp
268 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_a3 = 0.09067690_dp,
s7_b3 = 4.537130_dp
269 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_a4 = 0.14334400_dp,
s7_b4 = 2.290480_dp
270 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_a5 = 0.13012600_dp,
s7_b5 = 1.619190_dp
271 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_a6 = 0.11794100_dp,
s7_b6 = 3.205850_dp
272 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s7_a7 = 0.03510960_dp,
s7_b7 = 0.700361_dp
274 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_rc = 0.60_dp
275 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a1 = 0.14676300_dp,
s8_b1 = 1.802170_dp
276 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a2 = 0.00686211_dp,
s8_b2 = 0.302201_dp
277 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a3 = 0.08248590_dp,
s8_b3 = 4.741690_dp
278 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a4 = 0.10588700_dp,
s8_b4 = 3.410740_dp
279 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a5 = 0.06409090_dp,
s8_b5 = 0.877859_dp
280 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a6 = 0.11461200_dp,
s8_b6 = 1.283730_dp
281 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a7 = 0.13708200_dp,
s8_b7 = 2.482170_dp
282 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s8_a8 = 0.02571900_dp,
s8_b8 = 0.557431_dp
284 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_rc = 0.55_dp
285 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a1 = 0.0760147_dp,
s9_b1 = 4.924130_dp
286 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a2 = 0.0050867_dp,
s9_b2 = 0.242656_dp
287 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a3 = 0.1524530_dp,
s9_b3 = 1.962780_dp
288 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a4 = 0.0993944_dp,
s9_b4 = 1.028540_dp
289 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a5 = 0.1433380_dp,
s9_b5 = 1.438020_dp
290 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a6 = 0.1267950_dp,
s9_b6 = 2.655630_dp
291 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a7 = 0.0958376_dp,
s9_b7 = 3.595590_dp
292 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a8 = 0.0511698_dp,
s9_b8 = 0.704455_dp
293 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s9_a9 = 0.0195500_dp,
s9_b9 = 0.447544_dp
295 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s10_rc = 0.5_dp
307 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s11_rc = 0.45_dp
320 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s12_rc = 0.40_dp
334 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s13_rc = 0.35_dp
349 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s14_rc = 0.3_dp
365 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s15_rc = 0.25_dp
382 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s16_rc = 0.20_dp
400 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s17_rc = 0.15_dp
419 REAL(kind=
dp),
PARAMETER,
PUBLIC ::
s18_rc = 0.05_dp
Defines the basic variable types.
integer, parameter, public dp
GEEP coefficients for fixed radii. THIS IS THE GEEP LIB. They can be used together with the "omotetia...
real(kind=dp), parameter, public s13_b4
real(kind=dp), parameter, public s14_a14
real(kind=dp), parameter, public g11_b4
real(kind=dp), parameter, public g11_rc
real(kind=dp), parameter, public g14_a12
real(kind=dp), parameter, public g7_b3
real(kind=dp), parameter, public g15_a2
real(kind=dp), parameter, public s8_rc
real(kind=dp), parameter, public g6_a2
real(kind=dp), parameter, public g16_b16
real(kind=dp), parameter, public g16_b13
real(kind=dp), parameter, public s15_b8
real(kind=dp), parameter, public s10_a4
real(kind=dp), parameter, public g18_a7
real(kind=dp), parameter, public s18_a18
real(kind=dp), parameter, public s7_b5
real(kind=dp), parameter, public g8_rc
real(kind=dp), parameter, public s2_a2
real(kind=dp), parameter, public s18_a9
real(kind=dp), parameter, public g10_rc
real(kind=dp), parameter, public s18_b10
real(kind=dp), parameter, public g17_b1
real(kind=dp), parameter, public s9_b6
real(kind=dp), parameter, public s18_a2
real(kind=dp), parameter, public s8_b4
real(kind=dp), parameter, public g16_a15
real(kind=dp), parameter, public s12_b7
real(kind=dp), parameter, public g12_a8
real(kind=dp), parameter, public g12_a1
real(kind=dp), parameter, public s16_rc
real(kind=dp), parameter, public g10_b5
real(kind=dp), parameter, public g14_b8
real(kind=dp), parameter, public g10_b4
real(kind=dp), parameter, public g18_a4
real(kind=dp), parameter, public g17_a14
real(kind=dp), parameter, public s7_b4
real(kind=dp), parameter, public g12_a3
real(kind=dp), parameter, public g14_a6
real(kind=dp), parameter, public g11_b10
real(kind=dp), parameter, public g12_b5
real(kind=dp), parameter, public g12_b4
real(kind=dp), parameter, public g17_a11
real(kind=dp), parameter, public g7_rc
real(kind=dp), parameter, public g6_a1
real(kind=dp), parameter, public s12_b1
real(kind=dp), parameter, public g9_a1
real(kind=dp), parameter, public g9_a5
real(kind=dp), parameter, public g4_a1
real(kind=dp), parameter, public s16_b16
real(kind=dp), parameter, public s18_b5
real(kind=dp), parameter, public g15_a3
real(kind=dp), parameter, public s17_a17
real(kind=dp), parameter, public g13_b10
real(kind=dp), parameter, public g9_a4
real(kind=dp), parameter, public g14_b13
real(kind=dp), parameter, public g16_b5
real(kind=dp), parameter, public s9_a2
real(kind=dp), parameter, public g10_b10
real(kind=dp), parameter, public g12_b7
real(kind=dp), parameter, public g16_a7
real(kind=dp), parameter, public g8_a1
real(kind=dp), parameter, public g16_b8
real(kind=dp), parameter, public s14_b6
real(kind=dp), parameter, public g11_a1
real(kind=dp), parameter, public g12_b12
real(kind=dp), parameter, public g5_a2
real(kind=dp), parameter, public s10_a9
real(kind=dp), parameter, public s13_b12
real(kind=dp), parameter, public s12_a3
real(kind=dp), parameter, public g16_a2
real(kind=dp), parameter, public s9_b2
real(kind=dp), parameter, public s16_a13
real(kind=dp), parameter, public s6_a1
real(kind=dp), parameter, public s10_a2
real(kind=dp), parameter, public g15_b7
real(kind=dp), parameter, public g11_a7
real(kind=dp), parameter, public s14_rc
real(kind=dp), parameter, public g9_b6
real(kind=dp), parameter, public g11_a8
real(kind=dp), parameter, public s10_b4
real(kind=dp), parameter, public g8_b2
real(kind=dp), parameter, public s16_b10
real(kind=dp), parameter, public s15_a5
real(kind=dp), parameter, public g17_b5
real(kind=dp), parameter, public s16_b11
real(kind=dp), parameter, public s10_b7
real(kind=dp), parameter, public s10_a1
real(kind=dp), parameter, public s10_b9
real(kind=dp), parameter, public g12_b10
real(kind=dp), parameter, public s14_b2
real(kind=dp), parameter, public g17_a9
real(kind=dp), parameter, public g13_b12
real(kind=dp), parameter, public s9_b1
real(kind=dp), parameter, public s13_a10
real(kind=dp), parameter, public g14_a1
real(kind=dp), parameter, public s13_b9
real(kind=dp), parameter, public g16_a10
real(kind=dp), parameter, public g8_a8
real(kind=dp), parameter, public s4_b2
real(kind=dp), parameter, public s7_a1
real(kind=dp), parameter, public s11_b10
real(kind=dp), parameter, public s11_a1
real(kind=dp), parameter, public s13_b7
real(kind=dp), parameter, public s12_rc
real(kind=dp), parameter, public g15_a4
real(kind=dp), parameter, public g11_b3
real(kind=dp), parameter, public g10_b1
real(kind=dp), parameter, public s15_b15
real(kind=dp), parameter, public g3_b2
real(kind=dp), parameter, public g11_b8
real(kind=dp), parameter, public s5_a2
real(kind=dp), parameter, public s2_rc
real(kind=dp), parameter, public s5_a4
real(kind=dp), parameter, public s6_b6
real(kind=dp), parameter, public s12_a7
real(kind=dp), parameter, public g17_a8
real(kind=dp), parameter, public s17_b1
real(kind=dp), parameter, public s18_a1
real(kind=dp), parameter, public s11_a10
real(kind=dp), parameter, public s16_b9
real(kind=dp), parameter, public s15_a2
real(kind=dp), parameter, public s15_a13
real(kind=dp), parameter, public s11_b8
real(kind=dp), parameter, public s6_a3
real(kind=dp), parameter, public s16_a5
real(kind=dp), parameter, public s3_rc
real(kind=dp), parameter, public g17_a5
real(kind=dp), parameter, public g18_b9
real(kind=dp), parameter, public g18_b5
real(kind=dp), parameter, public g6_b4
real(kind=dp), parameter, public s16_a8
real(kind=dp), parameter, public s14_b1
real(kind=dp), parameter, public s16_a10
real(kind=dp), parameter, public s14_b9
real(kind=dp), parameter, public s15_a4
real(kind=dp), parameter, public g5_b1
real(kind=dp), parameter, public s7_a6
real(kind=dp), parameter, public g14_a3
real(kind=dp), parameter, public s17_a6
real(kind=dp), parameter, public s3_b3
real(kind=dp), parameter, public s9_b5
real(kind=dp), parameter, public g13_a1
real(kind=dp), parameter, public s16_a15
real(kind=dp), parameter, public s8_a2
real(kind=dp), parameter, public s13_a6
real(kind=dp), parameter, public g16_a13
real(kind=dp), parameter, public g6_b2
real(kind=dp), parameter, public g9_a8
real(kind=dp), parameter, public g15_b15
real(kind=dp), parameter, public g4_b1
real(kind=dp), parameter, public s17_b13
real(kind=dp), parameter, public s18_b16
real(kind=dp), parameter, public g13_b9
real(kind=dp), parameter, public g2_rc
real(kind=dp), parameter, public s18_a11
real(kind=dp), parameter, public g17_a4
real(kind=dp), parameter, public s17_a3
real(kind=dp), parameter, public s6_rc
real(kind=dp), parameter, public g5_a5
real(kind=dp), parameter, public s12_b10
real(kind=dp), parameter, public g17_b12
real(kind=dp), parameter, public s17_a9
real(kind=dp), parameter, public s14_a9
real(kind=dp), parameter, public g13_b3
real(kind=dp), parameter, public g14_a4
real(kind=dp), parameter, public g14_b9
real(kind=dp), parameter, public s11_b7
real(kind=dp), parameter, public s16_b6
real(kind=dp), parameter, public g18_a15
real(kind=dp), parameter, public g7_b4
real(kind=dp), parameter, public s9_b4
real(kind=dp), parameter, public g18_b8
real(kind=dp), parameter, public g16_a3
real(kind=dp), parameter, public g10_b8
real(kind=dp), parameter, public g15_b1
real(kind=dp), parameter, public g13_b7
real(kind=dp), parameter, public g13_a9
real(kind=dp), parameter, public s17_a2
real(kind=dp), parameter, public s6_a6
real(kind=dp), parameter, public g9_b5
real(kind=dp), parameter, public s14_b14
real(kind=dp), parameter, public g14_b6
real(kind=dp), parameter, public g12_a4
real(kind=dp), parameter, public s15_b6
real(kind=dp), parameter, public g7_b7
real(kind=dp), parameter, public s4_b4
real(kind=dp), parameter, public s13_b2
real(kind=dp), parameter, public s15_b7
real(kind=dp), parameter, public s5_rc
real(kind=dp), parameter, public g11_b11
real(kind=dp), parameter, public g18_b14
real(kind=dp), parameter, public g17_a15
real(kind=dp), parameter, public s10_a6
real(kind=dp), parameter, public g16_rc
real(kind=dp), parameter, public g10_a6
real(kind=dp), parameter, public s12_a1
real(kind=dp), parameter, public g13_a4
real(kind=dp), parameter, public g9_rc
real(kind=dp), parameter, public s14_b11
real(kind=dp), parameter, public g11_a9
real(kind=dp), parameter, public g3_rc
real(kind=dp), parameter, public g12_a9
real(kind=dp), parameter, public g18_a10
real(kind=dp), parameter, public g5_a1
real(kind=dp), parameter, public s9_a6
real(kind=dp), parameter, public s15_b10
real(kind=dp), parameter, public g18_a2
real(kind=dp), parameter, public s11_a8
real(kind=dp), parameter, public s18_b1
real(kind=dp), parameter, public s16_a3
real(kind=dp), parameter, public g18_b11
real(kind=dp), parameter, public s5_b3
real(kind=dp), parameter, public g18_a13
real(kind=dp), parameter, public s13_a5
real(kind=dp), parameter, public g11_b1
real(kind=dp), parameter, public s15_a11
real(kind=dp), parameter, public s13_a12
real(kind=dp), parameter, public s16_a9
real(kind=dp), parameter, public s13_b13
real(kind=dp), parameter, public s14_a11
real(kind=dp), parameter, public s9_a1
real(kind=dp), parameter, public s2_a1
real(kind=dp), parameter, public g16_a6
real(kind=dp), parameter, public s18_b12
real(kind=dp), parameter, public s16_a4
real(kind=dp), parameter, public g15_b9
real(kind=dp), parameter, public s18_b18
real(kind=dp), parameter, public g13_a7
real(kind=dp), parameter, public s6_a4
real(kind=dp), parameter, public g17_a1
real(kind=dp), parameter, public g10_a1
real(kind=dp), parameter, public g14_a11
real(kind=dp), parameter, public g17_b13
real(kind=dp), parameter, public g16_a4
real(kind=dp), parameter, public s18_b14
real(kind=dp), parameter, public s16_a12
real(kind=dp), parameter, public s15_b12
real(kind=dp), parameter, public s15_b5
real(kind=dp), parameter, public g14_b1
real(kind=dp), parameter, public g4_b3
real(kind=dp), parameter, public s17_b17
real(kind=dp), parameter, public s15_a1
real(kind=dp), parameter, public g7_a7
real(kind=dp), parameter, public s16_b1
real(kind=dp), parameter, public g18_a3
real(kind=dp), parameter, public s14_b12
real(kind=dp), parameter, public s15_b13
real(kind=dp), parameter, public g3_a2
real(kind=dp), parameter, public g18_rc
real(kind=dp), parameter, public s13_b5
real(kind=dp), parameter, public g17_b4
real(kind=dp), parameter, public s11_rc
real(kind=dp), parameter, public g15_a10
real(kind=dp), parameter, public s13_a4
real(kind=dp), parameter, public g15_b11
real(kind=dp), parameter, public g18_a16
real(kind=dp), parameter, public s18_a15
real(kind=dp), parameter, public g17_b15
real(kind=dp), parameter, public s4_a3
real(kind=dp), parameter, public s18_a10
real(kind=dp), parameter, public s10_b10
real(kind=dp), parameter, public g12_b9
real(kind=dp), parameter, public s13_b10
real(kind=dp), parameter, public g11_b7
real(kind=dp), parameter, public g15_a11
real(kind=dp), parameter, public s11_a11
real(kind=dp), parameter, public g16_b7
real(kind=dp), parameter, public s14_b7
real(kind=dp), parameter, public s12_b4
real(kind=dp), parameter, public s13_b3
real(kind=dp), parameter, public s9_rc
real(kind=dp), parameter, public s17_b11
real(kind=dp), parameter, public g15_b2
real(kind=dp), parameter, public g12_a12
real(kind=dp), parameter, public s8_a6
real(kind=dp), parameter, public s10_a10
real(kind=dp), parameter, public s8_a4
real(kind=dp), parameter, public g17_a7
real(kind=dp), parameter, public s18_b3
real(kind=dp), parameter, public g15_a15
real(kind=dp), parameter, public s6_b3
real(kind=dp), parameter, public s18_b2
real(kind=dp), parameter, public s17_b15
real(kind=dp), parameter, public s8_a1
real(kind=dp), parameter, public s17_a7
real(kind=dp), parameter, public s15_a6
real(kind=dp), parameter, public s3_b1
real(kind=dp), parameter, public s11_a7
real(kind=dp), parameter, public s18_a3
real(kind=dp), parameter, public g18_b15
real(kind=dp), parameter, public g13_b4
real(kind=dp), parameter, public g13_b8
real(kind=dp), parameter, public s17_b9
real(kind=dp), parameter, public s18_a13
real(kind=dp), parameter, public g4_b4
real(kind=dp), parameter, public s14_a4
real(kind=dp), parameter, public s18_b9
real(kind=dp), parameter, public s10_b6
real(kind=dp), parameter, public g17_rc
real(kind=dp), parameter, public g11_b6
real(kind=dp), parameter, public s4_a2
real(kind=dp), parameter, public g14_a5
real(kind=dp), parameter, public s16_a14
real(kind=dp), parameter, public g12_b8
real(kind=dp), parameter, public s13_a7
real(kind=dp), parameter, public g13_b13
real(kind=dp), parameter, public s14_b13
real(kind=dp), parameter, public g6_b3
real(kind=dp), parameter, public g6_b1
real(kind=dp), parameter, public s14_a5
real(kind=dp), parameter, public s18_rc
real(kind=dp), parameter, public s13_rc
real(kind=dp), parameter, public g18_a12
real(kind=dp), parameter, public g6_a6
real(kind=dp), parameter, public s18_a5
real(kind=dp), parameter, public g16_b3
real(kind=dp), parameter, public g2_b1
real(kind=dp), parameter, public g15_b8
real(kind=dp), parameter, public g10_a3
real(kind=dp), parameter, public g14_a9
real(kind=dp), parameter, public g9_b8
real(kind=dp), parameter, public s11_b5
real(kind=dp), parameter, public s7_a5
real(kind=dp), parameter, public s10_b3
real(kind=dp), parameter, public g9_a7
real(kind=dp), parameter, public g8_a3
real(kind=dp), parameter, public g7_a5
real(kind=dp), parameter, public g13_a6
real(kind=dp), parameter, public g13_a13
real(kind=dp), parameter, public s16_b4
real(kind=dp), parameter, public g13_b6
real(kind=dp), parameter, public g18_b7
real(kind=dp), parameter, public g3_b3
real(kind=dp), parameter, public s15_b3
real(kind=dp), parameter, public g5_a4
real(kind=dp), parameter, public g10_b2
real(kind=dp), parameter, public g6_b6
real(kind=dp), parameter, public g15_a7
real(kind=dp), parameter, public g6_a5
real(kind=dp), parameter, public s8_b5
real(kind=dp), parameter, public s14_a8
real(kind=dp), parameter, public g18_a6
real(kind=dp), parameter, public g12_b1
real(kind=dp), parameter, public s8_b3
real(kind=dp), parameter, public s12_a9
real(kind=dp), parameter, public s17_a8
real(kind=dp), parameter, public s11_a9
real(kind=dp), parameter, public s11_b9
real(kind=dp), parameter, public s6_a2
real(kind=dp), parameter, public g14_a14
real(kind=dp), parameter, public g5_b4
real(kind=dp), parameter, public g14_rc
real(kind=dp), parameter, public s12_a12
real(kind=dp), parameter, public g5_b3
real(kind=dp), parameter, public s15_a3
real(kind=dp), parameter, public g15_b12
real(kind=dp), parameter, public s16_a1
real(kind=dp), parameter, public s17_b5
real(kind=dp), parameter, public s10_a8
real(kind=dp), parameter, public s18_a6
real(kind=dp), parameter, public g15_a13
real(kind=dp), parameter, public s14_b10
real(kind=dp), parameter, public s4_a1
real(kind=dp), parameter, public s18_a14
real(kind=dp), parameter, public s6_b5
real(kind=dp), parameter, public s17_b2
real(kind=dp), parameter, public s17_a14
real(kind=dp), parameter, public s12_b2
real(kind=dp), parameter, public g14_a7
real(kind=dp), parameter, public g17_a13
real(kind=dp), parameter, public s7_a7
real(kind=dp), parameter, public g10_a10
real(kind=dp), parameter, public g10_b6
real(kind=dp), parameter, public g7_b2
real(kind=dp), parameter, public s16_a7
real(kind=dp), parameter, public s3_b2
real(kind=dp), parameter, public s7_rc
real(kind=dp), parameter, public g16_a11
real(kind=dp), parameter, public s16_b13
real(kind=dp), parameter, public s11_b2
real(kind=dp), parameter, public g6_a4
real(kind=dp), parameter, public s14_a12
real(kind=dp), parameter, public s12_b12
real(kind=dp), parameter, public s11_b3
real(kind=dp), parameter, public s18_b13
integer, parameter, public max_geep_lib_gauss
real(kind=dp), parameter, public s14_b4
real(kind=dp), parameter, public s15_a10
real(kind=dp), parameter, public s13_a11
real(kind=dp), parameter, public s3_a2
real(kind=dp), parameter, public s13_a13
real(kind=dp), parameter, public s10_a5
real(kind=dp), parameter, public s13_a8
real(kind=dp), parameter, public g15_a6
real(kind=dp), parameter, public g18_b4
real(kind=dp), parameter, public s16_a16
real(kind=dp), parameter, public g7_a3
real(kind=dp), parameter, public g16_a5
real(kind=dp), parameter, public s18_b7
real(kind=dp), parameter, public g8_b6
real(kind=dp), parameter, public g17_a10
real(kind=dp), parameter, public g17_b9
real(kind=dp), parameter, public g12_b3
real(kind=dp), parameter, public s12_a8
real(kind=dp), parameter, public s15_rc
real(kind=dp), parameter, public g10_a4
real(kind=dp), parameter, public g16_b9
real(kind=dp), parameter, public s13_b11
real(kind=dp), parameter, public g18_a11
real(kind=dp), parameter, public g17_b7
real(kind=dp), parameter, public s5_a3
real(kind=dp), parameter, public g18_a14
real(kind=dp), parameter, public s13_b1
real(kind=dp), parameter, public g14_b7
real(kind=dp), parameter, public s10_a7
real(kind=dp), parameter, public g12_a2
real(kind=dp), parameter, public g13_a8
real(kind=dp), parameter, public g11_a6
real(kind=dp), parameter, public g11_b9
real(kind=dp), parameter, public g16_b10
real(kind=dp), parameter, public s11_a2
real(kind=dp), parameter, public g17_a6
real(kind=dp), parameter, public s9_b3
real(kind=dp), parameter, public g16_a12
real(kind=dp), parameter, public s16_b2
real(kind=dp), parameter, public g16_a14
real(kind=dp), parameter, public g18_a1
real(kind=dp), parameter, public s17_b12
real(kind=dp), parameter, public s12_b8
real(kind=dp), parameter, public s17_b3
real(kind=dp), parameter, public g18_a18
real(kind=dp), parameter, public s11_a3
real(kind=dp), parameter, public s4_b3
real(kind=dp), parameter, public g9_a6
real(kind=dp), parameter, public s8_b1
real(kind=dp), parameter, public s15_a8
real(kind=dp), parameter, public s5_b1
real(kind=dp), parameter, public g18_b3
real(kind=dp), parameter, public g13_a3
integer, parameter, public min_geep_lib_gauss
real(kind=dp), parameter, public g8_a5
real(kind=dp), parameter, public g5_b5
real(kind=dp), parameter, public g8_a2
real(kind=dp), parameter, public g10_a8
real(kind=dp), parameter, public s17_a1
real(kind=dp), parameter, public g4_a4
real(kind=dp), parameter, public s7_b1
real(kind=dp), parameter, public s15_a12
real(kind=dp), parameter, public g17_b3
real(kind=dp), parameter, public g8_a7
real(kind=dp), parameter, public s15_a14
real(kind=dp), parameter, public g15_a8
real(kind=dp), parameter, public g15_a1
real(kind=dp), parameter, public s10_b8
real(kind=dp), parameter, public s15_a9
real(kind=dp), parameter, public s12_b3
real(kind=dp), parameter, public g6_b5
real(kind=dp), parameter, public s11_b6
real(kind=dp), parameter, public s16_b14
real(kind=dp), parameter, public g9_b9
real(kind=dp), parameter, public s5_a5
real(kind=dp), parameter, public g13_b11
real(kind=dp), parameter, public s16_b5
real(kind=dp), parameter, public s18_b6
real(kind=dp), parameter, public g18_b12
real(kind=dp), parameter, public s15_a15
real(kind=dp), parameter, public s8_b8
real(kind=dp), parameter, public g17_a17
real(kind=dp), parameter, public s2_b1
real(kind=dp), parameter, public s8_a3
real(kind=dp), parameter, public g14_b14
real(kind=dp), parameter, public g16_b6
real(kind=dp), parameter, public g9_a2
real(kind=dp), parameter, public g12_b2
real(kind=dp), parameter, public g10_b3
real(kind=dp), parameter, public s5_b5
real(kind=dp), parameter, public s13_a9
real(kind=dp), parameter, public g11_a2
real(kind=dp), parameter, public s17_b14
real(kind=dp), parameter, public s18_a4
real(kind=dp), parameter, public g10_b9
real(kind=dp), parameter, public g18_b18
real(kind=dp), parameter, public g12_a10
real(kind=dp), parameter, public s3_a1
real(kind=dp), parameter, public g18_a8
real(kind=dp), parameter, public s17_b7
real(kind=dp), parameter, public s18_a16
real(kind=dp), parameter, public g11_a10
real(kind=dp), parameter, public s12_a11
real(kind=dp), parameter, public g2_a2
real(kind=dp), parameter, public g7_b6
real(kind=dp), parameter, public g9_b4
real(kind=dp), parameter, public g17_a3
real(kind=dp), parameter, public g18_b17
real(kind=dp), parameter, public g16_b11
real(kind=dp), parameter, public g14_b10
real(kind=dp), parameter, public g9_a9
real(kind=dp), parameter, public g12_b6
real(kind=dp), parameter, public g11_a5
real(kind=dp), parameter, public s6_b4
real(kind=dp), parameter, public s13_b8
real(kind=dp), parameter, public s12_b11
real(kind=dp), parameter, public s17_rc
real(kind=dp), parameter, public s8_a5
real(kind=dp), parameter, public s14_a2
real(kind=dp), parameter, public g10_a2
real(kind=dp), parameter, public s5_b2
real(kind=dp), parameter, public g11_a11
real(kind=dp), parameter, public g18_a9
real(kind=dp), parameter, public s7_a3
real(kind=dp), parameter, public s13_b6
real(kind=dp), parameter, public g8_b5
real(kind=dp), parameter, public g4_a3
real(kind=dp), parameter, public s12_b6
real(kind=dp), parameter, public g14_a8
real(kind=dp), parameter, public g15_b4
real(kind=dp), parameter, public s6_b1
real(kind=dp), parameter, public s9_b7
real(kind=dp), parameter, public g12_a7
real(kind=dp), parameter, public s17_a12
real(kind=dp), parameter, public s4_rc
real(kind=dp), parameter, public g16_b1
real(kind=dp), parameter, public g7_a6
real(kind=dp), parameter, public g15_b10
real(kind=dp), parameter, public g17_a12
real(kind=dp), parameter, public s3_a3
real(kind=dp), parameter, public s5_a1
real(kind=dp), parameter, public g16_b2
real(kind=dp), parameter, public g18_b16
real(kind=dp), parameter, public g15_a12
real(kind=dp), parameter, public g18_b10
real(kind=dp), parameter, public g11_b2
real(kind=dp), parameter, public g15_b14
real(kind=dp), parameter, public s17_a15
real(kind=dp), parameter, public s7_b2
real(kind=dp), parameter, public g7_b5
real(kind=dp), parameter, public g10_b7
real(kind=dp), parameter, public s16_a6
real(kind=dp), parameter, public g2_b2
real(kind=dp), parameter, public g14_b11
real(kind=dp), parameter, public s9_a5
real(kind=dp), parameter, public s18_a8
real(kind=dp), parameter, public s16_b15
real(kind=dp), parameter, public s9_b9
real(kind=dp), parameter, public g14_a13
real(kind=dp), parameter, public g11_b5
real(kind=dp), parameter, public s11_b4
real(kind=dp), parameter, public s16_a11
real(kind=dp), parameter, public s16_b8
real(kind=dp), parameter, public g15_b5
real(kind=dp), parameter, public g14_b3
real(kind=dp), parameter, public s10_b1
real(kind=dp), parameter, public s15_b1
real(kind=dp), parameter, public s14_a3
real(kind=dp), parameter, public g8_b7
real(kind=dp), parameter, public s17_b16
real(kind=dp), parameter, public g18_b2
real(kind=dp), parameter, public g18_b6
real(kind=dp), parameter, public g18_a17
real(kind=dp), parameter, public g7_b1
real(kind=dp), parameter, public s8_a7
real(kind=dp), parameter, public g5_b2
real(kind=dp), parameter, public g13_b2
real(kind=dp), parameter, public s12_b9
real(kind=dp), parameter, public g15_b13
real(kind=dp), parameter, public g13_b5
real(kind=dp), parameter, public g15_a14
real(kind=dp), parameter, public s17_b8
real(kind=dp), parameter, public g12_rc
real(kind=dp), parameter, public s8_b6
real(kind=dp), parameter, public s9_a7
real(kind=dp), parameter, public g15_b6
real(kind=dp), parameter, public s15_b2
real(kind=dp), parameter, public s9_a4
real(kind=dp), parameter, public s10_rc
real(kind=dp), parameter, public s11_b11
real(kind=dp), parameter, public g17_b8
real(kind=dp), parameter, public g17_b10
real(kind=dp), parameter, public s15_b11
real(kind=dp), parameter, public g8_b1
real(kind=dp), parameter, public s18_a12
real(kind=dp), parameter, public g14_b4
real(kind=dp), parameter, public s11_a4
real(kind=dp), parameter, public g14_b5
real(kind=dp), parameter, public g3_a3
real(kind=dp), parameter, public g3_a1
real(kind=dp), parameter, public g2_a1
real(kind=dp), parameter, public g3_b1
real(kind=dp), parameter, public s10_a3
real(kind=dp), parameter, public g16_a8
real(kind=dp), parameter, public g7_a4
real(kind=dp), parameter, public g8_a6
real(kind=dp), parameter, public s18_b4
real(kind=dp), parameter, public s17_b4
real(kind=dp), parameter, public s18_b17
real(kind=dp), parameter, public s5_b4
real(kind=dp), parameter, public s4_b1
real(kind=dp), parameter, public g12_a11
real(kind=dp), parameter, public g15_a5
real(kind=dp), parameter, public g14_a2
real(kind=dp), parameter, public s12_a4
real(kind=dp), parameter, public g10_a7
real(kind=dp), parameter, public s7_b7
real(kind=dp), parameter, public s13_a2
real(kind=dp), parameter, public s17_a4
real(kind=dp), parameter, public g6_rc
real(kind=dp), parameter, public s6_b2
real(kind=dp), parameter, public g9_b7
real(kind=dp), parameter, public s15_b4
real(kind=dp), parameter, public g12_a6
real(kind=dp), parameter, public s8_b2
real(kind=dp), parameter, public s14_a13
real(kind=dp), parameter, public g13_a5
real(kind=dp), parameter, public g8_b4
real(kind=dp), parameter, public s16_b3
real(kind=dp), parameter, public s18_a17
real(kind=dp), parameter, public s14_b3
real(kind=dp), parameter, public g13_a12
real(kind=dp), parameter, public g13_a11
real(kind=dp), parameter, public g18_b1
real(kind=dp), parameter, public g16_a1
real(kind=dp), parameter, public s16_b12
real(kind=dp), parameter, public g14_a10
real(kind=dp), parameter, public g7_a1
real(kind=dp), parameter, public g12_a5
real(kind=dp), parameter, public g8_b8
real(kind=dp), parameter, public g4_a2
real(kind=dp), parameter, public g17_a2
real(kind=dp), parameter, public g17_b2
real(kind=dp), parameter, public g17_b16
real(kind=dp), parameter, public g16_b12
real(kind=dp), parameter, public s9_a9
real(kind=dp), parameter, public s17_a11
real(kind=dp), parameter, public g16_a9
real(kind=dp), parameter, public s17_a10
real(kind=dp), parameter, public g16_b4
real(kind=dp), parameter, public g4_rc
real(kind=dp), parameter, public s11_b1
real(kind=dp), parameter, public g17_b6
real(kind=dp), parameter, public g17_b11
real(kind=dp), parameter, public g10_a9
real(kind=dp), parameter, public g8_b3
real(kind=dp), parameter, public s14_a10
real(kind=dp), parameter, public s17_a13
real(kind=dp), parameter, public s7_a4
real(kind=dp), parameter, public g16_b15
real(kind=dp), parameter, public s16_b7
real(kind=dp), parameter, public s9_a8
real(kind=dp), parameter, public s17_a5
real(kind=dp), parameter, public g9_b2
real(kind=dp), parameter, public s17_b10
real(kind=dp), parameter, public s16_a2
real(kind=dp), parameter, public g5_a3
real(kind=dp), parameter, public s14_b8
real(kind=dp), parameter, public s8_b7
real(kind=dp), parameter, public s13_a1
real(kind=dp), parameter, public g13_a2
real(kind=dp), parameter, public s15_a7
real(kind=dp), parameter, public g8_a4
real(kind=dp), parameter, public g14_b12
real(kind=dp), parameter, public s18_b8
real(kind=dp), parameter, public g17_a16
real(kind=dp), parameter, public g9_b1
real(kind=dp), parameter, public s14_b5
real(kind=dp), parameter, public g18_a5
real(kind=dp), parameter, public s15_b9
real(kind=dp), parameter, public s10_b2
real(kind=dp), parameter, public g16_a16
real(kind=dp), parameter, public s7_a2
real(kind=dp), parameter, public s14_a6
real(kind=dp), parameter, public s18_b15
real(kind=dp), parameter, public s9_a3
real(kind=dp), parameter, public g17_b14
real(kind=dp), parameter, public s12_a6
real(kind=dp), parameter, public g18_b13
real(kind=dp), parameter, public s11_a5
real(kind=dp), parameter, public g13_a10
real(kind=dp), parameter, public s2_b2
real(kind=dp), parameter, public s8_a8
real(kind=dp), parameter, public s17_b6
real(kind=dp), parameter, public s9_b8
real(kind=dp), parameter, public s17_a16
real(kind=dp), parameter, public g12_b11
real(kind=dp), parameter, public s12_a2
real(kind=dp), parameter, public g17_b17
real(kind=dp), parameter, public s15_b14
real(kind=dp), parameter, public g9_b3
real(kind=dp), parameter, public s12_b5
real(kind=dp), parameter, public g15_a9
real(kind=dp), parameter, public g15_rc
real(kind=dp), parameter, public g9_a3
real(kind=dp), parameter, public g11_a4
real(kind=dp), parameter, public g5_rc
real(kind=dp), parameter, public g7_a2
real(kind=dp), parameter, public s13_a3
real(kind=dp), parameter, public s14_a1
real(kind=dp), parameter, public s14_a7
real(kind=dp), parameter, public s18_a7
real(kind=dp), parameter, public g13_rc
real(kind=dp), parameter, public g14_b2
real(kind=dp), parameter, public s7_b6
real(kind=dp), parameter, public g16_b14
real(kind=dp), parameter, public s10_b5
real(kind=dp), parameter, public s18_b11
real(kind=dp), parameter, public s4_a4
real(kind=dp), parameter, public g10_a5
real(kind=dp), parameter, public s6_a5
real(kind=dp), parameter, public s7_b3
real(kind=dp), parameter, public s12_a5
real(kind=dp), parameter, public g4_b2
real(kind=dp), parameter, public s11_a6
real(kind=dp), parameter, public g6_a3
real(kind=dp), parameter, public g13_b1
real(kind=dp), parameter, public g11_a3
real(kind=dp), parameter, public s12_a10
real(kind=dp), parameter, public g15_b3