]>
Commit | Line | Data |
---|---|---|
21886bb6 | 1 | #include "pdf/pilot.h" |
2 | SUBROUTINE SFMS130(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU) | |
3 | C | |
4 | C THIS IS THE alphas=0.130 FIT -- May 1995 -- standard Q^2 range | |
5 | C | |
6 | #include "pdf/impdp.inc" | |
7 | C | |
8 | PARAMETER(NX=47) | |
9 | PARAMETER(NTENTH=21) | |
10 | DIMENSION F(8,NX,20),G(8),XX(NX),N0(8) | |
11 | DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=1,7)/ | |
12 | + .00145, .00341, 8.97173, .70631, .15951, | |
13 | + .00000, .42112, .70932, | |
14 | + .00195, .00370, 21.90480, 1.19723, .65448, | |
15 | + .00000, .91481, 1.20088, | |
16 | + .00241, .00397, 39.05281, 1.80629, 1.26685, | |
17 | + .00000, 1.52615, 1.81047, | |
18 | + .00282, .00421, 59.39211, 2.50449, 1.96787, | |
19 | + .15991, 2.22633, 2.50914, | |
20 | + .00321, .00445, 82.46889, 3.28433, 2.75020, | |
21 | + .99243, 3.00792, 3.28941, | |
22 | + .00358, .00467, 107.99681, 4.13912, 3.60721, | |
23 | + 1.87580, 3.86428, 4.14459, | |
24 | + .00393, .00488, 135.18617, 5.04914, 4.51927, | |
25 | + 2.81308, 4.77575, 5.05498 / | |
26 | DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=8,14)/ | |
27 | + .00427, .00508, 163.95160, 6.01197, 5.48396, | |
28 | + 3.80070, 5.73991, 6.01815, | |
29 | + .00460, .00528, 193.94818, 7.01879, 6.49250, | |
30 | + 4.83005, 6.74796, 7.02529, | |
31 | + .00491, .00546, 224.90520, 8.06265, 7.53796, | |
32 | + 5.89456, 7.79297, 8.06945, | |
33 | + .00521, .00564, 256.61942, 9.13814, 8.61496, | |
34 | + 6.98912, 8.86953, 9.14523, | |
35 | + .00551, .00582, 288.94693, 10.24123, 9.71946, | |
36 | + 8.10991, 9.97364, 10.24859, | |
37 | + .00579, .00599, 321.78876, 11.36910, 10.84867, | |
38 | + 9.25427, 11.10246, 11.37672, | |
39 | + .00607, .00615, 354.90732, 12.51540, 11.99624, | |
40 | + 10.41604, 12.24968, 12.52328 / | |
41 | DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=15,19)/ | |
42 | + .00634, .00632, 388.08878, 13.67410, 13.15614, | |
43 | + 11.58928, 13.40924, 13.68221, | |
44 | + .00660, .00647, 421.57944, 14.85103, 14.33423, | |
45 | + 12.77993, 14.58700, 14.85938, | |
46 | + .00686, .00662, 455.24307, 16.04232, 15.52661, | |
47 | + 13.98418, 15.77907, 16.05088, | |
48 | + .00711, .00677, 488.59973, 17.23502, 16.72036, | |
49 | + 15.18921, 16.97252, 17.24380, | |
50 | + .00735, .00692, 522.26788, 18.44496, 17.93132, | |
51 | + 16.41086, 18.18320, 18.45395 / | |
52 | DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=1,7)/ | |
53 | + .00253, .00457, 8.25009, .66508, .14168, | |
54 | + .00000, .39140, .66804, | |
55 | + .00326, .00499, 18.93998, 1.07771, .55863, | |
56 | + .00000, .80673, 1.08113, | |
57 | + .00392, .00537, 32.49142, 1.57101, 1.05546, | |
58 | + .00000, 1.30225, 1.57482, | |
59 | + .00451, .00573, 48.05289, 2.12156, 1.60902, | |
60 | + .12561, 1.85471, 2.12572, | |
61 | + .00507, .00606, 65.26363, 2.72355, 2.21366, | |
62 | + .77230, 2.45838, 2.72802, | |
63 | + .00560, .00637, 83.90363, 3.37180, 2.86427, | |
64 | + 1.44583, 3.10814, 3.37654, | |
65 | + .00611, .00666, 103.39499, 4.05152, 3.54615, | |
66 | + 2.14950, 3.78924, 4.05653 / | |
67 | DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=8,14)/ | |
68 | + .00659, .00694, 123.69079, 4.76120, 4.25780, | |
69 | + 2.88091, 4.50019, 4.76645, | |
70 | + .00705, .00721, 144.55658, 5.49457, 4.99299, | |
71 | + 3.63404, 5.23473, 5.50005, | |
72 | + .00749, .00747, 165.81564, 6.24685, 5.74697, | |
73 | + 4.40443, 5.98810, 6.25254, | |
74 | + .00792, .00772, 187.34157, 7.01443, 6.51614, | |
75 | + 5.18873, 6.75670, 7.02033, | |
76 | + .00833, .00796, 209.04994, 7.79474, 7.29795, | |
77 | + 5.98455, 7.53797, 7.80083, | |
78 | + .00873, .00819, 230.88733, 8.58605, 8.09067, | |
79 | + 6.79032, 8.33020, 8.59233, | |
80 | + .00911, .00842, 252.70547, 9.38414, 8.89010, | |
81 | + 7.60195, 9.12914, 9.39059 / | |
82 | DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=15,19)/ | |
83 | + .00949, .00864, 274.37265, 10.18504, 9.69227, | |
84 | + 8.41560, 9.93087, 10.19166, | |
85 | + .00986, .00885, 296.07019, 10.99321, 10.50165, | |
86 | + 9.23578, 10.73981, 10.99999, | |
87 | + .01021, .00906, 317.71695, 11.80612, 11.31571, | |
88 | + 10.06005, 11.55346, 11.81306, | |
89 | + .01056, .00926, 339.00198, 12.61497, 12.12568, | |
90 | + 10.87969, 12.36303, 12.62206, | |
91 | + .01090, .00945, 360.35056, 13.43110, 12.94287, | |
92 | + 11.70607, 13.17984, 13.43833 / | |
93 | DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=1,7)/ | |
94 | + .00425, .00612, 7.58296, .62588, .12529, | |
95 | + .00000, .36358, .62886, | |
96 | + .00531, .00673, 16.36875, .97032, .47435, | |
97 | + .00000, .71070, .97364, | |
98 | + .00626, .00728, 27.01918, 1.36734, .87515, | |
99 | + .00000, 1.10992, 1.37093, | |
100 | + .00712, .00779, 38.85864, 1.79884, 1.30987, | |
101 | + .09816, 1.54331, 1.80268, | |
102 | + .00793, .00825, 51.62027, 2.26079, 1.77464, | |
103 | + .59813, 2.00691, 2.26485, | |
104 | + .00868, .00869, 65.14942, 2.74950, 2.26589, | |
105 | + 1.10921, 2.49711, 2.75377, | |
106 | + .00940, .00910, 79.03492, 3.25422, 2.77291, | |
107 | + 1.63498, 3.00319, 3.25867 / | |
108 | DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=8,14)/ | |
109 | + .01008, .00949, 93.26187, 3.77421, 3.29501, | |
110 | + 2.17406, 3.52441, 3.77883, | |
111 | + .01073, .00987, 107.67826, 4.30521, 3.82795, | |
112 | + 2.72240, 4.05656, 4.30999, | |
113 | + .01136, .01022, 122.17532, 4.84408, 4.36863, | |
114 | + 3.27718, 4.59649, 4.84901, | |
115 | + .01196, .01057, 136.67989, 5.38855, 4.91480, | |
116 | + 3.83633, 5.14197, 5.39363, | |
117 | + .01253, .01090, 151.14815, 5.93711, 5.46495, | |
118 | + 4.39850, 5.69146, 5.94232, | |
119 | + .01309, .01121, 165.55626, 6.48881, 6.01815, | |
120 | + 4.96289, 6.24405, 6.49415, | |
121 | + .01363, .01152, 179.81464, 7.04092, 6.57169, | |
122 | + 5.52689, 6.79699, 7.04638 / | |
123 | DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=15,19)/ | |
124 | + .01416, .01182, 193.84564, 7.59092, 7.12304, | |
125 | + 6.08807, 7.34779, 7.59650, | |
126 | + .01466, .01210, 207.78363, 8.14221, 7.67561, | |
127 | + 6.64989, 7.89983, 8.14790, | |
128 | + .01516, .01238, 221.58186, 8.69324, 8.22787, | |
129 | + 7.21089, 8.45158, 8.69904, | |
130 | + .01564, .01265, 235.04161, 9.23805, 8.77387, | |
131 | + 7.76517, 8.99709, 9.24396, | |
132 | + .01611, .01292, 248.45462, 9.78478, 9.32173, | |
133 | + 8.32089, 9.54449, 9.79079 / | |
134 | DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=1,7)/ | |
135 | + .00568, .00726, 7.21520, .60375, .11633, | |
136 | + .00000, .34810, .60680, | |
137 | + .00700, .00803, 15.02376, .91246, .42986, | |
138 | + .00000, .65953, .91580, | |
139 | + .00818, .00871, 24.24597, 1.26089, .78224, | |
140 | + .00000, 1.01018, 1.26446, | |
141 | + .00925, .00932, 34.30429, 1.63382, 1.15852, | |
142 | + .08475, 1.38500, 1.63760, | |
143 | + .01024, .00989, 44.98284, 2.02818, 1.55583, | |
144 | + .51372, 1.78103, 2.03215, | |
145 | + .01118, .01042, 56.16156, 2.44110, 1.97140, | |
146 | + .94748, 2.19544, 2.44523, | |
147 | + .01206, .01093, 67.50828, 2.86377, 2.39646, | |
148 | + 1.38969, 2.61947, 2.86805 / | |
149 | DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=8,14)/ | |
150 | + .01289, .01140, 79.02312, 3.29583, 2.83072, | |
151 | + 1.83946, 3.05277, 3.30026, | |
152 | + .01369, .01185, 90.59126, 3.73396, 3.27089, | |
153 | + 2.29369, 3.49206, 3.73852, | |
154 | + .01445, .01228, 102.13345, 4.17579, 3.71461, | |
155 | + 2.75028, 3.93495, 4.18048, | |
156 | + .01518, .01270, 113.59947, 4.61964, 4.16023, | |
157 | + 3.20775, 4.37981, 4.62445, | |
158 | + .01589, .01309, 124.96193, 5.06446, 4.60670, | |
159 | + 3.66519, 4.82556, 5.06938, | |
160 | + .01657, .01347, 136.20905, 5.50964, 5.05345, | |
161 | + 4.12214, 5.27162, 5.51466, | |
162 | + .01722, .01384, 147.27547, 5.95310, 5.49839, | |
163 | + 4.57663, 5.71592, 5.95823 / | |
164 | DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=15,19)/ | |
165 | + .01785, .01419, 158.10556, 6.39294, 5.93965, | |
166 | + 5.02684, 6.15656, 6.39817, | |
167 | + .01847, .01454, 168.81200, 6.83207, 6.38012, | |
168 | + 5.47575, 6.59645, 6.83739, | |
169 | + .01907, .01487, 179.36188, 7.26935, 6.81867, | |
170 | + 5.92226, 7.03445, 7.27475, | |
171 | + .01964, .01519, 189.60268, 7.70007, 7.25063, | |
172 | + 6.36177, 7.46586, 7.70556, | |
173 | + .02021, .01551, 199.76869, 8.13091, 7.68264, | |
174 | + 6.80094, 7.89736, 8.13649 / | |
175 | DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=1,7)/ | |
176 | + .00694, .00820, 6.96326, .58834, .11023, | |
177 | + .00000, .33745, .59148, | |
178 | + .00849, .00910, 14.13319, .87340, .40027, | |
179 | + .00000, .62526, .87680, | |
180 | + .00987, .00989, 22.44636, 1.19043, .72137, | |
181 | + .00000, .94454, 1.19404, | |
182 | + .01111, .01060, 31.39114, 1.52610, 1.06050, | |
183 | + .07625, 1.28213, 1.52990, | |
184 | + .01227, .01125, 40.78522, 1.87798, 1.41544, | |
185 | + .46054, 1.63570, 1.88195, | |
186 | + .01335, .01187, 50.53088, 2.24373, 1.78392, | |
187 | + .84613, 2.00296, 2.24785, | |
188 | + .01437, .01244, 60.34471, 2.61576, 2.15843, | |
189 | + 1.23670, 2.37636, 2.62002 / | |
190 | DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=8,14)/ | |
191 | + .01533, .01299, 70.23557, 2.99395, 2.53889, | |
192 | + 1.63170, 2.75580, 2.99834, | |
193 | + .01625, .01350, 80.11086, 3.37555, 2.92259, | |
194 | + 2.02857, 3.13856, 3.38006, | |
195 | + .01713, .01399, 89.90868, 3.75863, 3.30762, | |
196 | + 2.42566, 3.52272, 3.76325, | |
197 | + .01797, .01446, 99.59186, 4.14189, 3.69271, | |
198 | + 2.82183, 3.90699, 4.14662, | |
199 | + .01878, .01491, 109.14227, 4.52452, 4.07705, | |
200 | + 3.21645, 4.29057, 4.52935, | |
201 | + .01956, .01535, 118.55435, 4.90613, 4.46028, | |
202 | + 3.60923, 4.67307, 4.91106, | |
203 | + .02031, .01576, 127.77693, 5.28501, 4.84069, | |
204 | + 3.99857, 5.05280, 5.29003 / | |
205 | DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=15,19)/ | |
206 | + .02103, .01617, 136.76628, 5.65962, 5.21676, | |
207 | + 4.38303, 5.42821, 5.66473, | |
208 | + .02174, .01656, 145.62187, 6.03257, 5.59110, | |
209 | + 4.76525, 5.80193, 6.03777, | |
210 | + .02242, .01693, 154.31879, 6.40295, 5.96279, | |
211 | + 5.14439, 6.17303, 6.40822, | |
212 | + .02308, .01730, 162.73064, 6.76678, 6.32789, | |
213 | + 5.51656, 6.53756, 6.77213, | |
214 | + .02372, .01765, 171.05791, 7.12987, 6.69220, | |
215 | + 5.88756, 6.90132, 7.13530 / | |
216 | DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=1,7)/ | |
217 | + .00810, .00902, 6.77247, .57652, .10565, | |
218 | + .00000, .32936, .57977, | |
219 | + .00985, .01003, 13.47605, .84415, .37838, | |
220 | + .00000, .59977, .84764, | |
221 | + .01140, .01091, 21.13824, 1.13844, .67685, | |
222 | + .00000, .89634, 1.14213, | |
223 | + .01280, .01171, 29.29614, 1.44744, .98941, | |
224 | + .07019, 1.20729, 1.45131, | |
225 | + .01409, .01244, 37.79176, 1.76920, 1.31429, | |
226 | + .42275, 1.53075, 1.77322, | |
227 | + .01531, .01312, 46.54340, 2.10173, 1.64963, | |
228 | + .77438, 1.86482, 2.10590, | |
229 | + .01645, .01376, 55.30159, 2.43832, 1.98877, | |
230 | + 1.12879, 2.20280, 2.44262 / | |
231 | DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=8,14)/ | |
232 | + .01752, .01437, 64.08105, 2.77901, 2.33179, | |
233 | + 1.48562, 2.54476, 2.78343, | |
234 | + .01855, .01494, 72.80413, 3.12144, 2.67638, | |
235 | + 1.84273, 2.88836, 3.12597, | |
236 | + .01953, .01548, 81.42059, 3.46399, 3.02094, | |
237 | + 2.19873, 3.23201, 3.46864, | |
238 | + .02047, .01600, 89.90174, 3.80560, 3.36442, | |
239 | + 2.55275, 3.57464, 3.81035, | |
240 | + .02137, .01650, 98.23544, 4.14564, 3.70622, | |
241 | + 2.90430, 3.91564, 4.15049, | |
242 | + .02223, .01698, 106.42037, 4.48385, 4.04609, | |
243 | + 3.25324, 4.25475, 4.48878, | |
244 | + .02307, .01744, 114.41388, 4.81877, 4.38258, | |
245 | + 3.59822, 4.59053, 4.82379 / | |
246 | DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=15,19)/ | |
247 | + .02387, .01789, 122.18080, 5.14911, 4.71442, | |
248 | + 3.93801, 4.92168, 5.15422, | |
249 | + .02465, .01831, 129.81091, 5.47726, 5.04399, | |
250 | + 4.27506, 5.25060, 5.48244, | |
251 | + .02541, .01873, 137.28435, 5.80244, 5.37053, | |
252 | + 4.60867, 5.57653, 5.80770, | |
253 | + .02614, .01913, 144.49228, 6.12121, 5.69060, | |
254 | + 4.93544, 5.89600, 6.12654, | |
255 | + .02685, .01952, 151.61221, 6.43875, 6.00939, | |
256 | + 5.26058, 6.21422, 6.44416 / | |
257 | DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=1,7)/ | |
258 | + .01291, .01216, 6.20156, .54036, .09215, | |
259 | + .00000, .30504, .54410, | |
260 | + .01547, .01360, 11.60259, .75851, .31588, | |
261 | + .00000, .52618, .76249, | |
262 | + .01772, .01486, 17.50877, .99023, .55217, | |
263 | + .00000, .76035, .99442, | |
264 | + .01973, .01598, 23.59314, 1.22739, .79322, | |
265 | + .05395, .99958, 1.23175, | |
266 | + .02158, .01701, 29.76331, 1.46923, 1.03850, | |
267 | + .32220, 1.24326, 1.47376, | |
268 | + .02331, .01796, 35.97956, 1.71481, 1.28715, | |
269 | + .58480, 1.49048, 1.71948, | |
270 | + .02492, .01885, 42.07872, 1.95960, 1.53473, | |
271 | + .84539, 1.73676, 1.96441 / | |
272 | DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=8,14)/ | |
273 | + .02645, .01969, 48.08881, 2.20404, 1.78174, | |
274 | + 1.10413, 1.98256, 2.20898, | |
275 | + .02789, .02048, 53.96851, 2.44676, 2.02682, | |
276 | + 1.35985, 2.22655, 2.45182, | |
277 | + .02926, .02123, 59.69471, 2.68691, 2.26916, | |
278 | + 1.61191, 2.46786, 2.69207, | |
279 | + .03056, .02194, 65.25824, 2.92397, 2.50829, | |
280 | + 1.85998, 2.70602, 2.92924, | |
281 | + .03181, .02262, 70.65990, 3.15776, 2.74400, | |
282 | + 2.10397, 2.94083, 3.16313, | |
283 | + .03301, .02327, 75.90666, 3.38828, 2.97635, | |
284 | + 2.34400, 3.17232, 3.39374, | |
285 | + .03416, .02389, 80.97660, 3.61471, 3.20450, | |
286 | + 2.57934, 3.39967, 3.62026 / | |
287 | DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=15,19)/ | |
288 | + .03527, .02449, 85.85220, 3.83630, 3.42773, | |
289 | + 2.80931, 3.62213, 3.84194, | |
290 | + .03634, .02507, 90.59946, 4.05488, 3.64788, | |
291 | + 3.03580, 3.84154, 4.06060, | |
292 | + .03737, .02562, 95.20920, 4.27005, 3.86454, | |
293 | + 3.25844, 4.05751, 4.27586, | |
294 | + .03837, .02616, 99.61356, 4.47953, 4.07544, | |
295 | + 3.47501, 4.26774, 4.48541, | |
296 | + .03934, .02668, 103.93369, 4.68703, 4.28430, | |
297 | + 3.68924, 4.47596, 4.69298 / | |
298 | DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=1,7)/ | |
299 | + .02034, .01652, 5.65225, .50432, .07968, | |
300 | + .00000, .28159, .50893, | |
301 | + .02407, .01858, 9.94245, .67927, .26081, | |
302 | + .00000, .45986, .68419, | |
303 | + .02731, .02036, 14.43102, .85896, .44558, | |
304 | + .00000, .64228, .86416, | |
305 | + .03020, .02193, 18.90255, 1.03828, .62923, | |
306 | + .04100, .82392, 1.04372, | |
307 | + .03283, .02337, 23.31495, 1.21738, .81214, | |
308 | + .24288, 1.00506, 1.22303, | |
309 | + .03527, .02469, 27.65916, 1.39603, .99422, | |
310 | + .43682, 1.18555, 1.40189, | |
311 | + .03754, .02592, 31.83426, 1.57138, 1.17267, | |
312 | + .62626, 1.36256, 1.57741 / | |
313 | DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=8,14)/ | |
314 | + .03967, .02707, 35.87514, 1.74408, 1.34822, | |
315 | + .81172, 1.53678, 1.75028, | |
316 | + .04168, .02815, 39.76421, 1.91344, 1.52022, | |
317 | + .99269, 1.70755, 1.91980, | |
318 | + .04358, .02917, 43.49528, 2.07912, 1.68834, | |
319 | + 1.16900, 1.87453, 2.08562, | |
320 | + .04538, .03013, 47.07044, 2.24097, 1.85248, | |
321 | + 1.34068, 2.03761, 2.24761, | |
322 | + .04710, .03105, 50.49731, 2.39905, 2.01271, | |
323 | + 1.50787, 2.19683, 2.40582, | |
324 | + .04875, .03193, 53.78654, 2.55353, 2.16922, | |
325 | + 1.67085, 2.35240, 2.56043, | |
326 | + .05032, .03277, 56.92845, 2.70399, 2.32159, | |
327 | + 1.82927, 2.50388, 2.71100 / | |
328 | DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=15,19)/ | |
329 | + .05183, .03357, 59.91586, 2.85003, 2.46945, | |
330 | + 1.98279, 2.65089, 2.85716, | |
331 | + .05328, .03434, 62.79673, 2.99304, 2.61419, | |
332 | + 2.13286, 2.79482, 3.00028, | |
333 | + .05469, .03509, 65.56800, 3.13284, 2.75565, | |
334 | + 2.27934, 2.93551, 3.14018, | |
335 | + .05603, .03580, 68.18784, 3.26795, 2.89234, | |
336 | + 2.42079, 3.07146, 3.27539, | |
337 | + .05734, .03649, 70.73832, 3.40100, 3.02691, | |
338 | + 2.55987, 3.20532, 3.40854 / | |
339 | DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=1,7)/ | |
340 | + .02643, .01989, 5.33300, .48281, .07281, | |
341 | + .00000, .26801, .48814, | |
342 | + .03106, .02241, 9.04815, .63501, .23161, | |
343 | + .00000, .42379, .64074, | |
344 | + .03507, .02459, 12.83521, .78836, .39040, | |
345 | + .00000, .58009, .79443, | |
346 | + .03861, .02650, 16.53288, .93916, .54584, | |
347 | + .03467, .73340, .94553, | |
348 | + .04183, .02824, 20.12173, 1.08794, .69870, | |
349 | + .20442, .88439, 1.09458, | |
350 | + .04481, .02984, 23.60596, 1.23480, .84922, | |
351 | + .36568, 1.03323, 1.24168, | |
352 | + .04756, .03131, 26.91204, 1.37760, .99535, | |
353 | + .52172, 1.17782, 1.38471 / | |
354 | DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=8,14)/ | |
355 | + .05014, .03269, 30.07650, 1.51709, 1.13789, | |
356 | + .67320, 1.31896, 1.52441, | |
357 | + .05256, .03398, 33.09121, 1.65286, 1.27648, | |
358 | + .81988, 1.45626, 1.66038, | |
359 | + .05484, .03520, 35.95637, 1.78477, 1.41100, | |
360 | + .96178, 1.58958, 1.79247, | |
361 | + .05701, .03635, 38.67790, 1.91282, 1.54149, | |
362 | + 1.09906, 1.71894, 1.92069, | |
363 | + .05907, .03744, 41.26545, 2.03715, 1.66812, | |
364 | + 1.23195, 1.84451, 2.04518, | |
365 | + .06103, .03848, 43.73038, 2.15798, 1.79113, | |
366 | + 1.36078, 1.96652, 2.16618, | |
367 | + .06291, .03947, 46.06755, 2.27506, 1.91025, | |
368 | + 1.48534, 2.08470, 2.28340 / | |
369 | DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=15,19)/ | |
370 | + .06470, .04041, 48.27351, 2.38812, 2.02526, | |
371 | + 1.60544, 2.19882, 2.39661, | |
372 | + .06643, .04132, 50.38773, 2.49835, 2.13734, | |
373 | + 1.72231, 2.31004, 2.50697, | |
374 | + .06809, .04220, 52.40919, 2.60564, 2.24639, | |
375 | + 1.83587, 2.41828, 2.61439, | |
376 | + .06969, .04303, 54.30672, 2.70886, 2.35130, | |
377 | + 1.94505, 2.52241, 2.71773, | |
378 | + .07123, .04384, 56.14520, 2.81013, 2.45420, | |
379 | + 2.05200, 2.62456, 2.81912 / | |
380 | DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=1,7)/ | |
381 | + .03179, .02279, 5.10358, .46712, .06809, | |
382 | + .00000, .25829, .47305, | |
383 | + .03718, .02571, 8.43961, .60419, .21210, | |
384 | + .00000, .39915, .61059, | |
385 | + .04182, .02821, 11.77731, .74043, .35407, | |
386 | + .00000, .53852, .74725, | |
387 | + .04591, .03040, 14.98898, .87302, .49153, | |
388 | + .03066, .67377, .88019, | |
389 | + .04961, .03239, 18.06856, 1.00268, .62549, | |
390 | + .18012, .80577, 1.01016, | |
391 | + .05302, .03421, 21.02767, 1.12970, .75636, | |
392 | + .32097, .93489, 1.13747, | |
393 | + .05617, .03588, 23.80894, 1.25238, .88253, | |
394 | + .45634, 1.05948, 1.26042 / | |
395 | DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=8,14)/ | |
396 | + .05910, .03745, 26.44914, 1.37149, 1.00485, | |
397 | + .58694, 1.18034, 1.37978, | |
398 | + .06186, .03891, 28.94529, 1.48680, 1.12312, | |
399 | + .71270, 1.29726, 1.49532, | |
400 | + .06445, .04028, 31.30086, 1.59826, 1.23733, | |
401 | + .83374, 1.41022, 1.60699, | |
402 | + .06690, .04157, 33.52361, 1.70596, 1.34759, | |
403 | + .95029, 1.51932, 1.71489, | |
404 | + .06923, .04280, 35.62395, 1.81008, 1.45412, | |
405 | + 1.06262, 1.62475, 1.81920, | |
406 | + .07145, .04396, 37.61330, 1.91087, 1.55718, | |
407 | + 1.17106, 1.72677, 1.92017, | |
408 | + .07356, .04507, 39.48883, 2.00813, 1.65660, | |
409 | + 1.27551, 1.82521, 2.01761 / | |
410 | DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=15,19)/ | |
411 | + .07558, .04613, 41.24903, 2.10172, 1.75222, | |
412 | + 1.37584, 1.91991, 2.11136, | |
413 | + .07752, .04715, 42.92804, 2.19266, 1.84510, | |
414 | + 1.47314, 2.01190, 2.20245, | |
415 | + .07938, .04812, 44.52591, 2.28088, 1.93518, | |
416 | + 1.56739, 2.10114, 2.29082, | |
417 | + .08117, .04905, 46.01746, 2.36547, 2.02154, | |
418 | + 1.65769, 2.18669, 2.37555, | |
419 | + .08290, .04995, 47.45732, 2.44825, 2.10601, | |
420 | + 1.74591, 2.27039, 2.45847 / | |
421 | DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=1,7)/ | |
422 | + .03673, .02553, 4.91482, .45426, .06446, | |
423 | + .00000, .25036, .46060, | |
424 | + .04275, .02879, 7.96518, .57999, .19742, | |
425 | + .00000, .38003, .58685, | |
426 | + .04793, .03157, 10.97152, .70361, .32698, | |
427 | + .00000, .50690, .71092, | |
428 | + .05247, .03401, 13.83031, .82289, .45133, | |
429 | + .02774, .62895, .83059, | |
430 | + .05657, .03620, 16.54461, .93872, .57162, | |
431 | + .16250, .74720, .94676, | |
432 | + .06034, .03821, 19.13077, 1.05148, .68838, | |
433 | + .28866, .86215, 1.05984, | |
434 | + .06381, .04005, 21.54247, 1.15980, .80032, | |
435 | + .40926, .97244, 1.16844 / | |
436 | DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=8,14)/ | |
437 | + .06704, .04176, 23.81627, 1.26446, .90830, | |
438 | + .52502, 1.07891, 1.27336, | |
439 | + .07006, .04336, 25.95245, 1.36532, 1.01223, | |
440 | + .63599, 1.18144, 1.37448, | |
441 | + .07291, .04486, 27.95644, 1.46242, 1.11217, | |
442 | + .74235, 1.28009, 1.47180, | |
443 | + .07559, .04627, 29.83712, 1.55588, 1.20828, | |
444 | + .84436, 1.37499, 1.56548, | |
445 | + .07813, .04761, 31.60490, 1.64591, 1.30080, | |
446 | + .94233, 1.46638, 1.65571, | |
447 | + .08055, .04887, 33.27084, 1.73277, 1.39002, | |
448 | + 1.03661, 1.55453, 1.74277, | |
449 | + .08285, .05008, 34.83403, 1.81633, 1.47580, | |
450 | + 1.12710, 1.63930, 1.82652 / | |
451 | DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=15,19)/ | |
452 | + .08505, .05122, 36.29396, 1.89648, 1.55805, | |
453 | + 1.21377, 1.72059, 1.90684, | |
454 | + .08716, .05232, 37.68100, 1.97414, 1.63772, | |
455 | + 1.29759, 1.79934, 1.98467, | |
456 | + .08918, .05337, 38.99577, 2.04930, 1.71479, | |
457 | + 1.37857, 1.87555, 2.05999, | |
458 | + .09111, .05438, 40.21697, 2.12115, 1.78846, | |
459 | + 1.45594, 1.94838, 2.13198, | |
460 | + .09299, .05535, 41.39225, 2.19130, 1.86036, | |
461 | + 1.53134, 2.01949, 2.20228 / | |
462 | DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=1,7)/ | |
463 | + .05729, .03676, 4.32079, .41243, .05376, | |
464 | + .00000, .22540, .42062, | |
465 | + .06573, .04131, 6.58273, .50617, .15570, | |
466 | + .00000, .32367, .51510, | |
467 | + .07288, .04514, 8.70834, .59533, .25158, | |
468 | + .00000, .41654, .60487, | |
469 | + .07909, .04845, 10.65358, .67913, .34109, | |
470 | + .02000, .50348, .68920, | |
471 | + .08464, .05139, 12.44142, .75870, .42566, | |
472 | + .11614, .58580, .76923, | |
473 | + .08969, .05406, 14.09782, .83465, .50609, | |
474 | + .20431, .66422, .84560, | |
475 | + .09431, .05649, 15.60198, .90632, .58182, | |
476 | + .28712, .73813, .91766 / | |
477 | DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=8,14)/ | |
478 | + .09857, .05873, 16.98759, .97448, .65368, | |
479 | + .36533, .80832, .98617, | |
480 | + .10254, .06081, 18.26130, 1.03922, .72183, | |
481 | + .43922, .87494, 1.05124, | |
482 | + .10625, .06274, 19.43187, 1.10070, .78647, | |
483 | + .50908, .93815, 1.11302, | |
484 | + .10972, .06455, 20.50929, 1.15913, .84784, | |
485 | + .57525, .99820, 1.17173, | |
486 | + .11300, .06624, 21.50360, 1.21476, .90623, | |
487 | + .63807, 1.05535, 1.22762, | |
488 | + .11610, .06785, 22.42455, 1.26784, .96191, | |
489 | + .69785, 1.10986, 1.28096, | |
490 | + .11904, .06936, 23.27370, 1.31835, 1.01488, | |
491 | + .75464, 1.16172, 1.33171 / | |
492 | DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=15,19)/ | |
493 | + .12182, .07079, 24.05259, 1.36629, 1.06514, | |
494 | + .80847, 1.21094, 1.37987, | |
495 | + .12448, .07216, 24.78187, 1.41233, 1.11337, | |
496 | + .86006, 1.25818, 1.42612, | |
497 | + .12703, .07346, 25.46301, 1.45648, 1.15963, | |
498 | + .90948, 1.30349, 1.47048, | |
499 | + .12945, .07470, 26.08382, 1.49827, 1.20341, | |
500 | + .95625, 1.34637, 1.51245, | |
501 | + .13179, .07589, 26.67465, 1.53877, 1.24583, | |
502 | + 1.00150, 1.38793, 1.55314 / | |
503 | DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=1,7)/ | |
504 | + .08880, .05423, 3.68945, .36591, .04378, | |
505 | + .00000, .19873, .37669, | |
506 | + .10026, .06037, 5.29736, .43225, .11930, | |
507 | + .00000, .27018, .44403, | |
508 | + .10981, .06545, 6.73290, .49328, .18782, | |
509 | + .00000, .33537, .50590, | |
510 | + .11798, .06977, 7.99157, .54910, .24995, | |
511 | + .01395, .39470, .56242, | |
512 | + .12520, .07355, 9.10605, .60085, .30722, | |
513 | + .08025, .44950, .61477, | |
514 | + .13170, .07694, 10.10534, .64921, .36050, | |
515 | + .13975, .50060, .66369, | |
516 | + .13758, .07999, 10.98410, .69396, .40968, | |
517 | + .19457, .54780, .70892 / | |
518 | DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=8,14)/ | |
519 | + .14296, .08277, 11.77089, .73576, .45552, | |
520 | + .24546, .59183, .75116, | |
521 | + .14793, .08531, 12.47468, .77481, .49827, | |
522 | + .29278, .63293, .79062, | |
523 | + .15252, .08766, 13.10461, .81132, .53821, | |
524 | + .33686, .67134, .82750, | |
525 | + .15681, .08984, 13.66985, .84551, .57558, | |
526 | + .37803, .70729, .86204, | |
527 | + .16081, .09187, 14.17889, .87762, .61066, | |
528 | + .41661, .74104, .89447, | |
529 | + .16458, .09376, 14.63947, .90785, .64369, | |
530 | + .45287, .77281, .92500, | |
531 | + .16812, .09554, 15.05374, .93626, .67472, | |
532 | + .48692, .80267, .95369 / | |
533 | DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=15,19)/ | |
534 | + .17146, .09721, 15.42384, .96286, .70380, | |
535 | + .51882, .83064, .98055, | |
536 | + .17463, .09879, 15.76315, .98812, .73141, | |
537 | + .54908, .85720, 1.00606, | |
538 | + .17764, .10029, 16.07312, 1.01209, .75762, | |
539 | + .57777, .88240, 1.03027, | |
540 | + .18050, .10170, 16.34717, 1.03449, .78214, | |
541 | + .60464, .90597, 1.05289, | |
542 | + .18324, .10305, 16.60378, 1.05602, .80571, | |
543 | + .63042, .92862, 1.07463 / | |
544 | DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=1,7)/ | |
545 | + .11432, .06858, 3.30622, .33623, .03830, | |
546 | + -.00001, .18233, .34918, | |
547 | + .12775, .07574, 4.59543, .38872, .10048, | |
548 | + -.00001, .24024, .40286, | |
549 | + .13882, .08157, 5.70932, .43609, .15572, | |
550 | + -.00001, .29201, .45121, | |
551 | + .14819, .08646, 6.65830, .47869, .20493, | |
552 | + .01109, .33830, .49462, | |
553 | + .15641, .09071, 7.47751, .51760, .24960, | |
554 | + .06346, .38041, .53422, | |
555 | + .16375, .09448, 8.19556, .55347, .29059, | |
556 | + .10984, .41914, .57071, | |
557 | + .17033, .09783, 8.81229, .58623, .32795, | |
558 | + .15207, .45445, .60401 / | |
559 | DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=8,14)/ | |
560 | + .17633, .10086, 9.35310, .61647, .36237, | |
561 | + .19084, .48701, .63475, | |
562 | + .18182, .10362, 9.82714, .64440, .39413, | |
563 | + .22653, .51707, .66313, | |
564 | + .18687, .10614, 10.24289, .67024, .42349, | |
565 | + .25945, .54486, .68937, | |
566 | + .19155, .10846, 10.60831, .69418, .45070, | |
567 | + .28993, .57062, .71369, | |
568 | + .19591, .11061, 10.93075, .71644, .47602, | |
569 | + .31825, .59457, .73629, | |
570 | + .19998, .11261, 11.21683, .73721, .49965, | |
571 | + .34466, .61692, .75739, | |
572 | + .20379, .11447, 11.46870, .75655, .52166, | |
573 | + .36926, .63774, .77701 / | |
574 | DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=15,19)/ | |
575 | + .20737, .11620, 11.68827, .77447, .54212, | |
576 | + .39213, .65706, .79521, | |
577 | + .21075, .11783, 11.88582, .79136, .56141, | |
578 | + .41368, .67528, .81236, | |
579 | + .21395, .11937, 12.06263, .80726, .57958, | |
580 | + .43399, .69243, .82850, | |
581 | + .21696, .12081, 12.21381, .82196, .59644, | |
582 | + .45285, .70832, .84343, | |
583 | + .21985, .12218, 12.35318, .83601, .61255, | |
584 | + .47086, .72351, .85769 / | |
585 | DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=1,7)/ | |
586 | + .13644, .08120, 3.02896, .31396, .03459, | |
587 | + -.00001, .17029, .32885, | |
588 | + .15130, .08904, 4.12006, .35763, .08824, | |
589 | + -.00001, .21956, .37385, | |
590 | + .16343, .09535, 5.03905, .39650, .13518, | |
591 | + -.00001, .26295, .41379, | |
592 | + .17363, .10059, 5.80427, .43102, .17646, | |
593 | + .00933, .30125, .44919, | |
594 | + .18249, .10510, 6.45123, .46219, .21350, | |
595 | + .05321, .33570, .48110, | |
596 | + .19037, .10907, 7.00779, .49061, .24714, | |
597 | + .09167, .36704, .51019, | |
598 | + .19738, .11257, 7.47629, .51630, .27750, | |
599 | + .12638, .39532, .53645 / | |
600 | DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=8,14)/ | |
601 | + .20373, .11571, 7.87978, .53980, .30523, | |
602 | + .15800, .42117, .56046, | |
603 | + .20952, .11854, 8.22705, .56129, .33059, | |
604 | + .18687, .44482, .58242, | |
605 | + .21481, .12112, 8.52597, .58100, .35386, | |
606 | + .21331, .46650, .60254, | |
607 | + .21970, .12348, 8.78374, .59910, .37526, | |
608 | + .23762, .48643, .62102, | |
609 | + .22422, .12565, 9.00682, .61579, .39502, | |
610 | + .26006, .50483, .63806, | |
611 | + .22843, .12765, 9.20088, .63124, .41335, | |
612 | + .28086, .52187, .65384, | |
613 | + .23235, .12951, 9.36795, .64550, .43031, | |
614 | + .30011, .53762, .66839 / | |
615 | DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=15,19)/ | |
616 | + .23601, .13122, 9.50977, .65861, .44595, | |
617 | + .31790, .55213, .68177, | |
618 | + .23946, .13283, 9.63474, .67088, .46062, | |
619 | + .33458, .56572, .69429, | |
620 | + .24272, .13434, 9.74396, .68234, .47436, | |
621 | + .35021, .57844, .70599, | |
622 | + .24577, .13574, 9.83363, .69284, .48701, | |
623 | + .36464, .59012, .71671, | |
624 | + .24868, .13707, 9.91472, .70281, .49905, | |
625 | + .37836, .60123, .72689 / | |
626 | DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=1,7)/ | |
627 | + .15628, .09260, 2.81322, .29605, .03183, | |
628 | + .00000, .16078, .31276, | |
629 | + .17222, .10091, 3.76659, .33348, .07940, | |
630 | + .00000, .20392, .35161, | |
631 | + .18513, .10753, 4.55235, .36642, .12052, | |
632 | + .00000, .24146, .38569, | |
633 | + .19590, .11298, 5.19380, .39538, .15632, | |
634 | + .00812, .27425, .41557, | |
635 | + .20520, .11762, 5.72621, .42126, .18813, | |
636 | + .04613, .30344, .44223, | |
637 | + .21341, .12168, 6.17672, .44467, .21679, | |
638 | + .07920, .32979, .46632, | |
639 | + .22070, .12522, 6.54890, .46561, .24243, | |
640 | + .10881, .35335, .48785 / | |
641 | DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=8,14)/ | |
642 | + .22725, .12839, 6.86413, .48461, .26567, | |
643 | + .13559, .37470, .50736, | |
644 | + .23319, .13122, 7.13066, .50185, .28679, | |
645 | + .15990, .39410, .52507, | |
646 | + .23861, .13379, 7.35587, .51752, .30603, | |
647 | + .18204, .41175, .54116, | |
648 | + .24357, .13612, 7.54630, .53181, .32361, | |
649 | + .20227, .42787, .55582, | |
650 | + .24816, .13824, 7.70794, .54488, .33975, | |
651 | + .22084, .44263, .56923, | |
652 | + .25241, .14020, 7.84576, .55690, .35463, | |
653 | + .23796, .45623, .58156, | |
654 | + .25635, .14200, 7.96125, .56789, .36832, | |
655 | + .25374, .46872, .59284 / | |
656 | DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=15,19)/ | |
657 | + .26001, .14365, 8.05622, .57792, .38086, | |
658 | + .26823, .48013, .60313, | |
659 | + .26345, .14520, 8.13777, .58723, .39257, | |
660 | + .28177, .49076, .61269, | |
661 | + .26669, .14664, 8.20687, .59589, .40348, | |
662 | + .29439, .50066, .62156, | |
663 | + .26971, .14797, 8.26045, .60372, .41346, | |
664 | + .30598, .50967, .62960, | |
665 | + .27258, .14922, 8.30759, .61113, .42291, | |
666 | + .31696, .51820, .63720 / | |
667 | DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=1,7)/ | |
668 | + .23590, .13868, 2.16171, .23745, .02396, | |
669 | + .00000, .13082, .26215, | |
670 | + .25446, .14758, 2.76970, .25885, .05562, | |
671 | + .00000, .15801, .28514, | |
672 | + .26899, .15435, 3.22983, .27695, .08189, | |
673 | + .00000, .18071, .30440, | |
674 | + .28075, .15968, 3.57588, .29221, .10395, | |
675 | + .00507, .19977, .32057, | |
676 | + .29063, .16404, 3.84121, .30531, .12288, | |
677 | + .02846, .21612, .33439, | |
678 | + .29914, .16771, 4.04948, .31671, .13943, | |
679 | + .04825, .23038, .34639, | |
680 | + .30648, .17079, 4.20655, .32650, .15378, | |
681 | + .06551, .24269, .35666 / | |
682 | DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=8,14)/ | |
683 | + .31294, .17344, 4.32829, .33504, .16643, | |
684 | + .08076, .25350, .36562, | |
685 | + .31865, .17574, 4.42150, .34250, .17762, | |
686 | + .09428, .26300, .37342, | |
687 | + .32376, .17773, 4.49152, .34901, .18755, | |
688 | + .10632, .27139, .38023, | |
689 | + .32835, .17948, 4.54287, .35472, .19641, | |
690 | + .11711, .27881, .38619, | |
691 | + .33248, .18102, 4.57947, .35974, .20434, | |
692 | + .12681, .28542, .39143, | |
693 | + .33624, .18239, 4.60458, .36417, .21149, | |
694 | + .13559, .29132, .39604, | |
695 | + .33966, .18360, 4.61920, .36804, .21789, | |
696 | + .14351, .29657, .40007 / | |
697 | DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=15,19)/ | |
698 | + .34276, .18466, 4.62450, .37139, .22362, | |
699 | + .15065, .30120, .40356, | |
700 | + .34562, .18562, 4.62435, .37438, .22885, | |
701 | + .15720, .30540, .40667, | |
702 | + .34826, .18649, 4.61922, .37704, .23362, | |
703 | + .16321, .30920, .40943, | |
704 | + .35065, .18724, 4.60760, .37928, .23785, | |
705 | + .16861, .31251, .41175, | |
706 | + .35291, .18794, 4.59432, .38133, .24180, | |
707 | + .17366, .31557, .41388 / | |
708 | DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=1,7)/ | |
709 | + .34870, .20185, 1.60761, .17704, .01738, | |
710 | + -.00002, .10167, .21403, | |
711 | + .36659, .20828, 1.96903, .18737, .03734, | |
712 | + -.00001, .11730, .22529, | |
713 | + .37973, .21259, 2.20538, .19540, .05298, | |
714 | + -.00001, .12948, .23387, | |
715 | + .38971, .21554, 2.35707, .20160, .06543, | |
716 | + .00293, .13905, .24038, | |
717 | + .39759, .21762, 2.45432, .20644, .07561, | |
718 | + .01623, .14674, .24537, | |
719 | + .40400, .21912, 2.51666, .21027, .08410, | |
720 | + .02706, .15305, .24928, | |
721 | + .40916, .22011, 2.55005, .21318, .09113, | |
722 | + .03618, .15813, .25218 / | |
723 | DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=8,14)/ | |
724 | + .41343, .22078, 2.56543, .21544, .09707, | |
725 | + .04399, .16231, .25438, | |
726 | + .41697, .22119, 2.56732, .21715, .10211, | |
727 | + .05069, .16575, .25599, | |
728 | + .41992, .22139, 2.55924, .21840, .10639, | |
729 | + .05648, .16857, .25712, | |
730 | + .42237, .22142, 2.54390, .21928, .11004, | |
731 | + .06150, .17087, .25785, | |
732 | + .42441, .22133, 2.52343, .21986, .11317, | |
733 | + .06590, .17276, .25827, | |
734 | + .42614, .22113, 2.49945, .22019, .11587, | |
735 | + .06976, .17430, .25843, | |
736 | + .42755, .22084, 2.47252, .22030, .11819, | |
737 | + .07315, .17553, .25836 / | |
738 | DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=15,19)/ | |
739 | + .42868, .22047, 2.44299, .22021, .12015, | |
740 | + .07611, .17648, .25808, | |
741 | + .42962, .22005, 2.41287, .22000, .12187, | |
742 | + .07875, .17723, .25767, | |
743 | + .43040, .21960, 2.38229, .21968, .12335, | |
744 | + .08111, .17781, .25715, | |
745 | + .43097, .21908, 2.35033, .21919, .12458, | |
746 | + .08316, .17818, .25648, | |
747 | + .43146, .21855, 2.31919, .21867, .12568, | |
748 | + .08504, .17847, .25578 / | |
749 | DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=1,7)/ | |
750 | + .43156, .24337, 1.36996, .14248, .01413, | |
751 | + .00001, .08555, .18770, | |
752 | + .44554, .24571, 1.60928, .14817, .02881, | |
753 | + .00000, .09594, .19319, | |
754 | + .45485, .24650, 1.74154, .15205, .03974, | |
755 | + .00000, .10344, .19666, | |
756 | + .46118, .24636, 1.80853, .15459, .04804, | |
757 | + .00201, .10889, .19869, | |
758 | + .46558, .24567, 1.83713, .15618, .05452, | |
759 | + .01104, .11293, .19975, | |
760 | + .46869, .24467, 1.84335, .15713, .05971, | |
761 | + .01816, .11598, .20015, | |
762 | + .47073, .24338, 1.83214, .15751, .06381, | |
763 | + .02399, .11820, .19997 / | |
764 | DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=8,14)/ | |
765 | + .47203, .24197, 1.81166, .15751, .06714, | |
766 | + .02885, .11982, .19942, | |
767 | + .47275, .24046, 1.78492, .15723, .06984, | |
768 | + .03291, .12098, .19858, | |
769 | + .47302, .23888, 1.75418, .15672, .07203, | |
770 | + .03632, .12177, .19753, | |
771 | + .47294, .23726, 1.72109, .15603, .07381, | |
772 | + .03921, .12226, .19633, | |
773 | + .47257, .23563, 1.68685, .15522, .07526, | |
774 | + .04168, .12251, .19502, | |
775 | + .47197, .23401, 1.65231, .15431, .07643, | |
776 | + .04379, .12258, .19362, | |
777 | + .47118, .23239, 1.61764, .15332, .07736, | |
778 | + .04560, .12249, .19214 / | |
779 | DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=15,19)/ | |
780 | + .47022, .23075, 1.58301, .15224, .07809, | |
781 | + .04712, .12226, .19061, | |
782 | + .46916, .22914, 1.54941, .15114, .07867, | |
783 | + .04846, .12194, .18908, | |
784 | + .46802, .22756, 1.51677, .15003, .07914, | |
785 | + .04962, .12156, .18755, | |
786 | + .46674, .22598, 1.48451, .14886, .07945, | |
787 | + .05059, .12107, .18596, | |
788 | + .46545, .22444, 1.45378, .14771, .07970, | |
789 | + .05146, .12056, .18441 / | |
790 | DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=1,7)/ | |
791 | + .49642, .27083, 1.24381, .11851, .01198, | |
792 | + .00000, .07419, .16844, | |
793 | + .50483, .26869, 1.39643, .12149, .02341, | |
794 | + .00000, .08131, .17002, | |
795 | + .50920, .26582, 1.46080, .12301, .03151, | |
796 | + -.00001, .08598, .17022, | |
797 | + .51113, .26259, 1.47647, .12353, .03737, | |
798 | + .00149, .08902, .16950, | |
799 | + .51148, .25923, 1.46618, .12342, .04175, | |
800 | + .00805, .09100, .16819, | |
801 | + .51091, .25589, 1.44264, .12290, .04511, | |
802 | + .01308, .09226, .16659, | |
803 | + .50954, .25252, 1.40963, .12204, .04765, | |
804 | + .01710, .09295, .16471 / | |
805 | DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=8,14)/ | |
806 | + .50770, .24924, 1.37291, .12100, .04960, | |
807 | + .02037, .09326, .16270, | |
808 | + .50550, .24606, 1.33439, .11982, .05111, | |
809 | + .02304, .09328, .16060, | |
810 | + .50306, .24295, 1.29540, .11854, .05225, | |
811 | + .02523, .09307, .15849, | |
812 | + .50045, .23994, 1.25683, .11720, .05311, | |
813 | + .02704, .09271, .15635, | |
814 | + .49770, .23704, 1.21925, .11584, .05376, | |
815 | + .02854, .09222, .15422, | |
816 | + .49489, .23424, 1.18303, .11447, .05423, | |
817 | + .02980, .09165, .15212, | |
818 | + .49201, .23154, 1.14811, .11308, .05454, | |
819 | + .03085, .09100, .15006 / | |
820 | DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=15,19)/ | |
821 | + .48906, .22890, 1.11445, .11168, .05473, | |
822 | + .03171, .09028, .14801, | |
823 | + .48614, .22636, 1.08255, .11031, .05483, | |
824 | + .03243, .08954, .14603, | |
825 | + .48324, .22391, 1.05224, .10896, .05486, | |
826 | + .03304, .08879, .14410, | |
827 | + .48027, .22153, 1.02304, .10762, .05480, | |
828 | + .03353, .08798, .14219, | |
829 | + .47739, .21925, .99559, .10632, .05472, | |
830 | + .03396, .08720, .14036 / | |
831 | DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=1,7)/ | |
832 | + .54788, .28796, 1.16251, .10008, .01030, | |
833 | + .00000, .06503, .15187, | |
834 | + .54982, .28147, 1.24605, .10126, .01943, | |
835 | + -.00001, .06981, .15057, | |
836 | + .54871, .27514, 1.26090, .10129, .02557, | |
837 | + -.00001, .07255, .14847, | |
838 | + .54586, .26911, 1.24196, .10060, .02980, | |
839 | + .00114, .07402, .14592, | |
840 | + .54202, .26338, 1.20736, .09950, .03283, | |
841 | + .00605, .07470, .14316, | |
842 | + .53767, .25800, 1.16665, .09818, .03505, | |
843 | + .00976, .07491, .14033, | |
844 | + .53290, .25286, 1.12225, .09668, .03663, | |
845 | + .01262, .07469, .13746 / | |
846 | DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=8,14)/ | |
847 | + .52798, .24802, 1.07803, .09512, .03778, | |
848 | + .01491, .07426, .13466, | |
849 | + .52298, .24345, 1.03499, .09352, .03859, | |
850 | + .01673, .07366, .13192, | |
851 | + .51794, .23912, .99371, .09193, .03916, | |
852 | + .01819, .07295, .12925, | |
853 | + .51294, .23502, .95450, .09035, .03952, | |
854 | + .01937, .07216, .12668, | |
855 | + .50798, .23113, .91753, .08879, .03974, | |
856 | + .02033, .07132, .12420, | |
857 | + .50313, .22743, .88284, .08727, .03984, | |
858 | + .02111, .07045, .12182, | |
859 | + .49837, .22389, .85019, .08577, .03986, | |
860 | + .02173, .06957, .11952 / | |
861 | DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=15,19)/ | |
862 | + .49364, .22050, .81939, .08431, .03978, | |
863 | + .02224, .06866, .11731, | |
864 | + .48906, .21728, .79066, .08291, .03966, | |
865 | + .02265, .06776, .11519, | |
866 | + .48460, .21419, .76375, .08155, .03950, | |
867 | + .02298, .06688, .11317, | |
868 | + .48018, .21121, .73828, .08022, .03929, | |
869 | + .02322, .06598, .11121, | |
870 | + .47592, .20838, .71454, .07895, .03907, | |
871 | + .02343, .06512, .10933 / | |
872 | DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=1,7)/ | |
873 | + .59696, .29838, 1.08309, .08167, .00858, | |
874 | + -.00002, .05522, .13266, | |
875 | + .59016, .28694, 1.09774, .08134, .01553, | |
876 | + -.00001, .05789, .12884, | |
877 | + .58187, .27686, 1.06781, .08019, .01993, | |
878 | + .00000, .05899, .12486, | |
879 | + .57302, .26782, 1.02038, .07863, .02279, | |
880 | + .00082, .05921, .12091, | |
881 | + .56396, .25965, .96770, .07689, .02472, | |
882 | + .00435, .05890, .11708, | |
883 | + .55504, .25221, .91569, .07509, .02603, | |
884 | + .00691, .05830, .11346, | |
885 | + .54624, .24531, .86515, .07322, .02689, | |
886 | + .00886, .05751, .11001 / | |
887 | DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=8,14)/ | |
888 | + .53771, .23897, .81806, .07142, .02745, | |
889 | + .01036, .05660, .10674, | |
890 | + .52946, .23309, .77450, .06968, .02776, | |
891 | + .01153, .05563, .10369, | |
892 | + .52152, .22761, .73437, .06798, .02793, | |
893 | + .01244, .05463, .10081, | |
894 | + .51386, .22250, .69747, .06635, .02798, | |
895 | + .01315, .05363, .09807, | |
896 | + .50650, .21771, .66361, .06480, .02793, | |
897 | + .01372, .05263, .09551, | |
898 | + .49943, .21321, .63254, .06331, .02781, | |
899 | + .01416, .05164, .09310, | |
900 | + .49261, .20897, .60392, .06188, .02765, | |
901 | + .01450, .05068, .09080 / | |
902 | DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=15,19)/ | |
903 | + .48601, .20493, .57745, .06051, .02744, | |
904 | + .01475, .04973, .08864, | |
905 | + .47968, .20112, .55311, .05921, .02721, | |
906 | + .01495, .04882, .08658, | |
907 | + .47358, .19753, .53063, .05798, .02696, | |
908 | + .01510, .04794, .08462, | |
909 | + .46765, .19408, .50970, .05678, .02669, | |
910 | + .01518, .04707, .08275, | |
911 | + .46199, .19082, .49038, .05564, .02642, | |
912 | + .01524, .04624, .08100 / | |
913 | DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=1,7)/ | |
914 | + .63159, .29953, 1.00799, .06659, .00710, | |
915 | + -.00003, .04657, .11446, | |
916 | + .61584, .28388, .97004, .06530, .01244, | |
917 | + -.00002, .04778, .10903, | |
918 | + .60049, .27069, .90969, .06348, .01562, | |
919 | + -.00003, .04786, .10400, | |
920 | + .58581, .25930, .84524, .06152, .01755, | |
921 | + .00059, .04732, .09936, | |
922 | + .57186, .24922, .78353, .05951, .01877, | |
923 | + .00316, .04648, .09510, | |
924 | + .55875, .24025, .72728, .05757, .01954, | |
925 | + .00500, .04549, .09120, | |
926 | + .54630, .23208, .67591, .05564, .01996, | |
927 | + .00634, .04442, .08762 / | |
928 | DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=8,14)/ | |
929 | + .53458, .22466, .62999, .05384, .02018, | |
930 | + .00735, .04333, .08432, | |
931 | + .52352, .21790, .58891, .05214, .02025, | |
932 | + .00813, .04224, .08127, | |
933 | + .51305, .21168, .55210, .05053, .02021, | |
934 | + .00872, .04117, .07845, | |
935 | + .50315, .20590, .51904, .04902, .02010, | |
936 | + .00915, .04014, .07583, | |
937 | + .49378, .20053, .48930, .04759, .01994, | |
938 | + .00948, .03914, .07340, | |
939 | + .48486, .19556, .46248, .04625, .01975, | |
940 | + .00974, .03819, .07113, | |
941 | + .47637, .19091, .43817, .04498, .01952, | |
942 | + .00992, .03727, .06901 / | |
943 | DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=15,19)/ | |
944 | + .46825, .18652, .41601, .04377, .01927, | |
945 | + .01004, .03638, .06703, | |
946 | + .46055, .18240, .39587, .04263, .01902, | |
947 | + .01013, .03554, .06518, | |
948 | + .45322, .17851, .37746, .04154, .01876, | |
949 | + .01019, .03473, .06344, | |
950 | + .44612, .17483, .36053, .04053, .01849, | |
951 | + .01021, .03396, .06178, | |
952 | + .43938, .17135, .34503, .03958, .01822, | |
953 | + .01022, .03323, .06022 / | |
954 | DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=1,7)/ | |
955 | + .65359, .29370, .92960, .05398, .00584, | |
956 | + -.00001, .03885, .09726, | |
957 | + .62904, .27475, .85340, .05217, .00987, | |
958 | + .00000, .03905, .09100, | |
959 | + .60694, .25923, .77385, .05009, .01214, | |
960 | + -.00001, .03846, .08552, | |
961 | + .58690, .24609, .70071, .04799, .01344, | |
962 | + .00045, .03751, .08072, | |
963 | + .56853, .23468, .63607, .04596, .01418, | |
964 | + .00231, .03641, .07644, | |
965 | + .55171, .22467, .58004, .04406, .01461, | |
966 | + .00361, .03528, .07260, | |
967 | + .53609, .21567, .53101, .04227, .01478, | |
968 | + .00453, .03413, .06914 / | |
969 | DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=8,14)/ | |
970 | + .52166, .20760, .48845, .04060, .01481, | |
971 | + .00521, .03302, .06603, | |
972 | + .50826, .20028, .45132, .03906, .01475, | |
973 | + .00573, .03195, .06320, | |
974 | + .49573, .19362, .41879, .03763, .01462, | |
975 | + .00610, .03093, .06062, | |
976 | + .48401, .18751, .39010, .03630, .01446, | |
977 | + .00637, .02996, .05824, | |
978 | + .47304, .18186, .36470, .03504, .01426, | |
979 | + .00656, .02905, .05607, | |
980 | + .46273, .17665, .34212, .03387, .01403, | |
981 | + .00670, .02819, .05408, | |
982 | + .45296, .17181, .32189, .03282, .01381, | |
983 | + .00680, .02737, .05220 / | |
984 | DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=15,19)/ | |
985 | + .44370, .16727, .30369, .03179, .01356, | |
986 | + .00686, .02660, .05048, | |
987 | + .43497, .16303, .28730, .03083, .01332, | |
988 | + .00689, .02587, .04888, | |
989 | + .42670, .15906, .27249, .02994, .01309, | |
990 | + .00690, .02518, .04737, | |
991 | + .41879, .15530, .25898, .02909, .01285, | |
992 | + .00689, .02452, .04596, | |
993 | + .41131, .15177, .24669, .02830, .01262, | |
994 | + .00688, .02390, .04464 / | |
995 | DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=1,7)/ | |
996 | + .66431, .28276, .84653, .04336, .00474, | |
997 | + -.00001, .03197, .08132, | |
998 | + .63153, .26127, .74452, .04130, .00777, | |
999 | + -.00002, .03156, .07481, | |
1000 | + .60331, .24403, .65460, .03916, .00939, | |
1001 | + -.00002, .03062, .06937, | |
1002 | + .57848, .22974, .57878, .03712, .01026, | |
1003 | + .00031, .02949, .06470, | |
1004 | + .55631, .21746, .51526, .03520, .01070, | |
1005 | + .00169, .02831, .06068, | |
1006 | + .53635, .20682, .46221, .03348, .01090, | |
1007 | + .00260, .02718, .05712, | |
1008 | + .51811, .19738, .41729, .03187, .01095, | |
1009 | + .00327, .02607, .05398 / | |
1010 | DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=8,14)/ | |
1011 | + .50146, .18898, .37923, .03041, .01089, | |
1012 | + .00374, .02504, .05117, | |
1013 | + .48618, .18142, .34668, .02907, .01076, | |
1014 | + .00407, .02406, .04866, | |
1015 | + .47205, .17460, .31865, .02784, .01060, | |
1016 | + .00432, .02315, .04640, | |
1017 | + .45893, .16838, .29435, .02671, .01042, | |
1018 | + .00449, .02230, .04435, | |
1019 | + .44676, .16266, .27310, .02567, .01022, | |
1020 | + .00459, .02151, .04247, | |
1021 | + .43541, .15741, .25441, .02470, .01001, | |
1022 | + .00466, .02077, .04075, | |
1023 | + .42477, .15256, .23784, .02381, .00981, | |
1024 | + .00472, .02007, .03917 / | |
1025 | DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=15,19)/ | |
1026 | + .41473, .14803, .22313, .02297, .00960, | |
1027 | + .00475, .01941, .03771, | |
1028 | + .40530, .14383, .20999, .02220, .00939, | |
1029 | + .00476, .01880, .03636, | |
1030 | + .39642, .13991, .19818, .02148, .00920, | |
1031 | + .00475, .01823, .03512, | |
1032 | + .38796, .13621, .18754, .02080, .00900, | |
1033 | + .00473, .01769, .03395, | |
1034 | + .37999, .13276, .17790, .02016, .00881, | |
1035 | + .00469, .01719, .03286 / | |
1036 | DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=1,7)/ | |
1037 | + .66501, .26806, .76016, .03445, .00382, | |
1038 | + -.00002, .02597, .06684, | |
1039 | + .62480, .24477, .64287, .03232, .00608, | |
1040 | + -.00001, .02518, .06056, | |
1041 | + .59113, .22650, .54934, .03031, .00722, | |
1042 | + -.00002, .02409, .05541, | |
1043 | + .56229, .21151, .47509, .02840, .00778, | |
1044 | + .00025, .02295, .05116, | |
1045 | + .53691, .19883, .41540, .02670, .00804, | |
1046 | + .00123, .02181, .04752, | |
1047 | + .51441, .18793, .36705, .02518, .00813, | |
1048 | + .00189, .02075, .04436, | |
1049 | + .49410, .17834, .32712, .02382, .00808, | |
1050 | + .00236, .01975, .04161 / | |
1051 | DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=8,14)/ | |
1052 | + .47576, .16989, .29396, .02258, .00797, | |
1053 | + .00269, .01883, .03920, | |
1054 | + .45909, .16234, .26613, .02146, .00783, | |
1055 | + .00292, .01799, .03704, | |
1056 | + .44381, .15554, .24250, .02044, .00768, | |
1057 | + .00307, .01721, .03511, | |
1058 | + .42975, .14939, .22223, .01951, .00750, | |
1059 | + .00317, .01648, .03339, | |
1060 | + .41678, .14378, .20475, .01866, .00732, | |
1061 | + .00323, .01581, .03183, | |
1062 | + .40477, .13864, .18955, .01786, .00714, | |
1063 | + .00328, .01521, .03041, | |
1064 | + .39351, .13393, .17622, .01715, .00696, | |
1065 | + .00329, .01463, .02911 / | |
1066 | DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=15,19)/ | |
1067 | + .38297, .12955, .16448, .01650, .00679, | |
1068 | + .00329, .01410, .02791, | |
1069 | + .37314, .12549, .15406, .01589, .00663, | |
1070 | + .00329, .01360, .02681, | |
1071 | + .36394, .12172, .14477, .01532, .00646, | |
1072 | + .00327, .01315, .02580, | |
1073 | + .35520, .11820, .13642, .01479, .00630, | |
1074 | + .00325, .01271, .02486, | |
1075 | + .34701, .11491, .12891, .01429, .00615, | |
1076 | + .00323, .01230, .02398 / | |
1077 | DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=1,7)/ | |
1078 | + .65683, .25071, .67279, .02701, .00304, | |
1079 | + .00005, .02080, .05405, | |
1080 | + .61006, .22645, .54900, .02502, .00469, | |
1081 | + .00002, .01982, .04824, | |
1082 | + .57187, .20766, .45698, .02318, .00547, | |
1083 | + .00003, .01870, .04364, | |
1084 | + .53971, .19245, .38718, .02156, .00583, | |
1085 | + .00019, .01760, .03986, | |
1086 | + .51183, .17974, .33292, .02009, .00594, | |
1087 | + .00091, .01656, .03672, | |
1088 | + .48739, .16889, .29007, .01884, .00596, | |
1089 | + .00139, .01564, .03399, | |
1090 | + .46562, .15941, .25544, .01766, .00588, | |
1091 | + .00169, .01477, .03169 / | |
1092 | DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=8,14)/ | |
1093 | + .44613, .15111, .22718, .01664, .00577, | |
1094 | + .00190, .01400, .02965, | |
1095 | + .42852, .14376, .20383, .01574, .00564, | |
1096 | + .00205, .01328, .02786, | |
1097 | + .41250, .13719, .18424, .01492, .00550, | |
1098 | + .00215, .01264, .02627, | |
1099 | + .39787, .13125, .16766, .01418, .00534, | |
1100 | + .00222, .01204, .02486, | |
1101 | + .38445, .12587, .15352, .01349, .00518, | |
1102 | + .00225, .01151, .02359, | |
1103 | + .37207, .12097, .14132, .01286, .00504, | |
1104 | + .00227, .01102, .02245, | |
1105 | + .36055, .11649, .13069, .01233, .00490, | |
1106 | + .00228, .01056, .02140 / | |
1107 | DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=15,19)/ | |
1108 | + .34986, .11233, .12139, .01178, .00475, | |
1109 | + .00227, .01014, .02046, | |
1110 | + .33991, .10850, .11322, .01129, .00461, | |
1111 | + .00225, .00975, .01960, | |
1112 | + .33058, .10496, .10598, .01086, .00449, | |
1113 | + .00223, .00938, .01878, | |
1114 | + .32179, .10166, .09953, .01047, .00437, | |
1115 | + .00221, .00905, .01802, | |
1116 | + .31357, .09859, .09375, .01010, .00425, | |
1117 | + .00218, .00874, .01732 / | |
1118 | DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=1,7)/ | |
1119 | + .64065, .23200, .58715, .02115, .00225, | |
1120 | + -.00014, .01625, .04297, | |
1121 | + .58852, .20729, .46345, .01928, .00347, | |
1122 | + -.00015, .01527, .03782, | |
1123 | + .54674, .18842, .37639, .01765, .00404, | |
1124 | + -.00013, .01425, .03381, | |
1125 | + .51212, .17334, .31289, .01624, .00425, | |
1126 | + .00002, .01328, .03060, | |
1127 | + .48246, .16081, .26492, .01500, .00432, | |
1128 | + .00056, .01240, .02795, | |
1129 | + .45675, .15021, .22778, .01394, .00432, | |
1130 | + .00091, .01162, .02570, | |
1131 | + .43402, .14108, .19840, .01301, .00421, | |
1132 | + .00114, .01090, .02378 / | |
1133 | DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=8,14)/ | |
1134 | + .41382, .13310, .17477, .01219, .00411, | |
1135 | + .00129, .01026, .02214, | |
1136 | + .39575, .12606, .15547, .01145, .00400, | |
1137 | + .00140, .00969, .02070, | |
1138 | + .37940, .11981, .13951, .01081, .00388, | |
1139 | + .00147, .00917, .01943, | |
1140 | + .36454, .11421, .12615, .01022, .00376, | |
1141 | + .00151, .00870, .01828, | |
1142 | + .35100, .10916, .11484, .00969, .00364, | |
1143 | + .00153, .00828, .01726, | |
1144 | + .33855, .10457, .10517, .00923, .00352, | |
1145 | + .00154, .00789, .01634, | |
1146 | + .32708, .10038, .09681, .00877, .00341, | |
1147 | + .00154, .00753, .01554 / | |
1148 | DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=15,19)/ | |
1149 | + .31640, .09653, .08957, .00837, .00330, | |
1150 | + .00153, .00721, .01479, | |
1151 | + .30650, .09298, .08323, .00802, .00320, | |
1152 | + .00152, .00691, .01411, | |
1153 | + .29730, .08971, .07763, .00768, .00310, | |
1154 | + .00151, .00663, .01351, | |
1155 | + .28866, .08667, .07266, .00736, .00300, | |
1156 | + .00149, .00637, .01294, | |
1157 | + .28060, .08385, .06823, .00707, .00290, | |
1158 | + .00147, .00613, .01241 / | |
1159 | DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=1,7)/ | |
1160 | + .61804, .21189, .50473, .01606, .00178, | |
1161 | + -.00004, .01267, .03361, | |
1162 | + .56155, .18741, .38629, .01448, .00265, | |
1163 | + -.00002, .01170, .02917, | |
1164 | + .51709, .16893, .30663, .01312, .00301, | |
1165 | + -.00003, .01078, .02580, | |
1166 | + .48072, .15429, .25038, .01196, .00313, | |
1167 | + .00007, .00994, .02317, | |
1168 | + .44992, .14226, .20887, .01098, .00315, | |
1169 | + .00044, .00919, .02097, | |
1170 | + .42343, .13218, .17743, .01016, .00310, | |
1171 | + .00067, .00855, .01915, | |
1172 | + .40028, .12349, .15296, .00941, .00302, | |
1173 | + .00083, .00798, .01759 / | |
1174 | DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=8,14)/ | |
1175 | + .37985, .11599, .13355, .00877, .00293, | |
1176 | + .00093, .00746, .01628, | |
1177 | + .36164, .10941, .11791, .00820, .00283, | |
1178 | + .00100, .00700, .01514, | |
1179 | + .34534, .10357, .10511, .00769, .00274, | |
1180 | + .00104, .00659, .01414, | |
1181 | + .33058, .09836, .09447, .00724, .00264, | |
1182 | + .00106, .00623, .01326, | |
1183 | + .31715, .09370, .08553, .00685, .00254, | |
1184 | + .00107, .00590, .01247, | |
1185 | + .30492, .08949, .07796, .00648, .00244, | |
1186 | + .00107, .00560, .01176, | |
1187 | + .29363, .08564, .07147, .00617, .00236, | |
1188 | + .00107, .00534, .01114 / | |
1189 | DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=15,19)/ | |
1190 | + .28321, .08212, .06586, .00588, .00228, | |
1191 | + .00106, .00509, .01056, | |
1192 | + .27361, .07890, .06099, .00561, .00220, | |
1193 | + .00105, .00486, .01004, | |
1194 | + .26470, .07593, .05671, .00536, .00213, | |
1195 | + .00104, .00464, .00958, | |
1196 | + .25637, .07317, .05293, .00512, .00205, | |
1197 | + .00102, .00445, .00914, | |
1198 | + .24862, .07062, .04958, .00490, .00199, | |
1199 | + .00100, .00428, .00875 / | |
1200 | DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=1,7)/ | |
1201 | + .58965, .19166, .42772, .01211, .00134, | |
1202 | + -.00003, .00966, .02584, | |
1203 | + .53008, .16777, .31802, .01077, .00195, | |
1204 | + -.00004, .00879, .02215, | |
1205 | + .48387, .14997, .24702, .00967, .00221, | |
1206 | + -.00003, .00800, .01937, | |
1207 | + .44655, .13604, .19835, .00872, .00226, | |
1208 | + .00004, .00732, .01722, | |
1209 | + .41526, .12469, .16325, .00796, .00224, | |
1210 | + .00031, .00672, .01548, | |
1211 | + .38864, .11519, .13706, .00730, .00220, | |
1212 | + .00049, .00620, .01404, | |
1213 | + .36545, .10711, .11702, .00673, .00214, | |
1214 | + .00058, .00574, .01284 / | |
1215 | DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=8,14)/ | |
1216 | + .34518, .10014, .10134, .00624, .00206, | |
1217 | + .00064, .00535, .01181, | |
1218 | + .32726, .09407, .08885, .00580, .00198, | |
1219 | + .00069, .00499, .01091, | |
1220 | + .31125, .08873, .07872, .00542, .00190, | |
1221 | + .00072, .00468, .01015, | |
1222 | + .29683, .08398, .07038, .00509, .00182, | |
1223 | + .00073, .00440, .00948, | |
1224 | + .28380, .07972, .06342, .00479, .00175, | |
1225 | + .00073, .00415, .00888, | |
1226 | + .27196, .07588, .05755, .00451, .00169, | |
1227 | + .00073, .00393, .00835, | |
1228 | + .26109, .07242, .05256, .00429, .00162, | |
1229 | + .00072, .00372, .00788 / | |
1230 | DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=15,19)/ | |
1231 | + .25111, .06925, .04828, .00408, .00156, | |
1232 | + .00071, .00354, .00744, | |
1233 | + .24194, .06634, .04457, .00387, .00150, | |
1234 | + .00070, .00337, .00706, | |
1235 | + .23348, .06368, .04134, .00367, .00144, | |
1236 | + .00071, .00321, .00672, | |
1237 | + .22558, .06122, .03848, .00349, .00139, | |
1238 | + .00069, .00307, .00641, | |
1239 | + .21825, .05896, .03595, .00333, .00134, | |
1240 | + .00067, .00293, .00612 / | |
1241 | DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=1,7)/ | |
1242 | + .55671, .17150, .35716, .00892, .00101, | |
1243 | + -.00001, .00728, .01953, | |
1244 | + .49518, .14866, .25840, .00785, .00144, | |
1245 | + -.00001, .00653, .01650, | |
1246 | + .44816, .13180, .19669, .00697, .00159, | |
1247 | + .00000, .00588, .01430, | |
1248 | + .41060, .11872, .15543, .00624, .00162, | |
1249 | + .00004, .00532, .01262, | |
1250 | + .37939, .10818, .12629, .00567, .00160, | |
1251 | + .00024, .00483, .01125, | |
1252 | + .35306, .09941, .10492, .00515, .00155, | |
1253 | + .00034, .00444, .01014, | |
1254 | + .33032, .09198, .08878, .00473, .00150, | |
1255 | + .00041, .00409, .00920 / | |
1256 | DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=8,14)/ | |
1257 | + .31055, .08562, .07630, .00436, .00144, | |
1258 | + .00045, .00378, .00843, | |
1259 | + .29318, .08010, .06644, .00404, .00138, | |
1260 | + .00047, .00351, .00776, | |
1261 | + .27774, .07527, .05852, .00376, .00132, | |
1262 | + .00050, .00327, .00718, | |
1263 | + .26392, .07099, .05207, .00352, .00125, | |
1264 | + .00051, .00306, .00667, | |
1265 | + .25146, .06717, .04672, .00330, .00119, | |
1266 | + .00051, .00288, .00624, | |
1267 | + .24017, .06374, .04224, .00311, .00115, | |
1268 | + .00050, .00272, .00585, | |
1269 | + .22995, .06063, .03845, .00292, .00110, | |
1270 | + .00050, .00257, .00550 / | |
1271 | DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=15,19)/ | |
1272 | + .22052, .05783, .03521, .00277, .00105, | |
1273 | + .00048, .00243, .00518, | |
1274 | + .21186, .05527, .03241, .00264, .00101, | |
1275 | + .00048, .00231, .00489, | |
1276 | + .20388, .05293, .02998, .00252, .00098, | |
1277 | + .00048, .00219, .00464, | |
1278 | + .19649, .05077, .02786, .00240, .00093, | |
1279 | + .00046, .00209, .00440, | |
1280 | + .18966, .04880, .02598, .00229, .00089, | |
1281 | + .00045, .00199, .00418 / | |
1282 | DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=1,7)/ | |
1283 | + .52016, .15185, .29381, .00640, .00079, | |
1284 | + .00005, .00540, .01451, | |
1285 | + .45781, .13035, .20711, .00559, .00106, | |
1286 | + .00005, .00477, .01212, | |
1287 | + .41085, .11466, .15465, .00492, .00115, | |
1288 | + .00005, .00425, .01038, | |
1289 | + .37367, .10259, .12037, .00438, .00116, | |
1290 | + .00008, .00381, .00908, | |
1291 | + .34313, .09290, .09662, .00394, .00114, | |
1292 | + .00019, .00345, .00803, | |
1293 | + .31752, .08491, .07948, .00356, .00110, | |
1294 | + .00026, .00313, .00719, | |
1295 | + .29558, .07820, .06671, .00326, .00104, | |
1296 | + .00030, .00287, .00648 / | |
1297 | DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=8,14)/ | |
1298 | + .27662, .07248, .05694, .00299, .00099, | |
1299 | + .00033, .00263, .00591, | |
1300 | + .26003, .06752, .04928, .00276, .00094, | |
1301 | + .00035, .00244, .00543, | |
1302 | + .24537, .06321, .04317, .00256, .00090, | |
1303 | + .00035, .00227, .00500, | |
1304 | + .23231, .05940, .03823, .00239, .00085, | |
1305 | + .00035, .00211, .00462, | |
1306 | + .22059, .05603, .03418, .00224, .00081, | |
1307 | + .00034, .00198, .00430, | |
1308 | + .21004, .05302, .03079, .00209, .00077, | |
1309 | + .00034, .00186, .00402, | |
1310 | + .20044, .05030, .02794, .00198, .00074, | |
1311 | + .00033, .00175, .00375 / | |
1312 | DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=15,19)/ | |
1313 | + .19166, .04784, .02552, .00188, .00070, | |
1314 | + .00033, .00165, .00353, | |
1315 | + .18365, .04560, .02343, .00178, .00068, | |
1316 | + .00032, .00156, .00333, | |
1317 | + .17632, .04356, .02163, .00168, .00066, | |
1318 | + .00031, .00148, .00314, | |
1319 | + .16954, .04169, .02005, .00158, .00063, | |
1320 | + .00031, .00141, .00297, | |
1321 | + .16328, .03997, .01866, .00149, .00060, | |
1322 | + .00031, .00134, .00283 / | |
1323 | DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=1,7)/ | |
1324 | + .48090, .13323, .23815, .00463, .00054, | |
1325 | + .00001, .00389, .01058, | |
1326 | + .41895, .11324, .16385, .00397, .00074, | |
1327 | + .00002, .00340, .00871, | |
1328 | + .37279, .09882, .12007, .00344, .00080, | |
1329 | + .00001, .00299, .00741, | |
1330 | + .33665, .08781, .09216, .00307, .00080, | |
1331 | + .00003, .00266, .00641, | |
1332 | + .30720, .07905, .07313, .00273, .00078, | |
1333 | + .00012, .00239, .00564, | |
1334 | + .28268, .07187, .05961, .00248, .00074, | |
1335 | + .00018, .00216, .00501, | |
1336 | + .26183, .06588, .04965, .00224, .00070, | |
1337 | + .00020, .00196, .00451 / | |
1338 | DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=8,14)/ | |
1339 | + .24391, .06079, .04209, .00205, .00067, | |
1340 | + .00022, .00180, .00407, | |
1341 | + .22831, .05642, .03624, .00189, .00064, | |
1342 | + .00024, .00166, .00372, | |
1343 | + .21461, .05261, .03162, .00175, .00060, | |
1344 | + .00023, .00153, .00341, | |
1345 | + .20249, .04927, .02788, .00161, .00056, | |
1346 | + .00023, .00142, .00314, | |
1347 | + .19165, .04633, .02484, .00149, .00054, | |
1348 | + .00023, .00132, .00292, | |
1349 | + .18189, .04370, .02231, .00140, .00051, | |
1350 | + .00023, .00124, .00272, | |
1351 | + .17306, .04133, .02019, .00132, .00049, | |
1352 | + .00023, .00117, .00254 / | |
1353 | DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=15,19)/ | |
1354 | + .16503, .03921, .01839, .00125, .00046, | |
1355 | + .00022, .00109, .00238, | |
1356 | + .15771, .03729, .01685, .00117, .00043, | |
1357 | + .00022, .00103, .00224, | |
1358 | + .15103, .03553, .01552, .00110, .00041, | |
1359 | + .00020, .00097, .00211, | |
1360 | + .14485, .03392, .01437, .00105, .00040, | |
1361 | + .00020, .00092, .00200, | |
1362 | + .13917, .03245, .01335, .00099, .00038, | |
1363 | + .00020, .00087, .00189 / | |
1364 | DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=1,7)/ | |
1365 | + .44001, .11559, .19006, .00324, .00038, | |
1366 | + .00003, .00278, .00754, | |
1367 | + .37939, .09733, .12774, .00274, .00051, | |
1368 | + .00002, .00238, .00615, | |
1369 | + .33470, .08429, .09202, .00240, .00052, | |
1370 | + .00002, .00206, .00518, | |
1371 | + .30011, .07442, .06971, .00214, .00052, | |
1372 | + .00003, .00183, .00443, | |
1373 | + .27218, .06660, .05475, .00189, .00050, | |
1374 | + .00008, .00161, .00388, | |
1375 | + .24907, .06024, .04422, .00170, .00047, | |
1376 | + .00011, .00146, .00343, | |
1377 | + .22956, .05495, .03657, .00153, .00045, | |
1378 | + .00013, .00131, .00307 / | |
1379 | DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=8,14)/ | |
1380 | + .21287, .05049, .03084, .00140, .00042, | |
1381 | + .00014, .00119, .00278, | |
1382 | + .19842, .04667, .02642, .00129, .00040, | |
1383 | + .00015, .00110, .00251, | |
1384 | + .18581, .04337, .02295, .00118, .00038, | |
1385 | + .00014, .00100, .00229, | |
1386 | + .17467, .04049, .02017, .00109, .00036, | |
1387 | + .00014, .00092, .00211, | |
1388 | + .16475, .03794, .01791, .00102, .00034, | |
1389 | + .00014, .00086, .00195, | |
1390 | + .15589, .03568, .01605, .00095, .00032, | |
1391 | + .00013, .00080, .00180, | |
1392 | + .14790, .03366, .01449, .00088, .00030, | |
1393 | + .00013, .00075, .00169 / | |
1394 | DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=15,19)/ | |
1395 | + .14064, .03184, .01317, .00083, .00029, | |
1396 | + .00013, .00070, .00158, | |
1397 | + .13405, .03020, .01204, .00078, .00027, | |
1398 | + .00013, .00066, .00148, | |
1399 | + .12805, .02870, .01108, .00073, .00025, | |
1400 | + .00012, .00063, .00140, | |
1401 | + .12250, .02734, .01024, .00070, .00024, | |
1402 | + .00012, .00059, .00131, | |
1403 | + .11740, .02610, .00950, .00067, .00023, | |
1404 | + .00011, .00055, .00123 / | |
1405 | DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=1,7)/ | |
1406 | + .39819, .09919, .14914, .00220, .00031, | |
1407 | + .00004, .00195, .00525, | |
1408 | + .33978, .08269, .09797, .00184, .00036, | |
1409 | + .00004, .00165, .00426, | |
1410 | + .29723, .07103, .06939, .00159, .00037, | |
1411 | + .00003, .00142, .00355, | |
1412 | + .26461, .06228, .05188, .00139, .00036, | |
1413 | + .00004, .00124, .00301, | |
1414 | + .23845, .05540, .04033, .00122, .00034, | |
1415 | + .00007, .00109, .00262, | |
1416 | + .21702, .04983, .03232, .00107, .00033, | |
1417 | + .00009, .00098, .00231, | |
1418 | + .19897, .04524, .02655, .00098, .00031, | |
1419 | + .00009, .00088, .00203 / | |
1420 | DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=8,14)/ | |
1421 | + .18368, .04138, .02226, .00088, .00028, | |
1422 | + .00010, .00080, .00183, | |
1423 | + .17050, .03810, .01898, .00080, .00026, | |
1424 | + .00010, .00072, .00166, | |
1425 | + .15903, .03527, .01643, .00073, .00025, | |
1426 | + .00010, .00066, .00152, | |
1427 | + .14893, .03281, .01440, .00068, .00024, | |
1428 | + .00010, .00061, .00139, | |
1429 | + .13999, .03064, .01274, .00063, .00023, | |
1430 | + .00010, .00057, .00127, | |
1431 | + .13204, .02872, .01139, .00058, .00022, | |
1432 | + .00010, .00053, .00118, | |
1433 | + .12487, .02702, .01026, .00056, .00021, | |
1434 | + .00009, .00049, .00108 / | |
1435 | DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=15,19)/ | |
1436 | + .11840, .02549, .00931, .00052, .00019, | |
1437 | + .00010, .00046, .00101, | |
1438 | + .11255, .02411, .00850, .00050, .00018, | |
1439 | + .00010, .00043, .00095, | |
1440 | + .10721, .02287, .00781, .00047, .00018, | |
1441 | + .00009, .00041, .00087, | |
1442 | + .10232, .02172, .00721, .00044, .00017, | |
1443 | + .00009, .00038, .00083, | |
1444 | + .09785, .02069, .00668, .00040, .00016, | |
1445 | + .00008, .00036, .00079 / | |
1446 | DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=1,7)/ | |
1447 | + .35637, .08418, .11504, .00144, .00020, | |
1448 | + .00002, .00134, .00363, | |
1449 | + .30093, .06947, .07388, .00119, .00025, | |
1450 | + .00003, .00113, .00287, | |
1451 | + .26098, .05917, .05149, .00101, .00026, | |
1452 | + .00003, .00096, .00236, | |
1453 | + .23066, .05151, .03802, .00086, .00026, | |
1454 | + .00003, .00084, .00199, | |
1455 | + .20652, .04555, .02928, .00077, .00025, | |
1456 | + .00006, .00075, .00169, | |
1457 | + .18689, .04074, .02329, .00065, .00023, | |
1458 | + .00007, .00066, .00150, | |
1459 | + .17047, .03680, .01902, .00059, .00022, | |
1460 | + .00007, .00059, .00132 / | |
1461 | DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=8,14)/ | |
1462 | + .15663, .03351, .01587, .00053, .00020, | |
1463 | + .00008, .00053, .00118, | |
1464 | + .14477, .03071, .01348, .00047, .00019, | |
1465 | + .00009, .00049, .00107, | |
1466 | + .13448, .02832, .01163, .00044, .00018, | |
1467 | + .00008, .00044, .00097, | |
1468 | + .12548, .02625, .01016, .00041, .00017, | |
1469 | + .00008, .00041, .00088, | |
1470 | + .11755, .02444, .00898, .00037, .00016, | |
1471 | + .00008, .00038, .00080, | |
1472 | + .11050, .02284, .00800, .00034, .00015, | |
1473 | + .00008, .00035, .00075, | |
1474 | + .10418, .02142, .00720, .00033, .00014, | |
1475 | + .00007, .00033, .00069 / | |
1476 | DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=15,19)/ | |
1477 | + .09850, .02015, .00652, .00031, .00014, | |
1478 | + .00008, .00031, .00064, | |
1479 | + .09338, .01901, .00594, .00028, .00013, | |
1480 | + .00008, .00028, .00060, | |
1481 | + .08872, .01798, .00545, .00026, .00012, | |
1482 | + .00007, .00026, .00056, | |
1483 | + .08446, .01704, .00502, .00025, .00011, | |
1484 | + .00007, .00025, .00052, | |
1485 | + .08057, .01619, .00465, .00024, .00011, | |
1486 | + .00006, .00024, .00049 / | |
1487 | DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=1,7)/ | |
1488 | + .31534, .07072, .08731, .00103, .00009, | |
1489 | + -.00003, .00084, .00244, | |
1490 | + .26356, .05780, .05498, .00083, .00013, | |
1491 | + -.00001, .00070, .00190, | |
1492 | + .22668, .04884, .03774, .00070, .00014, | |
1493 | + -.00002, .00060, .00153, | |
1494 | + .19891, .04225, .02760, .00059, .00013, | |
1495 | + -.00001, .00052, .00130, | |
1496 | + .17696, .03713, .02109, .00054, .00012, | |
1497 | + .00001, .00044, .00111, | |
1498 | + .15925, .03305, .01666, .00047, .00012, | |
1499 | + .00002, .00039, .00097, | |
1500 | + .14455, .02971, .01354, .00042, .00011, | |
1501 | + .00003, .00035, .00086 / | |
1502 | DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=8,14)/ | |
1503 | + .13219, .02694, .01125, .00038, .00010, | |
1504 | + .00003, .00031, .00075, | |
1505 | + .12165, .02460, .00953, .00036, .00010, | |
1506 | + .00003, .00028, .00067, | |
1507 | + .11257, .02260, .00820, .00032, .00009, | |
1508 | + .00003, .00026, .00061, | |
1509 | + .10466, .02087, .00715, .00029, .00008, | |
1510 | + .00003, .00024, .00055, | |
1511 | + .09772, .01937, .00630, .00026, .00008, | |
1512 | + .00003, .00022, .00051, | |
1513 | + .09158, .01805, .00561, .00023, .00007, | |
1514 | + .00003, .00020, .00048, | |
1515 | + .08608, .01688, .00504, .00023, .00007, | |
1516 | + .00003, .00018, .00043 / | |
1517 | DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=15,19)/ | |
1518 | + .08116, .01584, .00456, .00022, .00006, | |
1519 | + .00003, .00017, .00040, | |
1520 | + .07674, .01491, .00415, .00020, .00006, | |
1521 | + .00003, .00016, .00037, | |
1522 | + .07273, .01406, .00380, .00019, .00006, | |
1523 | + .00003, .00014, .00035, | |
1524 | + .06907, .01330, .00350, .00018, .00006, | |
1525 | + .00003, .00013, .00033, | |
1526 | + .06574, .01261, .00324, .00017, .00005, | |
1527 | + .00002, .00013, .00031 / | |
1528 | DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=1,7)/ | |
1529 | + .27543, .05845, .06477, .00059, .00010, | |
1530 | + .00003, .00059, .00156, | |
1531 | + .22769, .04730, .03998, .00050, .00010, | |
1532 | + .00003, .00047, .00122, | |
1533 | + .19413, .03965, .02708, .00042, .00010, | |
1534 | + .00002, .00038, .00099, | |
1535 | + .16908, .03404, .01959, .00036, .00009, | |
1536 | + .00003, .00033, .00083, | |
1537 | + .14947, .02974, .01485, .00031, .00008, | |
1538 | + .00003, .00028, .00071, | |
1539 | + .13371, .02634, .01167, .00027, .00007, | |
1540 | + .00002, .00025, .00060, | |
1541 | + .12076, .02356, .00944, .00024, .00007, | |
1542 | + .00003, .00022, .00053 / | |
1543 | DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=8,14)/ | |
1544 | + .10990, .02127, .00782, .00024, .00007, | |
1545 | + .00003, .00019, .00047, | |
1546 | + .10070, .01934, .00660, .00021, .00006, | |
1547 | + .00003, .00017, .00042, | |
1548 | + .09282, .01770, .00566, .00018, .00006, | |
1549 | + .00003, .00016, .00037, | |
1550 | + .08598, .01629, .00493, .00017, .00005, | |
1551 | + .00002, .00015, .00033, | |
1552 | + .07998, .01506, .00434, .00016, .00005, | |
1553 | + .00003, .00013, .00030, | |
1554 | + .07469, .01399, .00386, .00015, .00005, | |
1555 | + .00002, .00012, .00028, | |
1556 | + .07001, .01305, .00346, .00013, .00004, | |
1557 | + .00002, .00011, .00026 / | |
1558 | DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=15,19)/ | |
1559 | + .06580, .01220, .00313, .00013, .00004, | |
1560 | + .00002, .00010, .00024, | |
1561 | + .06203, .01145, .00284, .00012, .00004, | |
1562 | + .00002, .00009, .00022, | |
1563 | + .05863, .01078, .00260, .00012, .00003, | |
1564 | + .00002, .00009, .00021, | |
1565 | + .05556, .01017, .00239, .00010, .00004, | |
1566 | + .00002, .00009, .00019, | |
1567 | + .05276, .00962, .00221, .00010, .00003, | |
1568 | + .00002, .00008, .00018 / | |
1569 | DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=1,7)/ | |
1570 | + .23735, .04768, .04709, .00034, .00008, | |
1571 | + .00004, .00039, .00098, | |
1572 | + .19415, .03819, .02850, .00027, .00008, | |
1573 | + .00004, .00031, .00075, | |
1574 | + .16402, .03174, .01904, .00024, .00007, | |
1575 | + .00002, .00026, .00061, | |
1576 | + .14179, .02706, .01365, .00019, .00006, | |
1577 | + .00002, .00021, .00051, | |
1578 | + .12451, .02349, .01027, .00018, .00006, | |
1579 | + .00003, .00018, .00042, | |
1580 | + .11074, .02068, .00802, .00016, .00005, | |
1581 | + .00002, .00016, .00036, | |
1582 | + .09945, .01840, .00647, .00014, .00005, | |
1583 | + .00003, .00014, .00032 / | |
1584 | DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=8,14)/ | |
1585 | + .09009, .01653, .00534, .00011, .00005, | |
1586 | + .00002, .00012, .00028, | |
1587 | + .08217, .01496, .00450, .00011, .00004, | |
1588 | + .00002, .00011, .00025, | |
1589 | + .07541, .01364, .00385, .00010, .00004, | |
1590 | + .00002, .00009, .00023, | |
1591 | + .06959, .01251, .00334, .00009, .00003, | |
1592 | + .00002, .00009, .00021, | |
1593 | + .06451, .01153, .00294, .00008, .00003, | |
1594 | + .00002, .00008, .00018, | |
1595 | + .06004, .01067, .00261, .00008, .00003, | |
1596 | + .00002, .00008, .00016, | |
1597 | + .05608, .00992, .00234, .00008, .00003, | |
1598 | + .00002, .00007, .00015 / | |
1599 | DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=15,19)/ | |
1600 | + .05256, .00925, .00211, .00007, .00003, | |
1601 | + .00002, .00006, .00014, | |
1602 | + .04941, .00866, .00192, .00007, .00003, | |
1603 | + .00001, .00006, .00013, | |
1604 | + .04656, .00813, .00175, .00007, .00002, | |
1605 | + .00001, .00006, .00012, | |
1606 | + .04400, .00765, .00161, .00006, .00002, | |
1607 | + .00001, .00005, .00010, | |
1608 | + .04168, .00722, .00149, .00005, .00002, | |
1609 | + .00001, .00005, .00009 / | |
1610 | DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=1,7)/ | |
1611 | + .20188, .03842, .03353, .00024, .00003, | |
1612 | + .00001, .00022, .00062, | |
1613 | + .16328, .03045, .01994, .00019, .00003, | |
1614 | + .00001, .00017, .00047, | |
1615 | + .13671, .02510, .01316, .00017, .00003, | |
1616 | + .00001, .00014, .00037, | |
1617 | + .11730, .02124, .00936, .00013, .00003, | |
1618 | + .00000, .00012, .00030, | |
1619 | + .10235, .01832, .00700, .00011, .00002, | |
1620 | + .00001, .00010, .00025, | |
1621 | + .09047, .01603, .00545, .00010, .00003, | |
1622 | + .00001, .00009, .00023, | |
1623 | + .08083, .01419, .00438, .00008, .00002, | |
1624 | + .00001, .00007, .00019 / | |
1625 | DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=8,14)/ | |
1626 | + .07285, .01269, .00360, .00008, .00002, | |
1627 | + .00000, .00006, .00016, | |
1628 | + .06614, .01144, .00303, .00008, .00001, | |
1629 | + .00001, .00005, .00015, | |
1630 | + .06046, .01039, .00259, .00007, .00002, | |
1631 | + .00001, .00005, .00013, | |
1632 | + .05557, .00949, .00225, .00007, .00002, | |
1633 | + .00001, .00005, .00012, | |
1634 | + .05132, .00872, .00197, .00007, .00001, | |
1635 | + .00001, .00004, .00011, | |
1636 | + .04760, .00804, .00175, .00006, .00001, | |
1637 | + .00000, .00003, .00009, | |
1638 | + .04433, .00746, .00157, .00006, .00001, | |
1639 | + .00000, .00003, .00008 / | |
1640 | DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=15,19)/ | |
1641 | + .04142, .00693, .00141, .00005, .00001, | |
1642 | + .00000, .00003, .00008, | |
1643 | + .03883, .00647, .00128, .00005, .00001, | |
1644 | + .00001, .00003, .00007, | |
1645 | + .03652, .00606, .00117, .00004, .00001, | |
1646 | + .00000, .00003, .00007, | |
1647 | + .03441, .00569, .00108, .00004, .00001, | |
1648 | + .00001, .00002, .00006, | |
1649 | + .03250, .00535, .00099, .00004, .00001, | |
1650 | + .00001, .00002, .00006 / | |
1651 | DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=1,7)/ | |
1652 | + .16881, .03032, .02320, .00009, .00004, | |
1653 | + .00004, .00014, .00037, | |
1654 | + .13497, .02378, .01355, .00008, .00003, | |
1655 | + .00003, .00011, .00027, | |
1656 | + .11197, .01942, .00885, .00007, .00003, | |
1657 | + .00002, .00009, .00021, | |
1658 | + .09528, .01632, .00624, .00007, .00003, | |
1659 | + .00002, .00007, .00016, | |
1660 | + .08255, .01398, .00465, .00005, .00002, | |
1661 | + .00002, .00006, .00015, | |
1662 | + .07252, .01216, .00360, .00006, .00002, | |
1663 | + .00002, .00006, .00010, | |
1664 | + .06443, .01071, .00289, .00004, .00002, | |
1665 | + .00001, .00004, .00010 / | |
1666 | DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=8,14)/ | |
1667 | + .05777, .00953, .00237, .00003, .00002, | |
1668 | + .00001, .00004, .00009, | |
1669 | + .05221, .00855, .00199, .00004, .00001, | |
1670 | + .00001, .00004, .00008, | |
1671 | + .04752, .00773, .00170, .00003, .00001, | |
1672 | + .00001, .00003, .00007, | |
1673 | + .04349, .00703, .00147, .00003, .00001, | |
1674 | + .00001, .00003, .00006, | |
1675 | + .04002, .00643, .00129, .00002, .00001, | |
1676 | + .00001, .00003, .00006, | |
1677 | + .03701, .00592, .00114, .00001, .00001, | |
1678 | + .00001, .00002, .00005, | |
1679 | + .03432, .00546, .00102, .00003, .00001, | |
1680 | + .00001, .00002, .00005 / | |
1681 | DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=15,19)/ | |
1682 | + .03197, .00507, .00092, .00002, .00001, | |
1683 | + .00001, .00002, .00004, | |
1684 | + .02988, .00471, .00084, .00002, .00001, | |
1685 | + .00001, .00002, .00004, | |
1686 | + .02800, .00440, .00076, .00002, .00001, | |
1687 | + .00001, .00002, .00003, | |
1688 | + .02632, .00412, .00070, .00002, .00001, | |
1689 | + .00001, .00002, .00003, | |
1690 | + .02480, .00387, .00064, .00002, .00001, | |
1691 | + .00001, .00002, .00003 / | |
1692 | DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=1,7)/ | |
1693 | + .11210, .01794, .01023, .00004, .00001, | |
1694 | + .00000, .00004, .00011, | |
1695 | + .08751, .01374, .00580, .00003, .00001, | |
1696 | + .00000, .00003, .00008, | |
1697 | + .07118, .01102, .00371, .00002, .00000, | |
1698 | + .00000, .00003, .00006, | |
1699 | + .05958, .00910, .00259, .00001, .00000, | |
1700 | + .00000, .00002, .00005, | |
1701 | + .05085, .00769, .00192, .00002, .00001, | |
1702 | + .00000, .00002, .00004, | |
1703 | + .04410, .00661, .00148, .00001, .00000, | |
1704 | + .00000, .00001, .00003, | |
1705 | + .03872, .00575, .00118, .00001, .00001, | |
1706 | + .00000, .00001, .00002 / | |
1707 | DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=8,14)/ | |
1708 | + .03434, .00506, .00097, .00001, .00001, | |
1709 | + .00000, .00001, .00002, | |
1710 | + .03074, .00450, .00081, .00001, .00000, | |
1711 | + .00000, .00001, .00002, | |
1712 | + .02771, .00403, .00069, .00001, .00000, | |
1713 | + .00000, .00001, .00002, | |
1714 | + .02516, .00364, .00060, .00000, .00000, | |
1715 | + .00000, .00001, .00002, | |
1716 | + .02296, .00330, .00052, .00000, .00000, | |
1717 | + .00000, .00001, .00002, | |
1718 | + .02106, .00302, .00046, .00001, .00000, | |
1719 | + .00000, .00001, .00001, | |
1720 | + .01940, .00277, .00041, .00001, .00000, | |
1721 | + .00000, .00001, .00001 / | |
1722 | DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=15,19)/ | |
1723 | + .01795, .00255, .00037, .00001, .00000, | |
1724 | + .00000, .00001, .00001, | |
1725 | + .01667, .00236, .00034, .00000, .00000, | |
1726 | + .00000, .00001, .00001, | |
1727 | + .01554, .00219, .00031, .00000, .00000, | |
1728 | + .00000, .00001, .00001, | |
1729 | + .01452, .00203, .00028, .00000, .00000, | |
1730 | + .00000, .00001, .00001, | |
1731 | + .01360, .00190, .00026, .00000, .00000, | |
1732 | + .00000, .00001, .00001 / | |
1733 | DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=1,7)/ | |
1734 | + .06818, .00965, .00390, .00001, .00000, | |
1735 | + .00000, .00001, .00003, | |
1736 | + .05187, .00721, .00217, .00000, .00000, | |
1737 | + -.00001, .00001, .00003, | |
1738 | + .04129, .00566, .00137, .00001, .00000, | |
1739 | + -.00001, .00000, .00002, | |
1740 | + .03395, .00459, .00096, .00000, .00000, | |
1741 | + .00000, .00000, .00001, | |
1742 | + .02853, .00382, .00071, .00001, .00000, | |
1743 | + .00000, .00000, .00001, | |
1744 | + .02439, .00324, .00055, .00001, .00000, | |
1745 | + .00000, .00000, .00000, | |
1746 | + .02114, .00279, .00044, .00000, .00000, | |
1747 | + .00000, .00000, .00001 / | |
1748 | DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=8,14)/ | |
1749 | + .01853, .00242, .00036, .00000, .00000, | |
1750 | + .00000, .00000, .00001, | |
1751 | + .01641, .00213, .00030, .00000, .00000, | |
1752 | + .00000, .00000, .00000, | |
1753 | + .01465, .00189, .00025, .00000, .00000, | |
1754 | + .00000, .00000, .00000, | |
1755 | + .01317, .00169, .00022, .00000, .00000, | |
1756 | + .00000, .00000, .00000, | |
1757 | + .01192, .00152, .00019, .00000, .00000, | |
1758 | + .00000, .00000, .00000, | |
1759 | + .01085, .00138, .00017, .00000, .00000, | |
1760 | + .00000, .00000, .00000, | |
1761 | + .00992, .00126, .00015, .00000, .00000, | |
1762 | + .00000, .00000, .00000 / | |
1763 | DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=15,19)/ | |
1764 | + .00911, .00115, .00014, .00000, .00000, | |
1765 | + .00000, .00000, .00000, | |
1766 | + .00840, .00106, .00012, .00000, .00000, | |
1767 | + .00000, .00000, .00000, | |
1768 | + .00778, .00097, .00011, .00000, .00000, | |
1769 | + .00000, .00000, .00000, | |
1770 | + .00722, .00090, .00010, .00000, .00000, | |
1771 | + .00000, .00000, .00000, | |
1772 | + .00673, .00084, .00009, .00000, .00000, | |
1773 | + .00000, .00000, .00000 / | |
1774 | DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=1,7)/ | |
1775 | + .03695, .00456, .00123, .00000, .00000, | |
1776 | + .00000, .00000, .00001, | |
1777 | + .02730, .00331, .00068, .00001, .00000, | |
1778 | + .00000, .00000, .00000, | |
1779 | + .02123, .00254, .00043, .00000, .00000, | |
1780 | + .00000, .00000, .00000, | |
1781 | + .01711, .00203, .00030, .00000, .00000, | |
1782 | + .00000, .00000, .00000, | |
1783 | + .01412, .00166, .00022, .00000, .00000, | |
1784 | + .00000, .00000, .00000, | |
1785 | + .01188, .00138, .00017, .00000, .00000, | |
1786 | + .00000, .00000, .00000, | |
1787 | + .01015, .00117, .00014, .00000, .00000, | |
1788 | + .00000, .00000, .00000 / | |
1789 | DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=8,14)/ | |
1790 | + .00879, .00101, .00011, .00000, .00000, | |
1791 | + .00000, .00000, .00000, | |
1792 | + .00768, .00088, .00010, .00000, .00000, | |
1793 | + .00000, .00000, .00000, | |
1794 | + .00678, .00077, .00008, .00000, .00000, | |
1795 | + .00000, .00000, .00000, | |
1796 | + .00604, .00068, .00007, .00000, .00000, | |
1797 | + .00000, .00000, .00000, | |
1798 | + .00541, .00061, .00006, .00000, .00000, | |
1799 | + .00000, .00000, .00000, | |
1800 | + .00488, .00054, .00005, .00000, .00000, | |
1801 | + .00000, .00000, .00000, | |
1802 | + .00442, .00049, .00005, .00000, .00000, | |
1803 | + .00000, .00000, .00000 / | |
1804 | DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=15,19)/ | |
1805 | + .00403, .00045, .00004, .00000, .00000, | |
1806 | + .00000, .00000, .00000, | |
1807 | + .00369, .00041, .00004, .00000, .00000, | |
1808 | + .00000, .00000, .00000, | |
1809 | + .00339, .00037, .00004, .00000, .00000, | |
1810 | + .00000, .00000, .00000, | |
1811 | + .00312, .00034, .00003, .00000, .00000, | |
1812 | + .00000, .00000, .00000, | |
1813 | + .00289, .00032, .00003, .00000, .00000, | |
1814 | + .00000, .00000, .00000 / | |
1815 | DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=1,7)/ | |
1816 | + .01691, .00179, .00029, .00000, .00000, | |
1817 | + .00000, .00000, .00000, | |
1818 | + .01209, .00126, .00017, .00000, .00000, | |
1819 | + .00000, .00000, .00000, | |
1820 | + .00914, .00094, .00011, .00000, .00000, | |
1821 | + .00000, .00000, .00000, | |
1822 | + .00720, .00073, .00008, .00000, .00000, | |
1823 | + .00000, .00000, .00000, | |
1824 | + .00582, .00059, .00006, .00000, .00000, | |
1825 | + .00000, .00000, .00000, | |
1826 | + .00481, .00048, .00005, .00000, .00000, | |
1827 | + .00000, .00000, .00000, | |
1828 | + .00404, .00040, .00004, .00000, .00000, | |
1829 | + .00000, .00000, .00000 / | |
1830 | DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=8,14)/ | |
1831 | + .00344, .00034, .00003, .00000, .00000, | |
1832 | + .00000, .00000, .00000, | |
1833 | + .00297, .00029, .00003, .00000, .00000, | |
1834 | + .00000, .00000, .00000, | |
1835 | + .00259, .00025, .00002, .00000, .00000, | |
1836 | + .00000, .00000, .00000, | |
1837 | + .00227, .00022, .00002, .00000, .00000, | |
1838 | + .00000, .00000, .00000, | |
1839 | + .00202, .00019, .00002, .00000, .00000, | |
1840 | + .00000, .00000, .00000, | |
1841 | + .00180, .00017, .00001, .00000, .00000, | |
1842 | + .00000, .00000, .00000, | |
1843 | + .00161, .00015, .00001, .00000, .00000, | |
1844 | + .00000, .00000, .00000 / | |
1845 | DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=15,19)/ | |
1846 | + .00146, .00014, .00001, .00000, .00000, | |
1847 | + .00000, .00000, .00000, | |
1848 | + .00132, .00013, .00001, .00000, .00000, | |
1849 | + .00000, .00000, .00000, | |
1850 | + .00120, .00011, .00001, .00000, .00000, | |
1851 | + .00000, .00000, .00000, | |
1852 | + .00110, .00010, .00001, .00000, .00000, | |
1853 | + .00000, .00000, .00000, | |
1854 | + .00101, .00010, .00001, .00000, .00000, | |
1855 | + .00000, .00000, .00000 / | |
1856 | DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=1,7)/ | |
1857 | + .00134, .00009, .00000, .00000, .00000, | |
1858 | + .00000, .00000, .00000, | |
1859 | + .00087, .00006, .00000, .00000, .00000, | |
1860 | + .00000, .00000, .00000, | |
1861 | + .00061, .00004, .00000, .00000, .00000, | |
1862 | + .00000, .00000, .00000, | |
1863 | + .00045, .00003, .00000, .00000, .00000, | |
1864 | + .00000, .00000, .00000, | |
1865 | + .00034, .00002, .00000, .00000, .00000, | |
1866 | + .00000, .00000, .00000, | |
1867 | + .00027, .00002, .00000, .00000, .00000, | |
1868 | + .00000, .00000, .00000, | |
1869 | + .00021, .00001, .00000, .00000, .00000, | |
1870 | + .00000, .00000, .00000 / | |
1871 | DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=8,14)/ | |
1872 | + .00017, .00001, .00000, .00000, .00000, | |
1873 | + .00000, .00000, .00000, | |
1874 | + .00014, .00001, .00000, .00000, .00000, | |
1875 | + .00000, .00000, .00000, | |
1876 | + .00012, .00001, .00000, .00000, .00000, | |
1877 | + .00000, .00000, .00000, | |
1878 | + .00010, .00001, .00000, .00000, .00000, | |
1879 | + .00000, .00000, .00000, | |
1880 | + .00009, .00001, .00000, .00000, .00000, | |
1881 | + .00000, .00000, .00000, | |
1882 | + .00008, .00001, .00000, .00000, .00000, | |
1883 | + .00000, .00000, .00000, | |
1884 | + .00006, .00001, .00000, .00000, .00000, | |
1885 | + .00000, .00000, .00000 / | |
1886 | DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=15,19)/ | |
1887 | + .00006, .00001, .00000, .00000, .00000, | |
1888 | + .00000, .00000, .00000, | |
1889 | + .00005, .00001, .00000, .00000, .00000, | |
1890 | + .00000, .00000, .00000, | |
1891 | + .00004, .00001, .00000, .00000, .00000, | |
1892 | + .00000, .00000, .00000, | |
1893 | + .00004, .00001, .00000, .00000, .00000, | |
1894 | + .00000, .00000, .00000, | |
1895 | + .00003, .00001, .00000, .00000, .00000, | |
1896 | + .00000, .00000, .00000 / | |
1897 | DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5, | |
1898 | . 1.D-4,2.D-4,4.D-4,6.D-4,8.D-4, | |
1899 | . 1.D-3,2.D-3,4.D-3,6.D-3,8.D-3, | |
1900 | . 1.D-2,2.D-2,4.D-2,6.D-2,8.D-2, | |
1901 | . .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0, | |
1902 | . .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0, | |
1903 | . .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0, | |
1904 | . .8D0,.9D0,1.D0/ | |
1905 | DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/ | |
1906 | DATA N0/2,5,5,9,0,0,9,9/ | |
1907 | DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/ | |
1908 | DATA INIT/0/ | |
1909 | C | |
1910 | xsave=x | |
1911 | C | |
1912 | IF(INIT.NE.0) GOTO 10 | |
1913 | INIT=1 | |
1914 | DO 20 N=1,NX-1 | |
1915 | DO 20 M=1,19 | |
1916 | C READ(80,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), | |
1917 | C . F(6,N,M),F(8,N,M) | |
1918 | C 1=UV 2=DV 3=GLUE 4=UBAR 5=CBAR 7=BBAR 6=SBAR 8=DBAR | |
1919 | DO 25 I=1,8 | |
1920 | 25 F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I) | |
1921 | 20 CONTINUE | |
1922 | DO 31 J=1,NTENTH-1 | |
1923 | XX(J)= LOG10(XX(J))+ONEDO | |
1924 | DO 31 I=1,8 | |
1925 | IF(I.EQ.7) GO TO 31 | |
1926 | DO 30 K=1,19 | |
1927 | 30 F(I,J,K)= LOG(F(I,J,K))*F(I,NTENTH,K)/ LOG(F(I,NTENTH,K)) | |
1928 | 31 CONTINUE | |
1929 | 50 FORMAT(8F10.5) | |
1930 | DO 40 I=1,8 | |
1931 | DO 40 M=1,19 | |
1932 | 40 F(I,nx,M)=ZEROD | |
1933 | 10 CONTINUE | |
1934 | IF(X.LT.XMIN) X=XMIN | |
1935 | IF(X.GT.XMAX) X=XMAX | |
1936 | QSQ=SCALE**2 | |
1937 | IF(QSQ.LT.QSQMIN) QSQ=QSQMIN | |
1938 | IF(QSQ.GT.QSQMAX) QSQ=QSQMAX | |
1939 | XXX=X | |
1940 | IF(X.LT.PONED) XXX= LOG10(X)+ONEDO | |
1941 | N=0 | |
1942 | 70 N=N+1 | |
1943 | IF(XXX.GT.XX(N+1)) GOTO 70 | |
1944 | A=(XXX-XX(N))/(XX(N+1)-XX(N)) | |
1945 | RM= LOG(QSQ/QSQMIN)/ LOG(TWOD) | |
1946 | B=RM-AINT(RM) | |
1947 | M=1+ INT(RM) | |
1948 | DO 60 I=1,8 | |
1949 | G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1) | |
1950 | . + A*(ONED-B)*F(I,N+1,M) + A*B*F(I,N+1,M+1) | |
1951 | IF(N.GE.NTENTH) GOTO 65 | |
1952 | IF(I.EQ.7) GOTO 65 | |
1953 | FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1) | |
1954 | G(I)=FAC**(G(I)/FAC) | |
1955 | 65 CONTINUE | |
1956 | G(I)=G(I)*(ONED-X)**N0(I) | |
1957 | 60 CONTINUE | |
1958 | UPV=G(1) | |
1959 | DNV=G(2) | |
1960 | USEA=G(4) | |
1961 | DSEA=G(8) | |
1962 | STR=G(6) | |
1963 | CHM=G(5) | |
1964 | GLU=G(3) | |
1965 | BOT=G(7) | |
1966 | C | |
1967 | x=xsave | |
1968 | C | |
1969 | RETURN | |
1970 | END |