]> git.uio.no Git - u/mrichter/AliRoot.git/blame - PDF/spdf/sfdisdm.F
git://git.uio.no / u / mrichter / AliRoot.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
This commit was generated by cvs2svn to compensate for changes in r2,
[u/mrichter/AliRoot.git] / PDF / spdf / sfdisdm.F
CommitLineData
fe4da5cc 1*
2* $Id$
3*
4* $Log$
5* Revision 1.1.1.2 1996/10/30 08:29:41 cernlib
6* Version 7.04
7*
8* Revision 1.1.1.1 1996/04/12 15:29:34 plothow
9* Version 7.01
10*
11*
12#include "pdf/pilot.h"
13 SUBROUTINE SFDISDM(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU)
14
15C THIS IS THE NEW B--TYPE FIT "D-'" WITH UBAR < DBAR (230 MEV)
16C IN THE ** DIS ** SCHEME
17
18#include "pdf/impdp.inc"
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.00783, 0.00469, 113.36284, 4.99856, 0.13350,
24 + 0.00000, 2.59293, 5.02028,
25 + 0.00828, 0.00483, 131.82452, 5.92056, 1.21986,
26 + 0.00002, 3.59897, 5.94280,
27 + 0.00869, 0.00498, 151.84360, 6.83898, 2.27842,
28 + 0.00000, 4.58917, 6.86165,
29 + 0.00908, 0.00512, 173.24471, 7.75136, 3.31266,
30 + 0.00002, 5.56407, 7.77444,
31 + 0.00944, 0.00525, 195.67310, 8.66962, 4.33841,
32 + 0.22312, 6.53754, 8.69308,
33 + 0.00979, 0.00538, 218.97154, 9.59438, 5.35948,
34 + 1.19609, 7.51180, 9.61820,
35 + 0.01012, 0.00552, 243.08543, 10.53078, 6.38328,
36 + 2.34336, 8.49317, 10.55492 /
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.01044, 0.00564, 267.88794, 11.47977, 7.41220,
39 + 3.46835, 9.48333, 11.50425,
40 + 0.01075, 0.00577, 293.24634, 12.44047, 8.44644,
41 + 4.59493, 10.48191, 12.46524,
42 + 0.01104, 0.00589, 319.05518, 13.41234, 9.48631,
43 + 5.72057, 11.48886, 13.43743,
44 + 0.01133, 0.00601, 345.24023, 14.39477, 10.53190,
45 + 6.84680, 12.50388, 14.42020,
46 + 0.01160, 0.00613, 371.73511, 15.38583, 11.58189,
47 + 7.97259, 13.52535, 15.41153,
48 + 0.01187, 0.00624, 398.40186, 16.38243, 12.63374,
49 + 9.09607, 14.55050, 16.40844,
50 + 0.01214, 0.00635, 425.26733, 17.38764, 13.69083,
51 + 10.22076, 15.58251, 17.41394 /
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.01239, 0.00645, 452.28052, 18.39935, 14.75138,
54 + 11.34535, 16.61946, 18.42594,
55 + 0.01264, 0.00657, 479.26636, 19.41307, 15.81131,
56 + 12.46604, 17.65709, 19.43997,
57 + 0.01288, 0.00667, 506.41284, 20.43520, 16.87714,
58 + 13.58954, 18.70181, 20.46239,
59 + 0.01312, 0.00677, 533.42773, 21.45621, 17.93974,
60 + 14.70706, 19.74434, 21.48370,
61 + 0.01335, 0.00688, 560.54785, 22.48378, 19.00680,
62 + 15.82642, 20.79234, 22.51157 /
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.01082, 0.00618, 80.27979, 3.67535, 0.09632,
65 + 0.00000, 1.90005, 3.68793,
66 + 0.01141, 0.00641, 93.60218, 4.33152, 0.86836,
67 + 0.00000, 2.61510, 4.34439,
68 + 0.01196, 0.00661, 107.86386, 4.98281, 1.61841,
69 + 0.00000, 3.31665, 4.99589,
70 + 0.01246, 0.00681, 122.91040, 5.62700, 2.34845,
71 + 0.00001, 4.00458, 5.64030,
72 + 0.01294, 0.00701, 138.51329, 6.27222, 3.06940,
73 + 0.15652, 4.68842, 6.28572,
74 + 0.01340, 0.00720, 154.56238, 6.91877, 3.78380,
75 + 0.83751, 5.36959, 6.93247,
76 + 0.01384, 0.00738, 171.01872, 7.57011, 4.49672,
77 + 1.63737, 6.05238, 7.58398 /
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.01426, 0.00757, 187.79849, 8.22688, 5.20980,
80 + 2.41790, 6.73793, 8.24095,
81 + 0.01468, 0.00774, 204.81499, 8.88842, 5.92313,
82 + 3.19589, 7.42595, 8.90268,
83 + 0.01506, 0.00791, 222.00338, 9.55446, 6.63707,
84 + 3.96968, 8.11651, 9.56891,
85 + 0.01544, 0.00807, 239.31991, 10.22467, 7.35177,
86 + 4.74047, 8.80948, 10.23928,
87 + 0.01581, 0.00823, 256.72212, 10.89766, 8.06628,
88 + 5.50756, 9.50373, 10.91245,
89 + 0.01616, 0.00839, 274.10981, 11.57118, 8.77870,
90 + 6.26951, 10.19718, 11.58613,
91 + 0.01651, 0.00855, 291.52754, 12.24780, 9.49186,
92 + 7.02928, 10.89252, 12.26293 /
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.01683, 0.00870, 308.94037, 12.92613, 10.20458,
95 + 7.78604, 11.58849, 12.94140,
96 + 0.01716, 0.00885, 326.22138, 13.60267, 10.91368,
97 + 8.53678, 12.28173, 13.61813,
98 + 0.01748, 0.00899, 343.52923, 14.28270, 11.62449,
99 + 9.28704, 12.97754, 14.29830,
100 + 0.01780, 0.00914, 360.64104, 14.95888, 12.32996,
101 + 10.02994, 13.66874, 14.97465,
102 + 0.01810, 0.00927, 377.74969, 15.63737, 13.03628,
103 + 10.77185, 14.36152, 15.65332 /
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.01493, 0.00816, 56.85426, 2.70330, 0.06946,
106 + 0.00000, 1.39316, 2.71073,
107 + 0.01571, 0.00849, 66.46410, 3.16990, 0.61767,
108 + 0.00000, 1.90097, 3.17747,
109 + 0.01643, 0.00879, 76.62157, 3.63133, 1.14867,
110 + 0.00001, 2.39756, 3.63904,
111 + 0.01710, 0.00909, 87.19536, 4.08570, 1.66349,
112 + 0.00001, 2.88252, 4.09353,
113 + 0.01774, 0.00936, 98.04134, 4.53858, 2.16968,
114 + 0.10972, 3.36237, 4.54654,
115 + 0.01835, 0.00963, 109.08383, 4.99007, 2.66893,
116 + 0.58597, 3.83804, 4.99814,
117 + 0.01893, 0.00989, 120.29666, 5.44254, 3.16472,
118 + 1.14314, 4.31247, 5.45070 /
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.01948, 0.01014, 131.62527, 5.89642, 3.65821,
121 + 1.68411, 4.78641, 5.90469,
122 + 0.02002, 0.01039, 143.01680, 6.35125, 4.14949,
123 + 2.22076, 5.25972, 6.35962,
124 + 0.02053, 0.01062, 154.43156, 6.80690, 4.63884,
125 + 2.75198, 5.73247, 6.81538,
126 + 0.02103, 0.01085, 165.84703, 7.26325, 5.12648,
127 + 3.27876, 6.20469, 7.27182,
128 + 0.02151, 0.01108, 177.23659, 7.71936, 5.61179,
129 + 3.80066, 6.67562, 7.72802,
130 + 0.02197, 0.01129, 188.52869, 8.17351, 6.09330,
131 + 4.31651, 7.14365, 8.18228,
132 + 0.02243, 0.01151, 199.77345, 8.62790, 6.57340,
133 + 4.82886, 7.61110, 8.63682 /
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.02287, 0.01172, 210.94688, 9.08158, 7.05127,
136 + 5.33710, 8.07706, 9.09058,
137 + 0.02329, 0.01192, 221.95897, 9.53192, 7.52450,
138 + 5.83896, 8.53903, 9.54103,
139 + 0.02371, 0.01211, 232.93710, 9.98312, 7.99734,
140 + 6.33889, 9.00123, 9.99232,
141 + 0.02412, 0.01231, 243.71588, 10.42962, 8.46443,
142 + 6.83158, 9.45817, 10.43888,
143 + 0.02451, 0.01250, 254.44711, 10.87630, 8.93067,
144 + 7.32211, 9.91481, 10.88567 /
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.01801, 0.00961, 46.46518, 2.25933, 0.05740,
147 + 0.00000, 1.16250, 2.26507,
148 + 0.01893, 0.01002, 54.40184, 2.64137, 0.50593,
149 + 0.00000, 1.57799, 2.64722,
150 + 0.01978, 0.01039, 62.72838, 3.01834, 0.93957,
151 + 0.00000, 1.98349, 3.02429,
152 + 0.02057, 0.01076, 71.32774, 3.38855, 1.35902,
153 + 0.00000, 2.37852, 3.39462,
154 + 0.02132, 0.01110, 80.09055, 3.75648, 1.77037,
155 + 0.08910, 2.76831, 3.76264,
156 + 0.02203, 0.01142, 88.95720, 4.12214, 2.17491,
157 + 0.47528, 3.15358, 4.12838,
158 + 0.02271, 0.01174, 97.90706, 4.48747, 2.57552,
159 + 0.92601, 3.53670, 4.49380 /
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.02336, 0.01204, 106.89930, 4.85278, 2.97309,
162 + 1.36230, 3.91828, 4.85920,
163 + 0.02399, 0.01234, 115.89411, 5.21774, 3.36772,
164 + 1.79388, 4.29820, 5.22424,
165 + 0.02460, 0.01263, 124.86358, 5.58227, 3.75968,
166 + 2.21988, 4.67657, 5.58886,
167 + 0.02519, 0.01291, 133.79310, 5.94634, 4.14922,
168 + 2.64118, 5.05351, 5.95302,
169 + 0.02575, 0.01318, 142.66317, 6.30919, 4.53583,
170 + 3.05743, 5.42834, 6.31594,
171 + 0.02630, 0.01344, 151.41555, 6.66937, 4.91829,
172 + 3.46764, 5.79977, 6.67619,
173 + 0.02683, 0.01370, 160.09943, 7.02889, 5.29871,
174 + 3.87411, 6.16985, 7.03580 /
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.02734, 0.01395, 168.69634, 7.38693, 5.67646,
177 + 4.27633, 6.53784, 7.39392,
178 + 0.02785, 0.01419, 177.13248, 7.74131, 6.04946,
179 + 4.67237, 6.90162, 7.74837,
180 + 0.02833, 0.01444, 185.51928, 8.09569, 6.42147,
181 + 5.06613, 7.26490, 8.10283,
182 + 0.02880, 0.01467, 193.71811, 8.44534, 6.78786,
183 + 5.45308, 7.62301, 8.45257,
184 + 0.02927, 0.01489, 201.86036, 8.79452, 7.15296,
185 + 5.83766, 7.98023, 8.80182 /
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.02056, 0.01082, 40.26817, 1.98972, 0.05014,
188 + 0.00000, 1.02275, 1.99472,
189 + 0.02160, 0.01128, 47.19662, 2.32112, 0.43906,
190 + 0.00000, 1.38302, 2.32622,
191 + 0.02255, 0.01172, 54.42696, 2.64761, 0.81458,
192 + 0.00000, 1.73414, 2.65281,
193 + 0.02344, 0.01212, 61.85147, 2.96763, 1.17718,
194 + 0.00000, 2.07554, 2.97293,
195 + 0.02428, 0.01251, 69.38116, 3.28500, 1.53208,
196 + 0.07684, 2.41178, 3.29039,
197 + 0.02507, 0.01290, 76.96577, 3.59972, 1.88044,
198 + 0.40958, 2.74341, 3.60520,
199 + 0.02584, 0.01326, 84.58859, 3.91345, 2.22467,
200 + 0.79724, 3.07246, 3.91900 /
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.02657, 0.01361, 92.21600, 4.22646, 2.56556,
203 + 1.17169, 3.39949, 4.23210,
204 + 0.02729, 0.01396, 99.81659, 4.53846, 2.90321,
205 + 1.54130, 3.72439, 4.54419,
206 + 0.02796, 0.01429, 107.36899, 4.84945, 3.23791,
207 + 1.90541, 4.04729, 4.85525,
208 + 0.02862, 0.01460, 114.86278, 5.15939, 3.56987,
209 + 2.26477, 4.36830, 5.16526,
210 + 0.02925, 0.01491, 122.28268, 5.46766, 3.89868,
211 + 2.61913, 4.68691, 5.47361,
212 + 0.02986, 0.01521, 129.57832, 5.77302, 4.22328,
213 + 2.96762, 5.00195, 5.77904,
214 + 0.03046, 0.01550, 136.79765, 6.07726, 4.54559,
215 + 3.31231, 5.31527, 6.08334 /
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.03104, 0.01579, 143.92532, 6.37970, 4.86506,
218 + 3.65280, 5.62628, 6.38586,
219 + 0.03160, 0.01607, 150.89703, 6.67843, 5.17989,
220 + 3.98739, 5.93311, 6.68466,
221 + 0.03214, 0.01634, 157.81467, 6.97673, 5.49342,
222 + 4.31957, 6.23907, 6.98302,
223 + 0.03267, 0.01660, 164.55515, 7.27043, 5.80159,
224 + 4.64533, 6.54005, 7.27679,
225 + 0.03319, 0.01686, 171.23663, 7.56334, 6.10828,
226 + 4.96866, 6.83990, 7.56976 /
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.02279, 0.01185, 36.03723, 1.80307, 0.04516,
229 + 0.00000, 0.92615, 1.80764,
230 + 0.02392, 0.01236, 42.27234, 2.09982, 0.39332,
231 + 0.00000, 1.24868, 2.10452,
232 + 0.02497, 0.01286, 48.75197, 2.39182, 0.72912,
233 + 0.00000, 1.56263, 2.39661,
234 + 0.02594, 0.01331, 55.37572, 2.67759, 1.05293,
235 + 0.00001, 1.86748, 2.68249,
236 + 0.02685, 0.01375, 62.06821, 2.96051, 1.36941,
237 + 0.06850, 2.16722, 2.96551,
238 + 0.02773, 0.01417, 68.78519, 3.24061, 1.67953,
239 + 0.36487, 2.46238, 3.24569,
240 + 0.02856, 0.01457, 75.51291, 3.51929, 1.98549,
241 + 0.70970, 2.75475, 3.52446 /
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.02937, 0.01497, 82.22302, 3.79687, 2.28797,
244 + 1.04220, 3.04481, 3.80212,
245 + 0.03014, 0.01534, 88.88927, 4.07306, 2.58708,
246 + 1.36987, 3.33251, 4.07840,
247 + 0.03088, 0.01571, 95.49414, 4.34789, 2.88309,
248 + 1.69214, 3.61796, 4.35331,
249 + 0.03160, 0.01606, 102.03079, 4.62135, 3.17623,
250 + 2.00972, 3.90129, 4.62684,
251 + 0.03229, 0.01640, 108.48605, 4.89292, 3.46614,
252 + 2.32239, 4.18206, 4.89848,
253 + 0.03295, 0.01675, 114.81557, 5.16141, 3.75184,
254 + 2.62935, 4.45919, 5.16705,
255 + 0.03360, 0.01707, 121.06581, 5.42857, 4.03514,
256 + 2.93256, 4.73444, 5.43428 /
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.03423, 0.01738, 127.22301, 5.69378, 4.31556,
259 + 3.23166, 5.00729, 5.69956,
260 + 0.03484, 0.01769, 133.23058, 5.95530, 4.59145,
261 + 3.52509, 5.27602, 5.96114,
262 + 0.03543, 0.01799, 139.18147, 6.21615, 4.86592,
263 + 3.81609, 5.54370, 6.22207,
264 + 0.03601, 0.01828, 144.96507, 6.47256, 5.13525,
265 + 4.10101, 5.80659, 6.47853,
266 + 0.03658, 0.01857, 150.68996, 6.72799, 5.40300,
267 + 4.38349, 6.06820, 6.73403 /
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.03130, 0.01577, 25.53156, 1.32994, 0.03270,
270 + 0.00000, 0.68224, 1.33450,
271 + 0.03280, 0.01650, 30.02258, 1.54021, 0.27934,
272 + 0.00000, 0.91068, 1.54493,
273 + 0.03418, 0.01719, 34.62773, 1.74624, 0.51634,
274 + 0.00000, 1.13218, 1.75109,
275 + 0.03547, 0.01784, 39.26733, 1.94686, 0.74385,
276 + 0.00000, 1.34623, 1.95185,
277 + 0.03668, 0.01844, 43.89818, 2.14443, 0.96513,
278 + 0.04789, 1.55563, 2.14954,
279 + 0.03783, 0.01902, 48.49229, 2.33892, 1.18086,
280 + 0.25451, 1.76073, 2.34414,
281 + 0.03894, 0.01959, 53.04248, 2.53136, 1.39257,
282 + 0.49388, 1.96278, 2.53669 /
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.04000, 0.02013, 57.53278, 2.72192, 1.60074,
285 + 0.72340, 2.16214, 2.72736,
286 + 0.04101, 0.02065, 61.94952, 2.91049, 1.80550,
287 + 0.94839, 2.35879, 2.91604,
288 + 0.04199, 0.02116, 66.28516, 3.09710, 2.00709,
289 + 1.16851, 2.55288, 3.10275,
290 + 0.04292, 0.02164, 70.53885, 3.28183, 2.20573,
291 + 1.38435, 2.74455, 3.28757,
292 + 0.04383, 0.02212, 74.70436, 3.46435, 2.40121,
293 + 1.59580, 2.93354, 3.47017,
294 + 0.04470, 0.02256, 78.75093, 3.64379, 2.59280,
295 + 1.80225, 3.11903, 3.64969,
296 + 0.04555, 0.02302, 82.71915, 3.82153, 2.78196,
297 + 2.00528, 3.30246, 3.82752 /
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.04637, 0.02344, 86.60075, 3.99718, 2.96835,
300 + 2.20466, 3.48348, 4.00325,
301 + 0.04717, 0.02386, 90.35558, 4.16945, 3.15079,
302 + 2.39925, 3.66082, 4.17560,
303 + 0.04794, 0.02427, 94.05588, 4.34067, 3.33165,
304 + 2.59153, 3.83684, 4.34689,
305 + 0.04870, 0.02467, 97.62140, 4.50806, 3.50817,
306 + 2.77879, 4.00878, 4.51435,
307 + 0.04943, 0.02506, 101.13344, 4.67428, 3.68308,
308 + 2.96385, 4.17933, 4.68062 /
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.04287, 0.02113, 18.09737, 0.98498, 0.02384,
311 + 0.00000, 0.50552, 0.99097,
312 + 0.04485, 0.02216, 21.32814, 1.13348, 0.19822,
313 + 0.00000, 0.66696, 1.13970,
314 + 0.04669, 0.02310, 24.59242, 1.27824, 0.36507,
315 + 0.00000, 0.82278, 1.28465,
316 + 0.04839, 0.02399, 27.82928, 1.41844, 0.52442,
317 + 0.00000, 0.97254, 1.42504,
318 + 0.04999, 0.02484, 31.01701, 1.55569, 0.67856,
319 + 0.03339, 1.11824, 1.56246,
320 + 0.05150, 0.02565, 34.13919, 1.69000, 0.82800,
321 + 0.17704, 1.26010, 1.69693,
322 + 0.05296, 0.02642, 37.19345, 1.82208, 0.97382,
323 + 0.34266, 1.39904, 1.82917 /
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.05435, 0.02716, 40.17247, 1.95208, 1.11638,
326 + 0.50050, 1.53532, 1.95931,
327 + 0.05568, 0.02789, 43.07063, 2.07996, 1.25580,
328 + 0.65434, 1.66897, 2.08733,
329 + 0.05696, 0.02857, 45.88628, 2.20579, 1.39230,
330 + 0.80400, 1.80013, 2.21328,
331 + 0.05819, 0.02923, 48.62247, 2.32965, 1.52609,
332 + 0.94996, 1.92895, 2.33727,
333 + 0.05937, 0.02988, 51.27676, 2.45136, 1.65706,
334 + 1.09217, 2.05529, 2.45910,
335 + 0.06052, 0.03050, 53.82848, 2.57030, 1.78466,
336 + 1.23020, 2.17856, 2.57814,
337 + 0.06162, 0.03109, 56.31184, 2.68756, 1.91007,
338 + 1.36531, 2.29987, 2.69551 /
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.06269, 0.03168, 58.72153, 2.80286, 2.03306,
341 + 1.49735, 2.41901, 2.81091,
342 + 0.06373, 0.03224, 61.03021, 2.91529, 2.15274,
343 + 1.62549, 2.53507, 2.92344,
344 + 0.06473, 0.03280, 63.29239, 3.02662, 2.27096,
345 + 1.75162, 2.64984, 3.03486,
346 + 0.06571, 0.03333, 65.45084, 3.13482, 2.38568,
347 + 1.87376, 2.76129, 3.14314,
348 + 0.06666, 0.03386, 67.56570, 3.24187, 2.49895,
349 + 1.99403, 2.87144, 3.25028 /
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.05146, 0.02518, 14.80340, 0.82900, 0.01988,
352 + 0.00000, 0.42604, 0.83633,
353 + 0.05380, 0.02641, 17.46556, 0.94989, 0.16209,
354 + 0.00000, 0.55763, 0.95749,
355 + 0.05596, 0.02757, 20.12881, 1.06734, 0.29770,
356 + 0.00000, 0.68420, 1.07517,
357 + 0.05795, 0.02864, 22.74222, 1.18065, 0.42679,
358 + 0.00000, 0.80543, 1.18871,
359 + 0.05982, 0.02965, 25.29341, 1.29117, 0.55124,
360 + 0.02698, 0.92294, 1.29944,
361 + 0.06162, 0.03062, 27.77130, 1.39889, 0.67144,
362 + 0.14286, 1.03693, 1.40735,
363 + 0.06332, 0.03156, 30.17592, 1.50442, 0.78829,
364 + 0.27603, 1.14815, 1.51307 /
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.06495, 0.03245, 32.50339, 1.60789, 0.90212,
367 + 0.40245, 1.25681, 1.61671,
368 + 0.06650, 0.03331, 34.75139, 1.70928, 1.01305,
369 + 0.52521, 1.36299, 1.71826,
370 + 0.06800, 0.03413, 36.92084, 1.80868, 1.12127,
371 + 0.64421, 1.46680, 1.81780,
372 + 0.06943, 0.03494, 39.01585, 1.90619, 1.22697,
373 + 0.75985, 1.56843, 1.91546,
374 + 0.07081, 0.03569, 41.03569, 2.00166, 1.33010,
375 + 0.87214, 1.66775, 2.01107,
376 + 0.07214, 0.03644, 42.96425, 2.09460, 1.43021,
377 + 0.98073, 1.76428, 2.10414,
378 + 0.07343, 0.03715, 44.83162, 2.18596, 1.52830,
379 + 1.08669, 1.85902, 2.19562 /
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.07467, 0.03785, 46.63419, 2.27552, 1.62421,
382 + 1.18992, 1.95176, 2.28529,
383 + 0.07588, 0.03852, 48.35025, 2.36251, 1.71722,
384 + 1.28974, 2.04177, 2.37240,
385 + 0.07704, 0.03918, 50.02550, 2.44845, 1.80886,
386 + 1.38777, 2.13058, 2.45846,
387 + 0.07818, 0.03981, 51.61328, 2.53165, 1.89747,
388 + 1.48235, 2.21648, 2.54175,
389 + 0.07928, 0.04042, 53.16382, 2.61380, 1.98477,
390 + 1.57527, 2.30122, 2.62401 /
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.05857, 0.02856, 12.84036, 0.73448, 0.01748,
393 + 0.00000, 0.37814, 0.74301,
394 + 0.06118, 0.02996, 15.15948, 0.83891, 0.14043,
395 + 0.00000, 0.49189, 0.84773,
396 + 0.06359, 0.03128, 17.46109, 0.94006, 0.25741,
397 + 0.00000, 0.60101, 0.94917,
398 + 0.06583, 0.03251, 19.70105, 1.03738, 0.36845,
399 + 0.00000, 0.70526, 1.04672,
400 + 0.06792, 0.03367, 21.87273, 1.13203, 0.47522,
401 + 0.02317, 0.80600, 1.14159,
402 + 0.06992, 0.03479, 23.96823, 1.22399, 0.57808,
403 + 0.12249, 0.90346, 1.23377,
404 + 0.07183, 0.03585, 25.98907, 1.31380, 0.67777,
405 + 0.23637, 0.99824, 1.32377 /
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.07364, 0.03686, 27.93349, 1.40161, 0.77460,
408 + 0.34414, 1.09061, 1.41177,
409 + 0.07538, 0.03784, 29.80106, 1.48739, 0.86871,
410 + 0.44850, 1.18059, 1.49772,
411 + 0.07704, 0.03878, 31.59392, 1.57124, 0.96027,
412 + 0.54937, 1.26832, 1.58174,
413 + 0.07864, 0.03967, 33.31693, 1.65328, 1.04948,
414 + 0.64714, 1.35397, 1.66394,
415 + 0.08018, 0.04054, 34.97005, 1.73340, 1.13628,
416 + 0.74183, 1.43746, 1.74419,
417 + 0.08165, 0.04138, 36.54018, 1.81114, 1.22030,
418 + 0.83313, 1.51837, 1.82207,
419 + 0.08309, 0.04219, 38.05452, 1.88738, 1.30243,
420 + 0.92201, 1.59759, 1.89845 /
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.08447, 0.04297, 39.51041, 1.96194, 1.38257,
423 + 1.00841, 1.67495, 1.97315,
424 + 0.08580, 0.04374, 40.88936, 2.03418, 1.46006,
425 + 1.09173, 1.74985, 2.04550,
426 + 0.08709, 0.04446, 42.23164, 2.10540, 1.53628,
427 + 1.17340, 1.82359, 2.11684,
428 + 0.08835, 0.04518, 43.49719, 2.17415, 1.60978,
429 + 1.25197, 1.89473, 2.18570,
430 + 0.08957, 0.04588, 44.72981, 2.24190, 1.68205,
431 + 1.32903, 1.96476, 2.25357 /
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.06462, 0.03167, 11.50222, 0.67221, 0.01579,
434 + 0.00000, 0.34616, 0.68127,
435 + 0.06748, 0.03324, 13.58566, 0.76527, 0.12547,
436 + 0.00001, 0.44759, 0.77467,
437 + 0.07011, 0.03470, 15.63766, 0.85522, 0.22961,
438 + 0.00001, 0.54470, 0.86491,
439 + 0.07254, 0.03607, 17.61949, 0.94153, 0.32825,
440 + 0.00002, 0.63723, 0.95150,
441 + 0.07484, 0.03736, 19.52823, 1.02524, 0.42286,
442 + 0.02056, 0.72643, 1.03546,
443 + 0.07701, 0.03859, 21.35942, 1.10634, 0.51374,
444 + 0.10845, 0.81247, 1.11678,
445 + 0.07908, 0.03976, 23.11586, 1.18533, 0.60162,
446 + 0.20903, 0.89595, 1.19599 /
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.08106, 0.04089, 24.79561, 1.26235, 0.68677,
449 + 0.30394, 0.97707, 1.27319,
450 + 0.08295, 0.04196, 26.40141, 1.33738, 0.76930,
451 + 0.39562, 1.05589, 1.34843,
452 + 0.08475, 0.04299, 27.93648, 1.41056, 0.84943,
453 + 0.48403, 1.13259, 1.42178,
454 + 0.08649, 0.04398, 29.40570, 1.48198, 0.92731,
455 + 0.56952, 1.20727, 1.49337,
456 + 0.08814, 0.04494, 30.80994, 1.55156, 1.00292,
457 + 0.65212, 1.27988, 1.56310,
458 + 0.08974, 0.04586, 32.13626, 1.61893, 1.07594,
459 + 0.73159, 1.35011, 1.63061,
460 + 0.09130, 0.04674, 33.41130, 1.68485, 1.14719,
461 + 0.80880, 1.41872, 1.69668 /
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.09279, 0.04760, 34.63304, 1.74916, 1.21653,
464 + 0.88368, 1.48557, 1.76113,
465 + 0.09423, 0.04843, 35.78522, 1.81129, 1.28341,
466 + 0.95570, 1.55010, 1.82339,
467 + 0.09564, 0.04923, 36.90384, 1.87244, 1.34908,
468 + 1.02618, 1.61354, 1.88467,
469 + 0.09699, 0.05000, 37.95329, 1.93137, 1.41227,
470 + 1.09385, 1.67461, 1.94370,
471 + 0.09830, 0.05076, 38.97290, 1.98934, 1.47434,
472 + 1.16012, 1.73466, 2.00179 /
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.08761, 0.04400, 8.18436, 0.51440, 0.01144,
475 + 0.00000, 0.26597, 0.52639,
476 + 0.09134, 0.04619, 9.67033, 0.57888, 0.08796,
477 + 0.00000, 0.33658, 0.59127,
478 + 0.09478, 0.04820, 11.09429, 0.64068, 0.16007,
479 + 0.00001, 0.40361, 0.65342,
480 + 0.09797, 0.05008, 12.43272, 0.69945, 0.22783,
481 + 0.00001, 0.46696, 0.71251,
482 + 0.10093, 0.05184, 13.69332, 0.75593, 0.29227,
483 + 0.01404, 0.52749, 0.76928,
484 + 0.10375, 0.05350, 14.87773, 0.81013, 0.35362,
485 + 0.07376, 0.58533, 0.82374,
486 + 0.10643, 0.05510, 15.99150, 0.86243, 0.41244,
487 + 0.14159, 0.64096, 0.87629 /
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.10898, 0.05659, 17.03688, 0.91293, 0.46894,
490 + 0.20499, 0.69451, 0.92703,
491 + 0.11139, 0.05803, 18.01881, 0.96172, 0.52325,
492 + 0.26570, 0.74611, 0.97602,
493 + 0.11370, 0.05939, 18.94221, 1.00888, 0.57554,
494 + 0.32377, 0.79588, 1.02338,
495 + 0.11591, 0.06070, 19.81262, 1.05452, 0.62596,
496 + 0.37946, 0.84396, 1.06921,
497 + 0.11803, 0.06195, 20.63210, 1.09863, 0.67453,
498 + 0.43285, 0.89034, 1.11349,
499 + 0.12006, 0.06315, 21.39287, 1.14095, 0.72106,
500 + 0.48379, 0.93480, 1.15597,
501 + 0.12202, 0.06430, 22.11525, 1.18207, 0.76613,
502 + 0.53293, 0.97794, 1.19725 /
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.12390, 0.06541, 22.79848, 1.22190, 0.80971,
505 + 0.58027, 1.01968, 1.23723,
506 + 0.12572, 0.06647, 23.43222, 1.26005, 0.85140,
507 + 0.62544, 1.05963, 1.27552,
508 + 0.12748, 0.06751, 24.04205, 1.29739, 0.89211,
509 + 0.66940, 1.09869, 1.31299,
510 + 0.12916, 0.06850, 24.60417, 1.33305, 0.93096,
511 + 0.71127, 1.13597, 1.34876,
512 + 0.13081, 0.06947, 25.14577, 1.36795, 0.96894,
513 + 0.75207, 1.17244, 1.38380 /
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.11846, 0.06208, 5.84701, 0.40210, 0.00805,
516 + 0.00001, 0.20896, 0.41769,
517 + 0.12332, 0.06506, 6.89168, 0.44579, 0.06069,
518 + 0.00001, 0.25725, 0.46182,
519 + 0.12777, 0.06781, 7.85723, 0.48722, 0.10985,
520 + 0.00002, 0.30265, 0.50365,
521 + 0.13188, 0.07031, 8.73285, 0.52620, 0.15559,
522 + 0.00002, 0.34509, 0.54296,
523 + 0.13571, 0.07264, 9.53477, 0.56324, 0.19863,
524 + 0.00943, 0.38521, 0.58031,
525 + 0.13931, 0.07483, 10.26739, 0.59836, 0.23917,
526 + 0.04923, 0.42311, 0.61569,
527 + 0.14271, 0.07689, 10.93883, 0.63182, 0.27762,
528 + 0.09400, 0.45914, 0.64940 /
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.14594, 0.07883, 11.55508, 0.66375, 0.31412,
531 + 0.13534, 0.49341, 0.68158,
532 + 0.14899, 0.08065, 12.11970, 0.69430, 0.34889,
533 + 0.17456, 0.52613, 0.71233,
534 + 0.15189, 0.08239, 12.63923, 0.72350, 0.38204,
535 + 0.21166, 0.55735, 0.74172,
536 + 0.15465, 0.08404, 13.11969, 0.75144, 0.41367,
537 + 0.24689, 0.58717, 0.76984,
538 + 0.15728, 0.08562, 13.56279, 0.77818, 0.44388,
539 + 0.28037, 0.61569, 0.79674,
540 + 0.15979, 0.08710, 13.96378, 0.80355, 0.47249,
541 + 0.31196, 0.64272, 0.82226,
542 + 0.16221, 0.08853, 14.33820, 0.82796, 0.49999,
543 + 0.34219, 0.66872, 0.84682 /
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.16453, 0.08988, 14.68612, 0.85141, 0.52637,
546 + 0.37108, 0.69367, 0.87040,
547 + 0.16673, 0.09119, 15.00078, 0.87362, 0.55134,
548 + 0.39837, 0.71728, 0.89274,
549 + 0.16886, 0.09244, 15.29998, 0.89520, 0.57556,
550 + 0.42475, 0.74021, 0.91443,
551 + 0.17092, 0.09363, 15.56985, 0.91560, 0.59847,
552 + 0.44966, 0.76190, 0.93494,
553 + 0.17291, 0.09479, 15.82652, 0.93543, 0.62072,
554 + 0.47379, 0.78295, 0.95488 /
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.14123, 0.07620, 4.81657, 0.35055, 0.00631,
557 + 0.00001, 0.18293, 0.36854,
558 + 0.14689, 0.07974, 5.65548, 0.38480, 0.04825,
559 + 0.00001, 0.22116, 0.40325,
560 + 0.15207, 0.08295, 6.41075, 0.41705, 0.08717,
561 + 0.00001, 0.25685, 0.43588,
562 + 0.15682, 0.08588, 7.07913, 0.44717, 0.12314,
563 + 0.00003, 0.28998, 0.46634,
564 + 0.16122, 0.08858, 7.67787, 0.47552, 0.15672,
565 + 0.00738, 0.32102, 0.49498,
566 + 0.16535, 0.09108, 8.21503, 0.50216, 0.18811,
567 + 0.03837, 0.35010, 0.52190,
568 + 0.16923, 0.09341, 8.69875, 0.52736, 0.21766,
569 + 0.07303, 0.37753, 0.54733 /
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.17287, 0.09562, 9.13327, 0.55122, 0.24555,
572 + 0.10479, 0.40348, 0.57139,
573 + 0.17632, 0.09767, 9.52586, 0.57382, 0.27187,
574 + 0.13467, 0.42798, 0.59418,
575 + 0.17958, 0.09960, 9.88058, 0.59525, 0.29678,
576 + 0.16273, 0.45120, 0.61578,
577 + 0.18268, 0.10143, 10.20232, 0.61562, 0.32043,
578 + 0.18921, 0.47325, 0.63632,
579 + 0.18563, 0.10316, 10.49513, 0.63497, 0.34285,
580 + 0.21422, 0.49419, 0.65582,
581 + 0.18842, 0.10478, 10.75471, 0.65318, 0.36395,
582 + 0.23766, 0.51386, 0.67414,
583 + 0.19109, 0.10634, 10.99390, 0.67061, 0.38412,
584 + 0.25996, 0.53269, 0.69169 /
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.19365, 0.10782, 11.21303, 0.68725, 0.40335,
587 + 0.28117, 0.55066, 0.70844,
588 + 0.19609, 0.10922, 11.40742, 0.70285, 0.42143,
589 + 0.30106, 0.56753, 0.72416,
590 + 0.19845, 0.11057, 11.59032, 0.71795, 0.43889,
591 + 0.32021, 0.58383, 0.73935,
592 + 0.20068, 0.11185, 11.74983, 0.73208, 0.45527,
593 + 0.33815, 0.59910, 0.75356,
594 + 0.20285, 0.11309, 11.90003, 0.74575, 0.47111,
595 + 0.35545, 0.61388, 0.76731 /
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.15999, 0.08821, 4.20492, 0.31892, 0.00510,
598 + 0.00001, 0.16695, 0.33870,
599 + 0.16629, 0.09216, 4.91633, 0.34744, 0.04063,
600 + 0.00001, 0.19910, 0.36768,
601 + 0.17204, 0.09574, 5.54333, 0.37413, 0.07343,
602 + 0.00001, 0.22896, 0.39474,
603 + 0.17730, 0.09895, 6.08681, 0.39891, 0.10359,
604 + 0.00002, 0.25650, 0.41985,
605 + 0.18212, 0.10190, 6.56528, 0.42207, 0.13156,
606 + 0.00616, 0.28213, 0.44328,
607 + 0.18664, 0.10461, 6.98754, 0.44366, 0.15754,
608 + 0.03192, 0.30599, 0.46512,
609 + 0.19088, 0.10713, 7.36174, 0.46395, 0.18186,
610 + 0.06059, 0.32835, 0.48561 /
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.19482, 0.10947, 7.69255, 0.48304, 0.20467,
613 + 0.08669, 0.34934, 0.50486,
614 + 0.19853, 0.11166, 7.98688, 0.50098, 0.22608,
615 + 0.11110, 0.36906, 0.52296,
616 + 0.20206, 0.11371, 8.24886, 0.51787, 0.24623,
617 + 0.13390, 0.38761, 0.54001,
618 + 0.20539, 0.11562, 8.48311, 0.53382, 0.26523,
619 + 0.15530, 0.40514, 0.55612,
620 + 0.20855, 0.11743, 8.69319, 0.54890, 0.28319,
621 + 0.17540, 0.42169, 0.57130,
622 + 0.21152, 0.11912, 8.87573, 0.56298, 0.29996,
623 + 0.19414, 0.43714, 0.58548,
624 + 0.21435, 0.12073, 9.04169, 0.57639, 0.31594,
625 + 0.21190, 0.45185, 0.59897 /
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.21706, 0.12227, 9.19145, 0.58911, 0.33109,
628 + 0.22870, 0.46581, 0.61178,
629 + 0.21964, 0.12370, 9.32139, 0.60096, 0.34527,
630 + 0.24439, 0.47884, 0.62372,
631 + 0.22213, 0.12508, 9.44241, 0.61236, 0.35890,
632 + 0.25943, 0.49138, 0.63521,
633 + 0.22447, 0.12639, 9.54491, 0.62296, 0.37162,
634 + 0.27345, 0.50306, 0.64586,
635 + 0.22673, 0.12765, 9.64039, 0.63319, 0.38388,
636 + 0.28692, 0.51431, 0.65613 /
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.17608, 0.09870, 3.78909, 0.29620, 0.00414,
639 + 0.00004, 0.15561, 0.31727,
640 + 0.18297, 0.10300, 4.41062, 0.32081, 0.03534,
641 + 0.00003, 0.18362, 0.34235,
642 + 0.18922, 0.10685, 4.94869, 0.34376, 0.06403,
643 + 0.00004, 0.20953, 0.36566,
644 + 0.19487, 0.11031, 5.40636, 0.36490, 0.09024,
645 + 0.00003, 0.23327, 0.38707,
646 + 0.20007, 0.11343, 5.80367, 0.38455, 0.11446,
647 + 0.00536, 0.25527, 0.40697,
648 + 0.20490, 0.11629, 6.14841, 0.40277, 0.13686,
649 + 0.02759, 0.27562, 0.42542,
650 + 0.20940, 0.11891, 6.44982, 0.41972, 0.15766,
651 + 0.05218, 0.29454, 0.44256 /
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.21361, 0.12135, 6.71309, 0.43557, 0.17707,
654 + 0.07446, 0.31221, 0.45857,
655 + 0.21754, 0.12361, 6.94215, 0.45040, 0.19522,
656 + 0.09521, 0.32874, 0.47353,
657 + 0.22124, 0.12572, 7.14344, 0.46429, 0.21221,
658 + 0.11449, 0.34422, 0.48755,
659 + 0.22472, 0.12769, 7.32200, 0.47733, 0.22817,
660 + 0.13250, 0.35872, 0.50069,
661 + 0.22801, 0.12954, 7.47954, 0.48957, 0.24314,
662 + 0.14934, 0.37236, 0.51300,
663 + 0.23113, 0.13126, 7.61383, 0.50091, 0.25709,
664 + 0.16497, 0.38503, 0.52445,
665 + 0.23410, 0.13288, 7.73413, 0.51165, 0.27031,
666 + 0.17973, 0.39703, 0.53527 /
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.23691, 0.13441, 7.84075, 0.52179, 0.28279,
669 + 0.19364, 0.40836, 0.54549,
670 + 0.23955, 0.13585, 7.93079, 0.53119, 0.29442,
671 + 0.20656, 0.41887, 0.55492,
672 + 0.24208, 0.13723, 8.01371, 0.54019, 0.30556,
673 + 0.21892, 0.42896, 0.56397,
674 + 0.24450, 0.13853, 8.08165, 0.54851, 0.31590,
675 + 0.23038, 0.43829, 0.57232,
676 + 0.24683, 0.13976, 8.14413, 0.55648, 0.32584,
677 + 0.24138, 0.44725, 0.58034 /
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.23820, 0.13968, 2.76158, 0.23526, 0.00112,
680 + 0.00001, 0.12497, 0.26085,
681 + 0.24698, 0.14483, 3.14364, 0.24978, 0.02153,
682 + 0.00002, 0.14246, 0.27562,
683 + 0.25474, 0.14929, 3.45111, 0.26301, 0.03992,
684 + 0.00002, 0.15829, 0.28902,
685 + 0.26166, 0.15312, 3.69408, 0.27486, 0.05639,
686 + 0.00001, 0.17246, 0.30101,
687 + 0.26792, 0.15647, 3.89128, 0.28560, 0.07132,
688 + 0.00331, 0.18532, 0.31185,
689 + 0.27355, 0.15946, 4.05216, 0.29526, 0.08480,
690 + 0.01681, 0.19689, 0.32157,
691 + 0.27869, 0.16211, 4.18312, 0.30400, 0.09709,
692 + 0.03151, 0.20740, 0.33033 /
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.28341, 0.16449, 4.28890, 0.31195, 0.10833,
695 + 0.04454, 0.21699, 0.33831,
696 + 0.28777, 0.16666, 4.37443, 0.31919, 0.11863,
697 + 0.05646, 0.22574, 0.34554,
698 + 0.29180, 0.16863, 4.44350, 0.32578, 0.12811,
699 + 0.06736, 0.23378, 0.35211,
700 + 0.29553, 0.17042, 4.49922, 0.33180, 0.13685,
701 + 0.07738, 0.24115, 0.35810,
702 + 0.29902, 0.17203, 4.54317, 0.33728, 0.14490,
703 + 0.08657, 0.24789, 0.36356,
704 + 0.30224, 0.17352, 4.57534, 0.34224, 0.15228,
705 + 0.09499, 0.25406, 0.36846,
706 + 0.30525, 0.17490, 4.60048, 0.34683, 0.15915,
707 + 0.10282, 0.25977, 0.37299 /
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.30808, 0.17617, 4.61870, 0.35102, 0.16554,
710 + 0.11009, 0.26503, 0.37713,
711 + 0.31071, 0.17733, 4.62927, 0.35477, 0.17137,
712 + 0.11673, 0.26979, 0.38083,
713 + 0.31322, 0.17842, 4.63718, 0.35828, 0.17688,
714 + 0.12300, 0.27429, 0.38430,
715 + 0.31553, 0.17940, 4.63799, 0.36140, 0.18192,
716 + 0.12873, 0.27833, 0.38737,
717 + 0.31775, 0.18032, 4.63702, 0.36434, 0.18668,
718 + 0.13417, 0.28216, 0.39025 /
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.32378, 0.19344, 2.02602, 0.18065, 0.00001,
721 + 0.00013, 0.09672, 0.20947,
722 + 0.33408, 0.19828, 2.21553, 0.18760, 0.01073,
723 + 0.00010, 0.10656, 0.21627,
724 + 0.34280, 0.20212, 2.34974, 0.19368, 0.02193,
725 + 0.00010, 0.11512, 0.22214,
726 + 0.35019, 0.20519, 2.44077, 0.19883, 0.03171,
727 + 0.00009, 0.12248, 0.22704,
728 + 0.35657, 0.20767, 2.50405, 0.20319, 0.04024,
729 + 0.00174, 0.12888, 0.23123,
730 + 0.36212, 0.20966, 2.54612, 0.20688, 0.04773,
731 + 0.00923, 0.13440, 0.23464,
732 + 0.36694, 0.21128, 2.57231, 0.21000, 0.05438,
733 + 0.01724, 0.13922, 0.23754 /
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.37122, 0.21262, 2.58620, 0.21261, 0.06026,
736 + 0.02415, 0.14338, 0.23995,
737 + 0.37495, 0.21374, 2.59060, 0.21486, 0.06551,
738 + 0.03029, 0.14706, 0.24189,
739 + 0.37827, 0.21466, 2.58795, 0.21675, 0.07021,
740 + 0.03579, 0.15027, 0.24351,
741 + 0.38129, 0.21540, 2.58009, 0.21833, 0.07442,
742 + 0.04073, 0.15309, 0.24486,
743 + 0.38400, 0.21600, 2.56781, 0.21960, 0.07820,
744 + 0.04515, 0.15556, 0.24588,
745 + 0.38636, 0.21647, 2.55110, 0.22060, 0.08157,
746 + 0.04907, 0.15769, 0.24668,
747 + 0.38851, 0.21683, 2.53267, 0.22142, 0.08465,
748 + 0.05268, 0.15958, 0.24731 /
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.39049, 0.21707, 2.51257, 0.22210, 0.08744,
751 + 0.05603, 0.16125, 0.24778,
752 + 0.39218, 0.21724, 2.49006, 0.22256, 0.08992,
753 + 0.05899, 0.16267, 0.24803,
754 + 0.39376, 0.21737, 2.46764, 0.22294, 0.09221,
755 + 0.06173, 0.16397, 0.24819,
756 + 0.39512, 0.21741, 2.44285, 0.22314, 0.09420,
757 + 0.06415, 0.16500, 0.24815,
758 + 0.39639, 0.21741, 2.41859, 0.22327, 0.09608,
759 + 0.06642, 0.16593, 0.24807 /
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.38705, 0.22791, 1.67848, 0.14817, 0.00001,
762 + 0.00002, 0.07975, 0.17740,
763 + 0.39714, 0.23124, 1.77422, 0.15178, 0.00586,
764 + 0.00000, 0.08615, 0.18044,
765 + 0.40537, 0.23349, 1.83018, 0.15457, 0.01406,
766 + 0.00001, 0.09157, 0.18286,
767 + 0.41189, 0.23492, 1.85716, 0.15680, 0.02090,
768 + 0.00002, 0.09599, 0.18462,
769 + 0.41715, 0.23594, 1.86716, 0.15850, 0.02683,
770 + 0.00123, 0.09964, 0.18582,
771 + 0.42144, 0.23646, 1.86508, 0.15973, 0.03186,
772 + 0.00619, 0.10264, 0.18656,
773 + 0.42496, 0.23665, 1.85443, 0.16060, 0.03618,
774 + 0.01140, 0.10512, 0.18697 /
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.42793, 0.23655, 1.83759, 0.16113, 0.03992,
777 + 0.01584, 0.10718, 0.18712,
778 + 0.43030, 0.23631, 1.81657, 0.16148, 0.04316,
779 + 0.01967, 0.10886, 0.18701,
780 + 0.43222, 0.23596, 1.79276, 0.16159, 0.04604,
781 + 0.02302, 0.11022, 0.18672,
782 + 0.43384, 0.23548, 1.76724, 0.16149, 0.04858,
783 + 0.02601, 0.11135, 0.18631,
784 + 0.43512, 0.23490, 1.74053, 0.16129, 0.05078,
785 + 0.02866, 0.11228, 0.18575,
786 + 0.43608, 0.23422, 1.71261, 0.16099, 0.05269,
787 + 0.03102, 0.11295, 0.18505,
788 + 0.43689, 0.23348, 1.68484, 0.16057, 0.05439,
789 + 0.03311, 0.11349, 0.18431 /
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.43756, 0.23268, 1.65711, 0.16004, 0.05591,
792 + 0.03494, 0.11394, 0.18350,
793 + 0.43793, 0.23184, 1.62902, 0.15943, 0.05720,
794 + 0.03656, 0.11422, 0.18259,
795 + 0.43821, 0.23100, 1.60202, 0.15880, 0.05836,
796 + 0.03806, 0.11442, 0.18168,
797 + 0.43830, 0.23011, 1.57470, 0.15811, 0.05936,
798 + 0.03941, 0.11448, 0.18069,
799 + 0.43833, 0.22924, 1.54849, 0.15741, 0.06027,
800 + 0.04063, 0.11450, 0.17971 /
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.43754, 0.25071, 1.44890, 0.12407, 0.00001,
803 + 0.00006, 0.06695, 0.15239,
804 + 0.44643, 0.25192, 1.48757, 0.12565, 0.00304,
805 + 0.00007, 0.07142, 0.15331,
806 + 0.45299, 0.25224, 1.49868, 0.12675, 0.00944,
807 + 0.00005, 0.07501, 0.15362,
808 + 0.45766, 0.25202, 1.49133, 0.12745, 0.01469,
809 + 0.00005, 0.07775, 0.15348,
810 + 0.46120, 0.25124, 1.47410, 0.12771, 0.01908,
811 + 0.00094, 0.07989, 0.15309,
812 + 0.46372, 0.25007, 1.45070, 0.12757, 0.02273,
813 + 0.00452, 0.08151, 0.15255,
814 + 0.46532, 0.24883, 1.42331, 0.12732, 0.02577,
815 + 0.00814, 0.08274, 0.15166 /
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.46644, 0.24736, 1.39353, 0.12684, 0.02841,
818 + 0.01115, 0.08368, 0.15060,
819 + 0.46700, 0.24584, 1.36263, 0.12626, 0.03062,
820 + 0.01379, 0.08435, 0.14943,
821 + 0.46725, 0.24422, 1.33144, 0.12553, 0.03252,
822 + 0.01606, 0.08483, 0.14823,
823 + 0.46724, 0.24251, 1.30051, 0.12473, 0.03417,
824 + 0.01802, 0.08513, 0.14703,
825 + 0.46685, 0.24086, 1.26997, 0.12397, 0.03554,
826 + 0.01976, 0.08529, 0.14573,
827 + 0.46631, 0.23911, 1.23963, 0.12294, 0.03670,
828 + 0.02121, 0.08532, 0.14449,
829 + 0.46558, 0.23742, 1.21047, 0.12196, 0.03773,
830 + 0.02250, 0.08526, 0.14315 /
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.46464, 0.23581, 1.18233, 0.12105, 0.03865,
833 + 0.02364, 0.08514, 0.14168,
834 + 0.46358, 0.23409, 1.15475, 0.12003, 0.03938,
835 + 0.02464, 0.08489, 0.14035,
836 + 0.46252, 0.23242, 1.12862, 0.11902, 0.04002,
837 + 0.02556, 0.08461, 0.13907,
838 + 0.46130, 0.23070, 1.10297, 0.11796, 0.04056,
839 + 0.02632, 0.08428, 0.13771,
840 + 0.46006, 0.22903, 1.07864, 0.11692, 0.04104,
841 + 0.02702, 0.08396, 0.13640 /
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.47903, 0.26552, 1.27311, 0.10469, 0.00001,
844 + 0.00008, 0.05621, 0.13136,
845 + 0.48576, 0.26441, 1.27403, 0.10503, 0.00117,
846 + 0.00009, 0.05940, 0.13069,
847 + 0.49006, 0.26265, 1.25719, 0.10506, 0.00625,
848 + 0.00007, 0.06171, 0.12988,
849 + 0.49229, 0.26058, 1.22963, 0.10478, 0.01041,
850 + 0.00008, 0.06340, 0.12858,
851 + 0.49351, 0.25812, 1.19756, 0.10420, 0.01376,
852 + 0.00068, 0.06463, 0.12725,
853 + 0.49369, 0.25553, 1.16335, 0.10347, 0.01649,
854 + 0.00333, 0.06545, 0.12575,
855 + 0.49327, 0.25276, 1.12824, 0.10250, 0.01876,
856 + 0.00596, 0.06597, 0.12423 /
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.49233, 0.24994, 1.09321, 0.10152, 0.02065,
859 + 0.00814, 0.06626, 0.12264,
860 + 0.49102, 0.24717, 1.05890, 0.10040, 0.02224,
861 + 0.01001, 0.06640, 0.12100,
862 + 0.48934, 0.24448, 1.02570, 0.09927, 0.02355,
863 + 0.01159, 0.06639, 0.11938,
864 + 0.48742, 0.24182, 0.99387, 0.09819, 0.02463,
865 + 0.01294, 0.06626, 0.11780,
866 + 0.48543, 0.23913, 0.96340, 0.09702, 0.02555,
867 + 0.01414, 0.06601, 0.11627,
868 + 0.48317, 0.23655, 0.93397, 0.09585, 0.02637,
869 + 0.01512, 0.06571, 0.11459,
870 + 0.48087, 0.23404, 0.90616, 0.09472, 0.02703,
871 + 0.01598, 0.06537, 0.11298 /
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.47851, 0.23154, 0.87977, 0.09361, 0.02755,
874 + 0.01672, 0.06497, 0.11147,
875 + 0.47604, 0.22911, 0.85445, 0.09246, 0.02798,
876 + 0.01734, 0.06453, 0.10994,
877 + 0.47360, 0.22678, 0.83069, 0.09133, 0.02834,
878 + 0.01791, 0.06409, 0.10846,
879 + 0.47107, 0.22445, 0.80782, 0.09019, 0.02866,
880 + 0.01836, 0.06359, 0.10706,
881 + 0.46857, 0.22222, 0.78629, 0.08909, 0.02895,
882 + 0.01878, 0.06311, 0.10568 /
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.51941, 0.27470, 1.09500, 0.08511, 0.00001,
885 + 0.00011, 0.04574, 0.10917,
886 + 0.52229, 0.27080, 1.06534, 0.08460, 0.00001,
887 + 0.00007, 0.04781, 0.10749,
888 + 0.52278, 0.26660, 1.02751, 0.08390, 0.00398,
889 + 0.00010, 0.04926, 0.10553,
890 + 0.52192, 0.26203, 0.98597, 0.08276, 0.00715,
891 + 0.00007, 0.05009, 0.10376,
892 + 0.51991, 0.25765, 0.94460, 0.08168, 0.00962,
893 + 0.00055, 0.05061, 0.10185,
894 + 0.51720, 0.25323, 0.90446, 0.08041, 0.01166,
895 + 0.00240, 0.05084, 0.09988,
896 + 0.51380, 0.24902, 0.86598, 0.07916, 0.01328,
897 + 0.00428, 0.05083, 0.09795 /
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.51016, 0.24493, 0.82946, 0.07788, 0.01459,
900 + 0.00575, 0.05071, 0.09594,
901 + 0.50633, 0.24089, 0.79505, 0.07663, 0.01567,
902 + 0.00695, 0.05045, 0.09399,
903 + 0.50236, 0.23699, 0.76276, 0.07532, 0.01653,
904 + 0.00800, 0.05007, 0.09221,
905 + 0.49832, 0.23327, 0.73257, 0.07400, 0.01720,
906 + 0.00890, 0.04965, 0.09050,
907 + 0.49415, 0.22975, 0.70432, 0.07283, 0.01775,
908 + 0.00962, 0.04921, 0.08875,
909 + 0.48999, 0.22627, 0.67772, 0.07158, 0.01824,
910 + 0.01026, 0.04873, 0.08701,
911 + 0.48589, 0.22292, 0.65298, 0.07034, 0.01865,
912 + 0.01080, 0.04823, 0.08540 /
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.48187, 0.21967, 0.62985, 0.06909, 0.01897,
915 + 0.01125, 0.04771, 0.08392,
916 + 0.47769, 0.21659, 0.60792, 0.06800, 0.01920,
917 + 0.01164, 0.04718, 0.08239,
918 + 0.47363, 0.21364, 0.58752, 0.06695, 0.01938,
919 + 0.01199, 0.04666, 0.08090,
920 + 0.46965, 0.21075, 0.56824, 0.06582, 0.01948,
921 + 0.01224, 0.04612, 0.07956,
922 + 0.46577, 0.20799, 0.55024, 0.06475, 0.01957,
923 + 0.01247, 0.04559, 0.07824 /
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.54929, 0.27613, 0.94589, 0.06900, 0.00001,
926 + 0.00016, 0.03716, 0.09060,
927 + 0.54748, 0.26969, 0.89751, 0.06820, 0.00001,
928 + 0.00017, 0.03860, 0.08809,
929 + 0.54403, 0.26305, 0.84810, 0.06691, 0.00246,
930 + 0.00018, 0.03938, 0.08593,
931 + 0.53927, 0.25671, 0.80009, 0.06575, 0.00492,
932 + 0.00012, 0.03977, 0.08356,
933 + 0.53384, 0.25076, 0.75528, 0.06440, 0.00689,
934 + 0.00045, 0.03985, 0.08129,
935 + 0.52793, 0.24495, 0.71393, 0.06302, 0.00836,
936 + 0.00180, 0.03967, 0.07924,
937 + 0.52182, 0.23942, 0.67574, 0.06163, 0.00957,
938 + 0.00312, 0.03938, 0.07718 /
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.51565, 0.23413, 0.64056, 0.06017, 0.01051,
941 + 0.00411, 0.03904, 0.07522,
942 + 0.50940, 0.22918, 0.60823, 0.05883, 0.01121,
943 + 0.00497, 0.03860, 0.07330,
944 + 0.50321, 0.22445, 0.57857, 0.05756, 0.01177,
945 + 0.00568, 0.03815, 0.07144,
946 + 0.49713, 0.21995, 0.55131, 0.05629, 0.01222,
947 + 0.00626, 0.03770, 0.06967,
948 + 0.49111, 0.21573, 0.52613, 0.05506, 0.01264,
949 + 0.00680, 0.03715, 0.06798,
950 + 0.48518, 0.21162, 0.50286, 0.05391, 0.01288,
951 + 0.00719, 0.03660, 0.06642,
952 + 0.47939, 0.20772, 0.48150, 0.05280, 0.01308,
953 + 0.00755, 0.03604, 0.06494 /
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.47371, 0.20401, 0.46179, 0.05170, 0.01324,
956 + 0.00789, 0.03546, 0.06357,
957 + 0.46819, 0.20040, 0.44326, 0.05065, 0.01339,
958 + 0.00808, 0.03491, 0.06217,
959 + 0.46290, 0.19698, 0.42615, 0.04964, 0.01350,
960 + 0.00824, 0.03439, 0.06085,
961 + 0.45765, 0.19369, 0.41013, 0.04859, 0.01356,
962 + 0.00841, 0.03383, 0.05965,
963 + 0.45260, 0.19056, 0.39528, 0.04762, 0.01359,
964 + 0.00855, 0.03331, 0.05850 /
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.56922, 0.27224, 0.81692, 0.05614, 0.00001,
967 + 0.00003, 0.03009, 0.07459,
968 + 0.56291, 0.26296, 0.75773, 0.05482, 0.00001,
969 + 0.00004, 0.03100, 0.07212,
970 + 0.55504, 0.25447, 0.70292, 0.05349, 0.00138,
971 + 0.00001, 0.03139, 0.06967,
972 + 0.54651, 0.24646, 0.65280, 0.05194, 0.00340,
973 + 0.00000, 0.03150, 0.06729,
974 + 0.53766, 0.23907, 0.60795, 0.05060, 0.00496,
975 + 0.00028, 0.03132, 0.06499,
976 + 0.52887, 0.23214, 0.56790, 0.04913, 0.00612,
977 + 0.00125, 0.03108, 0.06281,
978 + 0.52020, 0.22554, 0.53185, 0.04775, 0.00695,
979 + 0.00220, 0.03070, 0.06081 /
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.51150, 0.21953, 0.49937, 0.04643, 0.00763,
982 + 0.00306, 0.03033, 0.05882,
983 + 0.50307, 0.21382, 0.47006, 0.04512, 0.00819,
984 + 0.00366, 0.02980, 0.05707,
985 + 0.49484, 0.20850, 0.44355, 0.04391, 0.00858,
986 + 0.00413, 0.02922, 0.05544,
987 + 0.48689, 0.20350, 0.41957, 0.04278, 0.00888,
988 + 0.00455, 0.02865, 0.05385,
989 + 0.47941, 0.19857, 0.39788, 0.04159, 0.00915,
990 + 0.00489, 0.02812, 0.05240,
991 + 0.47197, 0.19404, 0.37794, 0.04048, 0.00936,
992 + 0.00517, 0.02761, 0.05095,
993 + 0.46479, 0.18978, 0.35974, 0.03944, 0.00949,
994 + 0.00539, 0.02711, 0.04959 /
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.45787, 0.18575, 0.34305, 0.03849, 0.00956,
997 + 0.00556, 0.02664, 0.04831,
998 + 0.45103, 0.18202, 0.32767, 0.03762, 0.00967,
999 + 0.00568, 0.02610, 0.04700,
1000 + 0.44449, 0.17850, 0.31357, 0.03679, 0.00974,
1001 + 0.00578, 0.02559, 0.04575,
1002 + 0.43819, 0.17500, 0.30049, 0.03594, 0.00971,
1003 + 0.00589, 0.02510, 0.04472,
1004 + 0.43217, 0.17168, 0.28842, 0.03514, 0.00969,
1005 + 0.00598, 0.02464, 0.04371 /
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.58081, 0.26374, 0.70391, 0.04529, 0.00001,
1008 + 0.00007, 0.02417, 0.06112,
1009 + 0.56913, 0.25252, 0.63960, 0.04406, 0.00001,
1010 + 0.00001, 0.02475, 0.05849,
1011 + 0.55698, 0.24242, 0.58320, 0.04276, 0.00076,
1012 + 0.00005, 0.02497, 0.05579,
1013 + 0.54495, 0.23289, 0.53394, 0.04114, 0.00236,
1014 + 0.00006, 0.02485, 0.05373,
1015 + 0.53302, 0.22452, 0.49127, 0.03981, 0.00351,
1016 + 0.00033, 0.02459, 0.05150,
1017 + 0.52143, 0.21671, 0.45407, 0.03851, 0.00438,
1018 + 0.00095, 0.02425, 0.04946,
1019 + 0.51033, 0.20946, 0.42092, 0.03718, 0.00508,
1020 + 0.00165, 0.02372, 0.04765 /
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.49960, 0.20275, 0.39167, 0.03591, 0.00552,
1023 + 0.00218, 0.02324, 0.04603,
1024 + 0.48912, 0.19669, 0.36585, 0.03476, 0.00591,
1025 + 0.00261, 0.02271, 0.04443,
1026 + 0.47913, 0.19105, 0.34281, 0.03370, 0.00625,
1027 + 0.00296, 0.02222, 0.04280,
1028 + 0.46966, 0.18573, 0.32214, 0.03268, 0.00648,
1029 + 0.00324, 0.02177, 0.04128,
1030 + 0.46057, 0.18075, 0.30354, 0.03164, 0.00659,
1031 + 0.00344, 0.02125, 0.04012,
1032 + 0.45181, 0.17611, 0.28666, 0.03073, 0.00670,
1033 + 0.00362, 0.02078, 0.03879,
1034 + 0.44352, 0.17168, 0.27142, 0.02985, 0.00678,
1035 + 0.00376, 0.02032, 0.03760 /
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.43562, 0.16741, 0.25758, 0.02901, 0.00682,
1038 + 0.00387, 0.01987, 0.03658,
1039 + 0.42792, 0.16347, 0.24484, 0.02826, 0.00685,
1040 + 0.00395, 0.01939, 0.03551,
1041 + 0.42060, 0.15978, 0.23322, 0.02757, 0.00688,
1042 + 0.00401, 0.01893, 0.03450,
1043 + 0.41351, 0.15627, 0.22260, 0.02685, 0.00685,
1044 + 0.00402, 0.01853, 0.03357,
1045 + 0.40677, 0.15295, 0.21285, 0.02617, 0.00682,
1046 + 0.00405, 0.01813, 0.03269 /
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.58431, 0.25189, 0.60417, 0.03646, 0.00001,
1049 + 0.00010, 0.01929, 0.04964,
1050 + 0.56777, 0.23891, 0.53850, 0.03517, 0.00001,
1051 + 0.00004, 0.01974, 0.04718,
1052 + 0.55177, 0.22725, 0.48351, 0.03374, 0.00024,
1053 + 0.00002, 0.01971, 0.04494,
1054 + 0.53576, 0.21744, 0.43649, 0.03247, 0.00147,
1055 + 0.00009, 0.01945, 0.04281,
1056 + 0.52113, 0.20808, 0.39690, 0.03117, 0.00243,
1057 + 0.00023, 0.01915, 0.04085,
1058 + 0.50719, 0.19965, 0.36291, 0.02987, 0.00318,
1059 + 0.00071, 0.01874, 0.03900,
1060 + 0.49382, 0.19211, 0.33354, 0.02869, 0.00368,
1061 + 0.00125, 0.01833, 0.03734 /
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.48110, 0.18524, 0.30784, 0.02771, 0.00402,
1064 + 0.00162, 0.01786, 0.03572,
1065 + 0.46912, 0.17885, 0.28540, 0.02672, 0.00430,
1066 + 0.00183, 0.01744, 0.03423,
1067 + 0.45786, 0.17289, 0.26566, 0.02576, 0.00451,
1068 + 0.00208, 0.01698, 0.03293,
1069 + 0.44717, 0.16742, 0.24811, 0.02487, 0.00465,
1070 + 0.00237, 0.01647, 0.03175,
1071 + 0.43683, 0.16250, 0.23236, 0.02415, 0.00479,
1072 + 0.00256, 0.01604, 0.03044,
1073 + 0.42726, 0.15763, 0.21825, 0.02322, 0.00486,
1074 + 0.00263, 0.01554, 0.02956,
1075 + 0.41814, 0.15315, 0.20559, 0.02242, 0.00489,
1076 + 0.00265, 0.01509, 0.02866 /
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.40940, 0.14904, 0.19418, 0.02179, 0.00493,
1079 + 0.00264, 0.01470, 0.02766,
1080 + 0.40101, 0.14511, 0.18386, 0.02116, 0.00487,
1081 + 0.00277, 0.01433, 0.02685,
1082 + 0.39307, 0.14143, 0.17451, 0.02056, 0.00480,
1083 + 0.00289, 0.01397, 0.02608,
1084 + 0.38535, 0.13802, 0.16599, 0.02004, 0.00481,
1085 + 0.00287, 0.01363, 0.02522,
1086 + 0.37806, 0.13481, 0.15816, 0.01953, 0.00481,
1087 + 0.00285, 0.01332, 0.02443 /
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.58064, 0.23760, 0.51600, 0.02917, 0.00001,
1090 + 0.00012, 0.01540, 0.03991,
1091 + 0.55948, 0.22329, 0.45166, 0.02789, 0.00001,
1092 + 0.00001, 0.01556, 0.03781,
1093 + 0.53981, 0.21063, 0.39929, 0.02646, 0.00001,
1094 + 0.00010, 0.01557, 0.03574,
1095 + 0.52120, 0.19956, 0.35603, 0.02526, 0.00117,
1096 + 0.00013, 0.01533, 0.03362,
1097 + 0.50380, 0.19000, 0.32010, 0.02403, 0.00191,
1098 + 0.00011, 0.01494, 0.03195,
1099 + 0.48732, 0.18173, 0.28972, 0.02317, 0.00242,
1100 + 0.00056, 0.01446, 0.03025,
1101 + 0.47222, 0.17395, 0.26391, 0.02210, 0.00280,
1102 + 0.00095, 0.01403, 0.02894 /
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.45794, 0.16705, 0.24174, 0.02115, 0.00297,
1105 + 0.00115, 0.01367, 0.02767,
1106 + 0.44478, 0.16052, 0.22254, 0.02031, 0.00316,
1107 + 0.00140, 0.01328, 0.02639,
1108 + 0.43239, 0.15456, 0.20564, 0.01949, 0.00330,
1109 + 0.00158, 0.01286, 0.02531,
1110 + 0.42063, 0.14922, 0.19076, 0.01873, 0.00336,
1111 + 0.00168, 0.01246, 0.02434,
1112 + 0.40962, 0.14417, 0.17781, 0.01815, 0.00345,
1113 + 0.00175, 0.01207, 0.02331,
1114 + 0.39917, 0.13957, 0.16626, 0.01754, 0.00351,
1115 + 0.00184, 0.01174, 0.02227,
1116 + 0.38942, 0.13524, 0.15594, 0.01690, 0.00351,
1117 + 0.00190, 0.01138, 0.02147 /
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.38027, 0.13112, 0.14666, 0.01620, 0.00344,
1120 + 0.00192, 0.01100, 0.02094,
1121 + 0.37165, 0.12728, 0.13833, 0.01561, 0.00348,
1122 + 0.00197, 0.01069, 0.02014,
1123 + 0.36348, 0.12371, 0.13080, 0.01507, 0.00352,
1124 + 0.00201, 0.01041, 0.01937,
1125 + 0.35533, 0.12043, 0.12395, 0.01469, 0.00351,
1126 + 0.00199, 0.01009, 0.01877,
1127 + 0.34770, 0.11731, 0.11770, 0.01430, 0.00347,
1128 + 0.00197, 0.00980, 0.01821 /
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.57111, 0.22103, 0.43807, 0.02287, 0.00001,
1131 + 0.00005, 0.01226, 0.03207,
1132 + 0.54551, 0.20592, 0.37693, 0.02184, 0.00001,
1133 + 0.00001, 0.01235, 0.02969,
1134 + 0.52179, 0.19327, 0.32854, 0.02080, 0.00001,
1135 + 0.00014, 0.01224, 0.02785,
1136 + 0.50061, 0.18188, 0.28928, 0.01959, 0.00072,
1137 + 0.00019, 0.01185, 0.02645,
1138 + 0.48087, 0.17234, 0.25737, 0.01878, 0.00131,
1139 + 0.00016, 0.01148, 0.02480,
1140 + 0.46300, 0.16370, 0.23068, 0.01782, 0.00172,
1141 + 0.00044, 0.01112, 0.02346,
1142 + 0.44632, 0.15611, 0.20830, 0.01701, 0.00201,
1143 + 0.00078, 0.01077, 0.02219 /
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.43115, 0.14904, 0.18953, 0.01621, 0.00223,
1146 + 0.00095, 0.01040, 0.02109,
1147 + 0.41705, 0.14265, 0.17326, 0.01547, 0.00233,
1148 + 0.00105, 0.00997, 0.02016,
1149 + 0.40390, 0.13682, 0.15918, 0.01477, 0.00244,
1150 + 0.00114, 0.00966, 0.01916,
1151 + 0.39162, 0.13151, 0.14698, 0.01413, 0.00255,
1152 + 0.00123, 0.00942, 0.01820,
1153 + 0.38001, 0.12682, 0.13626, 0.01354, 0.00255,
1154 + 0.00128, 0.00905, 0.01749,
1155 + 0.36919, 0.12235, 0.12671, 0.01302, 0.00261,
1156 + 0.00129, 0.00877, 0.01669,
1157 + 0.35907, 0.11817, 0.11830, 0.01260, 0.00261,
1158 + 0.00132, 0.00846, 0.01598 /
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.34958, 0.11424, 0.11086, 0.01225, 0.00257,
1161 + 0.00137, 0.00812, 0.01536,
1162 + 0.34051, 0.11069, 0.10413, 0.01173, 0.00253,
1163 + 0.00141, 0.00786, 0.01490,
1164 + 0.33203, 0.10737, 0.09807, 0.01122, 0.00249,
1165 + 0.00144, 0.00761, 0.01448,
1166 + 0.32413, 0.10416, 0.09259, 0.01071, 0.00247,
1167 + 0.00143, 0.00741, 0.01400,
1168 + 0.31662, 0.10116, 0.08763, 0.01029, 0.00245,
1169 + 0.00143, 0.00721, 0.01354 /
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.55574, 0.20330, 0.36960, 0.01767, 0.00001,
1172 + 0.00010, 0.00947, 0.02555,
1173 + 0.52600, 0.18794, 0.31264, 0.01686, 0.00001,
1174 + 0.00010, 0.00964, 0.02346,
1175 + 0.49962, 0.17484, 0.26862, 0.01583, 0.00001,
1176 + 0.00006, 0.00947, 0.02209,
1177 + 0.47570, 0.16396, 0.23397, 0.01518, 0.00055,
1178 + 0.00007, 0.00915, 0.02040,
1179 + 0.45458, 0.15419, 0.20585, 0.01416, 0.00100,
1180 + 0.00003, 0.00886, 0.01924,
1181 + 0.43545, 0.14564, 0.18290, 0.01335, 0.00127,
1182 + 0.00034, 0.00851, 0.01822,
1183 + 0.41791, 0.13809, 0.16403, 0.01272, 0.00148,
1184 + 0.00056, 0.00826, 0.01707 /
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.40173, 0.13142, 0.14795, 0.01209, 0.00167,
1187 + 0.00071, 0.00790, 0.01612,
1188 + 0.38688, 0.12536, 0.13442, 0.01150, 0.00176,
1189 + 0.00076, 0.00763, 0.01529,
1190 + 0.37319, 0.11983, 0.12279, 0.01101, 0.00181,
1191 + 0.00081, 0.00734, 0.01447,
1192 + 0.36054, 0.11480, 0.11264, 0.01057, 0.00185,
1193 + 0.00088, 0.00704, 0.01371,
1194 + 0.34888, 0.11015, 0.10386, 0.01003, 0.00190,
1195 + 0.00088, 0.00679, 0.01306,
1196 + 0.33783, 0.10589, 0.09622, 0.00943, 0.00185,
1197 + 0.00095, 0.00649, 0.01274,
1198 + 0.32754, 0.10199, 0.08949, 0.00902, 0.00182,
1199 + 0.00099, 0.00624, 0.01231 /
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.31793, 0.09840, 0.08351, 0.00879, 0.00183,
1202 + 0.00099, 0.00604, 0.01173,
1203 + 0.30904, 0.09502, 0.07817, 0.00833, 0.00184,
1204 + 0.00102, 0.00582, 0.01127,
1205 + 0.30072, 0.09189, 0.07339, 0.00790, 0.00185,
1206 + 0.00104, 0.00562, 0.01085,
1207 + 0.29260, 0.08896, 0.06908, 0.00775, 0.00183,
1208 + 0.00102, 0.00547, 0.01038,
1209 + 0.28499, 0.08622, 0.06517, 0.00755, 0.00180,
1210 + 0.00100, 0.00530, 0.00997 /
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.53468, 0.18644, 0.30992, 0.01431, 0.00001,
1213 + 0.00010, 0.00710, 0.01988,
1214 + 0.50199, 0.17050, 0.25795, 0.01337, 0.00001,
1215 + 0.00015, 0.00717, 0.01845,
1216 + 0.47310, 0.15765, 0.21878, 0.01268, 0.00001,
1217 + 0.00009, 0.00712, 0.01677,
1218 + 0.44805, 0.14641, 0.18824, 0.01173, 0.00022,
1219 + 0.00005, 0.00692, 0.01571,
1220 + 0.42567, 0.13694, 0.16411, 0.01092, 0.00051,
1221 + 0.00007, 0.00662, 0.01483,
1222 + 0.40534, 0.12883, 0.14463, 0.01043, 0.00087,
1223 + 0.00009, 0.00631, 0.01374,
1224 + 0.38730, 0.12153, 0.12866, 0.00971, 0.00099,
1225 + 0.00030, 0.00608, 0.01298 /
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.37099, 0.11516, 0.11540, 0.00900, 0.00108,
1228 + 0.00040, 0.00584, 0.01221,
1229 + 0.35594, 0.10942, 0.10413, 0.00859, 0.00116,
1230 + 0.00047, 0.00557, 0.01146,
1231 + 0.34191, 0.10425, 0.09454, 0.00818, 0.00124,
1232 + 0.00052, 0.00533, 0.01093,
1233 + 0.32898, 0.09954, 0.08634, 0.00773, 0.00127,
1234 + 0.00057, 0.00511, 0.01048,
1235 + 0.31740, 0.09512, 0.07921, 0.00727, 0.00128,
1236 + 0.00062, 0.00497, 0.00995,
1237 + 0.30651, 0.09117, 0.07308, 0.00701, 0.00134,
1238 + 0.00064, 0.00477, 0.00937,
1239 + 0.29641, 0.08754, 0.06770, 0.00674, 0.00135,
1240 + 0.00067, 0.00459, 0.00889 /
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.28701, 0.08417, 0.06294, 0.00644, 0.00131,
1243 + 0.00070, 0.00440, 0.00854,
1244 + 0.27811, 0.08105, 0.05868, 0.00620, 0.00128,
1245 + 0.00072, 0.00424, 0.00821,
1246 + 0.26980, 0.07818, 0.05488, 0.00598, 0.00126,
1247 + 0.00072, 0.00408, 0.00790,
1248 + 0.26191, 0.07551, 0.05148, 0.00575, 0.00121,
1249 + 0.00069, 0.00392, 0.00755,
1250 + 0.25453, 0.07303, 0.04844, 0.00555, 0.00119,
1251 + 0.00067, 0.00377, 0.00724 /
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.51001, 0.16744, 0.25712, 0.01042, 0.00001,
1254 + 0.00016, 0.00576, 0.01548,
1255 + 0.47435, 0.15211, 0.21080, 0.00987, 0.00001,
1256 + 0.00012, 0.00572, 0.01411,
1257 + 0.44362, 0.13980, 0.17632, 0.00937, 0.00001,
1258 + 0.00010, 0.00556, 0.01290,
1259 + 0.41735, 0.12893, 0.15023, 0.00854, 0.00028,
1260 + 0.00011, 0.00529, 0.01207,
1261 + 0.39401, 0.12009, 0.12987, 0.00802, 0.00059,
1262 + 0.00013, 0.00512, 0.01106,
1263 + 0.37373, 0.11232, 0.11352, 0.00745, 0.00072,
1264 + 0.00019, 0.00490, 0.01025,
1265 + 0.35538, 0.10550, 0.10022, 0.00681, 0.00085,
1266 + 0.00028, 0.00468, 0.00986 /
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.33875, 0.09943, 0.08923, 0.00646, 0.00085,
1269 + 0.00037, 0.00446, 0.00934,
1270 + 0.32350, 0.09408, 0.07999, 0.00612, 0.00089,
1271 + 0.00044, 0.00423, 0.00880,
1272 + 0.30978, 0.08932, 0.07224, 0.00579, 0.00091,
1273 + 0.00048, 0.00402, 0.00822,
1274 + 0.29728, 0.08500, 0.06567, 0.00555, 0.00092,
1275 + 0.00046, 0.00385, 0.00762,
1276 + 0.28535, 0.08117, 0.05998, 0.00546, 0.00095,
1277 + 0.00041, 0.00361, 0.00719,
1278 + 0.27482, 0.07760, 0.05506, 0.00514, 0.00096,
1279 + 0.00045, 0.00347, 0.00673,
1280 + 0.26499, 0.07430, 0.05080, 0.00488, 0.00097,
1281 + 0.00049, 0.00334, 0.00640 /
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.25571, 0.07123, 0.04710, 0.00471, 0.00095,
1284 + 0.00051, 0.00322, 0.00621,
1285 + 0.24708, 0.06847, 0.04375, 0.00459, 0.00094,
1286 + 0.00051, 0.00311, 0.00585,
1287 + 0.23908, 0.06592, 0.04076, 0.00446, 0.00093,
1288 + 0.00049, 0.00298, 0.00553,
1289 + 0.23161, 0.06342, 0.03814, 0.00413, 0.00087,
1290 + 0.00048, 0.00282, 0.00543,
1291 + 0.22462, 0.06114, 0.03579, 0.00388, 0.00084,
1292 + 0.00047, 0.00268, 0.00531 /
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.48143, 0.15030, 0.21210, 0.00845, 0.00001,
1295 + 0.00005, 0.00419, 0.01161,
1296 + 0.44392, 0.13520, 0.17131, 0.00785, 0.00001,
1297 + 0.00002, 0.00414, 0.01082,
1298 + 0.41269, 0.12290, 0.14174, 0.00699, 0.00001,
1299 + 0.00001, 0.00408, 0.00990,
1300 + 0.38528, 0.11304, 0.11944, 0.00662, 0.00003,
1301 + 0.00004, 0.00384, 0.00915,
1302 + 0.36162, 0.10452, 0.10216, 0.00635, 0.00031,
1303 + 0.00001, 0.00369, 0.00831,
1304 + 0.34133, 0.09730, 0.08863, 0.00565, 0.00041,
1305 + 0.00011, 0.00355, 0.00786,
1306 + 0.32322, 0.09092, 0.07769, 0.00515, 0.00050,
1307 + 0.00019, 0.00340, 0.00737 /
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.30648, 0.08540, 0.06870, 0.00498, 0.00053,
1310 + 0.00024, 0.00315, 0.00691,
1311 + 0.29150, 0.08053, 0.06124, 0.00479, 0.00056,
1312 + 0.00024, 0.00301, 0.00638,
1313 + 0.27806, 0.07615, 0.05501, 0.00453, 0.00062,
1314 + 0.00027, 0.00287, 0.00591,
1315 + 0.26593, 0.07222, 0.04974, 0.00424, 0.00066,
1316 + 0.00032, 0.00268, 0.00559,
1317 + 0.25499, 0.06864, 0.04523, 0.00391, 0.00064,
1318 + 0.00031, 0.00248, 0.00532,
1319 + 0.24438, 0.06539, 0.04137, 0.00384, 0.00061,
1320 + 0.00032, 0.00239, 0.00507,
1321 + 0.23485, 0.06243, 0.03801, 0.00368, 0.00059,
1322 + 0.00029, 0.00230, 0.00476 /
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.22631, 0.05973, 0.03508, 0.00341, 0.00058,
1325 + 0.00023, 0.00221, 0.00436,
1326 + 0.21824, 0.05722, 0.03249, 0.00321, 0.00061,
1327 + 0.00028, 0.00213, 0.00416,
1328 + 0.21071, 0.05492, 0.03021, 0.00303, 0.00063,
1329 + 0.00034, 0.00205, 0.00401,
1330 + 0.20347, 0.05276, 0.02819, 0.00296, 0.00060,
1331 + 0.00032, 0.00198, 0.00388,
1332 + 0.19675, 0.05076, 0.02639, 0.00287, 0.00057,
1333 + 0.00031, 0.00190, 0.00375 /
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.45008, 0.13260, 0.17320, 0.00618, 0.00001,
1336 + 0.00007, 0.00314, 0.00891,
1337 + 0.41192, 0.11829, 0.13788, 0.00522, 0.00001,
1338 + 0.00005, 0.00315, 0.00831,
1339 + 0.37894, 0.10726, 0.11273, 0.00537, 0.00001,
1340 + 0.00005, 0.00320, 0.00730,
1341 + 0.35199, 0.09767, 0.09393, 0.00460, 0.00014,
1342 + 0.00004, 0.00304, 0.00681,
1343 + 0.32854, 0.08982, 0.07961, 0.00433, 0.00029,
1344 + 0.00004, 0.00278, 0.00623,
1345 + 0.30807, 0.08325, 0.06846, 0.00407, 0.00034,
1346 + 0.00007, 0.00254, 0.00584,
1347 + 0.29033, 0.07749, 0.05963, 0.00382, 0.00037,
1348 + 0.00014, 0.00250, 0.00532 /
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.27430, 0.07241, 0.05237, 0.00369, 0.00041,
1351 + 0.00016, 0.00241, 0.00491,
1352 + 0.25988, 0.06804, 0.04646, 0.00350, 0.00039,
1353 + 0.00018, 0.00221, 0.00458,
1354 + 0.24713, 0.06408, 0.04151, 0.00322, 0.00040,
1355 + 0.00018, 0.00206, 0.00430,
1356 + 0.23563, 0.06047, 0.03732, 0.00299, 0.00043,
1357 + 0.00019, 0.00199, 0.00405,
1358 + 0.22491, 0.05733, 0.03382, 0.00290, 0.00048,
1359 + 0.00025, 0.00196, 0.00374,
1360 + 0.21496, 0.05444, 0.03081, 0.00277, 0.00048,
1361 + 0.00026, 0.00181, 0.00360,
1362 + 0.20592, 0.05186, 0.02820, 0.00264, 0.00048,
1363 + 0.00025, 0.00170, 0.00342 /
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.19766, 0.04953, 0.02594, 0.00254, 0.00049,
1366 + 0.00022, 0.00165, 0.00319,
1367 + 0.19013, 0.04732, 0.02397, 0.00233, 0.00042,
1368 + 0.00020, 0.00151, 0.00300,
1369 + 0.18318, 0.04530, 0.02223, 0.00215, 0.00036,
1370 + 0.00018, 0.00139, 0.00284,
1371 + 0.17651, 0.04341, 0.02069, 0.00210, 0.00037,
1372 + 0.00020, 0.00137, 0.00275,
1373 + 0.17032, 0.04169, 0.01932, 0.00207, 0.00037,
1374 + 0.00022, 0.00133, 0.00264 /
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.41712, 0.11629, 0.14022, 0.00432, 0.00001,
1377 + 0.00002, 0.00236, 0.00653,
1378 + 0.37810, 0.10295, 0.11010, 0.00412, 0.00001,
1379 + 0.00000, 0.00225, 0.00606,
1380 + 0.34576, 0.09234, 0.08892, 0.00394, 0.00001,
1381 + 0.00000, 0.00216, 0.00548,
1382 + 0.31875, 0.08382, 0.07332, 0.00362, 0.00001,
1383 + 0.00002, 0.00208, 0.00503,
1384 + 0.29611, 0.07673, 0.06161, 0.00316, 0.00009,
1385 + 0.00005, 0.00201, 0.00465,
1386 + 0.27629, 0.07075, 0.05263, 0.00310, 0.00014,
1387 + 0.00007, 0.00188, 0.00419,
1388 + 0.25887, 0.06561, 0.04548, 0.00296, 0.00013,
1389 + 0.00010, 0.00171, 0.00383 /
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.24353, 0.06107, 0.03971, 0.00279, 0.00020,
1392 + 0.00012, 0.00158, 0.00359,
1393 + 0.23012, 0.05707, 0.03505, 0.00250, 0.00027,
1394 + 0.00013, 0.00148, 0.00337,
1395 + 0.21796, 0.05359, 0.03115, 0.00233, 0.00027,
1396 + 0.00013, 0.00142, 0.00309,
1397 + 0.20690, 0.05050, 0.02789, 0.00223, 0.00026,
1398 + 0.00011, 0.00136, 0.00281,
1399 + 0.19711, 0.04763, 0.02518, 0.00195, 0.00023,
1400 + 0.00008, 0.00122, 0.00264,
1401 + 0.18796, 0.04507, 0.02282, 0.00194, 0.00030,
1402 + 0.00011, 0.00121, 0.00249,
1403 + 0.17954, 0.04276, 0.02081, 0.00188, 0.00031,
1404 + 0.00013, 0.00117, 0.00236 /
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.17178, 0.04070, 0.01909, 0.00176, 0.00025,
1407 + 0.00013, 0.00105, 0.00225,
1408 + 0.16454, 0.03886, 0.01758, 0.00177, 0.00024,
1409 + 0.00013, 0.00101, 0.00211,
1410 + 0.15792, 0.03715, 0.01626, 0.00178, 0.00024,
1411 + 0.00013, 0.00098, 0.00198,
1412 + 0.15195, 0.03550, 0.01510, 0.00169, 0.00022,
1413 + 0.00012, 0.00092, 0.00185,
1414 + 0.14644, 0.03401, 0.01406, 0.00160, 0.00021,
1415 + 0.00010, 0.00088, 0.00177 /
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.38206, 0.10053, 0.11228, 0.00327, 0.00001,
1418 + 0.00005, 0.00172, 0.00507,
1419 + 0.34325, 0.08824, 0.08682, 0.00282, 0.00001,
1420 + 0.00003, 0.00178, 0.00455,
1421 + 0.31172, 0.07860, 0.06915, 0.00254, 0.00001,
1422 + 0.00000, 0.00159, 0.00414,
1423 + 0.28536, 0.07069, 0.05647, 0.00246, 0.00001,
1424 + 0.00001, 0.00154, 0.00368,
1425 + 0.26319, 0.06430, 0.04697, 0.00231, 0.00007,
1426 + 0.00001, 0.00151, 0.00323,
1427 + 0.24469, 0.05896, 0.03978, 0.00197, 0.00014,
1428 + 0.00005, 0.00137, 0.00294,
1429 + 0.22832, 0.05439, 0.03413, 0.00179, 0.00021,
1430 + 0.00007, 0.00125, 0.00278 /
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.21374, 0.05048, 0.02961, 0.00179, 0.00019,
1433 + 0.00008, 0.00116, 0.00250,
1434 + 0.20061, 0.04698, 0.02596, 0.00180, 0.00018,
1435 + 0.00009, 0.00107, 0.00232,
1436 + 0.18916, 0.04390, 0.02296, 0.00169, 0.00021,
1437 + 0.00008, 0.00099, 0.00214,
1438 + 0.17911, 0.04120, 0.02047, 0.00154, 0.00022,
1439 + 0.00006, 0.00092, 0.00193,
1440 + 0.16987, 0.03878, 0.01837, 0.00153, 0.00018,
1441 + 0.00007, 0.00091, 0.00173,
1442 + 0.16149, 0.03662, 0.01661, 0.00139, 0.00022,
1443 + 0.00011, 0.00087, 0.00168,
1444 + 0.15387, 0.03467, 0.01510, 0.00132, 0.00021,
1445 + 0.00012, 0.00082, 0.00160 /
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.14688, 0.03289, 0.01380, 0.00129, 0.00018,
1448 + 0.00009, 0.00077, 0.00147,
1449 + 0.14069, 0.03128, 0.01266, 0.00109, 0.00019,
1450 + 0.00010, 0.00074, 0.00139,
1451 + 0.13500, 0.02980, 0.01167, 0.00090, 0.00020,
1452 + 0.00011, 0.00072, 0.00135,
1453 + 0.12947, 0.02845, 0.01082, 0.00088, 0.00021,
1454 + 0.00010, 0.00067, 0.00127,
1455 + 0.12433, 0.02719, 0.01006, 0.00087, 0.00021,
1456 + 0.00010, 0.00064, 0.00120 /
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.34692, 0.08632, 0.08902, 0.00231, 0.00001,
1459 + 0.00004, 0.00112, 0.00371,
1460 + 0.30859, 0.07504, 0.06780, 0.00211, 0.00001,
1461 + 0.00007, 0.00112, 0.00336,
1462 + 0.27798, 0.06636, 0.05334, 0.00186, 0.00001,
1463 + 0.00004, 0.00112, 0.00292,
1464 + 0.25287, 0.05941, 0.04318, 0.00187, 0.00001,
1465 + 0.00006, 0.00102, 0.00254,
1466 + 0.23210, 0.05375, 0.03564, 0.00170, 0.00006,
1467 + 0.00002, 0.00094, 0.00235,
1468 + 0.21427, 0.04900, 0.02992, 0.00167, 0.00010,
1469 + 0.00001, 0.00094, 0.00202,
1470 + 0.19894, 0.04498, 0.02548, 0.00149, 0.00015,
1471 + 0.00000, 0.00090, 0.00188 /
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.18543, 0.04154, 0.02201, 0.00145, 0.00014,
1474 + 0.00001, 0.00078, 0.00166,
1475 + 0.17366, 0.03850, 0.01918, 0.00143, 0.00016,
1476 + 0.00001, 0.00077, 0.00147,
1477 + 0.16319, 0.03585, 0.01688, 0.00130, 0.00016,
1478 + 0.00003, 0.00074, 0.00142,
1479 + 0.15383, 0.03352, 0.01498, 0.00114, 0.00014,
1480 + 0.00003, 0.00066, 0.00140,
1481 + 0.14562, 0.03145, 0.01338, 0.00100, 0.00015,
1482 + 0.00002, 0.00061, 0.00124,
1483 + 0.13794, 0.02964, 0.01206, 0.00094, 0.00012,
1484 + 0.00004, 0.00055, 0.00117,
1485 + 0.13100, 0.02797, 0.01093, 0.00088, 0.00011,
1486 + 0.00006, 0.00052, 0.00114 /
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.12476, 0.02642, 0.00996, 0.00081, 0.00010,
1489 + 0.00006, 0.00051, 0.00112,
1490 + 0.11904, 0.02506, 0.00912, 0.00079, 0.00011,
1491 + 0.00006, 0.00049, 0.00102,
1492 + 0.11380, 0.02383, 0.00839, 0.00075, 0.00011,
1493 + 0.00006, 0.00045, 0.00093,
1494 + 0.10895, 0.02270, 0.00775, 0.00065, 0.00011,
1495 + 0.00006, 0.00045, 0.00091,
1496 + 0.10450, 0.02165, 0.00718, 0.00056, 0.00012,
1497 + 0.00007, 0.00044, 0.00087 /
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.31151, 0.07292, 0.06946, 0.00131, 0.00001,
1500 + 0.00006, 0.00082, 0.00263,
1501 + 0.27445, 0.06298, 0.05230, 0.00142, 0.00001,
1502 + 0.00000, 0.00079, 0.00246,
1503 + 0.24504, 0.05525, 0.04072, 0.00153, 0.00001,
1504 + 0.00003, 0.00083, 0.00213,
1505 + 0.22200, 0.04908, 0.03254, 0.00120, 0.00001,
1506 + 0.00001, 0.00074, 0.00193,
1507 + 0.20199, 0.04417, 0.02665, 0.00136, 0.00001,
1508 + 0.00002, 0.00067, 0.00161,
1509 + 0.18553, 0.04009, 0.02221, 0.00129, 0.00002,
1510 + 0.00000, 0.00065, 0.00144,
1511 + 0.17141, 0.03666, 0.01880, 0.00120, 0.00001,
1512 + 0.00002, 0.00054, 0.00126 /
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.15945, 0.03367, 0.01611, 0.00101, 0.00006,
1515 + 0.00001, 0.00050, 0.00117,
1516 + 0.14873, 0.03110, 0.01396, 0.00088, 0.00009,
1517 + 0.00001, 0.00049, 0.00114,
1518 + 0.13929, 0.02888, 0.01223, 0.00077, 0.00009,
1519 + 0.00002, 0.00046, 0.00103,
1520 + 0.13092, 0.02692, 0.01081, 0.00073, 0.00007,
1521 + 0.00001, 0.00042, 0.00089,
1522 + 0.12319, 0.02519, 0.00963, 0.00077, 0.00006,
1523 + 0.00000, 0.00039, 0.00083,
1524 + 0.11656, 0.02361, 0.00864, 0.00063, 0.00009,
1525 + 0.00002, 0.00039, 0.00075,
1526 + 0.11050, 0.02221, 0.00780, 0.00052, 0.00010,
1527 + 0.00004, 0.00036, 0.00073 /
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.10485, 0.02096, 0.00708, 0.00047, 0.00010,
1530 + 0.00004, 0.00034, 0.00076,
1531 + 0.09971, 0.01983, 0.00647, 0.00046, 0.00011,
1532 + 0.00006, 0.00035, 0.00071,
1533 + 0.09503, 0.01880, 0.00594, 0.00046, 0.00011,
1534 + 0.00007, 0.00035, 0.00066,
1535 + 0.09066, 0.01785, 0.00547, 0.00042, 0.00009,
1536 + 0.00004, 0.00030, 0.00065,
1537 + 0.08668, 0.01698, 0.00506, 0.00039, 0.00006,
1538 + 0.00002, 0.00026, 0.00063 /
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.27586, 0.06106, 0.05362, 0.00136, 0.00001,
1541 + 0.00004, 0.00053, 0.00190,
1542 + 0.24121, 0.05212, 0.03974, 0.00117, 0.00001,
1543 + 0.00008, 0.00054, 0.00159,
1544 + 0.21378, 0.04540, 0.03052, 0.00125, 0.00001,
1545 + 0.00004, 0.00043, 0.00126,
1546 + 0.19198, 0.04014, 0.02414, 0.00093, 0.00001,
1547 + 0.00003, 0.00045, 0.00127,
1548 + 0.17388, 0.03586, 0.01958, 0.00092, 0.00001,
1549 + 0.00005, 0.00041, 0.00107,
1550 + 0.15912, 0.03230, 0.01618, 0.00076, 0.00001,
1551 + 0.00006, 0.00040, 0.00090,
1552 + 0.14625, 0.02939, 0.01360, 0.00067, 0.00005,
1553 + 0.00002, 0.00040, 0.00085 /
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.13527, 0.02689, 0.01159, 0.00055, 0.00003,
1556 + 0.00001, 0.00038, 0.00085,
1557 + 0.12565, 0.02474, 0.00999, 0.00053, 0.00006,
1558 + 0.00000, 0.00034, 0.00072,
1559 + 0.11705, 0.02287, 0.00871, 0.00058, 0.00008,
1560 + 0.00002, 0.00032, 0.00063,
1561 + 0.10945, 0.02123, 0.00766, 0.00056, 0.00007,
1562 + 0.00002, 0.00032, 0.00060,
1563 + 0.10294, 0.01975, 0.00679, 0.00040, 0.00005,
1564 + 0.00001, 0.00029, 0.00061,
1565 + 0.09698, 0.01849, 0.00607, 0.00034, 0.00007,
1566 + 0.00002, 0.00027, 0.00056,
1567 + 0.09156, 0.01736, 0.00547, 0.00032, 0.00008,
1568 + 0.00003, 0.00026, 0.00052 /
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.08662, 0.01634, 0.00496, 0.00033, 0.00007,
1571 + 0.00003, 0.00026, 0.00048,
1572 + 0.08220, 0.01538, 0.00451, 0.00025, 0.00005,
1573 + 0.00003, 0.00022, 0.00045,
1574 + 0.07818, 0.01453, 0.00413, 0.00019, 0.00005,
1575 + 0.00002, 0.00020, 0.00042,
1576 + 0.07440, 0.01377, 0.00380, 0.00022, 0.00005,
1577 + 0.00003, 0.00020, 0.00039,
1578 + 0.07094, 0.01307, 0.00351, 0.00023, 0.00007,
1579 + 0.00004, 0.00021, 0.00036 /
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.24183, 0.05013, 0.04066, 0.00060, 0.00001,
1582 + 0.00001, 0.00037, 0.00139,
1583 + 0.20913, 0.04242, 0.02967, 0.00068, 0.00001,
1584 + 0.00006, 0.00028, 0.00104,
1585 + 0.18371, 0.03666, 0.02249, 0.00075, 0.00001,
1586 + 0.00005, 0.00039, 0.00096,
1587 + 0.16370, 0.03212, 0.01761, 0.00069, 0.00001,
1588 + 0.00004, 0.00037, 0.00081,
1589 + 0.14769, 0.02851, 0.01413, 0.00046, 0.00001,
1590 + 0.00003, 0.00031, 0.00072,
1591 + 0.13417, 0.02556, 0.01159, 0.00043, 0.00006,
1592 + 0.00001, 0.00030, 0.00061,
1593 + 0.12262, 0.02312, 0.00968, 0.00050, 0.00005,
1594 + 0.00000, 0.00027, 0.00055 /
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.11279, 0.02107, 0.00820, 0.00039, 0.00008,
1597 + 0.00001, 0.00029, 0.00051,
1598 + 0.10436, 0.01929, 0.00703, 0.00033, 0.00007,
1599 + 0.00002, 0.00029, 0.00047,
1600 + 0.09704, 0.01775, 0.00610, 0.00023, 0.00006,
1601 + 0.00003, 0.00025, 0.00046,
1602 + 0.09056, 0.01641, 0.00534, 0.00013, 0.00006,
1603 + 0.00003, 0.00023, 0.00043,
1604 + 0.08470, 0.01527, 0.00473, 0.00016, 0.00009,
1605 + 0.00002, 0.00022, 0.00034,
1606 + 0.07945, 0.01421, 0.00421, 0.00015, 0.00008,
1607 + 0.00002, 0.00021, 0.00032,
1608 + 0.07471, 0.01327, 0.00377, 0.00016, 0.00008,
1609 + 0.00002, 0.00020, 0.00031 /
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.07038, 0.01245, 0.00340, 0.00021, 0.00005,
1612 + 0.00002, 0.00018, 0.00027,
1613 + 0.06656, 0.01170, 0.00309, 0.00018, 0.00006,
1614 + 0.00003, 0.00018, 0.00028,
1615 + 0.06311, 0.01103, 0.00282, 0.00015, 0.00008,
1616 + 0.00004, 0.00017, 0.00029,
1617 + 0.05996, 0.01042, 0.00259, 0.00014, 0.00008,
1618 + 0.00003, 0.00016, 0.00025,
1619 + 0.05707, 0.00988, 0.00239, 0.00012, 0.00007,
1620 + 0.00003, 0.00015, 0.00022 /
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.20934, 0.04095, 0.03046, 0.00088, 0.00001,
1623 + 0.00009, 0.00012, 0.00076,
1624 + 0.17938, 0.03433, 0.02189, 0.00055, 0.00001,
1625 + 0.00008, 0.00016, 0.00077,
1626 + 0.15689, 0.02938, 0.01640, 0.00034, 0.00001,
1627 + 0.00008, 0.00022, 0.00069,
1628 + 0.13862, 0.02556, 0.01272, 0.00039, 0.00001,
1629 + 0.00007, 0.00019, 0.00050,
1630 + 0.12384, 0.02251, 0.01014, 0.00038, 0.00001,
1631 + 0.00005, 0.00016, 0.00049,
1632 + 0.11181, 0.02010, 0.00825, 0.00035, 0.00001,
1633 + 0.00004, 0.00016, 0.00043,
1634 + 0.10194, 0.01809, 0.00684, 0.00025, 0.00000,
1635 + 0.00003, 0.00017, 0.00037 /
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.09332, 0.01638, 0.00576, 0.00025, 0.00002,
1638 + 0.00001, 0.00016, 0.00032,
1639 + 0.08581, 0.01495, 0.00491, 0.00022, 0.00003,
1640 + 0.00001, 0.00015, 0.00033,
1641 + 0.07934, 0.01370, 0.00424, 0.00021, 0.00003,
1642 + 0.00000, 0.00014, 0.00032,
1643 + 0.07372, 0.01263, 0.00370, 0.00019, 0.00003,
1644 + 0.00000, 0.00014, 0.00028,
1645 + 0.06878, 0.01168, 0.00326, 0.00012, 0.00003,
1646 + 0.00001, 0.00011, 0.00024,
1647 + 0.06431, 0.01084, 0.00290, 0.00012, 0.00002,
1648 + 0.00001, 0.00010, 0.00025,
1649 + 0.06033, 0.01010, 0.00259, 0.00011, 0.00002,
1650 + 0.00001, 0.00010, 0.00023 /
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.05679, 0.00945, 0.00233, 0.00010, 0.00004,
1653 + 0.00001, 0.00012, 0.00019,
1654 + 0.05356, 0.00885, 0.00212, 0.00009, 0.00005,
1655 + 0.00001, 0.00011, 0.00017,
1656 + 0.05064, 0.00833, 0.00193, 0.00009, 0.00005,
1657 + 0.00002, 0.00011, 0.00016,
1658 + 0.04790, 0.00786, 0.00177, 0.00011, 0.00003,
1659 + 0.00002, 0.00009, 0.00014,
1660 + 0.04542, 0.00743, 0.00162, 0.00013, 0.00003,
1661 + 0.00002, 0.00008, 0.00014 /
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.17842, 0.03247, 0.02224, 0.00021, 0.00001,
1664 + 0.00003, 0.00009, 0.00066,
1665 + 0.15141, 0.02706, 0.01581, 0.00039, 0.00001,
1666 + 0.00001, 0.00013, 0.00050,
1667 + 0.13081, 0.02302, 0.01173, 0.00048, 0.00001,
1668 + 0.00003, 0.00011, 0.00037,
1669 + 0.11511, 0.01991, 0.00903, 0.00030, 0.00001,
1670 + 0.00002, 0.00009, 0.00038,
1671 + 0.10241, 0.01747, 0.00713, 0.00028, 0.00001,
1672 + 0.00001, 0.00010, 0.00028,
1673 + 0.09191, 0.01553, 0.00576, 0.00029, 0.00001,
1674 + 0.00002, 0.00009, 0.00022,
1675 + 0.08320, 0.01389, 0.00475, 0.00027, 0.00001,
1676 + 0.00001, 0.00007, 0.00024 /
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.07592, 0.01255, 0.00398, 0.00019, 0.00001,
1679 + 0.00000, 0.00008, 0.00025,
1680 + 0.06961, 0.01141, 0.00338, 0.00015, 0.00001,
1681 + 0.00000, 0.00007, 0.00022,
1682 + 0.06412, 0.01042, 0.00291, 0.00013, 0.00001,
1683 + 0.00000, 0.00005, 0.00019,
1684 + 0.05932, 0.00956, 0.00253, 0.00012, 0.00001,
1685 + 0.00001, 0.00005, 0.00017,
1686 + 0.05510, 0.00881, 0.00222, 0.00011, 0.00001,
1687 + 0.00002, 0.00005, 0.00013,
1688 + 0.05133, 0.00816, 0.00196, 0.00011, 0.00001,
1689 + 0.00001, 0.00004, 0.00014,
1690 + 0.04798, 0.00760, 0.00175, 0.00011, 0.00001,
1691 + 0.00000, 0.00004, 0.00014 /
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.04500, 0.00708, 0.00157, 0.00008, 0.00001,
1694 + 0.00000, 0.00004, 0.00013,
1695 + 0.04229, 0.00662, 0.00142, 0.00010, 0.00001,
1696 + 0.00001, 0.00003, 0.00013,
1697 + 0.03986, 0.00621, 0.00129, 0.00011, 0.00001,
1698 + 0.00001, 0.00003, 0.00012,
1699 + 0.03769, 0.00583, 0.00118, 0.00008, 0.00001,
1700 + 0.00000, 0.00003, 0.00012,
1701 + 0.03571, 0.00549, 0.00108, 0.00007, 0.00001,
1702 + 0.00000, 0.00003, 0.00010 /
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.12266, 0.01942, 0.01114, 0.00014, 0.00001,
1705 + 0.00000, 0.00004, 0.00022,
1706 + 0.10210, 0.01581, 0.00766, 0.00011, 0.00001,
1707 + 0.00002, 0.00004, 0.00021,
1708 + 0.08684, 0.01322, 0.00553, 0.00012, 0.00001,
1709 + 0.00001, 0.00008, 0.00010,
1710 + 0.07503, 0.01126, 0.00416, 0.00012, 0.00001,
1711 + 0.00001, 0.00004, 0.00011,
1712 + 0.06580, 0.00975, 0.00322, 0.00008, 0.00001,
1713 + 0.00000, 0.00006, 0.00013,
1714 + 0.05840, 0.00855, 0.00257, 0.00007, 0.00001,
1715 + 0.00000, 0.00004, 0.00010,
1716 + 0.05227, 0.00759, 0.00208, 0.00006, 0.00001,
1717 + 0.00000, 0.00005, 0.00009 /
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.04717, 0.00678, 0.00172, 0.00003, 0.00001,
1720 + 0.00000, 0.00005, 0.00006,
1721 + 0.04281, 0.00610, 0.00145, 0.00002, 0.00001,
1722 + 0.00000, 0.00005, 0.00007,
1723 + 0.03906, 0.00552, 0.00123, 0.00002, 0.00001,
1724 + 0.00000, 0.00003, 0.00007,
1725 + 0.03585, 0.00502, 0.00106, 0.00002, 0.00001,
1726 + 0.00001, 0.00003, 0.00006,
1727 + 0.03303, 0.00460, 0.00093, 0.00002, 0.00001,
1728 + 0.00000, 0.00003, 0.00004,
1729 + 0.03055, 0.00422, 0.00081, 0.00002, 0.00001,
1730 + 0.00000, 0.00002, 0.00004,
1731 + 0.02836, 0.00389, 0.00072, 0.00001, 0.00001,
1732 + 0.00000, 0.00002, 0.00004 /
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.02641, 0.00360, 0.00064, 0.00001, 0.00001,
1735 + 0.00000, 0.00002, 0.00005,
1736 + 0.02466, 0.00335, 0.00058, 0.00001, 0.00001,
1737 + 0.00000, 0.00002, 0.00005,
1738 + 0.02310, 0.00312, 0.00052, 0.00001, 0.00001,
1739 + 0.00000, 0.00002, 0.00003,
1740 + 0.02170, 0.00292, 0.00048, 0.00001, 0.00001,
1741 + 0.00000, 0.00002, 0.00003,
1742 + 0.02045, 0.00274, 0.00044, 0.00001, 0.00001,
1743 + 0.00000, 0.00001, 0.00003 /
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.07813, 0.01063, 0.00502, 0.00017, 0.00001,
1746 + 0.00001, 0.00001, 0.00004,
1747 + 0.06353, 0.00846, 0.00333, 0.00008, 0.00001,
1748 + 0.00002, 0.00001, 0.00005,
1749 + 0.05299, 0.00696, 0.00234, 0.00005, 0.00001,
1750 + 0.00002, 0.00000, 0.00005,
1751 + 0.04510, 0.00583, 0.00172, 0.00003, 0.00001,
1752 + 0.00000, 0.00002, 0.00006,
1753 + 0.03890, 0.00496, 0.00131, 0.00004, 0.00001,
1754 + 0.00000, 0.00001, 0.00002,
1755 + 0.03405, 0.00430, 0.00102, 0.00003, 0.00001,
1756 + 0.00000, 0.00001, 0.00002,
1757 + 0.03010, 0.00375, 0.00082, 0.00001, 0.00001,
1758 + 0.00001, 0.00001, 0.00002 /
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.02682, 0.00331, 0.00067, 0.00003, 0.00001,
1761 + 0.00000, 0.00001, 0.00002,
1762 + 0.02410, 0.00295, 0.00056, 0.00001, 0.00001,
1763 + 0.00000, 0.00001, 0.00003,
1764 + 0.02177, 0.00265, 0.00047, 0.00001, 0.00001,
1765 + 0.00000, 0.00001, 0.00003,
1766 + 0.01978, 0.00239, 0.00040, 0.00001, 0.00001,
1767 + 0.00000, 0.00001, 0.00001,
1768 + 0.01807, 0.00216, 0.00035, 0.00001, 0.00001,
1769 + 0.00000, 0.00001, 0.00001,
1770 + 0.01659, 0.00198, 0.00030, 0.00001, 0.00001,
1771 + 0.00000, 0.00001, 0.00001,
1772 + 0.01530, 0.00181, 0.00027, 0.00001, 0.00001,
1773 + 0.00000, 0.00001, 0.00001 /
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.01415, 0.00166, 0.00024, 0.00001, 0.00001,
1776 + 0.00000, 0.00001, 0.00001,
1777 + 0.01311, 0.00153, 0.00021, 0.00001, 0.00001,
1778 + 0.00000, 0.00001, 0.00001,
1779 + 0.01220, 0.00142, 0.00019, 0.00001, 0.00001,
1780 + 0.00000, 0.00001, 0.00001,
1781 + 0.01139, 0.00132, 0.00017, 0.00001, 0.00001,
1782 + 0.00000, 0.00001, 0.00001,
1783 + 0.01065, 0.00123, 0.00016, 0.00001, 0.00001,
1784 + 0.00000, 0.00001, 0.00001 /
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.04445, 0.00508, 0.00193, 0.00003, 0.00001,
1787 + 0.00001, 0.00001, 0.00001,
1788 + 0.03529, 0.00397, 0.00124, 0.00003, 0.00001,
1789 + 0.00001, 0.00001, 0.00001,
1790 + 0.02884, 0.00318, 0.00085, 0.00001, 0.00001,
1791 + 0.00000, 0.00001, 0.00001,
1792 + 0.02407, 0.00263, 0.00061, 0.00001, 0.00001,
1793 + 0.00000, 0.00001, 0.00001,
1794 + 0.02045, 0.00220, 0.00045, 0.00001, 0.00001,
1795 + 0.00000, 0.00001, 0.00002,
1796 + 0.01762, 0.00188, 0.00035, 0.00001, 0.00001,
1797 + 0.00000, 0.00001, 0.00001,
1798 + 0.01537, 0.00163, 0.00028, 0.00001, 0.00001,
1799 + 0.00000, 0.00001, 0.00001 /
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.01355, 0.00142, 0.00022, 0.00001, 0.00001,
1802 + 0.00000, 0.00001, 0.00001,
1803 + 0.01200, 0.00124, 0.00018, 0.00001, 0.00001,
1804 + 0.00000, 0.00001, 0.00001,
1805 + 0.01073, 0.00110, 0.00015, 0.00001, 0.00001,
1806 + 0.00000, 0.00001, 0.00001,
1807 + 0.00967, 0.00098, 0.00013, 0.00001, 0.00001,
1808 + 0.00000, 0.00001, 0.00001,
1809 + 0.00875, 0.00089, 0.00011, 0.00001, 0.00001,
1810 + 0.00000, 0.00001, 0.00001,
1811 + 0.00795, 0.00080, 0.00010, 0.00001, 0.00001,
1812 + 0.00000, 0.00001, 0.00001,
1813 + 0.00726, 0.00072, 0.00009, 0.00001, 0.00001,
1814 + 0.00000, 0.00001, 0.00001 /
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.00666, 0.00066, 0.00008, 0.00001, 0.00001,
1817 + 0.00000, 0.00001, 0.00001,
1818 + 0.00613, 0.00061, 0.00007, 0.00001, 0.00001,
1819 + 0.00000, 0.00001, 0.00001,
1820 + 0.00566, 0.00056, 0.00006, 0.00001, 0.00001,
1821 + 0.00000, 0.00001, 0.00001,
1822 + 0.00524, 0.00052, 0.00005, 0.00001, 0.00001,
1823 + 0.00000, 0.00001, 0.00001,
1824 + 0.00487, 0.00048, 0.00005, 0.00001, 0.00001,
1825 + 0.00000, 0.00001, 0.00001 /
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.02156, 0.00203, 0.00060, 0.00001, 0.00001,
1828 + 0.00000, 0.00001, 0.00001,
1829 + 0.01658, 0.00152, 0.00037, 0.00001, 0.00001,
1830 + 0.00000, 0.00001, 0.00002,
1831 + 0.01318, 0.00119, 0.00024, 0.00001, 0.00001,
1832 + 0.00000, 0.00001, 0.00002,
1833 + 0.01076, 0.00098, 0.00017, 0.00001, 0.00001,
1834 + 0.00000, 0.00001, 0.00001,
1835 + 0.00895, 0.00079, 0.00012, 0.00001, 0.00001,
1836 + 0.00000, 0.00001, 0.00001,
1837 + 0.00759, 0.00065, 0.00009, 0.00001, 0.00001,
1838 + 0.00000, 0.00001, 0.00001,
1839 + 0.00651, 0.00057, 0.00007, 0.00001, 0.00001,
1840 + 0.00000, 0.00001, 0.00001 /
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.00564, 0.00049, 0.00006, 0.00001, 0.00001,
1843 + 0.00000, 0.00001, 0.00001,
1844 + 0.00494, 0.00042, 0.00005, 0.00001, 0.00001,
1845 + 0.00000, 0.00001, 0.00001,
1846 + 0.00435, 0.00037, 0.00004, 0.00001, 0.00001,
1847 + 0.00000, 0.00001, 0.00001,
1848 + 0.00387, 0.00033, 0.00003, 0.00001, 0.00001,
1849 + 0.00000, 0.00001, 0.00001,
1850 + 0.00347, 0.00028, 0.00003, 0.00001, 0.00001,
1851 + 0.00000, 0.00001, 0.00001,
1852 + 0.00312, 0.00025, 0.00003, 0.00001, 0.00001,
1853 + 0.00000, 0.00001, 0.00001,
1854 + 0.00282, 0.00022, 0.00002, 0.00001, 0.00001,
1855 + 0.00000, 0.00001, 0.00001 /
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.00256, 0.00021, 0.00002, 0.00001, 0.00001,
1858 + 0.00000, 0.00001, 0.00001,
1859 + 0.00234, 0.00018, 0.00002, 0.00001, 0.00001,
1860 + 0.00000, 0.00001, 0.00001,
1861 + 0.00214, 0.00017, 0.00002, 0.00001, 0.00001,
1862 + 0.00000, 0.00001, 0.00001,
1863 + 0.00197, 0.00015, 0.00001, 0.00001, 0.00001,
1864 + 0.00000, 0.00001, 0.00001,
1865 + 0.00181, 0.00014, 0.00001, 0.00001, 0.00001,
1866 + 0.00000, 0.00001, 0.00001 /
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.00196, 0.00011, 0.00002, 0.00001, 0.00001,
1869 + 0.00000, 0.00001, 0.00001,
1870 + 0.00139, 0.00008, 0.00001, 0.00001, 0.00001,
1871 + 0.00000, 0.00001, 0.00001,
1872 + 0.00104, 0.00006, 0.00001, 0.00001, 0.00001,
1873 + 0.00000, 0.00001, 0.00001,
1874 + 0.00080, 0.00004, 0.00000, 0.00001, 0.00001,
1875 + 0.00000, 0.00001, 0.00001,
1876 + 0.00063, 0.00004, 0.00000, 0.00000, 0.00000,
1877 + 0.00000, 0.00000, 0.00000,
1878 + 0.00051, 0.00003, 0.00000, 0.00000, 0.00000,
1879 + 0.00000, 0.00000, 0.00000,
1880 + 0.00042, 0.00002, 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.00035, 0.00002, 0.00000, 0.00000, 0.00000,
1884 + 0.00000, 0.00000, 0.00000,
1885 + 0.00029, 0.00002, 0.00000, 0.00000, 0.00000,
1886 + 0.00000, 0.00000, 0.00000,
1887 + 0.00026, 0.00002, 0.00000, 0.00000, 0.00000,
1888 + 0.00000, 0.00000, 0.00000,
1889 + 0.00021, 0.00002, 0.00000, 0.00000, 0.00000,
1890 + 0.00000, 0.00000, 0.00000,
1891 + 0.00018, 0.00002, 0.00000, 0.00000, 0.00000,
1892 + 0.00000, 0.00000, 0.00000,
1893 + 0.00016, 0.00002, 0.00000, 0.00000, 0.00000,
1894 + 0.00000, 0.00000, 0.00000,
1895 + 0.00015, 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.00012, 0.00001, 0.00000, 0.00000, 0.00000,
1899 + 0.00000, 0.00000, 0.00000,
1900 + 0.00011, 0.00001, 0.00000, 0.00000, 0.00000,
1901 + 0.00000, 0.00000, 0.00000,
1902 + 0.00009, 0.00001, 0.00000, 0.00000, 0.00000,
1903 + 0.00000, 0.00000, 0.00000,
1904 + 0.00009, 0.00001, 0.00000, 0.00000, 0.00000,
1905 + 0.00000, 0.00000, 0.00000,
1906 + 0.00008, 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,7,0,0,7,7/
1918 DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
1919 DATA INIT/0/
1920
1921
1922 XSAVE=X
1923
1924 IF(INIT.NE.0) GOTO 10
1925 INIT=1
1926 DO 20 N=1,NX-1
1927 DO 20 M=1,19
1928C READ(54,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),
1929C . F(6,N,M),F(8,N,M)
1930C 1=UV 2=DV 3=GLUE 4=UBAR 5=CBAR 7=BBAR 6=SBAR 8=DBAR
1931 DO 25 I=1,8
1932 25 F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
1933 20 CONTINUE
1934 DO 31 J=1,NTENTH-1
1935 XX(J)= LOG10(XX(J))+ONEDO
1936 DO 31 I=1,8
1937 IF(I.EQ.7) GO TO 31
1938 DO 30 K=1,19
1939 30 F(I,J,K)= LOG(F(I,J,K))*F(I,NTENTH,K)/ LOG(F(I,NTENTH,K))
1940 31 CONTINUE
1941 50 FORMAT(8F10.5)
1942 DO 40 I=1,8
1943 DO 40 M=1,19
1944 40 F(I,NX,M)=ZEROD
1945 10 CONTINUE
1946 IF(X.LT.XMIN) X=XMIN
1947 IF(X.GT.XMAX) X=XMAX
1948 QSQ=SCALE**2
1949 IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
1950 IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
1951 XXX=X
1952 IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
1953 N=0
1954 70 N=N+1
1955 IF(XXX.GT.XX(N+1)) GOTO 70
1956 A=(XXX-XX(N))/(XX(N+1)-XX(N))
1957 RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
1958 B=RM-AINT(RM)
1959 M=1+ INT(RM)
1960 DO 60 I=1,8
1961 G(I)=ZEROD
1962 IF(XXX.GE.ONED) GOTO 60
1963 G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
1964 . + A*(ONED-B)*F(I,N+1,M) + A*B*F(I,N+1,M+1)
1965 IF(N.GE.NTENTH) GOTO 65
1966 IF(I.EQ.7) GOTO 65
1967 FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
1968 G(I)=FAC**(G(I)/FAC)
1969 65 CONTINUE
1970 G(I)=G(I)*(ONED-X)**N0(I)
1971 60 CONTINUE
1972 UPV=G(1)
1973 DNV=G(2)
1974 USEA=G(4)
1975 DSEA=G(8)
1976 STR=G(6)
1977 CHM=G(5)
1978 GLU=G(3)
1979 BOT=G(7)
1980
1981 X=XSAVE
1982
1983 RETURN
1984 END