]> git.uio.no Git - u/mrichter/AliRoot.git/blame - PDF/spdf/sfmsbh.F
git://git.uio.no / u / mrichter / AliRoot.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Number of pads along z is corrected
[u/mrichter/AliRoot.git] / PDF / spdf / sfmsbh.F
CommitLineData
21886bb6 1*
2* $Id$
3*
4* $Log$
5* Revision 1.1.1.2 1996/10/30 08:30:22 cernlib
6* Version 7.04
7*
8* Revision 1.1.1.1 1996/04/12 15:29:44 plothow
9* Version 7.01
10*
11*
12#include "pdf/pilot.h"
13 SUBROUTINE SFMSBH(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU)
14
15C THIS IS THE NEW PRELIMINARY HERA FIT MRS(H)
16C .... WITH UBAR < DBAR (230 MeV)
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.01399, 0.00189, 28.57361, 2.52574, 0.13922,
24 + 0.00000, 1.35002, 2.55150,
25 + 0.01450, 0.00205, 41.41998, 2.93569, 0.60391,
26 + 0.00001, 1.78792, 2.96110,
27 + 0.01497, 0.00221, 56.22984, 3.40128, 1.11643,
28 + 0.00001, 2.27752, 3.42636,
29 + 0.01541, 0.00235, 72.60197, 3.91488, 1.67105,
30 + 0.00001, 2.81215, 3.93963,
31 + 0.01581, 0.00249, 90.39349, 4.46961, 2.26217,
32 + 0.12740, 3.38556, 4.49408,
33 + 0.01618, 0.00263, 109.40785, 5.06167, 2.88696,
34 + 0.69649, 3.99446, 5.08588,
35 + 0.01654, 0.00276, 129.52321, 5.69024, 3.54540,
36 + 1.39599, 4.63840, 5.71420 /
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.01688, 0.00289, 150.59039, 6.35208, 4.23468,
39 + 2.11291, 5.31439, 6.37581,
40 + 0.01721, 0.00301, 172.47517, 7.04358, 4.95158,
41 + 2.85689, 6.01900, 7.06710,
42 + 0.01752, 0.00313, 195.07593, 7.76197, 5.69356,
43 + 3.62358, 6.74958, 7.78529,
44 + 0.01782, 0.00325, 218.32326, 8.50504, 6.45865,
45 + 4.41183, 7.50404, 8.52820,
46 + 0.01811, 0.00336, 242.10217, 9.27003, 7.24428,
47 + 5.21909, 8.27972, 9.29304,
48 + 0.01840, 0.00348, 266.14624, 10.05212, 8.04581,
49 + 6.04096, 9.07188, 10.07497,
50 + 0.01867, 0.00359, 290.66772, 10.85345, 8.86548,
51 + 6.87977, 9.88272, 10.87617 /
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.01893, 0.00370, 315.54395, 11.67175, 9.70111,
54 + 7.73350, 10.71001, 11.69433,
55 + 0.01919, 0.00380, 340.46313, 12.50028, 10.54612,
56 + 8.59568, 11.54710, 12.52274,
57 + 0.01944, 0.00391, 365.83740, 13.34612, 11.40759,
58 + 9.47343, 12.40105, 13.36847,
59 + 0.01968, 0.00401, 391.07251, 14.19815, 12.27457,
60 + 10.35593, 13.26086, 14.22042,
61 + 0.01992, 0.00411, 416.66797, 15.06506, 13.15572,
62 + 11.25187, 14.13518, 15.08723 /
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.01772, 0.00272, 23.12250, 2.05768, 0.11044,
65 + 0.00000, 1.09384, 2.07248,
66 + 0.01840, 0.00297, 33.11473, 2.37891, 0.47574,
67 + 0.00000, 1.43741, 2.39348,
68 + 0.01903, 0.00319, 44.40932, 2.73870, 0.87330,
69 + 0.00001, 1.81637, 2.75305,
70 + 0.01960, 0.00341, 56.67400, 3.13056, 1.29815,
71 + 0.00000, 2.22501, 3.14471,
72 + 0.02012, 0.00361, 69.79974, 3.54923, 1.74606,
73 + 0.09624, 2.65856, 3.56320,
74 + 0.02062, 0.00381, 83.63524, 3.99164, 2.21476,
75 + 0.52392, 3.11437, 4.00544,
76 + 0.02109, 0.00400, 98.08752, 4.45698, 2.70407,
77 + 1.04547, 3.59193, 4.47063 /
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.02154, 0.00418, 113.04889, 4.94272, 3.21183,
80 + 1.57516, 4.08891, 4.95622,
81 + 0.02196, 0.00436, 128.42447, 5.44617, 3.73564,
82 + 2.12040, 4.60277, 5.45955,
83 + 0.02237, 0.00453, 144.14647, 5.96530, 4.27367,
84 + 2.67801, 5.13156, 5.97855,
85 + 0.02276, 0.00470, 160.17076, 6.49851, 4.82451,
86 + 3.24717, 5.67379, 6.51165,
87 + 0.02314, 0.00487, 176.41954, 7.04381, 5.38634,
88 + 3.82612, 6.22756, 7.05686,
89 + 0.02351, 0.00503, 192.70801, 7.59759, 5.95567,
90 + 4.41154, 6.78931, 7.61054,
91 + 0.02386, 0.00518, 209.19713, 8.16174, 6.53449,
92 + 5.00551, 7.36098, 8.17461 /
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.02420, 0.00534, 225.80484, 8.73462, 7.12124,
95 + 5.60657, 7.94098, 8.74743,
96 + 0.02453, 0.00549, 242.31677, 9.31133, 7.71111,
97 + 6.21002, 8.52444, 9.32406,
98 + 0.02486, 0.00563, 259.03003, 9.89730, 8.30958,
99 + 6.82136, 9.11683, 9.91000,
100 + 0.02517, 0.00578, 275.53491, 10.48433, 8.90855,
101 + 7.43260, 9.70999, 10.49697,
102 + 0.02548, 0.00592, 292.18457, 11.07906, 9.51465,
103 + 8.05038, 10.31057, 11.09164 /
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.02241, 0.00393, 18.71066, 1.67536, 0.08754,
106 + 0.00000, 0.88625, 1.68330,
107 + 0.02331, 0.00428, 26.47142, 1.92669, 0.37440,
108 + 0.00000, 1.15548, 1.93450,
109 + 0.02412, 0.00462, 35.06683, 2.20416, 0.68230,
110 + 0.00000, 1.44829, 2.21187,
111 + 0.02487, 0.00493, 44.22931, 2.50242, 1.00712,
112 + 0.00000, 1.75995, 2.51003,
113 + 0.02556, 0.00523, 53.88190, 2.81753, 1.34576,
114 + 0.07253, 2.08694, 2.82505,
115 + 0.02621, 0.00552, 63.91248, 3.14711, 1.69647,
116 + 0.39322, 2.42720, 3.15454,
117 + 0.02682, 0.00579, 74.25426, 3.49047, 2.05910,
118 + 0.78114, 2.78030, 3.49783 /
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.02740, 0.00606, 84.83257, 3.84571, 2.43203,
121 + 1.17147, 3.14449, 3.85301,
122 + 0.02796, 0.00631, 95.58434, 4.21089, 2.81355,
123 + 1.56995, 3.51794, 4.21813,
124 + 0.02849, 0.00656, 106.46631, 4.58455, 3.20237,
125 + 1.97427, 3.89928, 4.59172,
126 + 0.02900, 0.00680, 117.45285, 4.96560, 3.59757,
127 + 2.38397, 4.28750, 4.97272,
128 + 0.02949, 0.00704, 128.49417, 5.35265, 3.99787,
129 + 2.79781, 4.68126, 5.35973,
130 + 0.02996, 0.00727, 139.46341, 5.74303, 4.40071,
131 + 3.21339, 5.07796, 5.75007,
132 + 0.03042, 0.00749, 150.48344, 6.13838, 4.80782,
133 + 3.63247, 5.47927, 6.14539 /
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.03086, 0.00771, 161.50014, 6.53758, 5.21812,
136 + 4.05410, 5.88411, 6.54456,
137 + 0.03129, 0.00792, 172.36797, 6.93704, 5.62812,
138 + 4.47482, 6.28891, 6.94399,
139 + 0.03170, 0.00813, 183.30180, 7.34098, 6.04206,
140 + 4.89894, 6.69793, 7.34790,
141 + 0.03211, 0.00833, 194.01912, 7.74337, 6.45399,
142 + 5.32057, 7.10517, 7.75027,
143 + 0.03250, 0.00853, 204.77129, 8.14922, 6.86895,
144 + 5.74476, 7.51565, 8.15611 /
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.02568, 0.00487, 16.53067, 1.48499, 0.07637,
147 + 0.00000, 0.78360, 1.49042,
148 + 0.02673, 0.00532, 23.21927, 1.70253, 0.32526,
149 + 0.00000, 1.01687, 1.70789,
150 + 0.02769, 0.00574, 30.53673, 1.94063, 0.59019,
151 + 0.00000, 1.26845, 1.94593,
152 + 0.02856, 0.00613, 38.25038, 2.19453, 0.86751,
153 + 0.00000, 1.53412, 2.19979,
154 + 0.02937, 0.00650, 46.30000, 2.46097, 1.15468,
155 + 0.06140, 1.81099, 2.46619,
156 + 0.03012, 0.00686, 54.59346, 2.73794, 1.45028,
157 + 0.33205, 2.09733, 2.74312,
158 + 0.03084, 0.00720, 63.07721, 3.02485, 1.75415,
159 + 0.65786, 2.39277, 3.02999 /
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.03152, 0.00753, 71.69281, 3.32010, 2.06498,
162 + 0.98389, 2.69587, 3.32522,
163 + 0.03216, 0.00784, 80.39113, 3.62211, 2.38137,
164 + 1.31506, 3.00512, 3.62720,
165 + 0.03278, 0.00815, 89.14072, 3.92971, 2.70232,
166 + 1.64953, 3.31945, 3.93478,
167 + 0.03337, 0.00845, 97.92462, 4.24206, 3.02712,
168 + 1.98698, 3.63808, 4.24712,
169 + 0.03394, 0.00874, 106.70447, 4.55803, 3.35474,
170 + 2.32641, 3.95992, 4.56306,
171 + 0.03449, 0.00902, 115.37933, 4.87541, 3.68309,
172 + 2.66585, 4.28283, 4.88043,
173 + 0.03502, 0.00929, 124.05481, 5.19573, 4.01373,
174 + 3.00694, 4.60835, 5.20074 /
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.03553, 0.00955, 132.68863, 5.51803, 4.34580,
177 + 3.34887, 4.93558, 5.52303,
178 + 0.03603, 0.00981, 141.16512, 5.83940, 4.67643,
179 + 3.68886, 5.26162, 5.84439,
180 + 0.03651, 0.01007, 149.66237, 6.16345, 5.00927,
181 + 4.03056, 5.59011, 6.16844,
182 + 0.03698, 0.01031, 157.95305, 6.48515, 5.33936,
183 + 4.36910, 5.91604, 6.49013,
184 + 0.03743, 0.01055, 166.24387, 6.80877, 5.67098,
185 + 4.70876, 6.24370, 6.81376 /
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.02828, 0.00567, 15.13950, 1.36292, 0.06931,
188 + 0.00000, 0.71806, 1.36711,
189 + 0.02945, 0.00620, 21.15556, 1.55918, 0.29426,
190 + 0.00000, 0.92870, 1.56335,
191 + 0.03052, 0.00669, 27.67900, 1.77264, 0.53228,
192 + 0.00000, 1.15448, 1.77679,
193 + 0.03149, 0.00715, 34.50014, 1.99898, 0.78004,
194 + 0.00000, 1.39155, 2.00311,
195 + 0.03239, 0.00759, 41.56969, 2.23533, 1.03536,
196 + 0.05451, 1.63742, 2.23946,
197 + 0.03323, 0.00800, 48.80835, 2.47993, 1.29699,
198 + 0.29431, 1.89057, 2.48405,
199 + 0.03403, 0.00840, 56.17104, 2.73226, 1.56483,
200 + 0.58199, 2.15068, 2.73637 /
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.03478, 0.00878, 63.60899, 2.99093, 1.83774,
203 + 0.86870, 2.41650, 2.99504,
204 + 0.03550, 0.00915, 71.08234, 3.25458, 2.11453,
205 + 1.15891, 2.68675, 3.25868,
206 + 0.03619, 0.00950, 78.56602, 3.52221, 2.39437,
207 + 1.45101, 2.96051, 3.52631,
208 + 0.03685, 0.00985, 86.04810, 3.79315, 2.67668,
209 + 1.74479, 3.23716, 3.79725,
210 + 0.03748, 0.01018, 93.49756, 4.06641, 2.96060,
211 + 2.03942, 3.51578, 4.07052,
212 + 0.03809, 0.01051, 100.82874, 4.34007, 3.24427,
213 + 2.33317, 3.79447, 4.34419,
214 + 0.03868, 0.01082, 108.13600, 4.61557, 3.52920,
215 + 2.62757, 4.07471, 4.61969 /
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.03925, 0.01113, 115.38472, 4.89210, 3.81465,
218 + 2.92197, 4.35572, 4.89622,
219 + 0.03980, 0.01143, 122.47620, 5.16710, 4.09811,
220 + 3.21392, 4.63498, 5.17123,
221 + 0.04033, 0.01172, 129.56682, 5.44385, 4.38289,
222 + 3.50673, 4.91576, 5.44800,
223 + 0.04085, 0.01200, 136.46161, 5.71789, 4.66459,
224 + 3.79609, 5.19365, 5.72204,
225 + 0.04136, 0.01228, 143.34029, 5.99307, 4.94706,
226 + 4.08586, 5.47249, 5.99723 /
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.03046, 0.00638, 14.14132, 1.27502, 0.06427,
229 + 0.00000, 0.67103, 1.27853,
230 + 0.03174, 0.00698, 19.68086, 1.45616, 0.27221,
231 + 0.00000, 0.86559, 1.45968,
232 + 0.03290, 0.00754, 25.64561, 1.65221, 0.49119,
233 + 0.00000, 1.07312, 1.65574,
234 + 0.03396, 0.00806, 31.84277, 1.85914, 0.71812,
235 + 0.00000, 1.29006, 1.86268,
236 + 0.03494, 0.00856, 38.23102, 2.07441, 0.95110,
237 + 0.04969, 1.51420, 2.07796,
238 + 0.03585, 0.00902, 44.74008, 2.29640, 1.18899,
239 + 0.26791, 1.74416, 2.29996,
240 + 0.03672, 0.00947, 51.33093, 2.52466, 1.43172,
241 + 0.52899, 1.97967, 2.52823 /
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.03754, 0.00990, 57.96184, 2.75795, 1.67830,
244 + 0.78837, 2.21962, 2.76154,
245 + 0.03832, 0.01031, 64.59860, 2.99506, 1.92768,
246 + 1.05019, 2.46288, 2.99866,
247 + 0.03907, 0.01071, 71.22144, 3.23513, 2.17913,
248 + 1.31302, 2.70865, 3.23875,
249 + 0.03978, 0.01110, 77.82121, 3.47757, 2.43218,
250 + 1.57670, 2.95641, 3.48120,
251 + 0.04047, 0.01147, 84.37195, 3.72152, 2.68607,
252 + 1.84053, 3.20534, 3.72517,
253 + 0.04113, 0.01183, 90.79819, 3.96526, 2.93915,
254 + 2.10294, 3.45376, 3.96893,
255 + 0.04177, 0.01218, 97.18675, 4.21015, 3.19283,
256 + 2.36541, 3.70306, 4.21383 /
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.04238, 0.01253, 103.50786, 4.45548, 3.44648,
259 + 2.62735, 3.95256, 4.45918,
260 + 0.04298, 0.01286, 109.67487, 4.69895, 3.69784,
261 + 2.88658, 4.19999, 4.70267,
262 + 0.04356, 0.01318, 115.82816, 4.94358, 3.94995,
263 + 3.14614, 4.44836, 4.94731,
264 + 0.04412, 0.01350, 121.79561, 5.18534, 4.19884,
265 + 3.40214, 4.69370, 5.18908,
266 + 0.04466, 0.01381, 127.73788, 5.42774, 4.44805,
267 + 3.65810, 4.93951, 5.43150 /
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.03836, 0.00925, 11.43973, 1.03567, 0.05078,
270 + 0.00000, 0.54373, 1.03836,
271 + 0.04001, 0.01013, 15.71670, 1.17658, 0.21340,
272 + 0.00000, 0.69549, 1.17936,
273 + 0.04151, 0.01096, 20.21892, 1.32668, 0.38207,
274 + 0.00000, 0.85488, 1.32954,
275 + 0.04288, 0.01172, 24.80116, 1.48282, 0.55440,
276 + 0.00000, 1.01910, 1.48575,
277 + 0.04415, 0.01243, 29.44316, 1.64326, 0.72917,
278 + 0.03716, 1.18670, 1.64626,
279 + 0.04533, 0.01311, 34.09891, 1.80686, 0.90564,
280 + 0.19950, 1.35673, 1.80993,
281 + 0.04644, 0.01375, 38.74529, 1.97333, 1.08382,
282 + 0.39205, 1.52904, 1.97646 /
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.04750, 0.01437, 43.35803, 2.14183, 1.26306,
285 + 0.58144, 1.70291, 2.14501,
286 + 0.04850, 0.01496, 47.91843, 2.31155, 1.44269,
287 + 0.77090, 1.87757, 2.31479,
288 + 0.04946, 0.01553, 52.41753, 2.48195, 1.62230,
289 + 0.95950, 2.05258, 2.48525,
290 + 0.05038, 0.01608, 56.85410, 2.65270, 1.80163,
291 + 1.14723, 2.22761, 2.65605,
292 + 0.05126, 0.01660, 61.21371, 2.82325, 1.98020,
293 + 1.33365, 2.40216, 2.82664,
294 + 0.05211, 0.01712, 65.44678, 2.99236, 2.15687,
295 + 1.51769, 2.57504, 2.99581,
296 + 0.05293, 0.01761, 69.61964, 3.16121, 2.33282,
297 + 1.70058, 2.74743, 3.16469 /
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.05372, 0.01809, 73.71400, 3.32931, 2.50763,
300 + 1.88195, 2.91888, 3.33283,
301 + 0.05448, 0.01856, 77.67226, 3.49504, 2.67973,
302 + 2.06026, 3.08778, 3.49861,
303 + 0.05522, 0.01901, 81.59584, 3.66070, 2.85144,
304 + 2.23785, 3.25646, 3.66431,
305 + 0.05594, 0.01945, 85.36723, 3.82339, 3.01989,
306 + 2.41191, 3.42202, 3.82704,
307 + 0.05664, 0.01989, 89.10036, 3.98575, 3.18774,
308 + 2.58510, 3.58712, 3.98944 /
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.04826, 0.01348, 9.25090, 0.84012, 0.04000,
311 + 0.00000, 0.44066, 0.84345,
312 + 0.05039, 0.01479, 12.53508, 0.94920, 0.16672,
313 + 0.00000, 0.55857, 0.95268,
314 + 0.05231, 0.01599, 15.90942, 1.06346, 0.29606,
315 + 0.00000, 0.68038, 1.06705,
316 + 0.05408, 0.01710, 19.26860, 1.18047, 0.42623,
317 + 0.00000, 0.80397, 1.18418,
318 + 0.05570, 0.01813, 22.60866, 1.29914, 0.55655,
319 + 0.02762, 0.92847, 1.30295,
320 + 0.05722, 0.01910, 25.90247, 1.41871, 0.68657,
321 + 0.14764, 1.05327, 1.42263,
322 + 0.05865, 0.02003, 29.13887, 1.53904, 0.81641,
323 + 0.28871, 1.17835, 1.54304 /
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.06001, 0.02090, 32.30612, 1.65958, 0.94568,
326 + 0.42601, 1.30325, 1.66366,
327 + 0.06130, 0.02174, 35.39610, 1.77983, 1.07400,
328 + 0.56207, 1.42754, 1.78400,
329 + 0.06253, 0.02255, 38.40730, 1.89951, 1.20115,
330 + 0.69633, 1.55095, 1.90375,
331 + 0.06371, 0.02332, 41.34314, 2.01844, 1.32706,
332 + 0.82886, 1.67337, 2.02275,
333 + 0.06483, 0.02407, 44.19688, 2.13630, 1.45144,
334 + 0.95943, 1.79448, 2.14068,
335 + 0.06592, 0.02479, 46.93665, 2.25223, 1.57350,
336 + 1.08731, 1.91347, 2.25667,
337 + 0.06696, 0.02548, 49.61301, 2.36720, 1.69425,
338 + 1.21354, 2.03133, 2.37170 /
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.06797, 0.02615, 52.21521, 2.48092, 1.81343,
341 + 1.33788, 2.14777, 2.48548,
342 + 0.06894, 0.02680, 54.70546, 2.59223, 1.92992,
343 + 1.45927, 2.26167, 2.59685,
344 + 0.06988, 0.02743, 57.15674, 2.70292, 2.04552,
345 + 1.57950, 2.37481, 2.70758,
346 + 0.07080, 0.02804, 59.48952, 2.81086, 2.15814,
347 + 1.69655, 2.48508, 2.81557,
348 + 0.07168, 0.02863, 61.78384, 2.91807, 2.26982,
349 + 1.81243, 2.59452, 2.92283 /
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.05520, 0.01689, 8.16771, 0.74291, 0.03471,
352 + 0.00000, 0.38972, 0.74703,
353 + 0.05768, 0.01852, 10.97002, 0.83649, 0.14393,
354 + 0.00000, 0.49116, 0.84078,
355 + 0.05991, 0.02002, 13.80556, 0.93348, 0.25430,
356 + 0.00000, 0.59486, 0.93790,
357 + 0.06195, 0.02139, 16.58923, 1.03184, 0.36434,
358 + 0.00000, 0.69908, 1.03639,
359 + 0.06383, 0.02267, 19.32477, 1.13080, 0.47362,
360 + 0.02313, 0.80322, 1.13545,
361 + 0.06559, 0.02387, 21.99377, 1.22976, 0.58186,
362 + 0.12326, 0.90683, 1.23452,
363 + 0.06725, 0.02500, 24.59062, 1.32865, 0.68919,
364 + 0.24031, 1.00996, 1.33351 /
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.06881, 0.02608, 27.10899, 1.42708, 0.79538,
367 + 0.35349, 1.11228, 1.43203,
368 + 0.07030, 0.02711, 29.54529, 1.52470, 0.90015,
369 + 0.46499, 1.21348, 1.52973,
370 + 0.07172, 0.02809, 31.90111, 1.62131, 1.00340,
371 + 0.57442, 1.31341, 1.62642,
372 + 0.07308, 0.02903, 34.18138, 1.71683, 1.10511,
373 + 0.68189, 1.41204, 1.72201,
374 + 0.07438, 0.02994, 36.38255, 1.81102, 1.20510,
375 + 0.78726, 1.50913, 1.81626,
376 + 0.07563, 0.03081, 38.48053, 1.90320, 1.30273,
377 + 0.88994, 1.60404, 1.90851,
378 + 0.07684, 0.03164, 40.51802, 1.99423, 1.39890,
379 + 0.99087, 1.69765, 1.99961 /
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.07800, 0.03245, 42.48756, 2.08391, 1.49343,
382 + 1.08989, 1.78975, 2.08934,
383 + 0.07912, 0.03323, 44.35997, 2.17129, 1.58541,
384 + 1.18613, 1.87944, 2.17679,
385 + 0.08020, 0.03399, 46.19490, 2.25790, 1.67639,
386 + 1.28114, 1.96824, 2.26345,
387 + 0.08125, 0.03472, 47.92944, 2.34199, 1.76465,
388 + 1.37323, 2.05441, 2.34759,
389 + 0.08226, 0.03544, 49.62872, 2.42527, 1.85189,
390 + 1.46414, 2.13967, 2.43091 /
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.06076, 0.01989, 7.47539, 0.68073, 0.03133,
393 + 0.00000, 0.35722, 0.68552,
394 + 0.06351, 0.02180, 9.97223, 0.76448, 0.12944,
395 + 0.00000, 0.44819, 0.76942,
396 + 0.06599, 0.02355, 12.46965, 0.85058, 0.22784,
397 + 0.00000, 0.54049, 0.85567,
398 + 0.06826, 0.02514, 14.89576, 0.93728, 0.32526,
399 + 0.00000, 0.63257, 0.94249,
400 + 0.07035, 0.02662, 17.25882, 1.02396, 0.42144,
401 + 0.02033, 0.72403, 1.02929,
402 + 0.07230, 0.02801, 19.54593, 1.11017, 0.51617,
403 + 0.10814, 0.81452, 1.11560,
404 + 0.07414, 0.02932, 21.75473, 1.19587, 0.60964,
405 + 0.21035, 0.90413, 1.20139 /
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.07588, 0.03056, 23.88213, 1.28076, 0.70166,
408 + 0.30870, 0.99260, 1.28637,
409 + 0.07753, 0.03174, 25.92714, 1.36457, 0.79206,
410 + 0.40519, 1.07972, 1.37026,
411 + 0.07910, 0.03286, 27.89279, 1.44717, 0.88077,
412 + 0.49949, 1.16539, 1.45294,
413 + 0.08061, 0.03394, 29.78505, 1.52853, 0.96782,
414 + 0.59175, 1.24961, 1.53437,
415 + 0.08204, 0.03497, 31.60204, 1.60846, 1.05309,
416 + 0.68189, 1.33222, 1.61436,
417 + 0.08343, 0.03596, 33.32407, 1.68638, 1.13603,
418 + 0.76940, 1.41267, 1.69235,
419 + 0.08476, 0.03692, 34.98917, 1.76310, 1.21748,
420 + 0.85516, 1.49177, 1.76913 /
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.08604, 0.03784, 36.59158, 1.83844, 1.29729,
423 + 0.93903, 1.56935, 1.84453,
424 + 0.08728, 0.03873, 38.10712, 1.91161, 1.37470,
425 + 1.02028, 1.64464, 1.91775,
426 + 0.08847, 0.03959, 39.58728, 1.98395, 1.45107,
427 + 1.10029, 1.71901, 1.99014,
428 + 0.08963, 0.04041, 40.97926, 2.05395, 1.52491,
429 + 1.17760, 1.79094, 2.06019,
430 + 0.09075, 0.04122, 42.33871, 2.12312, 1.59774,
431 + 1.25374, 1.86195, 2.12941 /
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.06552, 0.02273, 6.97721, 0.63640, 0.02887,
434 + 0.00000, 0.33384, 0.64150,
435 + 0.06853, 0.02489, 9.25154, 0.71299, 0.11890,
436 + 0.00000, 0.41719, 0.71826,
437 + 0.07124, 0.02685, 11.50403, 0.79122, 0.20863,
438 + 0.00000, 0.50121, 0.79665,
439 + 0.07371, 0.02863, 13.67303, 0.86953, 0.29696,
440 + 0.00002, 0.58456, 0.87509,
441 + 0.07599, 0.03029, 15.77015, 0.94740, 0.38372,
442 + 0.01834, 0.66690, 0.95309,
443 + 0.07811, 0.03183, 17.78607, 1.02450, 0.46879,
444 + 0.09732, 0.74801, 1.03030,
445 + 0.08011, 0.03329, 19.72060, 1.10081, 0.55236,
446 + 0.18896, 0.82796, 1.10670 /
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.08200, 0.03466, 21.57309, 1.17610, 0.63432,
449 + 0.27677, 0.90661, 1.18209,
450 + 0.08380, 0.03597, 23.34392, 1.25015, 0.71453,
451 + 0.36262, 0.98375, 1.25623,
452 + 0.08550, 0.03721, 25.03760, 1.32287, 0.79298,
453 + 0.44622, 1.05935, 1.32903,
454 + 0.08713, 0.03840, 26.66037, 1.39427, 0.86971,
455 + 0.52777, 1.13343, 1.40051,
456 + 0.08869, 0.03954, 28.21049, 1.46420, 0.94464,
457 + 0.60720, 1.20587, 1.47050,
458 + 0.09019, 0.04063, 29.67432, 1.53217, 1.01730,
459 + 0.68409, 1.27620, 1.53854,
460 + 0.09163, 0.04168, 31.08479, 1.59892, 1.08848,
461 + 0.75924, 1.34517, 1.60535 /
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.09302, 0.04269, 32.43724, 1.66431, 1.15805,
464 + 0.83256, 1.41266, 1.67080,
465 + 0.09436, 0.04366, 33.70975, 1.72762, 1.22534,
466 + 0.90340, 1.47796, 1.73417,
467 + 0.09565, 0.04460, 34.94885, 1.79010, 1.29159,
468 + 0.97302, 1.54234, 1.79670,
469 + 0.09690, 0.04551, 36.10852, 1.85038, 1.35546,
470 + 1.04010, 1.60442, 1.85703,
471 + 0.09811, 0.04639, 37.23849, 1.90983, 1.41834,
472 + 1.10603, 1.66559, 1.91652 /
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.08306, 0.03468, 5.62636, 0.51597, 0.02225,
475 + 0.00000, 0.27072, 0.52239,
476 + 0.08703, 0.03776, 7.30762, 0.57341, 0.09065,
477 + 0.00000, 0.33370, 0.58003,
478 + 0.09059, 0.04052, 8.91820, 0.63079, 0.15743,
479 + 0.00000, 0.39583, 0.63757,
480 + 0.09384, 0.04302, 10.42288, 0.68708, 0.22191,
481 + 0.00001, 0.45625, 0.69400,
482 + 0.09682, 0.04531, 11.84112, 0.74211, 0.28420,
483 + 0.01314, 0.51495, 0.74915,
484 + 0.09958, 0.04743, 13.17321, 0.79574, 0.34436,
485 + 0.06936, 0.57187, 0.80289,
486 + 0.10218, 0.04942, 14.42432, 0.84804, 0.40262,
487 + 0.13384, 0.62718, 0.85529 /
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.10463, 0.05128, 15.59858, 0.89896, 0.45901,
490 + 0.19482, 0.68086, 0.90630,
491 + 0.10695, 0.05304, 16.70023, 0.94841, 0.51352,
492 + 0.25373, 0.73286, 0.95584,
493 + 0.10916, 0.05470, 17.73563, 0.99642, 0.56622,
494 + 0.31046, 0.78323, 1.00392,
495 + 0.11125, 0.05629, 18.71164, 1.04304, 0.61723,
496 + 0.36522, 0.83206, 1.05061,
497 + 0.11325, 0.05780, 19.62926, 1.08822, 0.66653,
498 + 0.41804, 0.87932, 1.09586,
499 + 0.11517, 0.05923, 20.48106, 1.13167, 0.71384,
500 + 0.46864, 0.92471, 1.13936,
501 + 0.11701, 0.06060, 21.29117, 1.17396, 0.75978,
502 + 0.51769, 0.96885, 1.18172 /
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.11877, 0.06192, 22.05750, 1.21503, 0.80430,
505 + 0.56513, 1.01165, 1.22284,
506 + 0.12047, 0.06317, 22.76675, 1.25441, 0.84696,
507 + 0.61056, 1.05268, 1.26227,
508 + 0.12211, 0.06439, 23.45059, 1.29300, 0.88867,
509 + 0.65489, 1.09284, 1.30090,
510 + 0.12369, 0.06555, 24.07961, 1.32988, 0.92851,
511 + 0.69723, 1.13121, 1.33782,
512 + 0.12521, 0.06668, 24.68698, 1.36602, 0.96749,
513 + 0.73859, 1.16878, 1.37400 /
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.10659, 0.05365, 4.52734, 0.41874, 0.01687,
516 + 0.00002, 0.21978, 0.42669,
517 + 0.11190, 0.05787, 5.73271, 0.46075, 0.06788,
518 + 0.00001, 0.26634, 0.46889,
519 + 0.11665, 0.06161, 6.84270, 0.50165, 0.11652,
520 + 0.00002, 0.31116, 0.50994,
521 + 0.12094, 0.06495, 7.84306, 0.54081, 0.16243,
522 + 0.00002, 0.35373, 0.54924,
523 + 0.12486, 0.06799, 8.75681, 0.57835, 0.20596,
524 + 0.00920, 0.39430, 0.58687,
525 + 0.12847, 0.07078, 9.59102, 0.61424, 0.24725,
526 + 0.04814, 0.43292, 0.62286,
527 + 0.13186, 0.07335, 10.35507, 0.64866, 0.28662,
528 + 0.09226, 0.46984, 0.65737 /
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.13503, 0.07575, 11.05375, 0.68165, 0.32415,
531 + 0.13337, 0.50511, 0.69044,
532 + 0.13802, 0.07799, 11.69351, 0.71321, 0.35990,
533 + 0.17253, 0.53878, 0.72205,
534 + 0.14084, 0.08010, 12.28241, 0.74340, 0.39402,
535 + 0.20976, 0.57095, 0.75230,
536 + 0.14352, 0.08209, 12.82666, 0.77236, 0.42664,
537 + 0.24529, 0.60176, 0.78131,
538 + 0.14606, 0.08397, 13.32714, 0.80010, 0.45781,
539 + 0.27918, 0.63123, 0.80909,
540 + 0.14848, 0.08575, 13.78036, 0.82638, 0.48732,
541 + 0.31125, 0.65913, 0.83542,
542 + 0.15080, 0.08744, 14.20426, 0.85170, 0.51569,
543 + 0.34202, 0.68599, 0.86078 /
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.15302, 0.08905, 14.59854, 0.87603, 0.54292,
546 + 0.37151, 0.71178, 0.88515,
547 + 0.15514, 0.09057, 14.95536, 0.89911, 0.56875,
548 + 0.39948, 0.73624, 0.90825,
549 + 0.15718, 0.09203, 15.29492, 0.92154, 0.59380,
550 + 0.42656, 0.75999, 0.93072,
551 + 0.15913, 0.09343, 15.59800, 0.94268, 0.61744,
552 + 0.45213, 0.78238, 0.95189,
553 + 0.16102, 0.09478, 15.88724, 0.96326, 0.64040,
554 + 0.47693, 0.80416, 0.97249 /
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.12441, 0.06939, 3.98165, 0.37079, 0.01422,
557 + 0.00002, 0.19472, 0.37969,
558 + 0.13072, 0.07435, 4.95415, 0.40520, 0.05672,
559 + 0.00003, 0.23323, 0.41426,
560 + 0.13632, 0.07871, 5.82556, 0.43811, 0.09659,
561 + 0.00003, 0.26967, 0.44729,
562 + 0.14137, 0.08255, 6.59158, 0.46912, 0.13371,
563 + 0.00003, 0.30376, 0.47841,
564 + 0.14597, 0.08601, 7.27642, 0.49842, 0.16845,
565 + 0.00735, 0.33581, 0.50780,
566 + 0.15019, 0.08916, 7.89017, 0.52610, 0.20103,
567 + 0.03830, 0.36597, 0.53556,
568 + 0.15410, 0.09206, 8.44100, 0.55235, 0.23176,
569 + 0.07307, 0.39448, 0.56186 /
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.15777, 0.09475, 8.93561, 0.57718, 0.26072,
572 + 0.10512, 0.42139, 0.58676,
573 + 0.16120, 0.09724, 9.38150, 0.60070, 0.28808,
574 + 0.13539, 0.44683, 0.61033,
575 + 0.16444, 0.09956, 9.78434, 0.62302, 0.31396,
576 + 0.16395, 0.47095, 0.63268,
577 + 0.16751, 0.10174, 10.15014, 0.64422, 0.33851,
578 + 0.19100, 0.49384, 0.65392,
579 + 0.17040, 0.10379, 10.48254, 0.66433, 0.36176,
580 + 0.21658, 0.51553, 0.67406,
581 + 0.17314, 0.10571, 10.77755, 0.68325, 0.38363,
582 + 0.24065, 0.53593, 0.69301,
583 + 0.17575, 0.10753, 11.04940, 0.70133, 0.40451,
584 + 0.26358, 0.55541, 0.71111 /
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.17823, 0.10927, 11.29810, 0.71857, 0.42439,
587 + 0.28540, 0.57398, 0.72835,
588 + 0.18061, 0.11090, 11.51828, 0.73473, 0.44308,
589 + 0.30592, 0.59141, 0.74454,
590 + 0.18289, 0.11247, 11.72573, 0.75036, 0.46112,
591 + 0.32569, 0.60825, 0.76019,
592 + 0.18507, 0.11393, 11.90742, 0.76496, 0.47802,
593 + 0.34424, 0.62401, 0.77481,
594 + 0.18718, 0.11535, 12.07889, 0.77911, 0.49436,
595 + 0.36216, 0.63925, 0.78896 /
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.13963, 0.08328, 3.63159, 0.34026, 0.01251,
598 + 0.00002, 0.17877, 0.34987,
599 + 0.14675, 0.08874, 4.45618, 0.36979, 0.04961,
600 + 0.00002, 0.21213, 0.37954,
601 + 0.15305, 0.09349, 5.17942, 0.39765, 0.08399,
602 + 0.00003, 0.24329, 0.40749,
603 + 0.15870, 0.09764, 5.80246, 0.42356, 0.11563,
604 + 0.00003, 0.27208, 0.43349,
605 + 0.16381, 0.10136, 6.34982, 0.44777, 0.14495,
606 + 0.00621, 0.29888, 0.45777,
607 + 0.16850, 0.10473, 6.83238, 0.47042, 0.17222,
608 + 0.03227, 0.32386, 0.48048,
609 + 0.17281, 0.10781, 7.25862, 0.49169, 0.19770,
610 + 0.06136, 0.34725, 0.50177 /
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.17684, 0.11065, 7.63543, 0.51164, 0.22155,
613 + 0.08796, 0.36915, 0.52176,
614 + 0.18060, 0.11326, 7.96998, 0.53036, 0.24389,
615 + 0.11291, 0.38969, 0.54051,
616 + 0.18414, 0.11569, 8.26775, 0.54799, 0.26490,
617 + 0.13631, 0.40901, 0.55816,
618 + 0.18747, 0.11795, 8.53430, 0.56461, 0.28469,
619 + 0.15834, 0.42723, 0.57480,
620 + 0.19061, 0.12007, 8.77298, 0.58026, 0.30331,
621 + 0.17905, 0.44437, 0.59047,
622 + 0.19357, 0.12204, 8.98090, 0.59487, 0.32071,
623 + 0.19841, 0.46038, 0.60508,
624 + 0.19637, 0.12391, 9.17000, 0.60875, 0.33725,
625 + 0.21678, 0.47558, 0.61896 /
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.19904, 0.12568, 9.34047, 0.62189, 0.35290,
628 + 0.23416, 0.48998, 0.63210,
629 + 0.20158, 0.12734, 9.48812, 0.63411, 0.36753,
630 + 0.25042, 0.50341, 0.64433,
631 + 0.20402, 0.12892, 9.62581, 0.64588, 0.38159,
632 + 0.26602, 0.51632, 0.65610,
633 + 0.20634, 0.13040, 9.74323, 0.65678, 0.39467,
634 + 0.28058, 0.52832, 0.66700,
635 + 0.20857, 0.13182, 9.85289, 0.66729, 0.40728,
636 + 0.29459, 0.53988, 0.67751 /
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.15327, 0.09584, 3.37937, 0.31835, 0.01131,
639 + 0.00002, 0.16734, 0.32849,
640 + 0.16108, 0.10164, 4.09838, 0.34437, 0.04455,
641 + 0.00004, 0.19701, 0.35462,
642 + 0.16799, 0.10663, 4.71769, 0.36860, 0.07504,
643 + 0.00004, 0.22442, 0.37896,
644 + 0.17410, 0.11100, 5.24194, 0.39092, 0.10283,
645 + 0.00003, 0.24948, 0.40129,
646 + 0.17962, 0.11488, 5.69572, 0.41158, 0.12839,
647 + 0.00545, 0.27260, 0.42199,
648 + 0.18466, 0.11836, 6.08940, 0.43072, 0.15197,
649 + 0.02810, 0.29397, 0.44117,
650 + 0.18930, 0.12152, 6.43224, 0.44857, 0.17388,
651 + 0.05329, 0.31386, 0.45904 /
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.19361, 0.12442, 6.73166, 0.46515, 0.19422,
654 + 0.07616, 0.33233, 0.47565,
655 + 0.19762, 0.12708, 6.99285, 0.48062, 0.21317,
656 + 0.09751, 0.34955, 0.49112,
657 + 0.20136, 0.12954, 7.22282, 0.49508, 0.23088,
658 + 0.11741, 0.36563, 0.50557,
659 + 0.20488, 0.13183, 7.42642, 0.50861, 0.24747,
660 + 0.13604, 0.38068, 0.51910,
661 + 0.20821, 0.13395, 7.60415, 0.52126, 0.26300,
662 + 0.15348, 0.39478, 0.53177,
663 + 0.21131, 0.13594, 7.75704, 0.53297, 0.27742,
664 + 0.16968, 0.40784, 0.54346,
665 + 0.21425, 0.13780, 7.89445, 0.54405, 0.29106,
666 + 0.18501, 0.42021, 0.55452 /
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.21706, 0.13954, 8.01655, 0.55450, 0.30395,
669 + 0.19948, 0.43188, 0.56497,
670 + 0.21971, 0.14116, 8.11928, 0.56413, 0.31590,
671 + 0.21292, 0.44266, 0.57459,
672 + 0.22226, 0.14271, 8.21397, 0.57335, 0.32734,
673 + 0.22578, 0.45299, 0.58380,
674 + 0.22466, 0.14416, 8.29227, 0.58183, 0.33794,
675 + 0.23772, 0.46253, 0.59226,
676 + 0.22696, 0.14554, 8.36434, 0.58997, 0.34812,
677 + 0.24917, 0.47169, 0.60038 /
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.21004, 0.14651, 2.68652, 0.25825, 0.00799,
680 + 0.00001, 0.13599, 0.26981,
681 + 0.22012, 0.15270, 3.12191, 0.27451, 0.03088,
682 + 0.00002, 0.15558, 0.28606,
683 + 0.22881, 0.15789, 3.47119, 0.28899, 0.05113,
684 + 0.00000, 0.17293, 0.30048,
685 + 0.23634, 0.16230, 3.74667, 0.30175, 0.06897,
686 + 0.00002, 0.18823, 0.31316,
687 + 0.24302, 0.16610, 3.96980, 0.31313, 0.08491,
688 + 0.00345, 0.20186, 0.32446,
689 + 0.24902, 0.16942, 4.15146, 0.32331, 0.09921,
690 + 0.01754, 0.21410, 0.33457,
691 + 0.25445, 0.17234, 4.29869, 0.33243, 0.11214,
692 + 0.03288, 0.22511, 0.34364 /
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.25940, 0.17494, 4.41846, 0.34064, 0.12387,
695 + 0.04651, 0.23506, 0.35179,
696 + 0.26393, 0.17728, 4.51544, 0.34807, 0.13457,
697 + 0.05900, 0.24411, 0.35914,
698 + 0.26810, 0.17939, 4.59424, 0.35478, 0.14434,
699 + 0.07041, 0.25234, 0.36577,
700 + 0.27196, 0.18131, 4.65814, 0.36087, 0.15331,
701 + 0.08088, 0.25985, 0.37179,
702 + 0.27555, 0.18305, 4.70790, 0.36640, 0.16155,
703 + 0.09055, 0.26672, 0.37727,
704 + 0.27887, 0.18461, 4.74467, 0.37133, 0.16904,
705 + 0.09936, 0.27290, 0.38211,
706 + 0.28198, 0.18603, 4.77407, 0.37585, 0.17599,
707 + 0.10755, 0.27863, 0.38658 /
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.28491, 0.18734, 4.79632, 0.37997, 0.18244,
710 + 0.11516, 0.28391, 0.39067,
711 + 0.28761, 0.18853, 4.80952, 0.38366, 0.18832,
712 + 0.12214, 0.28868, 0.39427,
713 + 0.29017, 0.18966, 4.81959, 0.38712, 0.19387,
714 + 0.12874, 0.29317, 0.39766,
715 + 0.29255, 0.19067, 4.82134, 0.39014, 0.19888,
716 + 0.13475, 0.29717, 0.40063,
717 + 0.29483, 0.19162, 4.82118, 0.39298, 0.20364,
718 + 0.14045, 0.30095, 0.40342 /
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.30013, 0.21489, 2.09615, 0.20512, 0.00519,
721 + -0.00012, 0.10809, 0.21700,
722 + 0.31140, 0.21926, 2.30651, 0.21297, 0.01984,
723 + -0.00014, 0.11928, 0.22464,
724 + 0.32072, 0.22263, 2.45504, 0.21947, 0.03220,
725 + -0.00009, 0.12866, 0.23086,
726 + 0.32846, 0.22525, 2.55577, 0.22471, 0.04260,
727 + -0.00010, 0.13640, 0.23586,
728 + 0.33509, 0.22729, 2.62536, 0.22904, 0.05153,
729 + 0.00184, 0.14297, 0.23996,
730 + 0.34081, 0.22892, 2.67192, 0.23257, 0.05927,
731 + 0.00979, 0.14856, 0.24331,
732 + 0.34585, 0.23018, 2.70094, 0.23551, 0.06605,
733 + 0.01828, 0.15339, 0.24606 /
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.35029, 0.23117, 2.71617, 0.23789, 0.07198,
736 + 0.02557, 0.15751, 0.24826,
737 + 0.35420, 0.23194, 2.72121, 0.23981, 0.07722,
738 + 0.03208, 0.16107, 0.25005,
739 + 0.35766, 0.23253, 2.71849, 0.24139, 0.08186,
740 + 0.03789, 0.16414, 0.25147,
741 + 0.36075, 0.23298, 2.70995, 0.24268, 0.08600,
742 + 0.04311, 0.16681, 0.25259,
743 + 0.36354, 0.23329, 2.69663, 0.24370, 0.08972,
744 + 0.04784, 0.16913, 0.25347,
745 + 0.36598, 0.23347, 2.67878, 0.24441, 0.09297,
746 + 0.05202, 0.17107, 0.25402,
747 + 0.36820, 0.23358, 2.65897, 0.24492, 0.09591,
748 + 0.05581, 0.17278, 0.25442 /
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.37022, 0.23363, 2.63718, 0.24526, 0.09856,
751 + 0.05923, 0.17425, 0.25470,
752 + 0.37200, 0.23356, 2.61265, 0.24543, 0.10088,
753 + 0.06236, 0.17546, 0.25478,
754 + 0.37367, 0.23346, 2.58826, 0.24555, 0.10303,
755 + 0.06528, 0.17656, 0.25480,
756 + 0.37511, 0.23330, 2.56176, 0.24547, 0.10490,
757 + 0.06783, 0.17744, 0.25457,
758 + 0.37645, 0.23311, 2.53572, 0.24535, 0.10664,
759 + 0.07022, 0.17823, 0.25431 /
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.37435, 0.25824, 1.77708, 0.17306, 0.00395,
762 + 0.00000, 0.09130, 0.18433,
763 + 0.38426, 0.25969, 1.88087, 0.17665, 0.01458,
764 + -0.00001, 0.09834, 0.18753,
765 + 0.39209, 0.26040, 1.94096, 0.17928, 0.02324,
766 + 0.00005, 0.10392, 0.18977,
767 + 0.39827, 0.26051, 1.96970, 0.18099, 0.03031,
768 + 0.00003, 0.10822, 0.19124,
769 + 0.40327, 0.26026, 1.97969, 0.18217, 0.03619,
770 + 0.00132, 0.11167, 0.19206,
771 + 0.40739, 0.25974, 1.97654, 0.18287, 0.04114,
772 + 0.00664, 0.11444, 0.19248,
773 + 0.41076, 0.25907, 1.96431, 0.18316, 0.04541,
774 + 0.01216, 0.11669, 0.19263 /
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.41354, 0.25821, 1.94539, 0.18320, 0.04903,
777 + 0.01685, 0.11844, 0.19245,
778 + 0.41575, 0.25730, 1.92203, 0.18305, 0.05210,
779 + 0.02097, 0.11985, 0.19206,
780 + 0.41757, 0.25630, 1.89570, 0.18271, 0.05476,
781 + 0.02456, 0.12095, 0.19149,
782 + 0.41912, 0.25520, 1.86760, 0.18219, 0.05709,
783 + 0.02772, 0.12181, 0.19079,
784 + 0.42040, 0.25403, 1.83844, 0.18150, 0.05913,
785 + 0.03057, 0.12249, 0.18997,
786 + 0.42129, 0.25288, 1.80774, 0.18075, 0.06086,
787 + 0.03303, 0.12291, 0.18904,
788 + 0.42201, 0.25171, 1.77732, 0.17993, 0.06240,
789 + 0.03524, 0.12322, 0.18807 /
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.42260, 0.25049, 1.74710, 0.17905, 0.06377,
792 + 0.03722, 0.12341, 0.18706,
793 + 0.42298, 0.24922, 1.71651, 0.17808, 0.06489,
794 + 0.03895, 0.12347, 0.18597,
795 + 0.42328, 0.24799, 1.68711, 0.17712, 0.06590,
796 + 0.04053, 0.12348, 0.18490,
797 + 0.42338, 0.24674, 1.65738, 0.17610, 0.06673,
798 + 0.04189, 0.12335, 0.18372,
799 + 0.42342, 0.24553, 1.62891, 0.17508, 0.06750,
800 + 0.04314, 0.12320, 0.18258 /
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.43672, 0.28564, 1.55169, 0.14808, 0.00311,
803 + 0.00008, 0.07818, 0.15829,
804 + 0.44382, 0.28390, 1.59176, 0.14907, 0.01129,
805 + 0.00006, 0.08264, 0.15881,
806 + 0.44892, 0.28182, 1.60210, 0.14940, 0.01774,
807 + 0.00005, 0.08594, 0.15868,
808 + 0.45254, 0.27937, 1.59256, 0.14913, 0.02284,
809 + 0.00009, 0.08827, 0.15816,
810 + 0.45506, 0.27697, 1.57257, 0.14859, 0.02697,
811 + 0.00103, 0.09001, 0.15730,
812 + 0.45677, 0.27446, 1.54594, 0.14781, 0.03037,
813 + 0.00483, 0.09126, 0.15625,
814 + 0.45785, 0.27196, 1.51525, 0.14685, 0.03319,
815 + 0.00876, 0.09212, 0.15502 /
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.45843, 0.26944, 1.48214, 0.14579, 0.03556,
818 + 0.01200, 0.09270, 0.15363,
819 + 0.45864, 0.26691, 1.44787, 0.14457, 0.03754,
820 + 0.01480, 0.09304, 0.15222,
821 + 0.45855, 0.26441, 1.41340, 0.14326, 0.03920,
822 + 0.01719, 0.09317, 0.15077,
823 + 0.45820, 0.26198, 1.37933, 0.14192, 0.04062,
824 + 0.01926, 0.09315, 0.14928,
825 + 0.45763, 0.25960, 1.34583, 0.14053, 0.04185,
826 + 0.02106, 0.09305, 0.14774,
827 + 0.45678, 0.25725, 1.31263, 0.13917, 0.04282,
828 + 0.02266, 0.09281, 0.14618,
829 + 0.45583, 0.25498, 1.28073, 0.13783, 0.04365,
830 + 0.02406, 0.09251, 0.14464 /
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.45480, 0.25276, 1.24994, 0.13650, 0.04436,
833 + 0.02527, 0.09215, 0.14310,
834 + 0.45364, 0.25053, 1.21982, 0.13508, 0.04494,
835 + 0.02634, 0.09170, 0.14164,
836 + 0.45246, 0.24839, 1.19131, 0.13371, 0.04545,
837 + 0.02732, 0.09125, 0.14024,
838 + 0.45108, 0.24633, 1.16340, 0.13238, 0.04583,
839 + 0.02811, 0.09073, 0.13868,
840 + 0.44972, 0.24433, 1.13695, 0.13109, 0.04617,
841 + 0.02883, 0.09021, 0.13720 /
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.48847, 0.30165, 1.37264, 0.12695, 0.00253,
844 + 0.00008, 0.06700, 0.13583,
845 + 0.49191, 0.29675, 1.37121, 0.12624, 0.00888,
846 + 0.00007, 0.06973, 0.13474,
847 + 0.49363, 0.29197, 1.35088, 0.12521, 0.01381,
848 + 0.00007, 0.07156, 0.13324,
849 + 0.49399, 0.28740, 1.31920, 0.12382, 0.01760,
850 + 0.00011, 0.07267, 0.13153,
851 + 0.49353, 0.28301, 1.28289, 0.12237, 0.02064,
852 + 0.00078, 0.07336, 0.12966,
853 + 0.49259, 0.27868, 1.24451, 0.12077, 0.02308,
854 + 0.00362, 0.07369, 0.12781,
855 + 0.49116, 0.27455, 1.20543, 0.11907, 0.02504,
856 + 0.00644, 0.07377, 0.12595 /
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.48944, 0.27055, 1.16658, 0.11735, 0.02666,
859 + 0.00878, 0.07369, 0.12405,
860 + 0.48741, 0.26671, 1.12864, 0.11568, 0.02797,
861 + 0.01076, 0.07344, 0.12213,
862 + 0.48517, 0.26305, 1.09201, 0.11402, 0.02902,
863 + 0.01242, 0.07310, 0.12027,
864 + 0.48279, 0.25956, 1.05697, 0.11238, 0.02987,
865 + 0.01384, 0.07270, 0.11845,
866 + 0.48024, 0.25626, 1.02352, 0.11080, 0.03059,
867 + 0.01513, 0.07222, 0.11657,
868 + 0.47763, 0.25296, 0.99127, 0.10920, 0.03118,
869 + 0.01618, 0.07165, 0.11477,
870 + 0.47505, 0.24978, 0.96083, 0.10761, 0.03167,
871 + 0.01708, 0.07106, 0.11309 /
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.47250, 0.24668, 0.93196, 0.10602, 0.03206,
874 + 0.01784, 0.07044, 0.11154,
875 + 0.46978, 0.24376, 0.90429, 0.10453, 0.03235,
876 + 0.01852, 0.06979, 0.10986,
877 + 0.46711, 0.24099, 0.87835, 0.10313, 0.03259,
878 + 0.01915, 0.06916, 0.10823,
879 + 0.46439, 0.23822, 0.85343, 0.10169, 0.03276,
880 + 0.01967, 0.06850, 0.10671,
881 + 0.46175, 0.23558, 0.83000, 0.10032, 0.03290,
882 + 0.02013, 0.06785, 0.10524 /
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.53953, 0.30942, 1.18740, 0.10410, 0.00193,
885 + 0.00004, 0.05492, 0.11164,
886 + 0.53742, 0.30119, 1.15255, 0.10223, 0.00679,
887 + 0.00006, 0.05631, 0.10926,
888 + 0.53429, 0.29360, 1.10937, 0.10028, 0.01038,
889 + 0.00008, 0.05698, 0.10680,
890 + 0.53041, 0.28651, 1.06249, 0.09814, 0.01312,
891 + 0.00010, 0.05722, 0.10436,
892 + 0.52610, 0.28000, 1.01611, 0.09603, 0.01517,
893 + 0.00061, 0.05716, 0.10209,
894 + 0.52157, 0.27391, 0.97144, 0.09401, 0.01682,
895 + 0.00259, 0.05692, 0.09977,
896 + 0.51681, 0.26826, 0.92871, 0.09206, 0.01812,
897 + 0.00457, 0.05649, 0.09746 /
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.51212, 0.26280, 0.88821, 0.09009, 0.01910,
900 + 0.00617, 0.05597, 0.09534,
901 + 0.50735, 0.25767, 0.85014, 0.08816, 0.01993,
902 + 0.00751, 0.05538, 0.09328,
903 + 0.50252, 0.25288, 0.81454, 0.08634, 0.02059,
904 + 0.00865, 0.05474, 0.09127,
905 + 0.49772, 0.24836, 0.78133, 0.08462, 0.02109,
906 + 0.00960, 0.05407, 0.08933,
907 + 0.49297, 0.24408, 0.75025, 0.08296, 0.02148,
908 + 0.01036, 0.05342, 0.08747,
909 + 0.48833, 0.23990, 0.72100, 0.08134, 0.02177,
910 + 0.01102, 0.05271, 0.08567,
911 + 0.48378, 0.23595, 0.69387, 0.07980, 0.02198,
912 + 0.01161, 0.05200, 0.08398 /
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.47926, 0.23221, 0.66857, 0.07833, 0.02212,
915 + 0.01212, 0.05129, 0.08240,
916 + 0.47483, 0.22860, 0.64465, 0.07686, 0.02222,
917 + 0.01250, 0.05062, 0.08082,
918 + 0.47057, 0.22518, 0.62242, 0.07546, 0.02231,
919 + 0.01282, 0.04997, 0.07931,
920 + 0.46632, 0.22186, 0.60137, 0.07411, 0.02235,
921 + 0.01311, 0.04926, 0.07788,
922 + 0.46222, 0.21870, 0.58173, 0.07283, 0.02237,
923 + 0.01336, 0.04859, 0.07650 /
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.57633, 0.30733, 1.03032, 0.08465, 0.00158,
926 + 0.00012, 0.04476, 0.09074,
927 + 0.56850, 0.29621, 0.97512, 0.08219, 0.00528,
928 + 0.00016, 0.04521, 0.08790,
929 + 0.56023, 0.28646, 0.91944, 0.07979, 0.00791,
930 + 0.00014, 0.04524, 0.08519,
931 + 0.55194, 0.27751, 0.86550, 0.07745, 0.00985,
932 + 0.00013, 0.04497, 0.08247,
933 + 0.54388, 0.26931, 0.81547, 0.07519, 0.01136,
934 + 0.00051, 0.04452, 0.07992,
935 + 0.53587, 0.26193, 0.76943, 0.07311, 0.01248,
936 + 0.00195, 0.04393, 0.07753,
937 + 0.52802, 0.25510, 0.72705, 0.07105, 0.01329,
938 + 0.00335, 0.04330, 0.07532 /
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.52045, 0.24865, 0.68803, 0.06913, 0.01395,
941 + 0.00447, 0.04263, 0.07316,
942 + 0.51307, 0.24271, 0.65228, 0.06728, 0.01446,
943 + 0.00539, 0.04186, 0.07118,
944 + 0.50591, 0.23714, 0.61950, 0.06551, 0.01483,
945 + 0.00616, 0.04116, 0.06927,
946 + 0.49900, 0.23186, 0.58943, 0.06385, 0.01509,
947 + 0.00680, 0.04055, 0.06742,
948 + 0.49233, 0.22685, 0.56185, 0.06230, 0.01529,
949 + 0.00732, 0.03984, 0.06573,
950 + 0.48575, 0.22220, 0.53623, 0.06080, 0.01544,
951 + 0.00773, 0.03909, 0.06412,
952 + 0.47945, 0.21780, 0.51271, 0.05940, 0.01555,
953 + 0.00809, 0.03836, 0.06259 /
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.47341, 0.21360, 0.49099, 0.05809, 0.01563,
956 + 0.00841, 0.03764, 0.06110,
957 + 0.46753, 0.20956, 0.47080, 0.05677, 0.01565,
958 + 0.00869, 0.03698, 0.05972,
959 + 0.46190, 0.20575, 0.45219, 0.05551, 0.01564,
960 + 0.00893, 0.03635, 0.05842,
961 + 0.45634, 0.20213, 0.43474, 0.05435, 0.01558,
962 + 0.00906, 0.03572, 0.05715,
963 + 0.45103, 0.19867, 0.41857, 0.05323, 0.01552,
964 + 0.00918, 0.03512, 0.05596 /
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.59996, 0.29826, 0.89347, 0.06814, 0.00117,
967 + 0.00004, 0.03597, 0.07309,
968 + 0.58637, 0.28495, 0.82658, 0.06549, 0.00403,
969 + -0.00001, 0.03595, 0.07010,
970 + 0.57337, 0.27331, 0.76486, 0.06305, 0.00608,
971 + 0.00002, 0.03564, 0.06722,
972 + 0.56089, 0.26301, 0.70869, 0.06075, 0.00751,
973 + 0.00001, 0.03514, 0.06452,
974 + 0.54925, 0.25365, 0.65873, 0.05848, 0.00858,
975 + 0.00035, 0.03449, 0.06219,
976 + 0.53815, 0.24527, 0.61410, 0.05646, 0.00931,
977 + 0.00139, 0.03388, 0.05991,
978 + 0.52753, 0.23767, 0.57406, 0.05450, 0.00991,
979 + 0.00243, 0.03321, 0.05781 /
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.51747, 0.23057, 0.53806, 0.05266, 0.01035,
982 + 0.00324, 0.03245, 0.05595,
983 + 0.50785, 0.22400, 0.50557, 0.05102, 0.01067,
984 + 0.00397, 0.03169, 0.05412,
985 + 0.49862, 0.21793, 0.47630, 0.04946, 0.01090,
986 + 0.00453, 0.03099, 0.05241,
987 + 0.48984, 0.21226, 0.44993, 0.04795, 0.01104,
988 + 0.00493, 0.03033, 0.05085,
989 + 0.48156, 0.20686, 0.42605, 0.04657, 0.01109,
990 + 0.00528, 0.02966, 0.04941,
991 + 0.47345, 0.20197, 0.40396, 0.04529, 0.01119,
992 + 0.00558, 0.02899, 0.04791,
993 + 0.46577, 0.19730, 0.38391, 0.04405, 0.01124,
994 + 0.00582, 0.02836, 0.04656 /
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.45847, 0.19279, 0.36563, 0.04282, 0.01122,
997 + 0.00598, 0.02776, 0.04540,
998 + 0.45139, 0.18858, 0.34877, 0.04171, 0.01120,
999 + 0.00611, 0.02718, 0.04420,
1000 + 0.44463, 0.18464, 0.33331, 0.04067, 0.01116,
1001 + 0.00623, 0.02663, 0.04305,
1002 + 0.43794, 0.18095, 0.31892, 0.03970, 0.01109,
1003 + 0.00631, 0.02609, 0.04196,
1004 + 0.43162, 0.17744, 0.30570, 0.03879, 0.01102,
1005 + 0.00639, 0.02557, 0.04092 /
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.61180, 0.28403, 0.77290, 0.05428, 0.00091,
1008 + 0.00000, 0.02857, 0.05826,
1009 + 0.59269, 0.26924, 0.70031, 0.05176, 0.00312,
1010 + 0.00002, 0.02829, 0.05523,
1011 + 0.57527, 0.25644, 0.63701, 0.04948, 0.00456,
1012 + 0.00006, 0.02779, 0.05255,
1013 + 0.55906, 0.24517, 0.58177, 0.04728, 0.00569,
1014 + 0.00004, 0.02721, 0.05008,
1015 + 0.54419, 0.23517, 0.53394, 0.04516, 0.00643,
1016 + 0.00029, 0.02654, 0.04800,
1017 + 0.53038, 0.22615, 0.49229, 0.04336, 0.00698,
1018 + 0.00105, 0.02587, 0.04596,
1019 + 0.51721, 0.21817, 0.45567, 0.04177, 0.00734,
1020 + 0.00181, 0.02519, 0.04405 /
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.50499, 0.21076, 0.42329, 0.04019, 0.00764,
1023 + 0.00240, 0.02456, 0.04228,
1024 + 0.49362, 0.20380, 0.39454, 0.03862, 0.00781,
1025 + 0.00283, 0.02388, 0.04084,
1026 + 0.48275, 0.19751, 0.36890, 0.03726, 0.00795,
1027 + 0.00317, 0.02319, 0.03942,
1028 + 0.47243, 0.19176, 0.34601, 0.03604, 0.00806,
1029 + 0.00347, 0.02253, 0.03801,
1030 + 0.46286, 0.18624, 0.32555, 0.03477, 0.00806,
1031 + 0.00373, 0.02193, 0.03685,
1032 + 0.45349, 0.18125, 0.30698, 0.03370, 0.00809,
1033 + 0.00390, 0.02141, 0.03556,
1034 + 0.44468, 0.17651, 0.29019, 0.03269, 0.00808,
1035 + 0.00407, 0.02090, 0.03441 /
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.43638, 0.17197, 0.27493, 0.03172, 0.00804,
1038 + 0.00424, 0.02039, 0.03342,
1039 + 0.42838, 0.16779, 0.26109, 0.03080, 0.00800,
1040 + 0.00434, 0.01988, 0.03244,
1041 + 0.42080, 0.16388, 0.24849, 0.02993, 0.00796,
1042 + 0.00442, 0.01940, 0.03152,
1043 + 0.41343, 0.16018, 0.23672, 0.02914, 0.00787,
1044 + 0.00442, 0.01892, 0.03067,
1045 + 0.40644, 0.15669, 0.22597, 0.02840, 0.00779,
1046 + 0.00443, 0.01846, 0.02987 /
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.61300, 0.26638, 0.66597, 0.04286, 0.00064,
1049 + 0.00008, 0.02243, 0.04577,
1050 + 0.58913, 0.25049, 0.59189, 0.04046, 0.00237,
1051 + 0.00008, 0.02216, 0.04297,
1052 + 0.56777, 0.23695, 0.52989, 0.03826, 0.00346,
1053 + 0.00008, 0.02154, 0.04078,
1054 + 0.54829, 0.22528, 0.47756, 0.03639, 0.00427,
1055 + 0.00009, 0.02089, 0.03856,
1056 + 0.53078, 0.21480, 0.43304, 0.03459, 0.00480,
1057 + 0.00021, 0.02024, 0.03676,
1058 + 0.51459, 0.20567, 0.39519, 0.03298, 0.00517,
1059 + 0.00076, 0.01964, 0.03504,
1060 + 0.49960, 0.19740, 0.36238, 0.03151, 0.00548,
1061 + 0.00133, 0.01896, 0.03347 /
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.48565, 0.18994, 0.33366, 0.03022, 0.00567,
1064 + 0.00171, 0.01838, 0.03193,
1065 + 0.47260, 0.18312, 0.30864, 0.02906, 0.00576,
1066 + 0.00198, 0.01783, 0.03052,
1067 + 0.46044, 0.17683, 0.28664, 0.02797, 0.00583,
1068 + 0.00223, 0.01727, 0.02928,
1069 + 0.44908, 0.17100, 0.26714, 0.02694, 0.00589,
1070 + 0.00247, 0.01671, 0.02818,
1071 + 0.43838, 0.16554, 0.24979, 0.02594, 0.00593,
1072 + 0.00270, 0.01620, 0.02720,
1073 + 0.42825, 0.16055, 0.23419, 0.02502, 0.00590,
1074 + 0.00284, 0.01574, 0.02619,
1075 + 0.41871, 0.15591, 0.22028, 0.02416, 0.00585,
1076 + 0.00292, 0.01531, 0.02529 /
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.40969, 0.15156, 0.20783, 0.02333, 0.00577,
1079 + 0.00296, 0.01490, 0.02450,
1080 + 0.40101, 0.14755, 0.19640, 0.02262, 0.00570,
1081 + 0.00301, 0.01446, 0.02372,
1082 + 0.39283, 0.14380, 0.18606, 0.02197, 0.00564,
1083 + 0.00305, 0.01405, 0.02299,
1084 + 0.38512, 0.14008, 0.17672, 0.02129, 0.00559,
1085 + 0.00309, 0.01369, 0.02228,
1086 + 0.37778, 0.13663, 0.16816, 0.02065, 0.00553,
1087 + 0.00312, 0.01334, 0.02163 /
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.60505, 0.24641, 0.57098, 0.03341, 0.00055,
1090 + 0.00001, 0.01754, 0.03535,
1091 + 0.57715, 0.22979, 0.49826, 0.03116, 0.00182,
1092 + 0.00005, 0.01707, 0.03323,
1093 + 0.55242, 0.21595, 0.43921, 0.02926, 0.00283,
1094 + 0.00002, 0.01659, 0.03104,
1095 + 0.53033, 0.20407, 0.39068, 0.02764, 0.00335,
1096 + 0.00009, 0.01595, 0.02929,
1097 + 0.51047, 0.19377, 0.35043, 0.02612, 0.00374,
1098 + 0.00023, 0.01529, 0.02777,
1099 + 0.49247, 0.18462, 0.31648, 0.02487, 0.00398,
1100 + 0.00064, 0.01477, 0.02625,
1101 + 0.47596, 0.17644, 0.28761, 0.02362, 0.00419,
1102 + 0.00095, 0.01424, 0.02497 /
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.46064, 0.16916, 0.26274, 0.02253, 0.00424,
1105 + 0.00125, 0.01375, 0.02382,
1106 + 0.44659, 0.16240, 0.24127, 0.02153, 0.00430,
1107 + 0.00150, 0.01328, 0.02271,
1108 + 0.43346, 0.15628, 0.22253, 0.02068, 0.00429,
1109 + 0.00167, 0.01282, 0.02171,
1110 + 0.42119, 0.15072, 0.20607, 0.01991, 0.00425,
1111 + 0.00178, 0.01235, 0.02083,
1112 + 0.40990, 0.14547, 0.19155, 0.01906, 0.00430,
1113 + 0.00189, 0.01188, 0.02003,
1114 + 0.39918, 0.14066, 0.17887, 0.01833, 0.00426,
1115 + 0.00201, 0.01147, 0.01927,
1116 + 0.38916, 0.13620, 0.16751, 0.01763, 0.00421,
1117 + 0.00209, 0.01110, 0.01859 /
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.37974, 0.13203, 0.15724, 0.01695, 0.00416,
1120 + 0.00210, 0.01077, 0.01798,
1121 + 0.37084, 0.12813, 0.14796, 0.01634, 0.00412,
1122 + 0.00213, 0.01044, 0.01732,
1123 + 0.36247, 0.12451, 0.13959, 0.01578, 0.00408,
1124 + 0.00215, 0.01014, 0.01670,
1125 + 0.35437, 0.12114, 0.13203, 0.01528, 0.00400,
1126 + 0.00218, 0.00984, 0.01615,
1127 + 0.34671, 0.11797, 0.12517, 0.01481, 0.00393,
1128 + 0.00219, 0.00957, 0.01563 /
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.58954, 0.22478, 0.48679, 0.02554, 0.00046,
1131 + 0.00010, 0.01354, 0.02713,
1132 + 0.55783, 0.20837, 0.41754, 0.02375, 0.00155,
1133 + 0.00004, 0.01304, 0.02512,
1134 + 0.53047, 0.19458, 0.36280, 0.02216, 0.00217,
1135 + 0.00009, 0.01257, 0.02346,
1136 + 0.50623, 0.18291, 0.31868, 0.02078, 0.00257,
1137 + 0.00012, 0.01199, 0.02208,
1138 + 0.48459, 0.17289, 0.28261, 0.01964, 0.00276,
1139 + 0.00015, 0.01153, 0.02074,
1140 + 0.46534, 0.16399, 0.25296, 0.01852, 0.00288,
1141 + 0.00047, 0.01102, 0.01971,
1142 + 0.44781, 0.15608, 0.22776, 0.01751, 0.00304,
1143 + 0.00077, 0.01059, 0.01860 /
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.43160, 0.14906, 0.20665, 0.01674, 0.00313,
1146 + 0.00090, 0.01014, 0.01755,
1147 + 0.41675, 0.14264, 0.18838, 0.01601, 0.00313,
1148 + 0.00109, 0.00971, 0.01672,
1149 + 0.40311, 0.13677, 0.17264, 0.01526, 0.00312,
1150 + 0.00126, 0.00934, 0.01597,
1151 + 0.39060, 0.13141, 0.15908, 0.01450, 0.00312,
1152 + 0.00135, 0.00901, 0.01526,
1153 + 0.37913, 0.12652, 0.14720, 0.01371, 0.00311,
1154 + 0.00136, 0.00867, 0.01461,
1155 + 0.36790, 0.12200, 0.13660, 0.01324, 0.00310,
1156 + 0.00144, 0.00836, 0.01398,
1157 + 0.35764, 0.11778, 0.12722, 0.01273, 0.00306,
1158 + 0.00149, 0.00806, 0.01344 /
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.34831, 0.11381, 0.11888, 0.01213, 0.00298,
1161 + 0.00149, 0.00776, 0.01297,
1162 + 0.33905, 0.11027, 0.11151, 0.01168, 0.00295,
1163 + 0.00155, 0.00754, 0.01253,
1164 + 0.33035, 0.10698, 0.10490, 0.01127, 0.00292,
1165 + 0.00159, 0.00735, 0.01212,
1166 + 0.32231, 0.10376, 0.09886, 0.01087, 0.00284,
1167 + 0.00156, 0.00710, 0.01171,
1168 + 0.31471, 0.10076, 0.09342, 0.01051, 0.00279,
1169 + 0.00153, 0.00687, 0.01131 /
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.56688, 0.20310, 0.41234, 0.01932, 0.00037,
1172 + 0.00010, 0.01025, 0.02057,
1173 + 0.53263, 0.18681, 0.34778, 0.01782, 0.00114,
1174 + 0.00000, 0.00983, 0.01899,
1175 + 0.50313, 0.17350, 0.29790, 0.01659, 0.00163,
1176 + 0.00010, 0.00946, 0.01757,
1177 + 0.47731, 0.16225, 0.25853, 0.01552, 0.00192,
1178 + 0.00007, 0.00903, 0.01634,
1179 + 0.45481, 0.15248, 0.22705, 0.01446, 0.00214,
1180 + 0.00016, 0.00866, 0.01526,
1181 + 0.43472, 0.14398, 0.20114, 0.01356, 0.00225,
1182 + 0.00036, 0.00822, 0.01442,
1183 + 0.41654, 0.13646, 0.17977, 0.01277, 0.00233,
1184 + 0.00055, 0.00784, 0.01362 /
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.39984, 0.12979, 0.16184, 0.01210, 0.00234,
1187 + 0.00073, 0.00747, 0.01294,
1188 + 0.38473, 0.12375, 0.14652, 0.01151, 0.00232,
1189 + 0.00084, 0.00716, 0.01224,
1190 + 0.37088, 0.11829, 0.13346, 0.01094, 0.00234,
1191 + 0.00090, 0.00685, 0.01159,
1192 + 0.35807, 0.11336, 0.12224, 0.01040, 0.00233,
1193 + 0.00094, 0.00654, 0.01103,
1194 + 0.34617, 0.10884, 0.11247, 0.00994, 0.00222,
1195 + 0.00101, 0.00634, 0.01056,
1196 + 0.33523, 0.10466, 0.10394, 0.00940, 0.00222,
1197 + 0.00105, 0.00607, 0.01014,
1198 + 0.32500, 0.10079, 0.09643, 0.00897, 0.00223,
1199 + 0.00109, 0.00582, 0.00973 /
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.31536, 0.09720, 0.08980, 0.00866, 0.00222,
1202 + 0.00115, 0.00561, 0.00934,
1203 + 0.30640, 0.09388, 0.08383, 0.00825, 0.00216,
1204 + 0.00112, 0.00541, 0.00897,
1205 + 0.29806, 0.09080, 0.07851, 0.00786, 0.00209,
1206 + 0.00109, 0.00522, 0.00863,
1207 + 0.29018, 0.08785, 0.07380, 0.00757, 0.00206,
1208 + 0.00111, 0.00504, 0.00829,
1209 + 0.28273, 0.08512, 0.06954, 0.00732, 0.00203,
1210 + 0.00113, 0.00487, 0.00798 /
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.53888, 0.18160, 0.34717, 0.01472, 0.00020,
1213 + -0.00007, 0.00753, 0.01533,
1214 + 0.50255, 0.16608, 0.28792, 0.01347, 0.00077,
1215 + -0.00004, 0.00723, 0.01407,
1216 + 0.47171, 0.15342, 0.24361, 0.01246, 0.00112,
1217 + -0.00012, 0.00691, 0.01296,
1218 + 0.44538, 0.14248, 0.20883, 0.01144, 0.00141,
1219 + -0.00006, 0.00651, 0.01211,
1220 + 0.42220, 0.13331, 0.18143, 0.01066, 0.00150,
1221 + -0.00005, 0.00622, 0.01131,
1222 + 0.40163, 0.12535, 0.15956, 0.00999, 0.00158,
1223 + 0.00014, 0.00593, 0.01058,
1224 + 0.38321, 0.11843, 0.14159, 0.00930, 0.00167,
1225 + 0.00033, 0.00564, 0.00997 /
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.36668, 0.11216, 0.12646, 0.00877, 0.00168,
1228 + 0.00042, 0.00530, 0.00939,
1229 + 0.35141, 0.10663, 0.11384, 0.00842, 0.00169,
1230 + 0.00054, 0.00508, 0.00877,
1231 + 0.33765, 0.10162, 0.10312, 0.00791, 0.00168,
1232 + 0.00062, 0.00490, 0.00832,
1233 + 0.32516, 0.09702, 0.09393, 0.00738, 0.00166,
1234 + 0.00065, 0.00470, 0.00799,
1235 + 0.31329, 0.09287, 0.08602, 0.00716, 0.00163,
1236 + 0.00068, 0.00450, 0.00758,
1237 + 0.30256, 0.08908, 0.07912, 0.00683, 0.00157,
1238 + 0.00072, 0.00429, 0.00713,
1239 + 0.29258, 0.08558, 0.07306, 0.00647, 0.00153,
1240 + 0.00072, 0.00410, 0.00678 /
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.28323, 0.08234, 0.06772, 0.00611, 0.00150,
1243 + 0.00068, 0.00393, 0.00654,
1244 + 0.27434, 0.07935, 0.06308, 0.00586, 0.00147,
1245 + 0.00071, 0.00380, 0.00632,
1246 + 0.26608, 0.07659, 0.05895, 0.00565, 0.00145,
1247 + 0.00074, 0.00368, 0.00611,
1248 + 0.25850, 0.07395, 0.05519, 0.00543, 0.00142,
1249 + 0.00077, 0.00352, 0.00583,
1250 + 0.25135, 0.07150, 0.05182, 0.00524, 0.00139,
1251 + 0.00078, 0.00339, 0.00558 /
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.50649, 0.16023, 0.28913, 0.01065, 0.00028,
1254 + 0.00012, 0.00570, 0.01125,
1255 + 0.46912, 0.14548, 0.23659, 0.00964, 0.00070,
1256 + 0.00008, 0.00541, 0.01033,
1257 + 0.43759, 0.13365, 0.19727, 0.00892, 0.00101,
1258 + 0.00003, 0.00514, 0.00936,
1259 + 0.41091, 0.12356, 0.16745, 0.00810, 0.00108,
1260 + 0.00010, 0.00485, 0.00878,
1261 + 0.38758, 0.11508, 0.14411, 0.00752, 0.00119,
1262 + 0.00014, 0.00456, 0.00818,
1263 + 0.36703, 0.10781, 0.12554, 0.00712, 0.00124,
1264 + 0.00024, 0.00430, 0.00758,
1265 + 0.34878, 0.10139, 0.11047, 0.00657, 0.00124,
1266 + 0.00033, 0.00407, 0.00716 /
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.33220, 0.09579, 0.09801, 0.00629, 0.00125,
1269 + 0.00040, 0.00390, 0.00662,
1270 + 0.31754, 0.09068, 0.08765, 0.00582, 0.00122,
1271 + 0.00043, 0.00371, 0.00632,
1272 + 0.30415, 0.08610, 0.07896, 0.00536, 0.00122,
1273 + 0.00048, 0.00352, 0.00604,
1274 + 0.29173, 0.08204, 0.07158, 0.00510, 0.00124,
1275 + 0.00053, 0.00335, 0.00568,
1276 + 0.28030, 0.07837, 0.06527, 0.00496, 0.00119,
1277 + 0.00050, 0.00320, 0.00533,
1278 + 0.26988, 0.07494, 0.05978, 0.00468, 0.00117,
1279 + 0.00050, 0.00305, 0.00505,
1280 + 0.26026, 0.07179, 0.05497, 0.00443, 0.00114,
1281 + 0.00051, 0.00291, 0.00483 /
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.25131, 0.06888, 0.05074, 0.00423, 0.00110,
1284 + 0.00055, 0.00276, 0.00468,
1285 + 0.24278, 0.06623, 0.04703, 0.00415, 0.00108,
1286 + 0.00056, 0.00266, 0.00438,
1287 + 0.23485, 0.06379, 0.04375, 0.00409, 0.00106,
1288 + 0.00056, 0.00258, 0.00409,
1289 + 0.22745, 0.06148, 0.04090, 0.00395, 0.00098,
1290 + 0.00055, 0.00247, 0.00399,
1291 + 0.22064, 0.05933, 0.03833, 0.00379, 0.00093,
1292 + 0.00055, 0.00237, 0.00388 /
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.47097, 0.14042, 0.23951, 0.00786, 0.00020,
1295 + -0.00001, 0.00404, 0.00812,
1296 + 0.43309, 0.12675, 0.19286, 0.00709, 0.00041,
1297 + 0.00002, 0.00386, 0.00749,
1298 + 0.40159, 0.11571, 0.15879, 0.00649, 0.00062,
1299 + -0.00002, 0.00363, 0.00685,
1300 + 0.37506, 0.10651, 0.13337, 0.00594, 0.00072,
1301 + -0.00003, 0.00340, 0.00630,
1302 + 0.35218, 0.09870, 0.11373, 0.00546, 0.00082,
1303 + 0.00006, 0.00323, 0.00581,
1304 + 0.33191, 0.09203, 0.09825, 0.00508, 0.00087,
1305 + 0.00013, 0.00306, 0.00550,
1306 + 0.31426, 0.08624, 0.08583, 0.00463, 0.00089,
1307 + 0.00019, 0.00289, 0.00513 /
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.29831, 0.08117, 0.07577, 0.00444, 0.00086,
1310 + 0.00020, 0.00268, 0.00472,
1311 + 0.28389, 0.07665, 0.06732, 0.00426, 0.00084,
1312 + 0.00023, 0.00250, 0.00437,
1313 + 0.27094, 0.07256, 0.06023, 0.00395, 0.00086,
1314 + 0.00026, 0.00239, 0.00415,
1315 + 0.25923, 0.06885, 0.05431, 0.00365, 0.00087,
1316 + 0.00029, 0.00230, 0.00398,
1317 + 0.24850, 0.06547, 0.04930, 0.00349, 0.00080,
1318 + 0.00033, 0.00218, 0.00371,
1319 + 0.23850, 0.06249, 0.04492, 0.00336, 0.00075,
1320 + 0.00033, 0.00206, 0.00354,
1321 + 0.22935, 0.05975, 0.04116, 0.00318, 0.00073,
1322 + 0.00033, 0.00195, 0.00340 /
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.22097, 0.05720, 0.03791, 0.00296, 0.00071,
1325 + 0.00035, 0.00186, 0.00326,
1326 + 0.21303, 0.05487, 0.03502, 0.00292, 0.00069,
1327 + 0.00034, 0.00178, 0.00302,
1328 + 0.20567, 0.05272, 0.03247, 0.00290, 0.00068,
1329 + 0.00032, 0.00171, 0.00279,
1330 + 0.19876, 0.05069, 0.03025, 0.00280, 0.00065,
1331 + 0.00033, 0.00164, 0.00269,
1332 + 0.19238, 0.04883, 0.02826, 0.00270, 0.00064,
1333 + 0.00034, 0.00158, 0.00258 /
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.43318, 0.12133, 0.19629, 0.00548, 0.00015,
1336 + 0.00002, 0.00293, 0.00593,
1337 + 0.39569, 0.10878, 0.15587, 0.00491, 0.00041,
1338 + 0.00002, 0.00278, 0.00534,
1339 + 0.36483, 0.09879, 0.12669, 0.00450, 0.00049,
1340 + 0.00007, 0.00265, 0.00484,
1341 + 0.33855, 0.09050, 0.10534, 0.00408, 0.00060,
1342 + 0.00004, 0.00243, 0.00455,
1343 + 0.31639, 0.08359, 0.08908, 0.00378, 0.00063,
1344 + 0.00006, 0.00227, 0.00414,
1345 + 0.29715, 0.07760, 0.07629, 0.00348, 0.00064,
1346 + 0.00011, 0.00214, 0.00385,
1347 + 0.28011, 0.07244, 0.06611, 0.00331, 0.00061,
1348 + 0.00012, 0.00198, 0.00348 /
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.26472, 0.06791, 0.05790, 0.00317, 0.00055,
1351 + 0.00015, 0.00189, 0.00328,
1352 + 0.25119, 0.06381, 0.05116, 0.00296, 0.00055,
1353 + 0.00018, 0.00177, 0.00306,
1354 + 0.23907, 0.06021, 0.04558, 0.00269, 0.00055,
1355 + 0.00021, 0.00166, 0.00287,
1356 + 0.22799, 0.05704, 0.04090, 0.00247, 0.00055,
1357 + 0.00021, 0.00159, 0.00273,
1358 + 0.21775, 0.05416, 0.03692, 0.00242, 0.00053,
1359 + 0.00022, 0.00150, 0.00253,
1360 + 0.20849, 0.05150, 0.03349, 0.00231, 0.00050,
1361 + 0.00025, 0.00143, 0.00236,
1362 + 0.19999, 0.04908, 0.03055, 0.00222, 0.00050,
1363 + 0.00026, 0.00137, 0.00221 /
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.19212, 0.04688, 0.02803, 0.00214, 0.00052,
1366 + 0.00025, 0.00132, 0.00207,
1367 + 0.18484, 0.04488, 0.02583, 0.00207, 0.00051,
1368 + 0.00028, 0.00126, 0.00197,
1369 + 0.17813, 0.04305, 0.02390, 0.00198, 0.00049,
1370 + 0.00029, 0.00120, 0.00188,
1371 + 0.17185, 0.04129, 0.02220, 0.00184, 0.00047,
1372 + 0.00023, 0.00112, 0.00182,
1373 + 0.16602, 0.03968, 0.02069, 0.00172, 0.00044,
1374 + 0.00019, 0.00105, 0.00176 /
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.39419, 0.10390, 0.15953, 0.00373, 0.00014,
1377 + 0.00008, 0.00208, 0.00419,
1378 + 0.35773, 0.09262, 0.12489, 0.00340, 0.00028,
1379 + 0.00007, 0.00195, 0.00377,
1380 + 0.32770, 0.08368, 0.10038, 0.00308, 0.00034,
1381 + 0.00000, 0.00180, 0.00350,
1382 + 0.30285, 0.07628, 0.08252, 0.00276, 0.00037,
1383 + 0.00002, 0.00164, 0.00320,
1384 + 0.28160, 0.07004, 0.06909, 0.00261, 0.00038,
1385 + 0.00006, 0.00151, 0.00291,
1386 + 0.26312, 0.06490, 0.05877, 0.00248, 0.00039,
1387 + 0.00007, 0.00144, 0.00259,
1388 + 0.24706, 0.06033, 0.05059, 0.00236, 0.00041,
1389 + 0.00012, 0.00133, 0.00239 /
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.23299, 0.05629, 0.04403, 0.00212, 0.00038,
1392 + 0.00013, 0.00123, 0.00226,
1393 + 0.22019, 0.05279, 0.03870, 0.00203, 0.00037,
1394 + 0.00012, 0.00117, 0.00212,
1395 + 0.20870, 0.04969, 0.03428, 0.00196, 0.00038,
1396 + 0.00011, 0.00109, 0.00194,
1397 + 0.19844, 0.04691, 0.03058, 0.00186, 0.00039,
1398 + 0.00011, 0.00101, 0.00179,
1399 + 0.18911, 0.04438, 0.02748, 0.00176, 0.00040,
1400 + 0.00015, 0.00105, 0.00170,
1401 + 0.18057, 0.04211, 0.02488, 0.00167, 0.00036,
1402 + 0.00011, 0.00095, 0.00151,
1403 + 0.17269, 0.04006, 0.02264, 0.00163, 0.00032,
1404 + 0.00010, 0.00088, 0.00141 /
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.16538, 0.03820, 0.02070, 0.00162, 0.00029,
1407 + 0.00014, 0.00084, 0.00140,
1408 + 0.15882, 0.03648, 0.01901, 0.00151, 0.00030,
1409 + 0.00014, 0.00081, 0.00128,
1410 + 0.15280, 0.03490, 0.01752, 0.00140, 0.00031,
1411 + 0.00013, 0.00078, 0.00117,
1412 + 0.14700, 0.03344, 0.01623, 0.00138, 0.00029,
1413 + 0.00010, 0.00072, 0.00113,
1414 + 0.14169, 0.03209, 0.01508, 0.00133, 0.00028,
1415 + 0.00009, 0.00067, 0.00110 /
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.35487, 0.08795, 0.12828, 0.00254, 0.00002,
1418 + 0.00001, 0.00147, 0.00297,
1419 + 0.31956, 0.07794, 0.09880, 0.00231, 0.00013,
1420 + -0.00003, 0.00134, 0.00259,
1421 + 0.29089, 0.06987, 0.07835, 0.00217, 0.00025,
1422 + -0.00006, 0.00121, 0.00237,
1423 + 0.26731, 0.06336, 0.06381, 0.00194, 0.00029,
1424 + -0.00001, 0.00118, 0.00211,
1425 + 0.24752, 0.05796, 0.05285, 0.00173, 0.00029,
1426 + -0.00002, 0.00110, 0.00192,
1427 + 0.23036, 0.05334, 0.04453, 0.00170, 0.00030,
1428 + 0.00004, 0.00100, 0.00174,
1429 + 0.21543, 0.04939, 0.03809, 0.00160, 0.00030,
1430 + 0.00007, 0.00092, 0.00151 /
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.20219, 0.04598, 0.03290, 0.00146, 0.00031,
1433 + 0.00008, 0.00088, 0.00145,
1434 + 0.19039, 0.04296, 0.02871, 0.00139, 0.00030,
1435 + 0.00007, 0.00081, 0.00137,
1436 + 0.17990, 0.04029, 0.02531, 0.00135, 0.00029,
1437 + 0.00008, 0.00075, 0.00121,
1438 + 0.17053, 0.03792, 0.02248, 0.00128, 0.00028,
1439 + 0.00009, 0.00072, 0.00107,
1440 + 0.16199, 0.03580, 0.02011, 0.00118, 0.00026,
1441 + 0.00009, 0.00067, 0.00102,
1442 + 0.15424, 0.03387, 0.01811, 0.00114, 0.00026,
1443 + 0.00011, 0.00068, 0.00101,
1444 + 0.14720, 0.03212, 0.01641, 0.00107, 0.00026,
1445 + 0.00011, 0.00065, 0.00099 /
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.14078, 0.03053, 0.01494, 0.00095, 0.00026,
1448 + 0.00010, 0.00060, 0.00095,
1449 + 0.13481, 0.02907, 0.01368, 0.00091, 0.00025,
1450 + 0.00012, 0.00057, 0.00090,
1451 + 0.12932, 0.02774, 0.01257, 0.00088, 0.00025,
1452 + 0.00013, 0.00055, 0.00085,
1453 + 0.12430, 0.02651, 0.01162, 0.00079, 0.00025,
1454 + 0.00014, 0.00053, 0.00081,
1455 + 0.11963, 0.02538, 0.01077, 0.00072, 0.00025,
1456 + 0.00014, 0.00051, 0.00077 /
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.31595, 0.07371, 0.10210, 0.00168, 0.00003,
1459 + -0.00002, 0.00089, 0.00213,
1460 + 0.28252, 0.06482, 0.07750, 0.00166, 0.00011,
1461 + -0.00002, 0.00085, 0.00185,
1462 + 0.25592, 0.05781, 0.06078, 0.00142, 0.00013,
1463 + -0.00006, 0.00078, 0.00163,
1464 + 0.23394, 0.05218, 0.04893, 0.00125, 0.00020,
1465 + 0.00001, 0.00075, 0.00153,
1466 + 0.21534, 0.04753, 0.04021, 0.00121, 0.00018,
1467 + -0.00001, 0.00069, 0.00139,
1468 + 0.19961, 0.04360, 0.03361, 0.00115, 0.00019,
1469 + 0.00001, 0.00065, 0.00115,
1470 + 0.18589, 0.04019, 0.02853, 0.00107, 0.00020,
1471 + 0.00003, 0.00060, 0.00106 /
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.17372, 0.03729, 0.02447, 0.00105, 0.00016,
1474 + 0.00000, 0.00054, 0.00100,
1475 + 0.16312, 0.03472, 0.02126, 0.00101, 0.00017,
1476 + 0.00002, 0.00050, 0.00090,
1477 + 0.15373, 0.03246, 0.01864, 0.00093, 0.00017,
1478 + 0.00003, 0.00047, 0.00078,
1479 + 0.14531, 0.03047, 0.01648, 0.00085, 0.00016,
1480 + 0.00003, 0.00044, 0.00070,
1481 + 0.13780, 0.02865, 0.01469, 0.00076, 0.00017,
1482 + 0.00005, 0.00043, 0.00065,
1483 + 0.13088, 0.02704, 0.01318, 0.00067, 0.00018,
1484 + 0.00006, 0.00042, 0.00066,
1485 + 0.12449, 0.02559, 0.01191, 0.00065, 0.00017,
1486 + 0.00006, 0.00039, 0.00065 /
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.11855, 0.02427, 0.01081, 0.00069, 0.00015,
1489 + 0.00005, 0.00036, 0.00061,
1490 + 0.11339, 0.02307, 0.00986, 0.00061, 0.00016,
1491 + 0.00005, 0.00035, 0.00054,
1492 + 0.10868, 0.02197, 0.00904, 0.00051, 0.00016,
1493 + 0.00005, 0.00035, 0.00047,
1494 + 0.10418, 0.02095, 0.00833, 0.00045, 0.00014,
1495 + 0.00005, 0.00032, 0.00048,
1496 + 0.10003, 0.02002, 0.00770, 0.00040, 0.00012,
1497 + 0.00006, 0.00030, 0.00049 /
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.27754, 0.06092, 0.08010, 0.00124, -0.00001,
1500 + 0.00000, 0.00060, 0.00138,
1501 + 0.24661, 0.05323, 0.05995, 0.00114, 0.00008,
1502 + 0.00001, 0.00058, 0.00126,
1503 + 0.22199, 0.04722, 0.04647, 0.00105, 0.00006,
1504 + -0.00001, 0.00052, 0.00102,
1505 + 0.20191, 0.04238, 0.03700, 0.00095, 0.00007,
1506 + -0.00005, 0.00052, 0.00088,
1507 + 0.18485, 0.03844, 0.03013, 0.00101, 0.00009,
1508 + -0.00005, 0.00044, 0.00074,
1509 + 0.17067, 0.03511, 0.02500, 0.00088, 0.00011,
1510 + -0.00002, 0.00041, 0.00069,
1511 + 0.15839, 0.03224, 0.02106, 0.00081, 0.00011,
1512 + -0.00001, 0.00037, 0.00063 /
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.14767, 0.02980, 0.01798, 0.00075, 0.00013,
1515 + 0.00003, 0.00035, 0.00056,
1516 + 0.13818, 0.02767, 0.01552, 0.00064, 0.00011,
1517 + 0.00003, 0.00032, 0.00057,
1518 + 0.12970, 0.02578, 0.01354, 0.00061, 0.00011,
1519 + 0.00001, 0.00030, 0.00050,
1520 + 0.12218, 0.02412, 0.01192, 0.00061, 0.00013,
1521 + 0.00002, 0.00030, 0.00043,
1522 + 0.11560, 0.02262, 0.01058, 0.00044, 0.00011,
1523 + 0.00004, 0.00029, 0.00051,
1524 + 0.10949, 0.02130, 0.00945, 0.00039, 0.00011,
1525 + 0.00004, 0.00027, 0.00045,
1526 + 0.10393, 0.02010, 0.00849, 0.00036, 0.00011,
1527 + 0.00004, 0.00025, 0.00039 /
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.09887, 0.01901, 0.00769, 0.00035, 0.00010,
1530 + 0.00003, 0.00023, 0.00037,
1531 + 0.09421, 0.01803, 0.00700, 0.00034, 0.00010,
1532 + 0.00004, 0.00022, 0.00036,
1533 + 0.08995, 0.01714, 0.00640, 0.00034, 0.00011,
1534 + 0.00005, 0.00022, 0.00036,
1535 + 0.08603, 0.01632, 0.00588, 0.00032, 0.00010,
1536 + 0.00005, 0.00020, 0.00032,
1537 + 0.08241, 0.01556, 0.00543, 0.00030, 0.00010,
1538 + 0.00005, 0.00019, 0.00030 /
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.24135, 0.04971, 0.06204, 0.00073, -0.00002,
1541 + -0.00005, 0.00039, 0.00086,
1542 + 0.21273, 0.04315, 0.04573, 0.00081, 0.00003,
1543 + -0.00003, 0.00034, 0.00077,
1544 + 0.19057, 0.03799, 0.03499, 0.00059, 0.00003,
1545 + -0.00001, 0.00031, 0.00068,
1546 + 0.17220, 0.03393, 0.02754, 0.00059, 0.00003,
1547 + -0.00006, 0.00029, 0.00058,
1548 + 0.15713, 0.03060, 0.02221, 0.00051, 0.00004,
1549 + -0.00006, 0.00025, 0.00049,
1550 + 0.14434, 0.02781, 0.01828, 0.00049, 0.00008,
1551 + -0.00002, 0.00026, 0.00045,
1552 + 0.13327, 0.02546, 0.01528, 0.00046, 0.00007,
1553 + -0.00002, 0.00025, 0.00045 /
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.12377, 0.02343, 0.01295, 0.00040, 0.00010,
1556 + -0.00001, 0.00022, 0.00037,
1557 + 0.11541, 0.02167, 0.01112, 0.00036, 0.00010,
1558 + 0.00001, 0.00021, 0.00034,
1559 + 0.10797, 0.02013, 0.00964, 0.00033, 0.00009,
1560 + 0.00003, 0.00021, 0.00036,
1561 + 0.10139, 0.01876, 0.00844, 0.00029, 0.00010,
1562 + 0.00003, 0.00021, 0.00036,
1563 + 0.09562, 0.01756, 0.00746, 0.00022, 0.00009,
1564 + 0.00002, 0.00021, 0.00033,
1565 + 0.09020, 0.01647, 0.00665, 0.00026, 0.00009,
1566 + 0.00002, 0.00019, 0.00026,
1567 + 0.08536, 0.01550, 0.00596, 0.00026, 0.00009,
1568 + 0.00003, 0.00017, 0.00023 /
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.08106, 0.01462, 0.00538, 0.00019, 0.00009,
1571 + 0.00004, 0.00017, 0.00026,
1572 + 0.07706, 0.01383, 0.00488, 0.00019, 0.00009,
1573 + 0.00004, 0.00017, 0.00024,
1574 + 0.07340, 0.01312, 0.00445, 0.00018, 0.00009,
1575 + 0.00005, 0.00016, 0.00022,
1576 + 0.07003, 0.01245, 0.00408, 0.00017, 0.00009,
1577 + 0.00005, 0.00015, 0.00021,
1578 + 0.06694, 0.01184, 0.00376, 0.00016, 0.00008,
1579 + 0.00005, 0.00014, 0.00019 /
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.20680, 0.03990, 0.04722, 0.00049, -0.00001,
1582 + -0.00005, 0.00023, 0.00055,
1583 + 0.18100, 0.03435, 0.03429, 0.00049, 0.00001,
1584 + -0.00006, 0.00021, 0.00046,
1585 + 0.16088, 0.03009, 0.02586, 0.00050, 0.00002,
1586 + -0.00004, 0.00020, 0.00039,
1587 + 0.14469, 0.02671, 0.02013, 0.00037, 0.00008,
1588 + -0.00001, 0.00020, 0.00041,
1589 + 0.13141, 0.02396, 0.01609, 0.00030, 0.00007,
1590 + -0.00003, 0.00020, 0.00032,
1591 + 0.12022, 0.02167, 0.01313, 0.00023, 0.00006,
1592 + -0.00002, 0.00017, 0.00028,
1593 + 0.11054, 0.01975, 0.01090, 0.00023, 0.00007,
1594 + -0.00001, 0.00017, 0.00026 /
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.10218, 0.01812, 0.00917, 0.00023, 0.00008,
1597 + 0.00001, 0.00017, 0.00024,
1598 + 0.09484, 0.01669, 0.00783, 0.00023, 0.00006,
1599 + -0.00001, 0.00013, 0.00018,
1600 + 0.08844, 0.01545, 0.00676, 0.00020, 0.00006,
1601 + 0.00000, 0.00012, 0.00017,
1602 + 0.08282, 0.01436, 0.00589, 0.00015, 0.00007,
1603 + 0.00002, 0.00014, 0.00018,
1604 + 0.07778, 0.01338, 0.00519, 0.00013, 0.00008,
1605 + 0.00004, 0.00014, 0.00015,
1606 + 0.07324, 0.01253, 0.00461, 0.00010, 0.00007,
1607 + 0.00003, 0.00012, 0.00015,
1608 + 0.06912, 0.01176, 0.00412, 0.00009, 0.00007,
1609 + 0.00003, 0.00011, 0.00014 /
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.06534, 0.01106, 0.00370, 0.00011, 0.00007,
1612 + 0.00002, 0.00011, 0.00013,
1613 + 0.06198, 0.01044, 0.00335, 0.00010, 0.00006,
1614 + 0.00003, 0.00011, 0.00013,
1615 + 0.05893, 0.00987, 0.00304, 0.00008, 0.00006,
1616 + 0.00003, 0.00011, 0.00013,
1617 + 0.05609, 0.00935, 0.00279, 0.00006, 0.00005,
1618 + 0.00003, 0.00009, 0.00013,
1619 + 0.05349, 0.00887, 0.00256, 0.00005, 0.00005,
1620 + 0.00002, 0.00008, 0.00012 /
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.17485, 0.03164, 0.03552, 0.00040, -0.00006,
1623 + -0.00010, 0.00008, 0.00037,
1624 + 0.15202, 0.02704, 0.02538, 0.00041, -0.00002,
1625 + -0.00006, 0.00011, 0.00030,
1626 + 0.13424, 0.02357, 0.01893, 0.00037, 0.00001,
1627 + -0.00007, 0.00012, 0.00025,
1628 + 0.12024, 0.02082, 0.01458, 0.00022, -0.00001,
1629 + -0.00007, 0.00010, 0.00018,
1630 + 0.10850, 0.01858, 0.01155, 0.00022, 0.00002,
1631 + -0.00004, 0.00010, 0.00022,
1632 + 0.09880, 0.01673, 0.00936, 0.00019, 0.00003,
1633 + -0.00005, 0.00008, 0.00016,
1634 + 0.09043, 0.01519, 0.00771, 0.00021, 0.00004,
1635 + -0.00002, 0.00010, 0.00014 /
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.08328, 0.01387, 0.00646, 0.00018, 0.00004,
1638 + -0.00002, 0.00009, 0.00014,
1639 + 0.07712, 0.01274, 0.00549, 0.00013, 0.00004,
1640 + 0.00000, 0.00008, 0.00013,
1641 + 0.07171, 0.01175, 0.00472, 0.00010, 0.00004,
1642 + 0.00000, 0.00008, 0.00012,
1643 + 0.06689, 0.01088, 0.00410, 0.00009, 0.00004,
1644 + 0.00000, 0.00007, 0.00011,
1645 + 0.06254, 0.01012, 0.00359, 0.00012, 0.00004,
1646 + 0.00001, 0.00006, 0.00012,
1647 + 0.05870, 0.00945, 0.00317, 0.00011, 0.00003,
1648 + 0.00001, 0.00006, 0.00011,
1649 + 0.05528, 0.00884, 0.00283, 0.00010, 0.00003,
1650 + 0.00000, 0.00006, 0.00010 /
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.05219, 0.00830, 0.00254, 0.00007, 0.00002,
1653 + 0.00001, 0.00006, 0.00009,
1654 + 0.04939, 0.00781, 0.00229, 0.00006, 0.00002,
1655 + 0.00001, 0.00005, 0.00007,
1656 + 0.04685, 0.00737, 0.00208, 0.00004, 0.00002,
1657 + 0.00000, 0.00005, 0.00006,
1658 + 0.04451, 0.00697, 0.00190, 0.00002, 0.00003,
1659 + 0.00001, 0.00005, 0.00008,
1660 + 0.04236, 0.00660, 0.00174, 0.00002, 0.00003,
1661 + 0.00002, 0.00005, 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.14537, 0.02451, 0.02606, 0.00020, -0.00003,
1664 + -0.00004, 0.00006, 0.00020,
1665 + 0.12554, 0.02085, 0.01841, 0.00024, -0.00001,
1666 + -0.00003, 0.00006, 0.00017,
1667 + 0.11019, 0.01807, 0.01358, 0.00020, -0.00003,
1668 + -0.00004, 0.00006, 0.00017,
1669 + 0.09805, 0.01588, 0.01038, 0.00018, 0.00000,
1670 + -0.00002, 0.00005, 0.00012,
1671 + 0.08810, 0.01412, 0.00815, 0.00017, 0.00000,
1672 + -0.00001, 0.00005, 0.00009,
1673 + 0.07983, 0.01267, 0.00655, 0.00013, -0.00001,
1674 + -0.00002, 0.00003, 0.00011,
1675 + 0.07291, 0.01145, 0.00537, 0.00008, 0.00000,
1676 + -0.00002, 0.00002, 0.00009 /
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.06691, 0.01043, 0.00447, 0.00007, 0.00001,
1679 + -0.00001, 0.00003, 0.00008,
1680 + 0.06168, 0.00954, 0.00378, 0.00007, 0.00001,
1681 + 0.00000, 0.00004, 0.00009,
1682 + 0.05712, 0.00878, 0.00323, 0.00008, 0.00001,
1683 + 0.00000, 0.00003, 0.00008,
1684 + 0.05311, 0.00812, 0.00279, 0.00010, 0.00001,
1685 + -0.00001, 0.00003, 0.00006,
1686 + 0.04954, 0.00753, 0.00244, 0.00010, 0.00001,
1687 + 0.00001, 0.00003, 0.00005,
1688 + 0.04638, 0.00701, 0.00215, 0.00008, 0.00001,
1689 + 0.00000, 0.00003, 0.00006,
1690 + 0.04354, 0.00654, 0.00191, 0.00007, 0.00001,
1691 + 0.00000, 0.00003, 0.00006 /
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.04095, 0.00613, 0.00171, 0.00008, 0.00000,
1694 + 0.00000, 0.00002, 0.00006,
1695 + 0.03868, 0.00575, 0.00154, 0.00005, 0.00001,
1696 + 0.00000, 0.00002, 0.00006,
1697 + 0.03663, 0.00541, 0.00139, 0.00002, 0.00001,
1698 + 0.00000, 0.00002, 0.00006,
1699 + 0.03470, 0.00511, 0.00127, 0.00003, 0.00000,
1700 + 0.00000, 0.00002, 0.00005,
1701 + 0.03295, 0.00483, 0.00116, 0.00003, 0.00000,
1702 + 0.00000, 0.00002, 0.00004 /
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.09524, 0.01389, 0.01314, 0.00006, -0.00002,
1705 + -0.00001, 0.00002, 0.00007,
1706 + 0.08096, 0.01162, 0.00898, 0.00009, 0.00000,
1707 + 0.00000, 0.00003, 0.00004,
1708 + 0.07009, 0.00994, 0.00644, 0.00006, -0.00001,
1709 + -0.00002, 0.00002, 0.00004,
1710 + 0.06161, 0.00862, 0.00480, 0.00003, 0.00001,
1711 + 0.00000, 0.00002, 0.00005,
1712 + 0.05476, 0.00758, 0.00370, -0.00001, 0.00001,
1713 + 0.00000, 0.00002, 0.00006,
1714 + 0.04915, 0.00674, 0.00292, 0.00000, 0.00001,
1715 + 0.00000, 0.00002, 0.00005,
1716 + 0.04439, 0.00604, 0.00236, 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.04040, 0.00545, 0.00194, 0.00001, 0.00002,
1720 + 0.00000, 0.00002, 0.00001,
1721 + 0.03694, 0.00494, 0.00162, 0.00000, 0.00002,
1722 + 0.00000, 0.00002, 0.00002,
1723 + 0.03392, 0.00451, 0.00137, 0.00001, 0.00001,
1724 + 0.00000, 0.00002, 0.00003,
1725 + 0.03130, 0.00414, 0.00118, 0.00002, 0.00001,
1726 + 0.00000, 0.00002, 0.00002,
1727 + 0.02902, 0.00381, 0.00102, 0.00001, 0.00001,
1728 + 0.00000, 0.00001, 0.00003,
1729 + 0.02698, 0.00353, 0.00089, 0.00001, 0.00001,
1730 + 0.00000, 0.00001, 0.00001,
1731 + 0.02517, 0.00327, 0.00079, 0.00002, 0.00001,
1732 + 0.00000, 0.00001, 0.00001 /
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.02355, 0.00305, 0.00070, 0.00002, 0.00001,
1735 + 0.00001, 0.00002, 0.00001,
1736 + 0.02210, 0.00285, 0.00063, 0.00002, 0.00001,
1737 + 0.00000, 0.00001, 0.00001,
1738 + 0.02079, 0.00267, 0.00056, 0.00002, 0.00001,
1739 + 0.00000, 0.00001, 0.00001,
1740 + 0.01961, 0.00250, 0.00051, 0.00001, 0.00001,
1741 + 0.00000, 0.00001, 0.00001,
1742 + 0.01853, 0.00236, 0.00047, 0.00001, 0.00001,
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.05737, 0.00716, 0.00596, 0.00004, -0.00001,
1746 + -0.00001, 0.00000, 0.00001,
1747 + 0.04794, 0.00589, 0.00393, 0.00005, -0.00001,
1748 + -0.00001, -0.00001, 0.00001,
1749 + 0.04088, 0.00496, 0.00274, 0.00002, 0.00000,
1750 + -0.00001, 0.00000, 0.00003,
1751 + 0.03548, 0.00425, 0.00200, 0.00000, 0.00000,
1752 + 0.00000, 0.00001, 0.00002,
1753 + 0.03116, 0.00369, 0.00151, -0.00001, 0.00000,
1754 + 0.00000, 0.00001, 0.00001,
1755 + 0.02762, 0.00324, 0.00117, 0.00001, 0.00001,
1756 + 0.00000, 0.00001, 0.00001,
1757 + 0.02472, 0.00288, 0.00093, 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.02227, 0.00257, 0.00076, 0.00000, 0.00000,
1761 + 0.00000, 0.00001, 0.00000,
1762 + 0.02018, 0.00232, 0.00062, 0.00000, 0.00001,
1763 + 0.00000, 0.00001, 0.00000,
1764 + 0.01840, 0.00210, 0.00052, 0.00000, 0.00001,
1765 + 0.00000, 0.00000, 0.00000,
1766 + 0.01686, 0.00191, 0.00044, -0.00001, 0.00000,
1767 + 0.00000, 0.00000, 0.00001,
1768 + 0.01549, 0.00174, 0.00038, 0.00001, 0.00000,
1769 + 0.00000, 0.00000, 0.00000,
1770 + 0.01430, 0.00160, 0.00033, 0.00000, 0.00000,
1771 + 0.00000, 0.00000, 0.00001,
1772 + 0.01326, 0.00148, 0.00029, 0.00000, 0.00000,
1773 + 0.00000, 0.00000, 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.01233, 0.00137, 0.00026, 0.00000, 0.00000,
1776 + 0.00000, 0.00000, 0.00000,
1777 + 0.01150, 0.00127, 0.00023, 0.00000, 0.00000,
1778 + 0.00000, 0.00000, 0.00001,
1779 + 0.01075, 0.00118, 0.00021, 0.00000, 0.00000,
1780 + 0.00000, 0.00000, 0.00001,
1781 + 0.01008, 0.00110, 0.00019, 0.00000, 0.00000,
1782 + 0.00000, 0.00000, 0.00001,
1783 + 0.00947, 0.00103, 0.00017, 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.03069, 0.00320, 0.00231, 0.00001, 0.00000,
1787 + -0.00001, -0.00001, 0.00000,
1788 + 0.02518, 0.00259, 0.00147, 0.00000, 0.00000,
1789 + 0.00000, 0.00000, 0.00001,
1790 + 0.02117, 0.00215, 0.00100, 0.00000, 0.00001,
1791 + 0.00000, 0.00000, 0.00000,
1792 + 0.01808, 0.00181, 0.00071, 0.00000, 0.00000,
1793 + 0.00000, 0.00000, 0.00000,
1794 + 0.01564, 0.00156, 0.00052, 0.00001, 0.00000,
1795 + 0.00000, 0.00000, 0.00001,
1796 + 0.01370, 0.00135, 0.00040, 0.00001, 0.00000,
1797 + 0.00000, 0.00000, 0.00000,
1798 + 0.01212, 0.00119, 0.00031, 0.00001, 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.01081, 0.00105, 0.00025, 0.00000, 0.00000,
1802 + 0.00000, 0.00000, 0.00000,
1803 + 0.00970, 0.00094, 0.00021, 0.00000, 0.00000,
1804 + 0.00000, 0.00000, 0.00000,
1805 + 0.00876, 0.00084, 0.00017, 0.00001, 0.00000,
1806 + 0.00000, 0.00000, 0.00000,
1807 + 0.00796, 0.00076, 0.00014, 0.00000, 0.00000,
1808 + 0.00000, 0.00000, 0.00000,
1809 + 0.00727, 0.00069, 0.00012, 0.00000, 0.00000,
1810 + 0.00000, 0.00000, 0.00000,
1811 + 0.00666, 0.00063, 0.00011, 0.00000, 0.00000,
1812 + 0.00000, 0.00000, 0.00000,
1813 + 0.00612, 0.00057, 0.00009, 0.00001, 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.00565, 0.00053, 0.00008, 0.00001, 0.00000,
1817 + 0.00000, 0.00000, 0.00000,
1818 + 0.00524, 0.00049, 0.00007, 0.00000, 0.00000,
1819 + 0.00000, 0.00000, 0.00000,
1820 + 0.00487, 0.00045, 0.00007, 0.00000, 0.00000,
1821 + 0.00000, 0.00000, 0.00000,
1822 + 0.00453, 0.00042, 0.00006, 0.00000, 0.00000,
1823 + 0.00000, 0.00000, 0.00000,
1824 + 0.00423, 0.00039, 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.01397, 0.00119, 0.00072, 0.00000, 0.00000,
1828 + 0.00000, 0.00000, 0.00000,
1829 + 0.01120, 0.00094, 0.00044, 0.00000, 0.00000,
1830 + 0.00000, 0.00000, 0.00000,
1831 + 0.00922, 0.00076, 0.00029, -0.00001, 0.00000,
1832 + 0.00000, 0.00000, 0.00001,
1833 + 0.00773, 0.00063, 0.00020, 0.00000, 0.00000,
1834 + 0.00000, 0.00000, 0.00000,
1835 + 0.00659, 0.00053, 0.00014, 0.00000, 0.00000,
1836 + 0.00000, 0.00000, 0.00000,
1837 + 0.00569, 0.00046, 0.00011, 0.00000, 0.00000,
1838 + 0.00000, 0.00000, 0.00000,
1839 + 0.00497, 0.00040, 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.00437, 0.00035, 0.00007, 0.00000, 0.00000,
1843 + 0.00000, 0.00000, 0.00000,
1844 + 0.00388, 0.00030, 0.00005, 0.00000, 0.00000,
1845 + 0.00000, 0.00000, 0.00000,
1846 + 0.00347, 0.00027, 0.00004, 0.00000, 0.00000,
1847 + 0.00000, 0.00000, 0.00000,
1848 + 0.00312, 0.00024, 0.00004, 0.00000, 0.00000,
1849 + 0.00000, 0.00000, 0.00000,
1850 + 0.00282, 0.00022, 0.00003, 0.00000, 0.00000,
1851 + 0.00000, 0.00000, 0.00000,
1852 + 0.00256, 0.00020, 0.00003, 0.00000, 0.00000,
1853 + 0.00000, 0.00000, 0.00000,
1854 + 0.00233, 0.00018, 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.00214, 0.00016, 0.00002, 0.00000, 0.00000,
1858 + 0.00000, 0.00000, 0.00000,
1859 + 0.00196, 0.00015, 0.00002, 0.00000, 0.00000,
1860 + 0.00000, 0.00000, 0.00000,
1861 + 0.00181, 0.00014, 0.00002, 0.00000, 0.00000,
1862 + 0.00000, 0.00000, 0.00000,
1863 + 0.00167, 0.00013, 0.00002, 0.00000, 0.00000,
1864 + 0.00000, 0.00000, 0.00000,
1865 + 0.00155, 0.00012, 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.00108, 0.00005, 0.00002, 0.00000, 0.00000,
1869 + 0.00000, 0.00000, 0.00000,
1870 + 0.00081, 0.00004, 0.00001, 0.00000, 0.00000,
1871 + 0.00000, 0.00000, 0.00000,
1872 + 0.00063, 0.00003, 0.00001, 0.00000, 0.00000,
1873 + 0.00000, 0.00000, 0.00000,
1874 + 0.00051, 0.00002, 0.00001, 0.00000, 0.00000,
1875 + 0.00000, 0.00000, 0.00000,
1876 + 0.00041, 0.00002, 0.00000, 0.00000, 0.00000,
1877 + 0.00000, 0.00000, 0.00000,
1878 + 0.00034, 0.00002, 0.00000, 0.00000, 0.00000,
1879 + 0.00000, 0.00000, 0.00000,
1880 + 0.00029, 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.00025, 0.00001, 0.00000, 0.00000, 0.00000,
1884 + 0.00000, 0.00000, 0.00000,
1885 + 0.00021, 0.00001, 0.00000, 0.00000, 0.00000,
1886 + 0.00000, 0.00000, 0.00000,
1887 + 0.00018, 0.00001, 0.00000, 0.00000, 0.00000,
1888 + 0.00000, 0.00000, 0.00000,
1889 + 0.00016, 0.00001, 0.00000, 0.00000, 0.00000,
1890 + 0.00000, 0.00000, 0.00000,
1891 + 0.00014, 0.00001, 0.00000, 0.00000, 0.00000,
1892 + 0.00000, 0.00000, 0.00000,
1893 + 0.00012, 0.00001, 0.00000, 0.00000, 0.00000,
1894 + 0.00000, 0.00000, 0.00000,
1895 + 0.00011, 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.00010, 0.00001, 0.00000, 0.00000, 0.00000,
1899 + 0.00000, 0.00000, 0.00000,
1900 + 0.00009, 0.00001, 0.00000, 0.00000, 0.00000,
1901 + 0.00000, 0.00000, 0.00000,
1902 + 0.00008, 0.00001, 0.00000, 0.00000, 0.00000,
1903 + 0.00000, 0.00000, 0.00000,
1904 + 0.00007, 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(92,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