]> git.uio.no Git - u/mrichter/AliRoot.git/blame - PDF/spdf/sfmsba.F
CLHEP version set explicitely to 1.5.0.0
[u/mrichter/AliRoot.git] / PDF / spdf / sfmsba.F
CommitLineData
fe4da5cc 1*
2* $Id$
3*
4* $Log$
5* Revision 1.1.1.2 1996/10/30 08:30:14 cernlib
6* Version 7.04
7*
8* Revision 1.1.1.1 1996/04/12 15:29:41 plothow
9* Version 7.01
10*
11*
12#include "pdf/pilot.h"
13 SUBROUTINE SFMSBA(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU)
14C
15C THIS IS THE NEW "A" FIT -- May 1994 -- standard Q^2 range
16C
17#include "pdf/impdp.inc"
18C
19 PARAMETER(NX=47)
20 PARAMETER(NTENTH=21)
21 DIMENSION F(8,NX,20),G(8),XX(NX),N0(8)
22 DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=1,7)/
23 + 0.00383, 0.00653, 28.15842, 2.66466, 0.26782,
24 + 0.00000, 1.41125, 2.66188,
25 + 0.00424, 0.00681, 40.95661, 3.06669, 0.72520,
26 + 0.00000, 1.84358, 3.06487,
27 + 0.00462, 0.00707, 55.69226, 3.52457, 1.23064,
28 + 0.00000, 2.32757, 3.52363,
29 + 0.00497, 0.00731, 71.98843, 4.03218, 1.77997,
30 + 0.34007, 2.85815, 4.03207,
31 + 0.00531, 0.00753, 89.79082, 4.58542, 2.37052,
32 + 0.97946, 3.43198, 4.58611,
33 + 0.00563, 0.00774, 108.92063, 5.18108, 2.99995,
34 + 1.62786, 4.04631, 5.18253,
35 + 0.00594, 0.00795, 129.17682, 5.81455, 3.66427,
36 + 2.31175, 4.69687, 5.81673 /
37 DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=8,14)/
38 + 0.00624, 0.00814, 150.39406, 6.48174, 4.35982,
39 + 3.02502, 5.37980, 6.48462,
40 + 0.00652, 0.00833, 172.43767, 7.17909, 5.08341,
41 + 3.76499, 6.09173, 7.18264,
42 + 0.00680, 0.00851, 195.20667, 7.90361, 5.83233,
43 + 4.52908, 6.82983, 7.90783,
44 + 0.00707, 0.00868, 218.62808, 8.65304, 6.60453,
45 + 5.31542, 7.59195, 8.65788,
46 + 0.00733, 0.00885, 242.57538, 9.42471, 7.39756,
47 + 6.12166, 8.37553, 9.43016,
48 + 0.00759, 0.00901, 266.79108, 10.21366, 8.20665,
49 + 6.94318, 9.17574, 10.21972,
50 + 0.00783, 0.00917, 291.48782, 11.02185, 9.03382,
51 + 7.78204, 9.99453, 11.02848 /
52 DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=15,19)/
53 + 0.00808, 0.00932, 316.54001, 11.84695, 9.87688,
54 + 8.63616, 10.82968, 11.85414,
55 + 0.00831, 0.00947, 341.62692, 12.68269, 10.72970,
56 + 9.49945, 11.67498, 12.69042,
57 + 0.00854, 0.00961, 367.17233, 13.53576, 11.59899,
58 + 10.37867, 12.53714, 13.54402,
59 + 0.00877, 0.00976, 392.56421, 14.39482, 12.47355,
60 + 11.26270, 13.40489, 14.40360,
61 + 0.00899, 0.00989, 418.32065, 15.26866, 13.36216,
62 + 12.16033, 14.28701, 15.27794 /
63 DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=1,7)/
64 + 0.00579, 0.00839, 22.78315, 2.15515, 0.21426,
65 + 0.00000, 1.13797, 2.15464,
66 + 0.00636, 0.00877, 32.73079, 2.46979, 0.57339,
67 + 0.00000, 1.47669, 2.46986,
68 + 0.00689, 0.00911, 43.96273, 2.82321, 0.96497,
69 + 0.00000, 1.85080, 2.82382,
70 + 0.00738, 0.00943, 56.16534, 3.21005, 1.38526,
71 + 0.25995, 2.25582, 3.21117,
72 + 0.00785, 0.00973, 69.29437, 3.62713, 1.83220,
73 + 0.74521, 2.68916, 3.62872,
74 + 0.00830, 0.01002, 83.20822, 4.07170, 2.30378,
75 + 1.23206, 3.14846, 4.07376,
76 + 0.00872, 0.01029, 97.75517, 4.54012, 2.79684,
77 + 1.74079, 3.63033, 4.54261 /
78 DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=8,14)/
79 + 0.00913, 0.01054, 112.81502, 5.02922, 3.30858,
80 + 2.26672, 4.13180, 5.03214,
81 + 0.00953, 0.01079, 128.29343, 5.53634, 3.83662,
82 + 2.80787, 4.65036, 5.53965,
83 + 0.00991, 0.01103, 144.12270, 6.05927, 4.37899,
84 + 3.36238, 5.18395, 6.06298,
85 + 0.01028, 0.01125, 160.25618, 6.59641, 4.93426,
86 + 3.92896, 5.73103, 6.60049,
87 + 0.01064, 0.01147, 176.60817, 7.14582, 5.50066,
88 + 4.50594, 6.28976, 7.15026,
89 + 0.01098, 0.01169, 193.00063, 7.70383, 6.07467,
90 + 5.08989, 6.85655, 7.70862,
91 + 0.01132, 0.01189, 209.59521, 8.27215, 6.65806,
92 + 5.68264, 7.43316, 8.27728 /
93 DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=15,19)/
94 + 0.01165, 0.01209, 226.30714, 8.84913, 7.24931,
95 + 6.28271, 8.01798, 8.85459,
96 + 0.01197, 0.01229, 242.91707, 9.43015, 7.84388,
97 + 6.88566, 8.60646, 9.43594,
98 + 0.01228, 0.01247, 259.72992, 10.02044, 8.44703,
99 + 7.49675, 9.20383, 10.02654,
100 + 0.01259, 0.01266, 276.32343, 10.61163, 9.05049,
101 + 8.10778, 9.80177, 10.61803,
102 + 0.01288, 0.01284, 293.06424, 11.21039, 9.66095,
103 + 8.72545, 10.40698, 11.21708 /
104 DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=1,7)/
105 + 0.00862, 0.01079, 18.43334, 1.74251, 0.17137,
106 + 0.00000, 0.91755, 1.74354,
107 + 0.00942, 0.01129, 26.15385, 1.98844, 0.45309,
108 + 0.00000, 1.18265, 1.98981,
109 + 0.01016, 0.01176, 34.69698, 2.26072, 0.75605,
110 + 0.00000, 1.47138, 2.26242,
111 + 0.01085, 0.01218, 43.80949, 2.55486, 1.07703,
112 + 0.19835, 1.77993, 2.55686,
113 + 0.01150, 0.01258, 53.46115, 2.86845, 1.41456,
114 + 0.56595, 2.10639, 2.87073,
115 + 0.01212, 0.01296, 63.54490, 3.19929, 1.76704,
116 + 0.93070, 2.44886, 3.20183,
117 + 0.01271, 0.01331, 73.95010, 3.54455, 2.13201,
118 + 1.30822, 2.80473, 3.54734 /
119 DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=8,14)/
120 + 0.01327, 0.01365, 84.59291, 3.90185, 2.50741,
121 + 1.69498, 3.17178, 3.90489,
122 + 0.01381, 0.01398, 95.41053, 4.26926, 2.89153,
123 + 2.08959, 3.54820, 4.27252,
124 + 0.01434, 0.01429, 106.36025, 4.64524, 3.28302,
125 + 2.49080, 3.93254, 4.64872,
126 + 0.01484, 0.01459, 117.41489, 5.02866, 3.68091,
127 + 2.89773, 4.32378, 5.03236,
128 + 0.01533, 0.01488, 128.51851, 5.41818, 4.08396,
129 + 3.30925, 4.72060, 5.42208,
130 + 0.01580, 0.01516, 139.54984, 5.81109, 4.48961,
131 + 3.72285, 5.12040, 5.81519,
132 + 0.01626, 0.01543, 150.63226, 6.20892, 4.89945,
133 + 4.14017, 5.52471, 6.21321 /
134 DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=15,19)/
135 + 0.01671, 0.01569, 161.71013, 6.61051, 5.31237,
136 + 4.56016, 5.93243, 6.61498,
137 + 0.01714, 0.01594, 172.63414, 7.01250, 5.72513,
138 + 4.97961, 6.34024, 7.01715,
139 + 0.01756, 0.01619, 183.62479, 7.41894, 6.14179,
140 + 5.40262, 6.75221, 7.42377,
141 + 0.01798, 0.01643, 194.39084, 7.82370, 6.55629,
142 + 5.82317, 7.16224, 7.82869,
143 + 0.01838, 0.01666, 205.19286, 8.23184, 6.97373,
144 + 6.24637, 7.57542, 8.23700 /
145 DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=1,7)/
146 + 0.01083, 0.01250, 16.28428, 1.53846, 0.15036,
147 + 0.00000, 0.80894, 1.54017,
148 + 0.01181, 0.01310, 22.93523, 1.75120, 0.39465,
149 + 0.00000, 1.03849, 1.75318,
150 + 0.01270, 0.01365, 30.20590, 1.98472, 0.65519,
151 + 0.00000, 1.28641, 1.98694,
152 + 0.01354, 0.01415, 37.87578, 2.23498, 0.92907,
153 + 0.16916, 1.54928, 2.23742,
154 + 0.01432, 0.01462, 45.92312, 2.50000, 1.21515,
155 + 0.48132, 1.82553, 2.50264,
156 + 0.01507, 0.01506, 54.25890, 2.77786, 1.51203,
157 + 0.78902, 2.11355, 2.78069,
158 + 0.01578, 0.01549, 62.79275, 3.06616, 1.81766,
159 + 1.10565, 2.41111, 3.06918 /
160 DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=8,14)/
161 + 0.01646, 0.01589, 71.45830, 3.36294, 2.13034,
162 + 1.42830, 2.71639, 3.36613,
163 + 0.01711, 0.01627, 80.20737, 3.66660, 2.44867,
164 + 1.75584, 3.02790, 3.66996,
165 + 0.01774, 0.01663, 89.00863, 3.97591, 2.77159,
166 + 2.08729, 3.34449, 3.97943,
167 + 0.01835, 0.01699, 97.84350, 4.29001, 3.09837,
168 + 2.42202, 3.66537, 4.29367,
169 + 0.01894, 0.01732, 106.66942, 4.60778, 3.42802,
170 + 2.75909, 3.98951, 4.61160,
171 + 0.01950, 0.01765, 115.38995, 4.92701, 3.75841,
172 + 3.09646, 4.31471, 4.93097,
173 + 0.02005, 0.01797, 124.11079, 5.24911, 4.09103,
174 + 3.43564, 4.64244, 5.25320 /
175 DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=15,19)/
176 + 0.02058, 0.01827, 132.78889, 5.57313, 4.42499,
177 + 3.77580, 4.97179, 5.57736,
178 + 0.02110, 0.01857, 141.30566, 5.89632, 4.75760,
179 + 4.11428, 5.30002, 5.90066,
180 + 0.02161, 0.01885, 149.84323, 6.22216, 5.09238,
181 + 4.45463, 5.63065, 6.22663,
182 + 0.02210, 0.01913, 158.16785, 6.54552, 5.42427,
183 + 4.79183, 5.95859, 6.55011,
184 + 0.02258, 0.01940, 166.49304, 6.87075, 5.75763,
185 + 5.13024, 6.28818, 6.87545 /
186 DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=1,7)/
187 + 0.01271, 0.01388, 14.91292, 1.40814, 0.13702,
188 + 0.00000, 0.73975, 1.41028,
189 + 0.01383, 0.01456, 20.89327, 1.60001, 0.35774,
190 + 0.00000, 0.94694, 1.60238,
191 + 0.01486, 0.01517, 27.37356, 1.80930, 0.59174,
192 + 0.00000, 1.16936, 1.81186,
193 + 0.01581, 0.01574, 34.15500, 2.03230, 0.83633,
194 + 0.15102, 1.40383, 2.03505,
195 + 0.01671, 0.01627, 41.22172, 2.26730, 1.09057,
196 + 0.42883, 1.64906, 2.27022,
197 + 0.01757, 0.01677, 48.49636, 2.51259, 1.35323,
198 + 0.70137, 1.90358, 2.51566,
199 + 0.01838, 0.01724, 55.90141, 2.76604, 1.62250,
200 + 0.98067, 2.16544, 2.76926 /
201 DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=8,14)/
202 + 0.01916, 0.01769, 63.38121, 3.02593, 1.89691,
203 + 1.26417, 2.43306, 3.02930,
204 + 0.01990, 0.01812, 70.89649, 3.29090, 2.17526,
205 + 1.55092, 2.70515, 3.29440,
206 + 0.02062, 0.01853, 78.42281, 3.55990, 2.45668,
207 + 1.84011, 2.98076, 3.56353,
208 + 0.02131, 0.01892, 85.94665, 3.83222, 2.74057,
209 + 2.13124, 3.25923, 3.83597,
210 + 0.02197, 0.01930, 93.43315, 4.10692, 3.02609,
211 + 2.42353, 3.53969, 4.11078,
212 + 0.02262, 0.01967, 100.80080, 4.38205, 3.31140,
213 + 2.71520, 3.82025, 4.38603,
214 + 0.02324, 0.02002, 108.14440, 4.65896, 3.59789,
215 + 3.00767, 4.10226, 4.66305 /
216 DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=15,19)/
217 + 0.02385, 0.02036, 115.42803, 4.93683, 3.88482,
218 + 3.30025, 4.38495, 4.94102,
219 + 0.02443, 0.02069, 122.55126, 5.21326, 4.16983,
220 + 3.59061, 4.66595, 5.21755,
221 + 0.02501, 0.02101, 129.67320, 5.49139, 4.45611,
222 + 3.88197, 4.94842, 5.49578,
223 + 0.02556, 0.02132, 136.59415, 5.76672, 4.73921,
224 + 4.16990, 5.22789, 5.77120,
225 + 0.02610, 0.02162, 143.49922, 6.04313, 5.02301,
226 + 4.45831, 5.50824, 6.04770 /
227 DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=1,7)/
228 + 0.01437, 0.01506, 13.92903, 1.31459, 0.12748,
229 + 0.00000, 0.69017, 1.31704,
230 + 0.01561, 0.01580, 19.43438, 1.49164, 0.33147,
231 + 0.00000, 0.88149, 1.49428,
232 + 0.01676, 0.01648, 25.35865, 1.68380, 0.54669,
233 + 0.00000, 1.08587, 1.68663,
234 + 0.01782, 0.01710, 31.51905, 1.88763, 0.77066,
235 + 0.13825, 1.30038, 1.89062,
236 + 0.01882, 0.01768, 37.90410, 2.10159, 1.00258,
237 + 0.39196, 1.52386, 2.10473,
238 + 0.01977, 0.01822, 44.44489, 2.32414, 1.24132,
239 + 0.63992, 1.75499, 2.32742,
240 + 0.02067, 0.01874, 51.07295, 2.55334, 1.48527,
241 + 0.89320, 1.99201, 2.55675 /
242 DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=8,14)/
243 + 0.02153, 0.01923, 57.74014, 2.78765, 1.73311,
244 + 1.14949, 2.23349, 2.79119,
245 + 0.02236, 0.01970, 64.41331, 3.02587, 1.98380,
246 + 1.40800, 2.47832, 3.02952,
247 + 0.02315, 0.02015, 71.07264, 3.26707, 2.23658,
248 + 1.66801, 2.72566, 3.27084,
249 + 0.02391, 0.02058, 77.70800, 3.51066, 2.49094,
250 + 1.92912, 2.97497, 3.51453,
251 + 0.02465, 0.02099, 84.28979, 3.75581, 2.74618,
252 + 2.19064, 3.22547, 3.75978,
253 + 0.02536, 0.02139, 90.74677, 4.00077, 3.00061,
254 + 2.45100, 3.47545, 4.00484,
255 + 0.02605, 0.02177, 97.16567, 4.24682, 3.25559,
256 + 2.71154, 3.72623, 4.25098 /
257 DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=15,19)/
258 + 0.02671, 0.02214, 103.51585, 4.49325, 3.51045,
259 + 2.97165, 3.97714, 4.49750,
260 + 0.02736, 0.02250, 109.70876, 4.73789, 3.76308,
261 + 3.22926, 4.22601, 4.74222,
262 + 0.02799, 0.02285, 115.88792, 4.98364, 4.01642,
263 + 3.48733, 4.47580, 4.98807,
264 + 0.02860, 0.02319, 121.87642, 5.22645, 4.26645,
265 + 3.74185, 4.72243, 5.23095,
266 + 0.02920, 0.02352, 127.84000, 5.46984, 4.51673,
267 + 3.99642, 4.96948, 5.47442 /
268 DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=1,7)/
269 + 0.02093, 0.01941, 11.26643, 1.06105, 0.10183,
270 + 0.00000, 0.55629, 1.06444,
271 + 0.02268, 0.02041, 15.51377, 1.19866, 0.26125,
272 + 0.00000, 0.70541, 1.20223,
273 + 0.02428, 0.02130, 19.98321, 1.34567, 0.42692,
274 + 0.00000, 0.86226, 1.34940,
275 + 0.02575, 0.02213, 24.53687, 1.49934, 0.59687,
276 + 0.10483, 1.02451, 1.50321,
277 + 0.02713, 0.02290, 29.17542, 1.65866, 0.77070,
278 + 0.29572, 1.19148, 1.66267,
279 + 0.02844, 0.02362, 33.85272, 1.82251, 0.94763,
280 + 0.48005, 1.36222, 1.82664,
281 + 0.02968, 0.02430, 38.52400, 1.98949, 1.12652,
282 + 0.66639, 1.53548, 1.99373 /
283 DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=8,14)/
284 + 0.03086, 0.02495, 43.16029, 2.15854, 1.30648,
285 + 0.85312, 1.71027, 2.16289,
286 + 0.03199, 0.02557, 47.74363, 2.32885, 1.48686,
287 + 1.03974, 1.88589, 2.33330,
288 + 0.03307, 0.02616, 52.26545, 2.49987, 1.66720,
289 + 1.22587, 2.06181, 2.50441,
290 + 0.03411, 0.02672, 56.72363, 2.67124, 1.84726,
291 + 1.41131, 2.23775, 2.67587,
292 + 0.03511, 0.02726, 61.10136, 2.84242, 2.02656,
293 + 1.59564, 2.41321, 2.84714,
294 + 0.03607, 0.02778, 65.35197, 3.01218, 2.20396,
295 + 1.77777, 2.58699, 3.01698,
296 + 0.03700, 0.02828, 69.54204, 3.18162, 2.38058,
297 + 1.95884, 2.76022, 3.18650 /
298 DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=15,19)/
299 + 0.03790, 0.02876, 73.65256, 3.35028, 2.55602,
300 + 2.13848, 2.93244, 3.35523,
301 + 0.03877, 0.02923, 77.62486, 3.51659, 2.72877,
302 + 2.31520, 3.10214, 3.52162,
303 + 0.03962, 0.02968, 81.56219, 3.68282, 2.90110,
304 + 2.49131, 3.27158, 3.68792,
305 + 0.04044, 0.03012, 85.34420, 3.84601, 3.07010,
306 + 2.66389, 3.43782, 3.85117,
307 + 0.04124, 0.03055, 89.08799, 4.00884, 3.23846,
308 + 2.83568, 3.60356, 4.01406 /
309 DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=1,7)/
310 + 0.03032, 0.02511, 9.10952, 0.85512, 0.08122,
311 + 0.00000, 0.44819, 0.85959,
312 + 0.03276, 0.02644, 12.36868, 0.96155, 0.20539,
313 + 0.00000, 0.56399, 0.96625,
314 + 0.03498, 0.02763, 15.71702, 1.07334, 0.33235,
315 + 0.00000, 0.68380, 1.07825,
316 + 0.03701, 0.02873, 19.05450, 1.18838, 0.46064,
317 + 0.07908, 0.80583, 1.19348,
318 + 0.03892, 0.02974, 22.39167, 1.30611, 0.59016,
319 + 0.22192, 0.92978, 1.31137,
320 + 0.04071, 0.03070, 25.70026, 1.42573, 0.72041,
321 + 0.35811, 1.05501, 1.43115,
322 + 0.04241, 0.03160, 28.95338, 1.54627, 0.85063,
323 + 0.49428, 1.18066, 1.55184 /
324 DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=8,14)/
325 + 0.04402, 0.03245, 32.13588, 1.66706, 0.98029,
326 + 0.62934, 1.30612, 1.67276,
327 + 0.04555, 0.03326, 35.24037, 1.78758, 1.10899,
328 + 0.76302, 1.43095, 1.79342,
329 + 0.04702, 0.03403, 38.26561, 1.90753, 1.23652,
330 + 0.89517, 1.55490, 1.91349,
331 + 0.04842, 0.03476, 41.21448, 2.02674, 1.36278,
332 + 1.02573, 1.67783, 2.03281,
333 + 0.04977, 0.03547, 44.07856, 2.14488, 1.48753,
334 + 1.15449, 1.79945, 2.15107,
335 + 0.05106, 0.03614, 46.82820, 2.26109, 1.60994,
336 + 1.28068, 1.91893, 2.26739,
337 + 0.05231, 0.03679, 49.51406, 2.37632, 1.73101,
338 + 1.40529, 2.03723, 2.38272 /
339 DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=15,19)/
340 + 0.05352, 0.03742, 52.12506, 2.49026, 1.85046,
341 + 1.52809, 2.15407, 2.49675,
342 + 0.05469, 0.03802, 54.62273, 2.60181, 1.96723,
343 + 1.64804, 2.26838, 2.60840,
344 + 0.05582, 0.03860, 57.08110, 2.71272, 2.08310,
345 + 1.76692, 2.38190, 2.71940,
346 + 0.05691, 0.03917, 59.41876, 2.82084, 2.19594,
347 + 1.88262, 2.49251, 2.82761,
348 + 0.05798, 0.03972, 61.71810, 2.92821, 2.30782,
349 + 1.99722, 2.60225, 2.93506 /
350 DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=1,7)/
351 + 0.03759, 0.02928, 8.04229, 0.75299, 0.07107,
352 + 0.00000, 0.39483, 0.75825,
353 + 0.04054, 0.03084, 10.82227, 0.84422, 0.17806,
354 + 0.00000, 0.49442, 0.84977,
355 + 0.04322, 0.03225, 13.63543, 0.93905, 0.28637,
356 + 0.00000, 0.59640, 0.94486,
357 + 0.04567, 0.03354, 16.40099, 1.03570, 0.39478,
358 + 0.06681, 0.69927, 1.04173,
359 + 0.04796, 0.03474, 19.13413, 1.13379, 0.50335,
360 + 0.18688, 0.80292, 1.14004,
361 + 0.05011, 0.03586, 21.81510, 1.23270, 0.61172,
362 + 0.30047, 0.90685, 1.23915,
363 + 0.05214, 0.03691, 24.42526, 1.33169, 0.71931,
364 + 0.41327, 1.01040, 1.33833 /
365 DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=8,14)/
366 + 0.05407, 0.03791, 26.95555, 1.43024, 0.82574,
367 + 0.52443, 1.11312, 1.43705,
368 + 0.05589, 0.03885, 29.40300, 1.52799, 0.93076,
369 + 0.63382, 1.21473, 1.53497,
370 + 0.05764, 0.03975, 31.76937, 1.62473, 1.03425,
371 + 0.74134, 1.31504, 1.63187,
372 + 0.05931, 0.04061, 34.05931, 1.72038, 1.13618,
373 + 0.84703, 1.41402, 1.72766,
374 + 0.06091, 0.04143, 36.26794, 1.81471, 1.23638,
375 + 0.95075, 1.51146, 1.82213,
376 + 0.06244, 0.04221, 38.37289, 1.90703, 1.33422,
377 + 1.05189, 1.60671, 1.91459,
378 + 0.06392, 0.04297, 40.41710, 1.99819, 1.43057,
379 + 1.15135, 1.70062, 2.00588 /
380 DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=15,19)/
381 + 0.06534, 0.04369, 42.39277, 2.08795, 1.52525,
382 + 1.24895, 1.79299, 2.09577,
383 + 0.06672, 0.04439, 44.27015, 2.17545, 1.61739,
384 + 1.34387, 1.88294, 2.18338,
385 + 0.06805, 0.04507, 46.10979, 2.26215, 1.70851,
386 + 1.43762, 1.97198, 2.27019,
387 + 0.06934, 0.04572, 47.84745, 2.34630, 1.79686,
388 + 1.52848, 2.05836, 2.35446,
389 + 0.07059, 0.04635, 49.54973, 2.42961, 1.88418,
390 + 1.61820, 2.14380, 2.43788 /
391 DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=1,7)/
392 + 0.04376, 0.03271, 7.36026, 0.68763, 0.06460,
393 + 0.00000, 0.36076, 0.69355,
394 + 0.04714, 0.03447, 9.83669, 0.76922, 0.16068,
395 + 0.00000, 0.45006, 0.77548,
396 + 0.05019, 0.03606, 12.31420, 0.85336, 0.25723,
397 + 0.00000, 0.54081, 0.85992,
398 + 0.05299, 0.03751, 14.72451, 0.93849, 0.35318,
399 + 0.05913, 0.63171, 0.94532,
400 + 0.05559, 0.03885, 17.08565, 1.02437, 0.44870,
401 + 0.16500, 0.72272, 1.03145,
402 + 0.05803, 0.04010, 19.38313, 1.11048, 0.54352,
403 + 0.26457, 0.81347, 1.11779,
404 + 0.06033, 0.04128, 21.60332, 1.19621, 0.63717,
405 + 0.36296, 0.90341, 1.20374 /
406 DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=8,14)/
407 + 0.06250, 0.04239, 23.74072, 1.28114, 0.72936,
408 + 0.45946, 0.99222, 1.28888,
409 + 0.06457, 0.04344, 25.79492, 1.36500, 0.81993,
410 + 0.55399, 1.07965, 1.37294,
411 + 0.06653, 0.04444, 27.76928, 1.44766, 0.90880,
412 + 0.64654, 1.16562, 1.45578,
413 + 0.06841, 0.04540, 29.66939, 1.52907, 0.99600,
414 + 0.73716, 1.25012, 1.53736,
415 + 0.07021, 0.04631, 31.49225, 1.60905, 1.08140,
416 + 0.82576, 1.33299, 1.61752,
417 + 0.07194, 0.04718, 33.21981, 1.68704, 1.16447,
418 + 0.91183, 1.41369, 1.69567,
419 + 0.07360, 0.04801, 34.89013, 1.76381, 1.24603,
420 + 0.99621, 1.49301, 1.77258 /
421 DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=15,19)/
422 + 0.07520, 0.04881, 36.49722, 1.83917, 1.32592,
423 + 1.07877, 1.57078, 1.84809,
424 + 0.07673, 0.04959, 38.01646, 1.91237, 1.40341,
425 + 1.15878, 1.64627, 1.92143,
426 + 0.07822, 0.05033, 39.50019, 1.98473, 1.47985,
427 + 1.23761, 1.72081, 1.99393,
428 + 0.07966, 0.05105, 40.89431, 2.05473, 1.55373,
429 + 1.31377, 1.79288, 2.06406,
430 + 0.08106, 0.05175, 42.25586, 2.12388, 1.62658,
431 + 1.38879, 1.86400, 2.13334 /
432 DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=1,7)/
433 + 0.04928, 0.03574, 6.86937, 0.64065, 0.05990,
434 + 0.00000, 0.33610, 0.64709,
435 + 0.05301, 0.03768, 9.12498, 0.71525, 0.14804,
436 + 0.00000, 0.41792, 0.72206,
437 + 0.05639, 0.03942, 11.35974, 0.79168, 0.23607,
438 + 0.00000, 0.50053, 0.79882,
439 + 0.05947, 0.04101, 13.51488, 0.86854, 0.32304,
440 + 0.05360, 0.58278, 0.87597,
441 + 0.06233, 0.04247, 15.61026, 0.94568, 0.40919,
442 + 0.14928, 0.66472, 0.95337,
443 + 0.06501, 0.04384, 17.63542, 1.02266, 0.49431,
444 + 0.23882, 0.74604, 1.03061,
445 + 0.06753, 0.04512, 19.58012, 1.09897, 0.57802,
446 + 0.32693, 0.82629, 1.10715 /
447 DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=8,14)/
448 + 0.06992, 0.04633, 21.44131, 1.17426, 0.66010,
449 + 0.41301, 0.90520, 1.18266,
450 + 0.07218, 0.04748, 23.22055, 1.24834, 0.74043,
451 + 0.49702, 0.98261, 1.25694,
452 + 0.07433, 0.04856, 24.92199, 1.32109, 0.81899,
453 + 0.57899, 1.05846, 1.32989,
454 + 0.07638, 0.04959, 26.55169, 1.39251, 0.89583,
455 + 0.65901, 1.13278, 1.40150,
456 + 0.07834, 0.05058, 28.10815, 1.46247, 0.97085,
457 + 0.73699, 1.20543, 1.47164,
458 + 0.08022, 0.05152, 29.57612, 1.53046, 1.04359,
459 + 0.81253, 1.27596, 1.53980,
460 + 0.08202, 0.05242, 30.99007, 1.59721, 1.11482,
461 + 0.88638, 1.34510, 1.60671 /
462 DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=15,19)/
463 + 0.08376, 0.05329, 32.34525, 1.66257, 1.18441,
464 + 0.95844, 1.41272, 1.67222,
465 + 0.08543, 0.05412, 33.62056, 1.72588, 1.25173,
466 + 1.02810, 1.47816, 1.73568,
467 + 0.08705, 0.05492, 34.86252, 1.78833, 1.31800,
468 + 1.09659, 1.54266, 1.79828,
469 + 0.08860, 0.05569, 36.02439, 1.84858, 1.38187,
470 + 1.16258, 1.60484, 1.85866,
471 + 0.09012, 0.05644, 37.15619, 1.90798, 1.44473,
472 + 1.22746, 1.66609, 1.91820 /
473 DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=1,7)/
474 + 0.07115, 0.04744, 5.53899, 0.51305, 0.04724,
475 + 0.00000, 0.26968, 0.52174,
476 + 0.07622, 0.05002, 7.20629, 0.56895, 0.11419,
477 + 0.00000, 0.33152, 0.57813,
478 + 0.08077, 0.05232, 8.80460, 0.62496, 0.17967,
479 + 0.00000, 0.39264, 0.63459,
480 + 0.08490, 0.05440, 10.30043, 0.68015, 0.24312,
481 + 0.03913, 0.45228, 0.69018,
482 + 0.08872, 0.05631, 11.71833, 0.73460, 0.30493,
483 + 0.10827, 0.51069, 0.74499,
484 + 0.09227, 0.05809, 13.05725, 0.78808, 0.36506,
485 + 0.17194, 0.56776, 0.79881,
486 + 0.09559, 0.05974, 14.31548, 0.84032, 0.42336,
487 + 0.23372, 0.62326, 0.85136 /
488 DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=8,14)/
489 + 0.09872, 0.06129, 15.49562, 0.89117, 0.47977,
490 + 0.29330, 0.67711, 0.90250,
491 + 0.10167, 0.06275, 16.60275, 0.94056, 0.53429,
492 + 0.35074, 0.72927, 0.95217,
493 + 0.10446, 0.06413, 17.64306, 0.98851, 0.58700,
494 + 0.40615, 0.77979, 1.00038,
495 + 0.10712, 0.06544, 18.62338, 1.03508, 0.63800,
496 + 0.45967, 0.82875, 1.04719,
497 + 0.10965, 0.06668, 19.54482, 1.08021, 0.68729,
498 + 0.51132, 0.87613, 1.09256,
499 + 0.11205, 0.06785, 20.39902, 1.12360, 0.73458,
500 + 0.56081, 0.92162, 1.13616,
501 + 0.11436, 0.06898, 21.21094, 1.16582, 0.78048,
502 + 0.60879, 0.96583, 1.17860 /
503 DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=15,19)/
504 + 0.11658, 0.07006, 21.97861, 1.20680, 0.82495,
505 + 0.65521, 1.00869, 1.21978,
506 + 0.11870, 0.07109, 22.68923, 1.24611, 0.86755,
507 + 0.69967, 1.04977, 1.25927,
508 + 0.12075, 0.07208, 23.37444, 1.28462, 0.90921,
509 + 0.74308, 1.08999, 1.29798,
510 + 0.12272, 0.07303, 24.00451, 1.32141, 0.94897,
511 + 0.78453, 1.12839, 1.33494,
512 + 0.12462, 0.07395, 24.61268, 1.35746, 0.98788,
513 + 0.82503, 1.16598, 1.37117 /
514 DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=1,7)/
515 + 0.10262, 0.06404, 4.45704, 0.40977, 0.03700,
516 + 0.00000, 0.21612, 0.42153,
517 + 0.10936, 0.06741, 5.65313, 0.45065, 0.08690,
518 + 0.00000, 0.26192, 0.46307,
519 + 0.11536, 0.07039, 6.75557, 0.49056, 0.13455,
520 + 0.00000, 0.30606, 0.50357,
521 + 0.12076, 0.07306, 7.75081, 0.52896, 0.17970,
522 + 0.02790, 0.34814, 0.54247,
523 + 0.12570, 0.07549, 8.66580, 0.56608, 0.22286,
524 + 0.07664, 0.38855, 0.58006,
525 + 0.13027, 0.07773, 9.50576, 0.60186, 0.26410,
526 + 0.12069, 0.42731, 0.61627,
527 + 0.13452, 0.07980, 10.27447, 0.63621, 0.30344,
528 + 0.16278, 0.46439, 0.65102 /
529 DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=8,14)/
530 + 0.13849, 0.08172, 10.97758, 0.66911, 0.34091,
531 + 0.20275, 0.49978, 0.68428,
532 + 0.14221, 0.08351, 11.62169, 0.70059, 0.37661,
533 + 0.24076, 0.53357, 0.71610,
534 + 0.14572, 0.08520, 12.21352, 0.73072, 0.41067,
535 + 0.27696, 0.56585, 0.74656,
536 + 0.14903, 0.08678, 12.75969, 0.75961, 0.44322,
537 + 0.31150, 0.59674, 0.77575,
538 + 0.15217, 0.08828, 13.26261, 0.78725, 0.47430,
539 + 0.34443, 0.62626, 0.80367,
540 + 0.15514, 0.08969, 13.71802, 0.81348, 0.50376,
541 + 0.37563, 0.65425, 0.83017,
542 + 0.15798, 0.09104, 14.14334, 0.83874, 0.53207,
543 + 0.40558, 0.68118, 0.85568 /
544 DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=15,19)/
545 + 0.16069, 0.09232, 14.53804, 0.86300, 0.55921,
546 + 0.43426, 0.70701, 0.88018,
547 + 0.16327, 0.09353, 14.89501, 0.88597, 0.58492,
548 + 0.46143, 0.73147, 0.90338,
549 + 0.16576, 0.09469, 15.23480, 0.90830, 0.60986,
550 + 0.48776, 0.75524, 0.92593,
551 + 0.16812, 0.09580, 15.53910, 0.92937, 0.63341,
552 + 0.51262, 0.77766, 0.94721,
553 + 0.17041, 0.09686, 15.82931, 0.94987, 0.65628,
554 + 0.53675, 0.79945, 0.96790 /
555 DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=1,7)/
556 + 0.12706, 0.07692, 3.91963, 0.35886, 0.03197,
557 + -0.00001, 0.18999, 0.37308,
558 + 0.13492, 0.08081, 4.88547, 0.39235, 0.07352,
559 + -0.00001, 0.22792, 0.40733,
560 + 0.14187, 0.08422, 5.75208, 0.42447, 0.11258,
561 + -0.00001, 0.26387, 0.44013,
562 + 0.14807, 0.08724, 6.51529, 0.45488, 0.14905,
563 + 0.02258, 0.29761, 0.47112,
564 + 0.15373, 0.08997, 7.20213, 0.48387, 0.18346,
565 + 0.06173, 0.32959, 0.50065,
566 + 0.15893, 0.09247, 7.82023, 0.51147, 0.21597,
567 + 0.09669, 0.35990, 0.52873,
568 + 0.16374, 0.09477, 8.37516, 0.53764, 0.24663,
569 + 0.12975, 0.38854, 0.55534 /
570 DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=8,14)/
571 + 0.16821, 0.09689, 8.87344, 0.56244, 0.27555,
572 + 0.16084, 0.41561, 0.58054,
573 + 0.17238, 0.09886, 9.32211, 0.58591, 0.30284,
574 + 0.19013, 0.44118, 0.60440,
575 + 0.17629, 0.10069, 9.72756, 0.60816, 0.32863,
576 + 0.21778, 0.46538, 0.62700,
577 + 0.17997, 0.10241, 10.09574, 0.62929, 0.35309,
578 + 0.24396, 0.48834, 0.64846,
579 + 0.18345, 0.10403, 10.42926, 0.64935, 0.37626,
580 + 0.26874, 0.51012, 0.66883,
581 + 0.18672, 0.10554, 10.72539, 0.66819, 0.39802,
582 + 0.29201, 0.53056, 0.68795,
583 + 0.18984, 0.10698, 10.99823, 0.68619, 0.41879,
584 + 0.31421, 0.55009, 0.70623 /
585 DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=15,19)/
586 + 0.19281, 0.10834, 11.24775, 0.70336, 0.43858,
587 + 0.33533, 0.56870, 0.72365,
588 + 0.19561, 0.10962, 11.46847, 0.71947, 0.45717,
589 + 0.35519, 0.58617, 0.74000,
590 + 0.19832, 0.11085, 11.67636, 0.73504, 0.47511,
591 + 0.37434, 0.60305, 0.75581,
592 + 0.20087, 0.11200, 11.85815, 0.74960, 0.49192,
593 + 0.39229, 0.61884, 0.77058,
594 + 0.20334, 0.11312, 12.02975, 0.76368, 0.50817,
595 + 0.40963, 0.63412, 0.78488 /
596 DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=1,7)/
597 + 0.14782, 0.08793, 3.57509, 0.32656, 0.02878,
598 + -0.00001, 0.17350, 0.34287,
599 + 0.15651, 0.09217, 4.39473, 0.35533, 0.06502,
600 + -0.00001, 0.20642, 0.37248,
601 + 0.16415, 0.09587, 5.11463, 0.38254, 0.09868,
602 + -0.00001, 0.23722, 0.40042,
603 + 0.17093, 0.09911, 5.73604, 0.40796, 0.12975,
604 + 0.01928, 0.26577, 0.42648,
605 + 0.17708, 0.10204, 6.28565, 0.43193, 0.15878,
606 + 0.05251, 0.29255, 0.45103,
607 + 0.18271, 0.10469, 6.77214, 0.45452, 0.18596,
608 + 0.08191, 0.31768, 0.47413,
609 + 0.18790, 0.10712, 7.20198, 0.47573, 0.21137,
610 + 0.10948, 0.34121, 0.49581 /
611 DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=8,14)/
612 + 0.19269, 0.10935, 7.58193, 0.49565, 0.23514,
613 + 0.13522, 0.36326, 0.51615,
614 + 0.19715, 0.11141, 7.91886, 0.51434, 0.25741,
615 + 0.15931, 0.38394, 0.53525,
616 + 0.20131, 0.11332, 8.21884, 0.53191, 0.27831,
617 + 0.18188, 0.40335, 0.55319,
618 + 0.20522, 0.11510, 8.48738, 0.54848, 0.29799,
619 + 0.20313, 0.42165, 0.57010,
620 + 0.20890, 0.11676, 8.72705, 0.56410, 0.31653,
621 + 0.22312, 0.43888, 0.58603,
622 + 0.21235, 0.11831, 8.93594, 0.57864, 0.33382,
623 + 0.24177, 0.45493, 0.60086,
624 + 0.21562, 0.11978, 9.12589, 0.59245, 0.35023,
625 + 0.25947, 0.47019, 0.61495 /
626 DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=15,19)/
627 + 0.21872, 0.12116, 9.29704, 0.60554, 0.36579,
628 + 0.27624, 0.48464, 0.62830,
629 + 0.22165, 0.12245, 9.44518, 0.61772, 0.38031,
630 + 0.29190, 0.49811, 0.64072,
631 + 0.22446, 0.12369, 9.58329, 0.62945, 0.39427,
632 + 0.30695, 0.51106, 0.65268,
633 + 0.22711, 0.12485, 9.70083, 0.64031, 0.40726,
634 + 0.32097, 0.52310, 0.66376,
635 + 0.22966, 0.12596, 9.81063, 0.65078, 0.41976,
636 + 0.33446, 0.53469, 0.67444 /
637 DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=1,7)/
638 + 0.16621, 0.09771, 3.32673, 0.30346, 0.02650,
639 + 0.00000, 0.16182, 0.32167,
640 + 0.17555, 0.10221, 4.04194, 0.32881, 0.05896,
641 + 0.00000, 0.19115, 0.34793,
642 + 0.18371, 0.10610, 4.65887, 0.35251, 0.08880,
643 + -0.00001, 0.21827, 0.37240,
644 + 0.19092, 0.10949, 5.18219, 0.37441, 0.11608,
645 + 0.01696, 0.24317, 0.39497,
646 + 0.19743, 0.11253, 5.63806, 0.39487, 0.14136,
647 + 0.04607, 0.26631, 0.41602,
648 + 0.20337, 0.11527, 6.03570, 0.41397, 0.16484,
649 + 0.07162, 0.28785, 0.43566,
650 + 0.20881, 0.11777, 6.38188, 0.43176, 0.18664,
651 + 0.09542, 0.30788, 0.45394 /
652 DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=8,14)/
653 + 0.21382, 0.12005, 6.68365, 0.44833, 0.20690,
654 + 0.11750, 0.32650, 0.47094,
655 + 0.21847, 0.12214, 6.94738, 0.46377, 0.22576,
656 + 0.13803, 0.34383, 0.48678,
657 + 0.22279, 0.12407, 7.17876, 0.47818, 0.24335,
658 + 0.15717, 0.36001, 0.50156,
659 + 0.22684, 0.12587, 7.38304, 0.49168, 0.25984,
660 + 0.17510, 0.37517, 0.51541,
661 + 0.23063, 0.12754, 7.56283, 0.50431, 0.27527,
662 + 0.19187, 0.38935, 0.52835,
663 + 0.23418, 0.12909, 7.71659, 0.51599, 0.28958,
664 + 0.20745, 0.40248, 0.54032,
665 + 0.23753, 0.13055, 7.85442, 0.52702, 0.30312,
666 + 0.22217, 0.41490, 0.55163 /
667 DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=15,19)/
668 + 0.24070, 0.13192, 7.97654, 0.53741, 0.31588,
669 + 0.23605, 0.42660, 0.56228,
670 + 0.24368, 0.13319, 8.07988, 0.54701, 0.32773,
671 + 0.24895, 0.43744, 0.57211,
672 + 0.24654, 0.13441, 8.17520, 0.55622, 0.33908,
673 + 0.26130, 0.44783, 0.58154,
674 + 0.24922, 0.13554, 8.25361, 0.56467, 0.34957,
675 + 0.27275, 0.45741, 0.59020,
676 + 0.25181, 0.13663, 8.32597, 0.57279, 0.35965,
677 + 0.28374, 0.46661, 0.59853 /
678 DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=1,7)/
679 + 0.23909, 0.13644, 2.64474, 0.24060, 0.02040,
680 + 0.00000, 0.13077, 0.26678,
681 + 0.25014, 0.14133, 3.07957, 0.25651, 0.04269,
682 + -0.00001, 0.15029, 0.28367,
683 + 0.25959, 0.14543, 3.42895, 0.27073, 0.06243,
684 + 0.00000, 0.16761, 0.29869,
685 + 0.26776, 0.14890, 3.70512, 0.28330, 0.07986,
686 + 0.01097, 0.18291, 0.31193,
687 + 0.27500, 0.15192, 3.93073, 0.29460, 0.09555,
688 + 0.02948, 0.19666, 0.32381,
689 + 0.28148, 0.15458, 4.11511, 0.30478, 0.10972,
690 + 0.04528, 0.20906, 0.33449,
691 + 0.28731, 0.15693, 4.26501, 0.31394, 0.12253,
692 + 0.05965, 0.22025, 0.34409 /
693 DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=8,14)/
694 + 0.29259, 0.15902, 4.38661, 0.32218, 0.13414,
695 + 0.07268, 0.23036, 0.35271,
696 + 0.29741, 0.16090, 4.48505, 0.32961, 0.14471,
697 + 0.08455, 0.23952, 0.36047,
698 + 0.30181, 0.16258, 4.56467, 0.33633, 0.15435,
699 + 0.09540, 0.24785, 0.36749,
700 + 0.30587, 0.16412, 4.62914, 0.34244, 0.16319,
701 + 0.10536, 0.25547, 0.37387,
702 + 0.30962, 0.16551, 4.68024, 0.34798, 0.17131,
703 + 0.11453, 0.26242, 0.37966,
704 + 0.31306, 0.16676, 4.71772, 0.35292, 0.17867,
705 + 0.12286, 0.26869, 0.38480,
706 + 0.31628, 0.16791, 4.74756, 0.35747, 0.18551,
707 + 0.13062, 0.27448, 0.38954 /
708 DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=15,19)/
709 + 0.31928, 0.16897, 4.77000, 0.36162, 0.19184,
710 + 0.13782, 0.27983, 0.39388,
711 + 0.32204, 0.16992, 4.78330, 0.36531, 0.19759,
712 + 0.14439, 0.28464, 0.39771,
713 + 0.32467, 0.17082, 4.79354, 0.36878, 0.20303,
714 + 0.15060, 0.28918, 0.40132,
715 + 0.32709, 0.17163, 4.79590, 0.37181, 0.20794,
716 + 0.15625, 0.29324, 0.40447,
717 + 0.32939, 0.17238, 4.79631, 0.37467, 0.21260,
718 + 0.16161, 0.29707, 0.40744 /
719 DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=1,7)/
720 + 0.34271, 0.18927, 2.06404, 0.18589, 0.01537,
721 + -0.00001, 0.10497, 0.22364,
722 + 0.35374, 0.19299, 2.27574, 0.19369, 0.02950,
723 + -0.00002, 0.11625, 0.23204,
724 + 0.36280, 0.19588, 2.42600, 0.20013, 0.04142,
725 + -0.00002, 0.12569, 0.23892,
726 + 0.37028, 0.19813, 2.52849, 0.20539, 0.05149,
727 + 0.00649, 0.13355, 0.24446,
728 + 0.37666, 0.19992, 2.60026, 0.20977, 0.06018,
729 + 0.01722, 0.14026, 0.24905,
730 + 0.38214, 0.20136, 2.64872, 0.21341, 0.06775,
731 + 0.02607, 0.14601, 0.25285,
732 + 0.38687, 0.20250, 2.67907, 0.21644, 0.07436,
733 + 0.03387, 0.15094, 0.25596 /
734 DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=8,14)/
735 + 0.39099, 0.20342, 2.69554, 0.21892, 0.08013,
736 + 0.04075, 0.15517, 0.25850,
737 + 0.39457, 0.20414, 2.70144, 0.22096, 0.08522,
738 + 0.04683, 0.15882, 0.26055,
739 + 0.39771, 0.20470, 2.69946, 0.22263, 0.08971,
740 + 0.05224, 0.16197, 0.26220,
741 + 0.40050, 0.20513, 2.69167, 0.22399, 0.09371,
742 + 0.05710, 0.16472, 0.26353,
743 + 0.40296, 0.20546, 2.67899, 0.22507, 0.09727,
744 + 0.06145, 0.16709, 0.26457,
745 + 0.40510, 0.20566, 2.66139, 0.22587, 0.10039,
746 + 0.06532, 0.16909, 0.26529,
747 + 0.40701, 0.20580, 2.64186, 0.22649, 0.10320,
748 + 0.06883, 0.17085, 0.26584 /
749 DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=15,19)/
750 + 0.40873, 0.20587, 2.62045, 0.22695, 0.10574,
751 + 0.07202, 0.17238, 0.26622,
752 + 0.41020, 0.20586, 2.59630, 0.22721, 0.10795,
753 + 0.07485, 0.17365, 0.26636,
754 + 0.41155, 0.20583, 2.57226, 0.22740, 0.11001,
755 + 0.07748, 0.17479, 0.26645,
756 + 0.41269, 0.20573, 2.54596, 0.22739, 0.11177,
757 + 0.07980, 0.17570, 0.26633,
758 + 0.41375, 0.20560, 2.52015, 0.22734, 0.11341,
759 + 0.08196, 0.17652, 0.26618 /
760 DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=1,7)/
761 + 0.42019, 0.22459, 1.74940, 0.15320, 0.01264,
762 + 0.00000, 0.08988, 0.19859,
763 + 0.42908, 0.22617, 1.85509, 0.15691, 0.02280,
764 + 0.00000, 0.09697, 0.20223,
765 + 0.43594, 0.22709, 1.91718, 0.15965, 0.03105,
766 + 0.00001, 0.10258, 0.20478,
767 + 0.44121, 0.22750, 1.94774, 0.16157, 0.03778,
768 + 0.00449, 0.10696, 0.20644,
769 + 0.44540, 0.22757, 1.95939, 0.16293, 0.04342,
770 + 0.01176, 0.11050, 0.20750,
771 + 0.44875, 0.22739, 1.95773, 0.16382, 0.04817,
772 + 0.01761, 0.11336, 0.20807,
773 + 0.45139, 0.22702, 1.94648, 0.16434, 0.05220,
774 + 0.02265, 0.11565, 0.20827 /
775 DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=8,14)/
776 + 0.45345, 0.22649, 1.92844, 0.16456, 0.05563,
777 + 0.02698, 0.11748, 0.20815,
778 + 0.45505, 0.22586, 1.90574, 0.16455, 0.05856,
779 + 0.03075, 0.11893, 0.20777,
780 + 0.45628, 0.22514, 1.88002, 0.16434, 0.06107,
781 + 0.03403, 0.12008, 0.20721,
782 + 0.45720, 0.22435, 1.85251, 0.16398, 0.06325,
783 + 0.03692, 0.12098, 0.20652,
784 + 0.45784, 0.22353, 1.82368, 0.16351, 0.06513,
785 + 0.03946, 0.12166, 0.20569,
786 + 0.45822, 0.22263, 1.79338, 0.16289, 0.06672,
787 + 0.04166, 0.12212, 0.20472,
788 + 0.45843, 0.22173, 1.76337, 0.16222, 0.06811,
789 + 0.04363, 0.12245, 0.20371 /
790 DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=15,19)/
791 + 0.45848, 0.22081, 1.73355, 0.16150, 0.06933,
792 + 0.04538, 0.12267, 0.20263,
793 + 0.45834, 0.21985, 1.70326, 0.16069, 0.07034,
794 + 0.04690, 0.12274, 0.20148,
795 + 0.45815, 0.21891, 1.67414, 0.15987, 0.07126,
796 + 0.04830, 0.12276, 0.20034,
797 + 0.45778, 0.21793, 1.64475, 0.15897, 0.07200,
798 + 0.04948, 0.12265, 0.19910,
799 + 0.45737, 0.21697, 1.61658, 0.15808, 0.07268,
800 + 0.05058, 0.12251, 0.19789 /
801 DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=1,7)/
802 + 0.48154, 0.24849, 1.52710, 0.12792, 0.01066,
803 + -0.00001, 0.07792, 0.17772,
804 + 0.48710, 0.24759, 1.56946, 0.12922, 0.01833,
805 + 0.00000, 0.08238, 0.17821,
806 + 0.49084, 0.24631, 1.58186, 0.12986, 0.02437,
807 + 0.00000, 0.08568, 0.17803,
808 + 0.49316, 0.24473, 1.57417, 0.12996, 0.02914,
809 + 0.00330, 0.08806, 0.17734,
810 + 0.49456, 0.24302, 1.55566, 0.12973, 0.03304,
811 + 0.00856, 0.08981, 0.17632,
812 + 0.49525, 0.24120, 1.53020, 0.12923, 0.03623,
813 + 0.01271, 0.09109, 0.17508,
814 + 0.49539, 0.23931, 1.50033, 0.12853, 0.03886,
815 + 0.01621, 0.09198, 0.17365 /
816 DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=8,14)/
817 + 0.49507, 0.23740, 1.46792, 0.12769, 0.04104,
818 + 0.01917, 0.09256, 0.17211,
819 + 0.49441, 0.23546, 1.43427, 0.12673, 0.04285,
820 + 0.02169, 0.09289, 0.17048,
821 + 0.49349, 0.23354, 1.40030, 0.12571, 0.04435,
822 + 0.02385, 0.09304, 0.16880,
823 + 0.49235, 0.23164, 1.36666, 0.12463, 0.04561,
824 + 0.02572, 0.09305, 0.16710,
825 + 0.49105, 0.22976, 1.33354, 0.12351, 0.04666,
826 + 0.02733, 0.09294, 0.16539,
827 + 0.48957, 0.22787, 1.30069, 0.12233, 0.04751,
828 + 0.02870, 0.09269, 0.16364,
829 + 0.48800, 0.22604, 1.26915, 0.12117, 0.04823,
830 + 0.02990, 0.09239, 0.16192 /
831 DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=15,19)/
832 + 0.48635, 0.22425, 1.23873, 0.12001, 0.04883,
833 + 0.03094, 0.09202, 0.16022,
834 + 0.48458, 0.22247, 1.20894, 0.11882, 0.04930,
835 + 0.03184, 0.09159, 0.15850,
836 + 0.48284, 0.22074, 1.18072, 0.11766, 0.04971,
837 + 0.03265, 0.09114, 0.15685,
838 + 0.48098, 0.21901, 1.15308, 0.11647, 0.05001,
839 + 0.03332, 0.09062, 0.15519,
840 + 0.47914, 0.21735, 1.12689, 0.11533, 0.05026,
841 + 0.03393, 0.09011, 0.15359 /
842 DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=1,7)/
843 + 0.53041, 0.26380, 1.35090, 0.10680, 0.00904,
844 + 0.00000, 0.06749, 0.15835,
845 + 0.53194, 0.26038, 1.35189, 0.10663, 0.01499,
846 + -0.00001, 0.07019, 0.15671,
847 + 0.53201, 0.25694, 1.33372, 0.10606, 0.01953,
848 + -0.00001, 0.07199, 0.15478,
849 + 0.53099, 0.25346, 1.30385, 0.10517, 0.02302,
850 + 0.00250, 0.07311, 0.15260,
851 + 0.52931, 0.25006, 1.26890, 0.10410, 0.02580,
852 + 0.00644, 0.07378, 0.15033,
853 + 0.52714, 0.24672, 1.23142, 0.10290, 0.02801,
854 + 0.00948, 0.07412, 0.14802,
855 + 0.52461, 0.24345, 1.19300, 0.10162, 0.02979,
856 + 0.01201, 0.07420, 0.14570 /
857 DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=8,14)/
858 + 0.52182, 0.24028, 1.15472, 0.10028, 0.03121,
859 + 0.01412, 0.07408, 0.14340,
860 + 0.51884, 0.23720, 1.11726, 0.09892, 0.03235,
861 + 0.01588, 0.07382, 0.14112,
862 + 0.51574, 0.23424, 1.08108, 0.09755, 0.03327,
863 + 0.01736, 0.07345, 0.13887,
864 + 0.51257, 0.23138, 1.04646, 0.09619, 0.03402,
865 + 0.01862, 0.07301, 0.13668,
866 + 0.50935, 0.22860, 1.01335, 0.09484, 0.03462,
867 + 0.01968, 0.07250, 0.13455,
868 + 0.50604, 0.22588, 0.98146, 0.09349, 0.03506,
869 + 0.02058, 0.07192, 0.13247,
870 + 0.50276, 0.22328, 0.95137, 0.09217, 0.03542,
871 + 0.02136, 0.07133, 0.13047 /
872 DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=15,19)/
873 + 0.49950, 0.22077, 0.92285, 0.09090, 0.03570,
874 + 0.02203, 0.07072, 0.12851,
875 + 0.49619, 0.21831, 0.89548, 0.08963, 0.03589,
876 + 0.02256, 0.07007, 0.12660,
877 + 0.49299, 0.21595, 0.86981, 0.08841, 0.03604,
878 + 0.02304, 0.06943, 0.12476,
879 + 0.48972, 0.21364, 0.84513, 0.08720, 0.03612,
880 + 0.02342, 0.06875, 0.12296,
881 + 0.48656, 0.21143, 0.82193, 0.08603, 0.03617,
882 + 0.02377, 0.06809, 0.12124 /
883 DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=1,7)/
884 + 0.57673, 0.27349, 1.16857, 0.08458, 0.00737,
885 + -0.00001, 0.05594, 0.13551,
886 + 0.57268, 0.26716, 1.13617, 0.08346, 0.01176,
887 + -0.00001, 0.05721, 0.13219,
888 + 0.56783, 0.26121, 1.09503, 0.08212, 0.01502,
889 + -0.00001, 0.05783, 0.12895,
890 + 0.56241, 0.25562, 1.04985, 0.08064, 0.01743,
891 + 0.00180, 0.05800, 0.12574,
892 + 0.55678, 0.25034, 1.00464, 0.07910, 0.01930,
893 + 0.00462, 0.05788, 0.12268,
894 + 0.55101, 0.24536, 0.96062, 0.07756, 0.02074,
895 + 0.00676, 0.05757, 0.11968,
896 + 0.54518, 0.24065, 0.91844, 0.07601, 0.02184,
897 + 0.00851, 0.05711, 0.11683 /
898 DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=8,14)/
899 + 0.53936, 0.23617, 0.87847, 0.07449, 0.02268,
900 + 0.00992, 0.05656, 0.11411,
901 + 0.53357, 0.23192, 0.84086, 0.07300, 0.02334,
902 + 0.01107, 0.05593, 0.11150,
903 + 0.52788, 0.22789, 0.80565, 0.07155, 0.02384,
904 + 0.01204, 0.05526, 0.10900,
905 + 0.52233, 0.22404, 0.77279, 0.07014, 0.02422,
906 + 0.01285, 0.05456, 0.10664,
907 + 0.51688, 0.22038, 0.74210, 0.06878, 0.02449,
908 + 0.01352, 0.05385, 0.10438,
909 + 0.51149, 0.21686, 0.71321, 0.06744, 0.02468,
910 + 0.01405, 0.05312, 0.10221,
911 + 0.50626, 0.21351, 0.68636, 0.06618, 0.02480,
912 + 0.01450, 0.05239, 0.10014 /
913 DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=15,19)/
914 + 0.50117, 0.21033, 0.66128, 0.06498, 0.02486,
915 + 0.01489, 0.05168, 0.09815,
916 + 0.49616, 0.20723, 0.63763, 0.06378, 0.02488,
917 + 0.01520, 0.05096, 0.09625,
918 + 0.49135, 0.20429, 0.61566, 0.06264, 0.02488,
919 + 0.01546, 0.05026, 0.09444,
920 + 0.48655, 0.20146, 0.59484, 0.06154, 0.02483,
921 + 0.01567, 0.04956, 0.09267,
922 + 0.48195, 0.19875, 0.57544, 0.06049, 0.02477,
923 + 0.01584, 0.04888, 0.09100 /
924 DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=1,7)/
925 + 0.60864, 0.27503, 1.01392, 0.06628, 0.00596,
926 + -0.00003, 0.04583, 0.11422,
927 + 0.59882, 0.26609, 0.96111, 0.06473, 0.00927,
928 + -0.00003, 0.04623, 0.11005,
929 + 0.58901, 0.25802, 0.90733, 0.06310, 0.01165,
930 + -0.00002, 0.04618, 0.10619,
931 + 0.57929, 0.25061, 0.85494, 0.06143, 0.01336,
932 + 0.00132, 0.04583, 0.10257,
933 + 0.56983, 0.24381, 0.80589, 0.05979, 0.01462,
934 + 0.00340, 0.04532, 0.09921,
935 + 0.56061, 0.23750, 0.76041, 0.05821, 0.01556,
936 + 0.00494, 0.04470, 0.09604,
937 + 0.55171, 0.23163, 0.71846, 0.05667, 0.01626,
938 + 0.00617, 0.04401, 0.09308 /
939 DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=8,14)/
940 + 0.54308, 0.22616, 0.67991, 0.05520, 0.01677,
941 + 0.00716, 0.04327, 0.09030,
942 + 0.53477, 0.22102, 0.64453, 0.05379, 0.01714,
943 + 0.00794, 0.04251, 0.08768,
944 + 0.52677, 0.21618, 0.61211, 0.05244, 0.01740,
945 + 0.00858, 0.04175, 0.08523,
946 + 0.51908, 0.21164, 0.58240, 0.05115, 0.01757,
947 + 0.00911, 0.04099, 0.08293,
948 + 0.51165, 0.20736, 0.55506, 0.04993, 0.01768,
949 + 0.00954, 0.04025, 0.08076,
950 + 0.50447, 0.20327, 0.52976, 0.04874, 0.01773,
951 + 0.00987, 0.03951, 0.07869,
952 + 0.49759, 0.19941, 0.50653, 0.04762, 0.01774,
953 + 0.01015, 0.03879, 0.07674 /
954 DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=15,19)/
955 + 0.49096, 0.19576, 0.48508, 0.04655, 0.01771,
956 + 0.01038, 0.03808, 0.07491,
957 + 0.48449, 0.19225, 0.46511, 0.04552, 0.01764,
958 + 0.01054, 0.03739, 0.07316,
959 + 0.47833, 0.18894, 0.44670, 0.04455, 0.01757,
960 + 0.01068, 0.03673, 0.07151,
961 + 0.47230, 0.18575, 0.42945, 0.04361, 0.01747,
962 + 0.01079, 0.03608, 0.06992,
963 + 0.46653, 0.18272, 0.41348, 0.04272, 0.01736,
964 + 0.01088, 0.03545, 0.06842 /
965 DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=1,7)/
966 + 0.62786, 0.27019, 0.87934, 0.05126, 0.00479,
967 + -0.00001, 0.03709, 0.09488,
968 + 0.61237, 0.25914, 0.81474, 0.04965, 0.00728,
969 + -0.00001, 0.03695, 0.09039,
970 + 0.59778, 0.24939, 0.75488, 0.04804, 0.00901,
971 + -0.00001, 0.03653, 0.08638,
972 + 0.58398, 0.24060, 0.70015, 0.04645, 0.01022,
973 + 0.00099, 0.03593, 0.08271,
974 + 0.57096, 0.23266, 0.65100, 0.04493, 0.01108,
975 + 0.00251, 0.03523, 0.07936,
976 + 0.55866, 0.22537, 0.60687, 0.04347, 0.01171,
977 + 0.00361, 0.03449, 0.07628,
978 + 0.54699, 0.21868, 0.56723, 0.04208, 0.01214,
979 + 0.00449, 0.03372, 0.07345 /
980 DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=8,14)/
981 + 0.53591, 0.21248, 0.53158, 0.04078, 0.01244,
982 + 0.00518, 0.03294, 0.07083,
983 + 0.52541, 0.20671, 0.49950, 0.03953, 0.01263,
984 + 0.00571, 0.03218, 0.06841,
985 + 0.51542, 0.20136, 0.47056, 0.03835, 0.01275,
986 + 0.00614, 0.03143, 0.06616,
987 + 0.50592, 0.19638, 0.44440, 0.03726, 0.01282,
988 + 0.00649, 0.03070, 0.06404,
989 + 0.49689, 0.19169, 0.42069, 0.03623, 0.01285,
990 + 0.00677, 0.02999, 0.06206,
991 + 0.48821, 0.18725, 0.39898, 0.03522, 0.01281,
992 + 0.00697, 0.02931, 0.06023,
993 + 0.47996, 0.18310, 0.37923, 0.03428, 0.01276,
994 + 0.00714, 0.02866, 0.05850 /
995 DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=15,19)/
996 + 0.47207, 0.17918, 0.36118, 0.03340, 0.01270,
997 + 0.00728, 0.02803, 0.05687,
998 + 0.46449, 0.17544, 0.34454, 0.03255, 0.01260,
999 + 0.00737, 0.02742, 0.05534,
1000 + 0.45730, 0.17190, 0.32930, 0.03174, 0.01250,
1001 + 0.00744, 0.02684, 0.05390,
1002 + 0.45030, 0.16853, 0.31518, 0.03098, 0.01239,
1003 + 0.00748, 0.02627, 0.05254,
1004 + 0.44364, 0.16534, 0.30216, 0.03025, 0.01228,
1005 + 0.00752, 0.02572, 0.05124 /
1006 DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=1,7)/
1007 + 0.63571, 0.26057, 0.76061, 0.03916, 0.00380,
1008 + -0.00002, 0.02961, 0.07759,
1009 + 0.61492, 0.24785, 0.69015, 0.03764, 0.00570,
1010 + -0.00002, 0.02921, 0.07320,
1011 + 0.59599, 0.23680, 0.62849, 0.03617, 0.00697,
1012 + -0.00003, 0.02862, 0.06932,
1013 + 0.57852, 0.22701, 0.57445, 0.03476, 0.00784,
1014 + 0.00073, 0.02792, 0.06585,
1015 + 0.56240, 0.21822, 0.52734, 0.03341, 0.00842,
1016 + 0.00187, 0.02718, 0.06277,
1017 + 0.54738, 0.21029, 0.48607, 0.03215, 0.00884,
1018 + 0.00268, 0.02643, 0.05995,
1019 + 0.53336, 0.20304, 0.44979, 0.03096, 0.00911,
1020 + 0.00332, 0.02569, 0.05738 /
1021 DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=8,14)/
1022 + 0.52023, 0.19641, 0.41774, 0.02986, 0.00927,
1023 + 0.00380, 0.02497, 0.05502,
1024 + 0.50790, 0.19028, 0.38931, 0.02883, 0.00937,
1025 + 0.00417, 0.02426, 0.05285,
1026 + 0.49631, 0.18461, 0.36400, 0.02785, 0.00941,
1027 + 0.00446, 0.02358, 0.05087,
1028 + 0.48539, 0.17936, 0.34139, 0.02694, 0.00940,
1029 + 0.00469, 0.02293, 0.04904,
1030 + 0.47508, 0.17446, 0.32109, 0.02608, 0.00938,
1031 + 0.00487, 0.02231, 0.04735,
1032 + 0.46525, 0.16987, 0.30275, 0.02527, 0.00932,
1033 + 0.00500, 0.02172, 0.04574,
1034 + 0.45596, 0.16558, 0.28620, 0.02451, 0.00925,
1035 + 0.00510, 0.02115, 0.04426 /
1036 DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=15,19)/
1037 + 0.44716, 0.16154, 0.27120, 0.02380, 0.00917,
1038 + 0.00517, 0.02060, 0.04289,
1039 + 0.43870, 0.15773, 0.25747, 0.02313, 0.00908,
1040 + 0.00523, 0.02009, 0.04157,
1041 + 0.43072, 0.15415, 0.24498, 0.02251, 0.00899,
1042 + 0.00527, 0.01961, 0.04034,
1043 + 0.42305, 0.15072, 0.23347, 0.02188, 0.00887,
1044 + 0.00528, 0.01913, 0.03922,
1045 + 0.41577, 0.14748, 0.22293, 0.02130, 0.00876,
1046 + 0.00528, 0.01868, 0.03816 /
1047 DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=1,7)/
1048 + 0.63353, 0.24733, 0.65531, 0.02949, 0.00299,
1049 + -0.00002, 0.02335, 0.06253,
1050 + 0.60799, 0.23340, 0.58311, 0.02817, 0.00444,
1051 + -0.00001, 0.02283, 0.05845,
1052 + 0.58526, 0.22144, 0.52246, 0.02688, 0.00539,
1053 + -0.00002, 0.02219, 0.05492,
1054 + 0.56463, 0.21101, 0.47102, 0.02570, 0.00601,
1055 + 0.00056, 0.02149, 0.05179,
1056 + 0.54586, 0.20174, 0.42728, 0.02458, 0.00641,
1057 + 0.00142, 0.02080, 0.04902,
1058 + 0.52859, 0.19343, 0.38971, 0.02355, 0.00667,
1059 + 0.00201, 0.02011, 0.04653,
1060 + 0.51268, 0.18589, 0.35721, 0.02258, 0.00683,
1061 + 0.00246, 0.01944, 0.04429 /
1062 DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=8,14)/
1063 + 0.49791, 0.17904, 0.32891, 0.02166, 0.00693,
1064 + 0.00280, 0.01878, 0.04228,
1065 + 0.48417, 0.17275, 0.30416, 0.02082, 0.00696,
1066 + 0.00307, 0.01817, 0.04043,
1067 + 0.47137, 0.16696, 0.28238, 0.02003, 0.00696,
1068 + 0.00326, 0.01759, 0.03873,
1069 + 0.45939, 0.16163, 0.26312, 0.01931, 0.00694,
1070 + 0.00341, 0.01703, 0.03717,
1071 + 0.44809, 0.15673, 0.24601, 0.01864, 0.00689,
1072 + 0.00353, 0.01652, 0.03571,
1073 + 0.43745, 0.15212, 0.23069, 0.01799, 0.00681,
1074 + 0.00361, 0.01601, 0.03441,
1075 + 0.42745, 0.14781, 0.21697, 0.01739, 0.00673,
1076 + 0.00367, 0.01554, 0.03319 /
1077 DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=15,19)/
1078 + 0.41802, 0.14379, 0.20461, 0.01684, 0.00665,
1079 + 0.00372, 0.01509, 0.03205,
1080 + 0.40900, 0.14001, 0.19339, 0.01631, 0.00656,
1081 + 0.00374, 0.01466, 0.03098,
1082 + 0.40052, 0.13648, 0.18323, 0.01582, 0.00647,
1083 + 0.00376, 0.01426, 0.02999,
1084 + 0.39238, 0.13312, 0.17395, 0.01536, 0.00638,
1085 + 0.00377, 0.01388, 0.02906,
1086 + 0.38469, 0.12996, 0.16548, 0.01492, 0.00628,
1087 + 0.00377, 0.01352, 0.02819 /
1088 DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=1,7)/
1089 + 0.62259, 0.23148, 0.56179, 0.02188, 0.00236,
1090 + 0.00002, 0.01819, 0.04966,
1091 + 0.59295, 0.21682, 0.49090, 0.02080, 0.00345,
1092 + 0.00002, 0.01762, 0.04601,
1093 + 0.56695, 0.20441, 0.43319, 0.01979, 0.00413,
1094 + 0.00003, 0.01699, 0.04291,
1095 + 0.54376, 0.19365, 0.38555, 0.01882, 0.00455,
1096 + 0.00046, 0.01637, 0.04019,
1097 + 0.52290, 0.18418, 0.34581, 0.01793, 0.00483,
1098 + 0.00106, 0.01575, 0.03780,
1099 + 0.50390, 0.17575, 0.31224, 0.01711, 0.00500,
1100 + 0.00150, 0.01512, 0.03569,
1101 + 0.48655, 0.16816, 0.28363, 0.01632, 0.00509,
1102 + 0.00181, 0.01454, 0.03380 /
1103 DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=8,14)/
1104 + 0.47059, 0.16127, 0.25905, 0.01560, 0.00512,
1105 + 0.00206, 0.01399, 0.03211,
1106 + 0.45583, 0.15503, 0.23781, 0.01494, 0.00512,
1107 + 0.00224, 0.01348, 0.03056,
1108 + 0.44214, 0.14932, 0.21931, 0.01434, 0.00510,
1109 + 0.00237, 0.01299, 0.02915,
1110 + 0.42941, 0.14408, 0.20310, 0.01378, 0.00507,
1111 + 0.00247, 0.01253, 0.02787,
1112 + 0.41754, 0.13924, 0.18885, 0.01326, 0.00502,
1113 + 0.00255, 0.01210, 0.02670,
1114 + 0.40638, 0.13472, 0.17617, 0.01276, 0.00495,
1115 + 0.00259, 0.01169, 0.02563,
1116 + 0.39593, 0.13055, 0.16489, 0.01231, 0.00487,
1117 + 0.00262, 0.01131, 0.02463 /
1118 DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=15,19)/
1119 + 0.38609, 0.12666, 0.15481, 0.01190, 0.00480,
1120 + 0.00265, 0.01096, 0.02369,
1121 + 0.37681, 0.12300, 0.14571, 0.01148, 0.00472,
1122 + 0.00265, 0.01061, 0.02284,
1123 + 0.36809, 0.11958, 0.13751, 0.01110, 0.00464,
1124 + 0.00266, 0.01029, 0.02206,
1125 + 0.35975, 0.11638, 0.13007, 0.01074, 0.00456,
1126 + 0.00266, 0.00998, 0.02130,
1127 + 0.35189, 0.11337, 0.12331, 0.01042, 0.00448,
1128 + 0.00265, 0.00970, 0.02060 /
1129 DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=1,7)/
1130 + 0.60398, 0.21422, 0.47915, 0.01623, 0.00169,
1131 + -0.00014, 0.01382, 0.03885,
1132 + 0.57099, 0.19920, 0.41142, 0.01535, 0.00253,
1133 + -0.00013, 0.01334, 0.03569,
1134 + 0.54250, 0.18657, 0.35785, 0.01449, 0.00304,
1135 + -0.00012, 0.01280, 0.03307,
1136 + 0.51735, 0.17574, 0.31456, 0.01373, 0.00337,
1137 + 0.00021, 0.01225, 0.03077,
1138 + 0.49494, 0.16629, 0.27910, 0.01301, 0.00357,
1139 + 0.00069, 0.01171, 0.02879,
1140 + 0.47473, 0.15792, 0.24960, 0.01237, 0.00368,
1141 + 0.00102, 0.01122, 0.02701,
1142 + 0.45639, 0.15045, 0.22480, 0.01176, 0.00373,
1143 + 0.00127, 0.01075, 0.02546 /
1144 DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=8,14)/
1145 + 0.43964, 0.14373, 0.20377, 0.01119, 0.00374,
1146 + 0.00143, 0.01029, 0.02409,
1147 + 0.42426, 0.13764, 0.18575, 0.01068, 0.00374,
1148 + 0.00158, 0.00987, 0.02285,
1149 + 0.41009, 0.13211, 0.17022, 0.01021, 0.00371,
1150 + 0.00168, 0.00948, 0.02170,
1151 + 0.39698, 0.12706, 0.15674, 0.00977, 0.00367,
1152 + 0.00174, 0.00912, 0.02066,
1153 + 0.38479, 0.12239, 0.14494, 0.00939, 0.00363,
1154 + 0.00179, 0.00877, 0.01973,
1155 + 0.37341, 0.11808, 0.13454, 0.00901, 0.00356,
1156 + 0.00183, 0.00845, 0.01886,
1157 + 0.36281, 0.11411, 0.12534, 0.00866, 0.00350,
1158 + 0.00185, 0.00815, 0.01806 /
1159 DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=15,19)/
1160 + 0.35289, 0.11042, 0.11716, 0.00833, 0.00343,
1161 + 0.00186, 0.00787, 0.01734,
1162 + 0.34351, 0.10696, 0.10984, 0.00803, 0.00337,
1163 + 0.00186, 0.00760, 0.01666,
1164 + 0.33474, 0.10374, 0.10327, 0.00774, 0.00331,
1165 + 0.00186, 0.00736, 0.01605,
1166 + 0.32640, 0.10072, 0.09735, 0.00747, 0.00324,
1167 + 0.00185, 0.00712, 0.01546,
1168 + 0.31854, 0.09789, 0.09200, 0.00723, 0.00318,
1169 + 0.00185, 0.00690, 0.01492 /
1170 DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=1,7)/
1171 + 0.57919, 0.19555, 0.40568, 0.01166, 0.00134,
1172 + -0.00002, 0.01052, 0.02990,
1173 + 0.54360, 0.18057, 0.34266, 0.01099, 0.00196,
1174 + -0.00003, 0.01007, 0.02729,
1175 + 0.51323, 0.16808, 0.29389, 0.01036, 0.00234,
1176 + -0.00003, 0.00960, 0.02508,
1177 + 0.48668, 0.15748, 0.25527, 0.00977, 0.00255,
1178 + 0.00021, 0.00913, 0.02324,
1179 + 0.46327, 0.14828, 0.22417, 0.00922, 0.00267,
1180 + 0.00055, 0.00870, 0.02161,
1181 + 0.44231, 0.14017, 0.19863, 0.00873, 0.00273,
1182 + 0.00078, 0.00828, 0.02021,
1183 + 0.42339, 0.13300, 0.17743, 0.00828, 0.00276,
1184 + 0.00095, 0.00789, 0.01895 /
1185 DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=8,14)/
1186 + 0.40622, 0.12657, 0.15963, 0.00788, 0.00277,
1187 + 0.00108, 0.00753, 0.01781,
1188 + 0.39055, 0.12079, 0.14454, 0.00750, 0.00275,
1189 + 0.00117, 0.00719, 0.01681,
1190 + 0.37620, 0.11554, 0.13166, 0.00715, 0.00272,
1191 + 0.00123, 0.00688, 0.01592,
1192 + 0.36300, 0.11075, 0.12056, 0.00682, 0.00268,
1193 + 0.00127, 0.00659, 0.01512,
1194 + 0.35080, 0.10637, 0.11090, 0.00651, 0.00262,
1195 + 0.00130, 0.00632, 0.01440,
1196 + 0.33944, 0.10234, 0.10245, 0.00624, 0.00257,
1197 + 0.00132, 0.00607, 0.01372,
1198 + 0.32888, 0.09864, 0.09503, 0.00599, 0.00252,
1199 + 0.00133, 0.00584, 0.01309 /
1200 DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=15,19)/
1201 + 0.31903, 0.09521, 0.08848, 0.00575, 0.00246,
1202 + 0.00133, 0.00562, 0.01253,
1203 + 0.30975, 0.09199, 0.08264, 0.00555, 0.00241,
1204 + 0.00133, 0.00541, 0.01201,
1205 + 0.30110, 0.08901, 0.07742, 0.00537, 0.00236,
1206 + 0.00133, 0.00522, 0.01154,
1207 + 0.29293, 0.08622, 0.07275, 0.00517, 0.00230,
1208 + 0.00132, 0.00504, 0.01109,
1209 + 0.28528, 0.08362, 0.06854, 0.00498, 0.00225,
1210 + 0.00131, 0.00488, 0.01067 /
1211 DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=1,7)/
1212 + 0.54919, 0.17662, 0.34122, 0.00829, 0.00100,
1213 + -0.00004, 0.00784, 0.02270,
1214 + 0.51179, 0.16196, 0.28359, 0.00782, 0.00147,
1215 + -0.00003, 0.00746, 0.02055,
1216 + 0.48021, 0.14985, 0.24004, 0.00734, 0.00173,
1217 + -0.00004, 0.00708, 0.01880,
1218 + 0.45291, 0.13964, 0.20611, 0.00689, 0.00189,
1219 + 0.00014, 0.00670, 0.01730,
1220 + 0.42896, 0.13085, 0.17915, 0.00649, 0.00198,
1221 + 0.00040, 0.00635, 0.01600,
1222 + 0.40769, 0.12316, 0.15733, 0.00613, 0.00202,
1223 + 0.00058, 0.00602, 0.01488,
1224 + 0.38863, 0.11637, 0.13943, 0.00580, 0.00202,
1225 + 0.00070, 0.00570, 0.01391 /
1226 DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=8,14)/
1227 + 0.37145, 0.11032, 0.12454, 0.00547, 0.00201,
1228 + 0.00078, 0.00543, 0.01304,
1229 + 0.35584, 0.10490, 0.11204, 0.00519, 0.00198,
1230 + 0.00083, 0.00517, 0.01226,
1231 + 0.34160, 0.10001, 0.10145, 0.00495, 0.00195,
1232 + 0.00087, 0.00493, 0.01155,
1233 + 0.32857, 0.09558, 0.09239, 0.00473, 0.00192,
1234 + 0.00091, 0.00471, 0.01091,
1235 + 0.31656, 0.09153, 0.08456, 0.00451, 0.00188,
1236 + 0.00093, 0.00451, 0.01036,
1237 + 0.30543, 0.08782, 0.07777, 0.00431, 0.00184,
1238 + 0.00094, 0.00431, 0.00985,
1239 + 0.29514, 0.08440, 0.07184, 0.00413, 0.00179,
1240 + 0.00095, 0.00413, 0.00938 /
1241 DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=15,19)/
1242 + 0.28557, 0.08125, 0.06662, 0.00396, 0.00175,
1243 + 0.00095, 0.00397, 0.00897,
1244 + 0.27662, 0.07832, 0.06200, 0.00378, 0.00171,
1245 + 0.00094, 0.00381, 0.00858,
1246 + 0.26829, 0.07561, 0.05789, 0.00363, 0.00167,
1247 + 0.00093, 0.00367, 0.00821,
1248 + 0.26039, 0.07308, 0.05424, 0.00350, 0.00163,
1249 + 0.00092, 0.00354, 0.00787,
1250 + 0.25302, 0.07073, 0.05095, 0.00339, 0.00159,
1251 + 0.00091, 0.00342, 0.00755 /
1252 DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=1,7)/
1253 + 0.51514, 0.15768, 0.28475, 0.00577, 0.00076,
1254 + 0.00000, 0.00578, 0.01695,
1255 + 0.47674, 0.14362, 0.23299, 0.00541, 0.00109,
1256 + 0.00000, 0.00547, 0.01527,
1257 + 0.44456, 0.13212, 0.19461, 0.00510, 0.00130,
1258 + 0.00000, 0.00517, 0.01384,
1259 + 0.41700, 0.12248, 0.16529, 0.00479, 0.00140,
1260 + 0.00013, 0.00487, 0.01267,
1261 + 0.39304, 0.11420, 0.14226, 0.00449, 0.00146,
1262 + 0.00032, 0.00458, 0.01168,
1263 + 0.37184, 0.10705, 0.12386, 0.00425, 0.00147,
1264 + 0.00043, 0.00433, 0.01079,
1265 + 0.35302, 0.10073, 0.10893, 0.00399, 0.00147,
1266 + 0.00051, 0.00409, 0.01004 /
1267 DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=8,14)/
1268 + 0.33610, 0.09514, 0.09660, 0.00379, 0.00146,
1269 + 0.00058, 0.00388, 0.00937,
1270 + 0.32086, 0.09015, 0.08636, 0.00358, 0.00143,
1271 + 0.00062, 0.00368, 0.00878,
1272 + 0.30700, 0.08566, 0.07775, 0.00339, 0.00140,
1273 + 0.00064, 0.00349, 0.00825,
1274 + 0.29435, 0.08162, 0.07042, 0.00323, 0.00138,
1275 + 0.00066, 0.00333, 0.00778,
1276 + 0.28276, 0.07793, 0.06417, 0.00306, 0.00134,
1277 + 0.00067, 0.00317, 0.00737,
1278 + 0.27204, 0.07456, 0.05875, 0.00293, 0.00131,
1279 + 0.00067, 0.00303, 0.00698,
1280 + 0.26216, 0.07148, 0.05404, 0.00281, 0.00128,
1281 + 0.00067, 0.00289, 0.00663 /
1282 DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=15,19)/
1283 + 0.25303, 0.06864, 0.04993, 0.00268, 0.00124,
1284 + 0.00068, 0.00276, 0.00632,
1285 + 0.24449, 0.06600, 0.04631, 0.00257, 0.00121,
1286 + 0.00067, 0.00266, 0.00603,
1287 + 0.23657, 0.06357, 0.04311, 0.00247, 0.00118,
1288 + 0.00067, 0.00256, 0.00575,
1289 + 0.22912, 0.06131, 0.04025, 0.00237, 0.00114,
1290 + 0.00065, 0.00245, 0.00550,
1291 + 0.22217, 0.05921, 0.03770, 0.00228, 0.00111,
1292 + 0.00064, 0.00236, 0.00527 /
1293 DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=1,7)/
1294 + 0.47803, 0.13922, 0.23556, 0.00390, 0.00060,
1295 + 0.00004, 0.00422, 0.01243,
1296 + 0.43933, 0.12596, 0.18990, 0.00368, 0.00084,
1297 + 0.00005, 0.00397, 0.01113,
1298 + 0.40722, 0.11520, 0.15658, 0.00345, 0.00097,
1299 + 0.00004, 0.00373, 0.01005,
1300 + 0.37997, 0.10622, 0.13151, 0.00322, 0.00105,
1301 + 0.00013, 0.00350, 0.00915,
1302 + 0.35637, 0.09859, 0.11214, 0.00303, 0.00108,
1303 + 0.00026, 0.00329, 0.00839,
1304 + 0.33571, 0.09201, 0.09679, 0.00286, 0.00109,
1305 + 0.00034, 0.00309, 0.00770,
1306 + 0.31740, 0.08624, 0.08445, 0.00268, 0.00107,
1307 + 0.00040, 0.00291, 0.00715 /
1308 DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=8,14)/
1309 + 0.30106, 0.08115, 0.07441, 0.00251, 0.00105,
1310 + 0.00043, 0.00274, 0.00667,
1311 + 0.28636, 0.07663, 0.06611, 0.00238, 0.00104,
1312 + 0.00046, 0.00259, 0.00622,
1313 + 0.27306, 0.07258, 0.05918, 0.00227, 0.00101,
1314 + 0.00048, 0.00245, 0.00582,
1315 + 0.26098, 0.06894, 0.05334, 0.00217, 0.00098,
1316 + 0.00049, 0.00233, 0.00547,
1317 + 0.24998, 0.06563, 0.04835, 0.00203, 0.00096,
1318 + 0.00049, 0.00221, 0.00517,
1319 + 0.23985, 0.06262, 0.04409, 0.00194, 0.00092,
1320 + 0.00049, 0.00211, 0.00488,
1321 + 0.23054, 0.05988, 0.04041, 0.00186, 0.00090,
1322 + 0.00048, 0.00201, 0.00462 /
1323 DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=15,19)/
1324 + 0.22194, 0.05737, 0.03720, 0.00178, 0.00088,
1325 + 0.00048, 0.00192, 0.00438,
1326 + 0.21393, 0.05505, 0.03438, 0.00170, 0.00085,
1327 + 0.00047, 0.00184, 0.00416,
1328 + 0.20651, 0.05291, 0.03190, 0.00164, 0.00083,
1329 + 0.00046, 0.00176, 0.00396,
1330 + 0.19958, 0.05090, 0.02970, 0.00157, 0.00080,
1331 + 0.00046, 0.00169, 0.00378,
1332 + 0.19313, 0.04905, 0.02775, 0.00150, 0.00078,
1333 + 0.00046, 0.00162, 0.00361 /
1334 DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=1,7)/
1335 + 0.43891, 0.12168, 0.19331, 0.00267, 0.00040,
1336 + 0.00001, 0.00298, 0.00902,
1337 + 0.40065, 0.10937, 0.15350, 0.00250, 0.00058,
1338 + 0.00000, 0.00280, 0.00797,
1339 + 0.36916, 0.09945, 0.12501, 0.00234, 0.00069,
1340 + 0.00001, 0.00262, 0.00717,
1341 + 0.34256, 0.09123, 0.10386, 0.00221, 0.00074,
1342 + 0.00008, 0.00246, 0.00650,
1343 + 0.31978, 0.08429, 0.08771, 0.00207, 0.00076,
1344 + 0.00017, 0.00230, 0.00590,
1345 + 0.29991, 0.07830, 0.07507, 0.00195, 0.00076,
1346 + 0.00023, 0.00215, 0.00542,
1347 + 0.28244, 0.07309, 0.06503, 0.00181, 0.00076,
1348 + 0.00027, 0.00202, 0.00500 /
1349 DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=8,14)/
1350 + 0.26685, 0.06852, 0.05691, 0.00171, 0.00075,
1351 + 0.00030, 0.00189, 0.00464,
1352 + 0.25296, 0.06448, 0.05027, 0.00161, 0.00072,
1353 + 0.00032, 0.00179, 0.00432,
1354 + 0.24044, 0.06090, 0.04476, 0.00153, 0.00071,
1355 + 0.00033, 0.00169, 0.00402,
1356 + 0.22909, 0.05767, 0.04014, 0.00146, 0.00069,
1357 + 0.00033, 0.00159, 0.00376,
1358 + 0.21876, 0.05474, 0.03623, 0.00139, 0.00065,
1359 + 0.00032, 0.00152, 0.00354,
1360 + 0.20932, 0.05210, 0.03290, 0.00132, 0.00064,
1361 + 0.00033, 0.00144, 0.00333,
1362 + 0.20067, 0.04968, 0.03003, 0.00125, 0.00062,
1363 + 0.00033, 0.00137, 0.00315 /
1364 DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=15,19)/
1365 + 0.19271, 0.04747, 0.02754, 0.00118, 0.00060,
1366 + 0.00033, 0.00129, 0.00300,
1367 + 0.18533, 0.04545, 0.02537, 0.00112, 0.00058,
1368 + 0.00032, 0.00124, 0.00284,
1369 + 0.17851, 0.04358, 0.02347, 0.00107, 0.00056,
1370 + 0.00032, 0.00119, 0.00269,
1371 + 0.17215, 0.04183, 0.02179, 0.00103, 0.00055,
1372 + 0.00032, 0.00114, 0.00257,
1373 + 0.16623, 0.04022, 0.02030, 0.00099, 0.00054,
1374 + 0.00032, 0.00110, 0.00245 /
1375 DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=1,7)/
1376 + 0.39872, 0.10510, 0.15704, 0.00175, 0.00030,
1377 + 0.00003, 0.00210, 0.00636,
1378 + 0.36144, 0.09386, 0.12291, 0.00167, 0.00042,
1379 + 0.00003, 0.00196, 0.00563,
1380 + 0.33109, 0.08486, 0.09888, 0.00160, 0.00049,
1381 + 0.00002, 0.00183, 0.00499,
1382 + 0.30567, 0.07746, 0.08131, 0.00148, 0.00052,
1383 + 0.00007, 0.00169, 0.00452,
1384 + 0.28395, 0.07123, 0.06805, 0.00139, 0.00052,
1385 + 0.00012, 0.00157, 0.00411,
1386 + 0.26514, 0.06591, 0.05779, 0.00131, 0.00052,
1387 + 0.00016, 0.00146, 0.00376,
1388 + 0.24864, 0.06130, 0.04969, 0.00124, 0.00051,
1389 + 0.00018, 0.00137, 0.00345 /
1390 DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=8,14)/
1391 + 0.23408, 0.05726, 0.04320, 0.00116, 0.00050,
1392 + 0.00020, 0.00128, 0.00319,
1393 + 0.22111, 0.05369, 0.03793, 0.00109, 0.00049,
1394 + 0.00021, 0.00120, 0.00295,
1395 + 0.20950, 0.05054, 0.03359, 0.00102, 0.00048,
1396 + 0.00022, 0.00113, 0.00275,
1397 + 0.19903, 0.04772, 0.02997, 0.00097, 0.00046,
1398 + 0.00022, 0.00107, 0.00256,
1399 + 0.18950, 0.04518, 0.02693, 0.00092, 0.00044,
1400 + 0.00022, 0.00101, 0.00241,
1401 + 0.18081, 0.04288, 0.02435, 0.00089, 0.00042,
1402 + 0.00021, 0.00095, 0.00226,
1403 + 0.17289, 0.04079, 0.02215, 0.00084, 0.00040,
1404 + 0.00021, 0.00090, 0.00213 /
1405 DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=15,19)/
1406 + 0.16563, 0.03888, 0.02025, 0.00079, 0.00039,
1407 + 0.00022, 0.00086, 0.00203,
1408 + 0.15888, 0.03714, 0.01860, 0.00077, 0.00039,
1409 + 0.00021, 0.00082, 0.00191,
1410 + 0.15266, 0.03553, 0.01715, 0.00075, 0.00038,
1411 + 0.00021, 0.00078, 0.00180,
1412 + 0.14690, 0.03404, 0.01588, 0.00070, 0.00036,
1413 + 0.00020, 0.00074, 0.00172,
1414 + 0.14157, 0.03267, 0.01476, 0.00066, 0.00035,
1415 + 0.00020, 0.00071, 0.00164 /
1416 DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=1,7)/
1417 + 0.35819, 0.08968, 0.12614, 0.00109, 0.00022,
1418 + 0.00004, 0.00145, 0.00442,
1419 + 0.32249, 0.07955, 0.09729, 0.00105, 0.00032,
1420 + 0.00004, 0.00135, 0.00389,
1421 + 0.29363, 0.07151, 0.07732, 0.00101, 0.00036,
1422 + 0.00003, 0.00126, 0.00344,
1423 + 0.26966, 0.06492, 0.06288, 0.00093, 0.00038,
1424 + 0.00006, 0.00116, 0.00310,
1425 + 0.24927, 0.05942, 0.05212, 0.00089, 0.00038,
1426 + 0.00010, 0.00108, 0.00279,
1427 + 0.23174, 0.05474, 0.04389, 0.00082, 0.00038,
1428 + 0.00013, 0.00100, 0.00254,
1429 + 0.21648, 0.05071, 0.03747, 0.00076, 0.00037,
1430 + 0.00014, 0.00093, 0.00232 /
1431 DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=8,14)/
1432 + 0.20301, 0.04719, 0.03236, 0.00072, 0.00037,
1433 + 0.00015, 0.00088, 0.00213,
1434 + 0.19108, 0.04410, 0.02824, 0.00068, 0.00036,
1435 + 0.00016, 0.00082, 0.00198,
1436 + 0.18043, 0.04137, 0.02487, 0.00064, 0.00035,
1437 + 0.00016, 0.00077, 0.00184,
1438 + 0.17087, 0.03894, 0.02209, 0.00060, 0.00033,
1439 + 0.00016, 0.00072, 0.00171,
1440 + 0.16226, 0.03676, 0.01976, 0.00056, 0.00031,
1441 + 0.00016, 0.00068, 0.00160,
1442 + 0.15438, 0.03479, 0.01780, 0.00054, 0.00030,
1443 + 0.00016, 0.00065, 0.00150,
1444 + 0.14721, 0.03301, 0.01613, 0.00052, 0.00029,
1445 + 0.00016, 0.00061, 0.00141 /
1446 DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=15,19)/
1447 + 0.14065, 0.03139, 0.01469, 0.00049, 0.00028,
1448 + 0.00016, 0.00057, 0.00133,
1449 + 0.13460, 0.02990, 0.01345, 0.00047, 0.00027,
1450 + 0.00015, 0.00055, 0.00126,
1451 + 0.12905, 0.02853, 0.01237, 0.00046, 0.00026,
1452 + 0.00014, 0.00052, 0.00118,
1453 + 0.12389, 0.02728, 0.01143, 0.00043, 0.00025,
1454 + 0.00014, 0.00050, 0.00113,
1455 + 0.11913, 0.02613, 0.01059, 0.00041, 0.00024,
1456 + 0.00014, 0.00047, 0.00107 /
1457 DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=1,7)/
1458 + 0.31817, 0.07563, 0.10021, 0.00068, 0.00016,
1459 + 0.00003, 0.00099, 0.00300,
1460 + 0.28451, 0.06662, 0.07613, 0.00064, 0.00023,
1461 + 0.00003, 0.00092, 0.00262,
1462 + 0.25747, 0.05950, 0.05972, 0.00061, 0.00026,
1463 + 0.00001, 0.00086, 0.00232,
1464 + 0.23515, 0.05374, 0.04805, 0.00057, 0.00028,
1465 + 0.00005, 0.00080, 0.00206,
1466 + 0.21633, 0.04894, 0.03946, 0.00053, 0.00028,
1467 + 0.00008, 0.00074, 0.00186,
1468 + 0.20020, 0.04489, 0.03296, 0.00050, 0.00028,
1469 + 0.00010, 0.00069, 0.00167,
1470 + 0.18621, 0.04141, 0.02792, 0.00048, 0.00027,
1471 + 0.00011, 0.00063, 0.00153 /
1472 DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=8,14)/
1473 + 0.17399, 0.03839, 0.02396, 0.00043, 0.00026,
1474 + 0.00012, 0.00060, 0.00140,
1475 + 0.16319, 0.03574, 0.02078, 0.00039, 0.00025,
1476 + 0.00013, 0.00056, 0.00130,
1477 + 0.15357, 0.03342, 0.01821, 0.00036, 0.00024,
1478 + 0.00013, 0.00053, 0.00121,
1479 + 0.14498, 0.03136, 0.01609, 0.00034, 0.00023,
1480 + 0.00012, 0.00050, 0.00112,
1481 + 0.13725, 0.02952, 0.01433, 0.00033, 0.00022,
1482 + 0.00013, 0.00046, 0.00103,
1483 + 0.13021, 0.02786, 0.01286, 0.00032, 0.00022,
1484 + 0.00012, 0.00044, 0.00096,
1485 + 0.12384, 0.02636, 0.01161, 0.00030, 0.00021,
1486 + 0.00012, 0.00042, 0.00091 /
1487 DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=15,19)/
1488 + 0.11805, 0.02499, 0.01054, 0.00027, 0.00020,
1489 + 0.00012, 0.00040, 0.00085,
1490 + 0.11270, 0.02375, 0.00962, 0.00026, 0.00020,
1491 + 0.00012, 0.00037, 0.00080,
1492 + 0.10780, 0.02261, 0.00882, 0.00025, 0.00019,
1493 + 0.00011, 0.00035, 0.00075,
1494 + 0.10324, 0.02158, 0.00813, 0.00024, 0.00018,
1495 + 0.00011, 0.00034, 0.00072,
1496 + 0.09904, 0.02063, 0.00752, 0.00023, 0.00017,
1497 + 0.00011, 0.00033, 0.00069 /
1498 DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=1,7)/
1499 + 0.27940, 0.06308, 0.07877, 0.00049, 0.00008,
1500 + -0.00002, 0.00062, 0.00199,
1501 + 0.24813, 0.05520, 0.05899, 0.00047, 0.00012,
1502 + -0.00001, 0.00057, 0.00175,
1503 + 0.22326, 0.04904, 0.04574, 0.00044, 0.00015,
1504 + -0.00002, 0.00054, 0.00151,
1505 + 0.20279, 0.04407, 0.03644, 0.00043, 0.00016,
1506 + 0.00001, 0.00049, 0.00135,
1507 + 0.18568, 0.03995, 0.02966, 0.00039, 0.00017,
1508 + 0.00003, 0.00046, 0.00121,
1509 + 0.17110, 0.03648, 0.02458, 0.00036, 0.00016,
1510 + 0.00004, 0.00042, 0.00110,
1511 + 0.15851, 0.03352, 0.02069, 0.00034, 0.00015,
1512 + 0.00005, 0.00039, 0.00100 /
1513 DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=8,14)/
1514 + 0.14755, 0.03096, 0.01764, 0.00032, 0.00015,
1515 + 0.00006, 0.00036, 0.00091,
1516 + 0.13792, 0.02873, 0.01522, 0.00030, 0.00014,
1517 + 0.00006, 0.00034, 0.00083,
1518 + 0.12937, 0.02678, 0.01327, 0.00027, 0.00014,
1519 + 0.00006, 0.00032, 0.00077,
1520 + 0.12174, 0.02505, 0.01167, 0.00026, 0.00014,
1521 + 0.00006, 0.00030, 0.00071,
1522 + 0.11490, 0.02352, 0.01036, 0.00025, 0.00013,
1523 + 0.00007, 0.00028, 0.00067,
1524 + 0.10873, 0.02213, 0.00926, 0.00023, 0.00012,
1525 + 0.00006, 0.00026, 0.00062,
1526 + 0.10313, 0.02089, 0.00833, 0.00022, 0.00011,
1527 + 0.00005, 0.00025, 0.00058 /
1528 DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=15,19)/
1529 + 0.09803, 0.01977, 0.00754, 0.00021, 0.00011,
1530 + 0.00005, 0.00023, 0.00054,
1531 + 0.09337, 0.01874, 0.00686, 0.00021, 0.00010,
1532 + 0.00005, 0.00022, 0.00050,
1533 + 0.08911, 0.01781, 0.00628, 0.00020, 0.00010,
1534 + 0.00005, 0.00021, 0.00047,
1535 + 0.08518, 0.01695, 0.00577, 0.00018, 0.00010,
1536 + 0.00005, 0.00020, 0.00045,
1537 + 0.08156, 0.01617, 0.00532, 0.00017, 0.00010,
1538 + 0.00005, 0.00019, 0.00043 /
1539 DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=1,7)/
1540 + 0.24204, 0.05168, 0.06086, 0.00025, 0.00009,
1541 + 0.00002, 0.00043, 0.00128,
1542 + 0.21349, 0.04492, 0.04492, 0.00023, 0.00011,
1543 + 0.00002, 0.00040, 0.00111,
1544 + 0.19087, 0.03967, 0.03440, 0.00025, 0.00013,
1545 + 0.00002, 0.00037, 0.00095,
1546 + 0.17248, 0.03546, 0.02713, 0.00023, 0.00012,
1547 + 0.00003, 0.00034, 0.00086,
1548 + 0.15714, 0.03200, 0.02188, 0.00021, 0.00012,
1549 + 0.00003, 0.00030, 0.00076,
1550 + 0.14414, 0.02909, 0.01798, 0.00020, 0.00011,
1551 + 0.00004, 0.00027, 0.00070,
1552 + 0.13298, 0.02662, 0.01502, 0.00019, 0.00011,
1553 + 0.00005, 0.00025, 0.00064 /
1554 DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=8,14)/
1555 + 0.12329, 0.02450, 0.01273, 0.00017, 0.00011,
1556 + 0.00005, 0.00023, 0.00057,
1557 + 0.11479, 0.02266, 0.01092, 0.00017, 0.00010,
1558 + 0.00005, 0.00022, 0.00052,
1559 + 0.10731, 0.02106, 0.00947, 0.00017, 0.00009,
1560 + 0.00004, 0.00020, 0.00048,
1561 + 0.10067, 0.01964, 0.00830, 0.00015, 0.00009,
1562 + 0.00005, 0.00019, 0.00044,
1563 + 0.09475, 0.01837, 0.00733, 0.00013, 0.00008,
1564 + 0.00005, 0.00018, 0.00042,
1565 + 0.08940, 0.01724, 0.00653, 0.00012, 0.00008,
1566 + 0.00005, 0.00017, 0.00039,
1567 + 0.08456, 0.01623, 0.00585, 0.00013, 0.00008,
1568 + 0.00005, 0.00016, 0.00036 /
1569 DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=15,19)/
1570 + 0.08018, 0.01532, 0.00528, 0.00013, 0.00008,
1571 + 0.00004, 0.00014, 0.00033,
1572 + 0.07616, 0.01449, 0.00479, 0.00013, 0.00007,
1573 + 0.00004, 0.00013, 0.00031,
1574 + 0.07251, 0.01374, 0.00437, 0.00012, 0.00007,
1575 + 0.00004, 0.00013, 0.00030,
1576 + 0.06916, 0.01305, 0.00401, 0.00012, 0.00007,
1577 + 0.00004, 0.00012, 0.00027,
1578 + 0.06608, 0.01242, 0.00369, 0.00011, 0.00006,
1579 + 0.00004, 0.00012, 0.00025 /
1580 DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=1,7)/
1581 + 0.20691, 0.04176, 0.04632, 0.00013, 0.00006,
1582 + 0.00004, 0.00028, 0.00080,
1583 + 0.18121, 0.03604, 0.03370, 0.00013, 0.00009,
1584 + 0.00004, 0.00027, 0.00069,
1585 + 0.16102, 0.03163, 0.02549, 0.00012, 0.00008,
1586 + 0.00002, 0.00023, 0.00061,
1587 + 0.14467, 0.02812, 0.01987, 0.00013, 0.00009,
1588 + 0.00003, 0.00021, 0.00054,
1589 + 0.13116, 0.02525, 0.01588, 0.00010, 0.00008,
1590 + 0.00004, 0.00019, 0.00048,
1591 + 0.11973, 0.02285, 0.01294, 0.00010, 0.00008,
1592 + 0.00004, 0.00018, 0.00043,
1593 + 0.10998, 0.02083, 0.01074, 0.00011, 0.00008,
1594 + 0.00004, 0.00017, 0.00038 /
1595 DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=8,14)/
1596 + 0.10157, 0.01909, 0.00903, 0.00009, 0.00008,
1597 + 0.00004, 0.00015, 0.00035,
1598 + 0.09422, 0.01759, 0.00770, 0.00009, 0.00008,
1599 + 0.00004, 0.00014, 0.00032,
1600 + 0.08777, 0.01628, 0.00665, 0.00009, 0.00007,
1601 + 0.00004, 0.00013, 0.00029,
1602 + 0.08206, 0.01513, 0.00580, 0.00009, 0.00006,
1603 + 0.00004, 0.00012, 0.00028,
1604 + 0.07698, 0.01412, 0.00510, 0.00008, 0.00006,
1605 + 0.00004, 0.00011, 0.00025,
1606 + 0.07242, 0.01321, 0.00452, 0.00007, 0.00006,
1607 + 0.00003, 0.00011, 0.00023,
1608 + 0.06833, 0.01240, 0.00404, 0.00007, 0.00006,
1609 + 0.00003, 0.00010, 0.00022 /
1610 DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=15,19)/
1611 + 0.06462, 0.01167, 0.00363, 0.00007, 0.00005,
1612 + 0.00003, 0.00009, 0.00020,
1613 + 0.06123, 0.01101, 0.00329, 0.00007, 0.00005,
1614 + 0.00003, 0.00009, 0.00019,
1615 + 0.05814, 0.01042, 0.00299, 0.00006, 0.00005,
1616 + 0.00003, 0.00008, 0.00018,
1617 + 0.05533, 0.00987, 0.00274, 0.00005, 0.00004,
1618 + 0.00002, 0.00008, 0.00017,
1619 + 0.05275, 0.00937, 0.00251, 0.00005, 0.00004,
1620 + 0.00002, 0.00007, 0.00016 /
1621 DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=1,7)/
1622 + 0.17455, 0.03329, 0.03478, 0.00009, 0.00002,
1623 + 0.00000, 0.00015, 0.00050,
1624 + 0.15174, 0.02853, 0.02492, 0.00010, 0.00004,
1625 + 0.00000, 0.00014, 0.00042,
1626 + 0.13397, 0.02490, 0.01862, 0.00009, 0.00005,
1627 + 0.00001, 0.00013, 0.00038,
1628 + 0.11972, 0.02200, 0.01436, 0.00008, 0.00005,
1629 + 0.00000, 0.00012, 0.00032,
1630 + 0.10798, 0.01965, 0.01137, 0.00008, 0.00005,
1631 + 0.00001, 0.00011, 0.00029,
1632 + 0.09813, 0.01771, 0.00920, 0.00008, 0.00004,
1633 + 0.00002, 0.00010, 0.00026,
1634 + 0.08976, 0.01607, 0.00757, 0.00007, 0.00004,
1635 + 0.00002, 0.00009, 0.00025 /
1636 DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=8,14)/
1637 + 0.08255, 0.01467, 0.00633, 0.00007, 0.00004,
1638 + 0.00001, 0.00008, 0.00021,
1639 + 0.07629, 0.01347, 0.00537, 0.00007, 0.00004,
1640 + 0.00002, 0.00008, 0.00019,
1641 + 0.07083, 0.01243, 0.00461, 0.00007, 0.00004,
1642 + 0.00002, 0.00007, 0.00017,
1643 + 0.06600, 0.01152, 0.00400, 0.00006, 0.00003,
1644 + 0.00001, 0.00006, 0.00015,
1645 + 0.06171, 0.01071, 0.00351, 0.00007, 0.00003,
1646 + 0.00001, 0.00006, 0.00015,
1647 + 0.05790, 0.01000, 0.00310, 0.00005, 0.00003,
1648 + 0.00001, 0.00006, 0.00014,
1649 + 0.05448, 0.00936, 0.00276, 0.00004, 0.00003,
1650 + 0.00001, 0.00005, 0.00013 /
1651 DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=15,19)/
1652 + 0.05137, 0.00878, 0.00248, 0.00005, 0.00003,
1653 + 0.00001, 0.00005, 0.00012,
1654 + 0.04855, 0.00827, 0.00224, 0.00005, 0.00003,
1655 + 0.00001, 0.00005, 0.00011,
1656 + 0.04600, 0.00780, 0.00203, 0.00005, 0.00002,
1657 + 0.00001, 0.00004, 0.00011,
1658 + 0.04367, 0.00737, 0.00185, 0.00004, 0.00002,
1659 + 0.00001, 0.00004, 0.00010,
1660 + 0.04154, 0.00698, 0.00169, 0.00004, 0.00002,
1661 + 0.00001, 0.00004, 0.00009 /
1662 DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=1,7)/
1663 + 0.14466, 0.02595, 0.02551, 0.00002, 0.00004,
1664 + 0.00003, 0.00011, 0.00029,
1665 + 0.12481, 0.02208, 0.01800, 0.00004, 0.00004,
1666 + 0.00002, 0.00010, 0.00025,
1667 + 0.10951, 0.01914, 0.01327, 0.00002, 0.00004,
1668 + 0.00001, 0.00009, 0.00021,
1669 + 0.09728, 0.01682, 0.01013, 0.00003, 0.00004,
1670 + 0.00002, 0.00008, 0.00019,
1671 + 0.08727, 0.01495, 0.00794, 0.00003, 0.00003,
1672 + 0.00002, 0.00007, 0.00017,
1673 + 0.07893, 0.01341, 0.00637, 0.00003, 0.00003,
1674 + 0.00002, 0.00007, 0.00015,
1675 + 0.07186, 0.01211, 0.00520, 0.00003, 0.00003,
1676 + 0.00002, 0.00006, 0.00013 /
1677 DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=8,14)/
1678 + 0.06582, 0.01101, 0.00432, 0.00003, 0.00003,
1679 + 0.00002, 0.00006, 0.00011,
1680 + 0.06059, 0.01007, 0.00364, 0.00003, 0.00003,
1681 + 0.00002, 0.00005, 0.00011,
1682 + 0.05604, 0.00926, 0.00311, 0.00003, 0.00003,
1683 + 0.00002, 0.00005, 0.00010,
1684 + 0.05205, 0.00855, 0.00269, 0.00003, 0.00002,
1685 + 0.00001, 0.00004, 0.00008,
1686 + 0.04850, 0.00793, 0.00235, 0.00003, 0.00003,
1687 + 0.00001, 0.00004, 0.00008,
1688 + 0.04536, 0.00737, 0.00207, 0.00003, 0.00002,
1689 + 0.00001, 0.00004, 0.00007,
1690 + 0.04255, 0.00688, 0.00183, 0.00002, 0.00002,
1691 + 0.00001, 0.00004, 0.00007 /
1692 DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=15,19)/
1693 + 0.04002, 0.00644, 0.00164, 0.00002, 0.00002,
1694 + 0.00001, 0.00003, 0.00007,
1695 + 0.03773, 0.00604, 0.00148, 0.00002, 0.00002,
1696 + 0.00001, 0.00003, 0.00006,
1697 + 0.03565, 0.00569, 0.00134, 0.00002, 0.00002,
1698 + 0.00001, 0.00003, 0.00006,
1699 + 0.03376, 0.00537, 0.00122, 0.00002, 0.00001,
1700 + 0.00001, 0.00003, 0.00005,
1701 + 0.03204, 0.00507, 0.00111, 0.00001, 0.00001,
1702 + 0.00001, 0.00002, 0.00005 /
1703 DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=1,7)/
1704 + 0.09437, 0.01492, 0.01292, 0.00001, 0.00001,
1705 + 0.00000, 0.00003, 0.00009,
1706 + 0.08017, 0.01250, 0.00883, 0.00001, 0.00001,
1707 + 0.00000, 0.00003, 0.00007,
1708 + 0.06937, 0.01068, 0.00634, 0.00001, 0.00001,
1709 + 0.00000, 0.00003, 0.00006,
1710 + 0.06086, 0.00928, 0.00472, 0.00001, 0.00001,
1711 + 0.00000, 0.00002, 0.00005,
1712 + 0.05399, 0.00816, 0.00363, 0.00001, 0.00001,
1713 + 0.00000, 0.00002, 0.00005,
1714 + 0.04833, 0.00724, 0.00286, 0.00001, 0.00001,
1715 + 0.00000, 0.00002, 0.00004,
1716 + 0.04360, 0.00648, 0.00230, 0.00001, 0.00001,
1717 + 0.00000, 0.00002, 0.00004 /
1718 DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=8,14)/
1719 + 0.03957, 0.00584, 0.00189, 0.00001, 0.00001,
1720 + 0.00000, 0.00002, 0.00004,
1721 + 0.03614, 0.00530, 0.00158, 0.00001, 0.00001,
1722 + 0.00000, 0.00001, 0.00003,
1723 + 0.03318, 0.00483, 0.00133, 0.00000, 0.00001,
1724 + 0.00000, 0.00001, 0.00003,
1725 + 0.03059, 0.00443, 0.00114, 0.00000, 0.00001,
1726 + 0.00000, 0.00001, 0.00003,
1727 + 0.02832, 0.00408, 0.00099, 0.00000, 0.00001,
1728 + 0.00000, 0.00001, 0.00002,
1729 + 0.02630, 0.00377, 0.00086, 0.00000, 0.00001,
1730 + 0.00000, 0.00001, 0.00002,
1731 + 0.02452, 0.00350, 0.00076, 0.00000, 0.00001,
1732 + 0.00000, 0.00001, 0.00002 /
1733 DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=15,19)/
1734 + 0.02293, 0.00325, 0.00068, 0.00000, 0.00001,
1735 + 0.00000, 0.00001, 0.00002,
1736 + 0.02149, 0.00304, 0.00061, 0.00000, 0.00001,
1737 + 0.00000, 0.00001, 0.00002,
1738 + 0.02020, 0.00284, 0.00055, 0.00001, 0.00001,
1739 + 0.00000, 0.00001, 0.00001,
1740 + 0.01903, 0.00267, 0.00049, 0.00001, 0.00001,
1741 + 0.00000, 0.00001, 0.00001,
1742 + 0.01796, 0.00251, 0.00045, 0.00001, 0.00000,
1743 + 0.00000, 0.00001, 0.00001 /
1744 DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=1,7)/
1745 + 0.05631, 0.00773, 0.00585, 0.00001, 0.00000,
1746 + 0.00000, 0.00000, 0.00002,
1747 + 0.04704, 0.00637, 0.00386, 0.00000, 0.00000,
1748 + 0.00000, 0.00001, 0.00002,
1749 + 0.04008, 0.00537, 0.00269, 0.00001, 0.00000,
1750 + 0.00000, 0.00001, 0.00002,
1751 + 0.03471, 0.00460, 0.00196, 0.00001, 0.00000,
1752 + 0.00000, 0.00000, 0.00001,
1753 + 0.03043, 0.00400, 0.00148, 0.00001, 0.00000,
1754 + 0.00000, 0.00001, 0.00001,
1755 + 0.02693, 0.00351, 0.00114, 0.00001, 0.00000,
1756 + 0.00000, 0.00000, 0.00001,
1757 + 0.02406, 0.00311, 0.00091, 0.00000, 0.00000,
1758 + 0.00000, 0.00000, 0.00001 /
1759 DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=8,14)/
1760 + 0.02164, 0.00277, 0.00073, 0.00000, 0.00000,
1761 + 0.00000, 0.00000, 0.00001,
1762 + 0.01958, 0.00250, 0.00060, 0.00000, 0.00000,
1763 + 0.00000, 0.00000, 0.00001,
1764 + 0.01782, 0.00226, 0.00051, 0.00000, 0.00000,
1765 + 0.00000, 0.00000, 0.00001,
1766 + 0.01630, 0.00205, 0.00043, 0.00000, 0.00000,
1767 + 0.00000, 0.00000, 0.00001,
1768 + 0.01498, 0.00188, 0.00037, 0.00000, 0.00000,
1769 + 0.00000, 0.00000, 0.00001,
1770 + 0.01382, 0.00172, 0.00032, 0.00000, 0.00000,
1771 + 0.00000, 0.00000, 0.00001,
1772 + 0.01279, 0.00159, 0.00028, 0.00000, 0.00000,
1773 + 0.00000, 0.00000, 0.00000 /
1774 DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=15,19)/
1775 + 0.01188, 0.00147, 0.00025, 0.00001, 0.00000,
1776 + 0.00000, 0.00000, 0.00000,
1777 + 0.01107, 0.00136, 0.00022, 0.00000, 0.00000,
1778 + 0.00000, 0.00000, 0.00000,
1779 + 0.01035, 0.00127, 0.00020, 0.00000, 0.00000,
1780 + 0.00000, 0.00000, 0.00000,
1781 + 0.00970, 0.00118, 0.00018, 0.00000, 0.00000,
1782 + 0.00000, 0.00000, 0.00000,
1783 + 0.00911, 0.00111, 0.00016, 0.00000, 0.00000,
1784 + 0.00000, 0.00000, 0.00000 /
1785 DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=1,7)/
1786 + 0.02987, 0.00349, 0.00227, 0.00000, 0.00000,
1787 + 0.00000, 0.00000, 0.00001,
1788 + 0.02449, 0.00282, 0.00145, 0.00000, 0.00000,
1789 + 0.00000, 0.00000, 0.00000,
1790 + 0.02052, 0.00234, 0.00098, 0.00000, 0.00000,
1791 + 0.00000, 0.00000, 0.00000,
1792 + 0.01752, 0.00198, 0.00069, 0.00000, 0.00000,
1793 + 0.00000, 0.00000, 0.00000,
1794 + 0.01514, 0.00169, 0.00051, 0.00000, 0.00000,
1795 + 0.00000, 0.00000, 0.00000,
1796 + 0.01324, 0.00147, 0.00039, 0.00000, 0.00000,
1797 + 0.00000, 0.00000, 0.00001,
1798 + 0.01169, 0.00129, 0.00030, 0.00000, 0.00000,
1799 + 0.00000, 0.00000, 0.00000 /
1800 DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=8,14)/
1801 + 0.01040, 0.00114, 0.00024, 0.00000, 0.00000,
1802 + 0.00000, 0.00000, 0.00000,
1803 + 0.00932, 0.00101, 0.00020, 0.00000, 0.00000,
1804 + 0.00000, 0.00000, 0.00000,
1805 + 0.00840, 0.00091, 0.00016, 0.00000, 0.00000,
1806 + 0.00000, 0.00000, 0.00000,
1807 + 0.00762, 0.00082, 0.00014, 0.00000, 0.00000,
1808 + 0.00000, 0.00000, 0.00000,
1809 + 0.00695, 0.00074, 0.00012, 0.00000, 0.00000,
1810 + 0.00000, 0.00000, 0.00000,
1811 + 0.00636, 0.00068, 0.00010, 0.00000, 0.00000,
1812 + 0.00000, 0.00000, 0.00000,
1813 + 0.00584, 0.00062, 0.00009, 0.00000, 0.00000,
1814 + 0.00000, 0.00000, 0.00000 /
1815 DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=15,19)/
1816 + 0.00539, 0.00057, 0.00008, 0.00000, 0.00000,
1817 + 0.00000, 0.00000, 0.00000,
1818 + 0.00499, 0.00052, 0.00007, 0.00000, 0.00000,
1819 + 0.00000, 0.00000, 0.00000,
1820 + 0.00463, 0.00048, 0.00006, 0.00000, 0.00000,
1821 + 0.00000, 0.00000, 0.00000,
1822 + 0.00431, 0.00045, 0.00006, 0.00000, 0.00000,
1823 + 0.00000, 0.00000, 0.00000,
1824 + 0.00402, 0.00042, 0.00005, 0.00000, 0.00000,
1825 + 0.00000, 0.00000, 0.00000 /
1826 DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=1,7)/
1827 + 0.01334, 0.00129, 0.00070, 0.00000, 0.00000,
1828 + 0.00000, 0.00000, 0.00000,
1829 + 0.01070, 0.00102, 0.00043, 0.00000, 0.00000,
1830 + 0.00000, 0.00000, 0.00000,
1831 + 0.00880, 0.00083, 0.00028, 0.00000, 0.00000,
1832 + 0.00000, 0.00000, 0.00000,
1833 + 0.00738, 0.00069, 0.00019, 0.00000, 0.00000,
1834 + 0.00000, 0.00000, 0.00000,
1835 + 0.00628, 0.00058, 0.00014, 0.00000, 0.00000,
1836 + 0.00000, 0.00000, 0.00000,
1837 + 0.00542, 0.00050, 0.00010, 0.00000, 0.00000,
1838 + 0.00000, 0.00000, 0.00000,
1839 + 0.00472, 0.00043, 0.00008, 0.00000, 0.00000,
1840 + 0.00000, 0.00000, 0.00000 /
1841 DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=8,14)/
1842 + 0.00414, 0.00038, 0.00006, 0.00000, 0.00000,
1843 + 0.00000, 0.00000, 0.00000,
1844 + 0.00367, 0.00033, 0.00005, 0.00000, 0.00000,
1845 + 0.00000, 0.00000, 0.00000,
1846 + 0.00328, 0.00029, 0.00004, 0.00000, 0.00000,
1847 + 0.00000, 0.00000, 0.00000,
1848 + 0.00294, 0.00026, 0.00004, 0.00000, 0.00000,
1849 + 0.00000, 0.00000, 0.00000,
1850 + 0.00265, 0.00023, 0.00003, 0.00000, 0.00000,
1851 + 0.00000, 0.00000, 0.00000,
1852 + 0.00241, 0.00021, 0.00003, 0.00000, 0.00000,
1853 + 0.00000, 0.00000, 0.00000,
1854 + 0.00219, 0.00019, 0.00002, 0.00000, 0.00000,
1855 + 0.00000, 0.00000, 0.00000 /
1856 DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=15,19)/
1857 + 0.00201, 0.00018, 0.00002, 0.00000, 0.00000,
1858 + 0.00000, 0.00000, 0.00000,
1859 + 0.00184, 0.00016, 0.00002, 0.00000, 0.00000,
1860 + 0.00000, 0.00000, 0.00000,
1861 + 0.00170, 0.00015, 0.00002, 0.00000, 0.00000,
1862 + 0.00000, 0.00000, 0.00000,
1863 + 0.00157, 0.00014, 0.00001, 0.00000, 0.00000,
1864 + 0.00000, 0.00000, 0.00000,
1865 + 0.00145, 0.00013, 0.00001, 0.00000, 0.00000,
1866 + 0.00000, 0.00000, 0.00000 /
1867 DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=1,7)/
1868 + 0.00099, 0.00005, 0.00002, 0.00000, 0.00000,
1869 + 0.00000, 0.00000, 0.00000,
1870 + 0.00074, 0.00004, 0.00001, 0.00000, 0.00000,
1871 + 0.00000, 0.00000, 0.00000,
1872 + 0.00058, 0.00003, 0.00001, 0.00000, 0.00000,
1873 + 0.00000, 0.00000, 0.00000,
1874 + 0.00046, 0.00002, 0.00000, 0.00000, 0.00000,
1875 + 0.00000, 0.00000, 0.00000,
1876 + 0.00038, 0.00002, 0.00000, 0.00000, 0.00000,
1877 + 0.00000, 0.00000, 0.00000,
1878 + 0.00031, 0.00002, 0.00000, 0.00000, 0.00000,
1879 + 0.00000, 0.00000, 0.00000,
1880 + 0.00026, 0.00001, 0.00000, 0.00000, 0.00000,
1881 + 0.00000, 0.00000, 0.00000 /
1882 DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=8,14)/
1883 + 0.00022, 0.00001, 0.00000, 0.00000, 0.00000,
1884 + 0.00000, 0.00000, 0.00000,
1885 + 0.00019, 0.00001, 0.00000, 0.00000, 0.00000,
1886 + 0.00000, 0.00000, 0.00000,
1887 + 0.00016, 0.00001, 0.00000, 0.00000, 0.00000,
1888 + 0.00000, 0.00000, 0.00000,
1889 + 0.00014, 0.00001, 0.00000, 0.00000, 0.00000,
1890 + 0.00000, 0.00000, 0.00000,
1891 + 0.00012, 0.00001, 0.00000, 0.00000, 0.00000,
1892 + 0.00000, 0.00000, 0.00000,
1893 + 0.00011, 0.00001, 0.00000, 0.00000, 0.00000,
1894 + 0.00000, 0.00000, 0.00000,
1895 + 0.00010, 0.00001, 0.00000, 0.00000, 0.00000,
1896 + 0.00000, 0.00000, 0.00000 /
1897 DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=15,19)/
1898 + 0.00009, 0.00001, 0.00000, 0.00000, 0.00000,
1899 + 0.00000, 0.00000, 0.00000,
1900 + 0.00008, 0.00001, 0.00000, 0.00000, 0.00000,
1901 + 0.00000, 0.00000, 0.00000,
1902 + 0.00007, 0.00001, 0.00000, 0.00000, 0.00000,
1903 + 0.00000, 0.00000, 0.00000,
1904 + 0.00006, 0.00001, 0.00000, 0.00000, 0.00000,
1905 + 0.00000, 0.00000, 0.00000,
1906 + 0.00006, 0.00001, 0.00000, 0.00000, 0.00000,
1907 + 0.00000, 0.00000, 0.00000 /
1908 DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5,
1909 . 1.D-4,2.D-4,4.D-4,6.D-4,8.D-4,
1910 . 1.D-3,2.D-3,4.D-3,6.D-3,8.D-3,
1911 . 1.D-2,2.D-2,4.D-2,6.D-2,8.D-2,
1912 . .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0,
1913 . .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0,
1914 . .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0,
1915 . .8D0,.9D0,1.D0/
1916 DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/
1917 DATA N0/2,5,5,9,0,0,9,9/
1918 DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
1919 DATA INIT/0/
1920C
1921 XSAVE=X
1922C
1923 IF(INIT.NE.0) GOTO 10
1924 INIT=1
1925 DO 20 N=1,NX-1
1926 DO 20 M=1,19
1927C READ(33,50)F(1,N,M),F(2,N,M),F(3,N,M),F(4,N,M),F(5,N,M),F(7,N,M),
1928C . F(6,N,M),F(8,N,M)
1929C 1=UV 2=DV 3=GLUE 4=UBAR 5=CBAR 7=BBAR 6=SBAR 8=DBAR
1930 DO 25 I=1,8
1931 25 F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
1932 20 CONTINUE
1933 DO 31 J=1,NTENTH-1
1934 XX(J)= LOG10(XX(J))+ONEDO
1935 DO 31 I=1,8
1936 IF(I.EQ.7) GO TO 31
1937 DO 30 K=1,19
1938 30 F(I,J,K)= LOG(F(I,J,K))*F(I,NTENTH,K)/ LOG(F(I,NTENTH,K))
1939 31 CONTINUE
1940 50 FORMAT(8F10.5)
1941 DO 40 I=1,8
1942 DO 40 M=1,19
1943 40 F(I,NX,M)=ZEROD
1944 10 CONTINUE
1945 IF(X.LT.XMIN) X=XMIN
1946 IF(X.GT.XMAX) X=XMAX
1947 QSQ=SCALE**2
1948 IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
1949 IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
1950 XXX=X
1951 IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
1952 N=0
1953 70 N=N+1
1954 IF(XXX.GT.XX(N+1)) GOTO 70
1955 A=(XXX-XX(N))/(XX(N+1)-XX(N))
1956 RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
1957 B=RM-AINT(RM)
1958 M=1+ INT(RM)
1959 DO 60 I=1,8
1960 G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
1961 . + A*(ONED-B)*F(I,N+1,M) + A*B*F(I,N+1,M+1)
1962 IF(N.GE.NTENTH) GOTO 65
1963 IF(I.EQ.7) GOTO 65
1964 FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
1965 G(I)=FAC**(G(I)/FAC)
1966 65 CONTINUE
1967 G(I)=G(I)*(ONED-X)**N0(I)
1968 60 CONTINUE
1969 UPV=G(1)
1970 DNV=G(2)
1971 USEA=G(4)
1972 DSEA=G(8)
1973 STR=G(6)
1974 CHM=G(5)
1975 GLU=G(3)
1976 BOT=G(7)
1977C
1978 X=XSAVE
1979C
1980 RETURN
1981 END
1982C