]>
Commit | Line | Data |
---|---|---|
21886bb6 | 1 | #include "pdf/pilot.h" |
2 | SUBROUTINE SFMS115(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU) | |
3 | C | |
4 | C THIS IS THE alphas=0.115 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 | + .00294, .00618, 13.39808, 1.13613, .15325, | |
13 | + .00000, .62350, 1.14037, | |
14 | + .00338, .00641, 24.76481, 1.48226, .51080, | |
15 | + .00000, .97623, 1.48715, | |
16 | + .00378, .00662, 38.63756, 1.89669, .93505, | |
17 | + .00000, 1.39637, 1.90215, | |
18 | + .00415, .00682, 54.53614, 2.37016, 1.41716, | |
19 | + .10064, 1.87489, 2.37615, | |
20 | + .00450, .00701, 72.40820, 2.90107, 1.95583, | |
21 | + .61877, 2.41034, 2.90753, | |
22 | + .00484, .00719, 91.81515, 3.48226, 2.54407, | |
23 | + 1.21948, 2.99567, 3.48917, | |
24 | + .00516, .00737, 112.60778, 4.10911, 3.17740, | |
25 | + 1.86958, 3.62635, 4.11645 / | |
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 | + .00547, .00754, 134.61856, 4.77730, 3.85157, | |
28 | + 2.55796, 4.29807, 4.78503, | |
29 | + .00577, .00770, 157.67596, 5.48271, 4.56253, | |
30 | + 3.28222, 5.00677, 5.49081, | |
31 | + .00606, .00785, 181.58061, 6.22071, 5.30571, | |
32 | + 4.03771, 5.74784, 6.22916, | |
33 | + .00634, .00801, 206.08290, 6.98534, 6.07522, | |
34 | + 4.81871, 6.51538, 6.99414, | |
35 | + .00661, .00816, 231.24123, 7.77697, 6.87144, | |
36 | + 5.62567, 7.30974, 7.78609, | |
37 | + .00687, .00830, 257.01788, 8.59436, 7.69316, | |
38 | + 6.45749, 8.12971, 8.60379, | |
39 | + .00713, .00844, 283.19421, 9.43239, 8.53529, | |
40 | + 7.30914, 8.97019, 9.44211 / | |
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 | + .00738, .00858, 309.53323, 10.28503, 9.39184, | |
43 | + 8.17470, 9.82517, 10.29503, | |
44 | + .00762, .00871, 336.40234, 11.16018, 10.27072, | |
45 | + 9.06211, 10.70255, 11.17046, | |
46 | + .00786, .00884, 363.25061, 12.04481, 11.15890, | |
47 | + 9.95842, 11.58931, 12.05536, | |
48 | + .00809, .00897, 390.38428, 12.94544, 12.06294, | |
49 | + 10.87019, 12.49199, 12.95624, | |
50 | + .00832, .00909, 417.62585, 13.85767, 12.97843, | |
51 | + 11.79306, 13.40617, 13.86872 / | |
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 | + .00473, .00784, 11.95323, 1.02402, .13320, | |
54 | + .00000, .55809, 1.02776, | |
55 | + .00533, .00817, 21.24411, 1.31177, .43166, | |
56 | + .00000, .85184, 1.31595, | |
57 | + .00589, .00847, 32.22407, 1.64827, .77736, | |
58 | + .00000, 1.19353, 1.65283, | |
59 | + .00641, .00875, 44.49063, 2.02521, 1.16240, | |
60 | + .07996, 1.57503, 2.03013, | |
61 | + .00689, .00901, 57.99106, 2.44082, 1.58526, | |
62 | + .48771, 1.99475, 2.44605, | |
63 | + .00736, .00927, 72.38376, 2.88908, 2.04012, | |
64 | + .95365, 2.44675, 2.89461, | |
65 | + .00780, .00951, 87.55804, 3.36624, 2.52333, | |
66 | + 1.45123, 2.92735, 3.37205 / | |
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 | + .00823, .00974, 103.39267, 3.86889, 3.03157, | |
69 | + 1.97172, 3.43318, 3.87496, | |
70 | + .00864, .00996, 119.76660, 4.39387, 3.56173, | |
71 | + 2.51333, 3.96111, 4.40018, | |
72 | + .00904, .01018, 136.54185, 4.93771, 4.11041, | |
73 | + 3.07261, 4.50772, 4.94426, | |
74 | + .00942, .01038, 153.54713, 5.49607, 4.67332, | |
75 | + 3.64540, 5.06868, 5.50285, | |
76 | + .00979, .01058, 170.83406, 6.06933, 5.25084, | |
77 | + 4.23218, 5.64437, 6.07632, | |
78 | + .01015, .01078, 188.38329, 6.65665, 5.84220, | |
79 | + 4.83222, 6.23401, 6.66384, | |
80 | + .01050, .01097, 206.04793, 7.25439, 6.44376, | |
81 | + 5.44198, 6.83394, 7.26178 / | |
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 | + .01084, .01115, 223.67165, 7.85832, 7.05133, | |
84 | + 6.05729, 7.43995, 7.86589, | |
85 | + .01117, .01133, 241.51816, 8.47427, 7.67075, | |
86 | + 6.68405, 8.05790, 8.48203, | |
87 | + .01149, .01150, 259.21350, 9.09298, 8.29276, | |
88 | + 7.31305, 8.67851, 9.10091, | |
89 | + .01181, .01167, 276.97617, 9.71928, 8.92223, | |
90 | + 7.94916, 9.30663, 9.72738, | |
91 | + .01211, .01184, 294.69116, 10.35014, 9.55611, | |
92 | + 8.58939, 9.93922, 10.35840 / | |
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 | + .00737, .00996, 10.66136, .92230, .11557, | |
95 | + .00000, .49935, .92574, | |
96 | + .00822, .01042, 18.21794, 1.16030, .36365, | |
97 | + .00000, .74286, 1.16402, | |
98 | + .00899, .01084, 26.86497, 1.43207, .64408, | |
99 | + .00000, 1.01937, 1.43604, | |
100 | + .00971, .01123, 36.28026, 1.73052, .95014, | |
101 | + .06323, 1.32199, 1.73472, | |
102 | + .01039, .01160, 46.42347, 2.05406, 1.28050, | |
103 | + .38270, 1.64928, 2.05846, | |
104 | + .01103, .01195, 57.03725, 2.39785, 1.63049, | |
105 | + .74248, 1.99647, 2.40244, | |
106 | + .01165, .01228, 68.04616, 2.75899, 1.99731, | |
107 | + 1.12158, 2.36075, 2.76376 / | |
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 | + .01224, .01259, 79.36783, 3.13493, 2.37849, | |
110 | + 1.51330, 2.73957, 3.13987, | |
111 | + .01280, .01290, 90.92162, 3.52335, 2.77178, | |
112 | + 1.91641, 3.13067, 3.52844, | |
113 | + .01335, .01319, 102.61610, 3.92176, 3.17473, | |
114 | + 2.32845, 3.53159, 3.92700, | |
115 | + .01387, .01347, 114.33725, 4.32705, 3.58428, | |
116 | + 2.74649, 3.93923, 4.33244, | |
117 | + .01438, .01374, 126.13145, 4.73966, 4.00089, | |
118 | + 3.17103, 4.35405, 4.74517, | |
119 | + .01487, .01400, 137.99217, 5.15909, 4.42410, | |
120 | + 3.60170, 4.77557, 5.16473, | |
121 | + .01534, .01425, 149.82338, 5.58280, 4.85140, | |
122 | + 4.03602, 5.20126, 5.58858 / | |
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 | + .01580, .01450, 161.52379, 6.00787, 5.27986, | |
125 | + 4.47113, 5.62821, 6.01376, | |
126 | + .01625, .01474, 173.28362, 6.43865, 5.71388, | |
127 | + 4.91144, 6.06078, 6.44465, | |
128 | + .01669, .01497, 184.85039, 6.86859, 6.14692, | |
129 | + 5.35046, 6.49244, 6.87470, | |
130 | + .01712, .01520, 196.38115, 7.30128, 6.58257, | |
131 | + 5.79180, 6.92676, 7.30750, | |
132 | + .01754, .01542, 207.80215, 7.73467, 7.01880, | |
133 | + 6.23347, 7.36173, 7.74099 / | |
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 | + .00946, .01146, 9.96917, .86710, .10626, | |
136 | + .00000, .46777, .87047, | |
137 | + .01049, .01202, 16.64713, 1.07949, .32840, | |
138 | + .00000, .68543, 1.08308, | |
139 | + .01143, .01253, 24.14569, 1.31862, .57591, | |
140 | + .00000, .92909, 1.32241, | |
141 | + .01231, .01300, 32.18777, 1.57818, .84283, | |
142 | + .05498, 1.19263, 1.58214, | |
143 | + .01313, .01345, 40.74284, 1.85677, 1.12802, | |
144 | + .33129, 1.47479, 1.86089, | |
145 | + .01391, .01386, 49.59633, 2.15021, 1.42746, | |
146 | + .63981, 1.77148, 2.15448, | |
147 | + .01465, .01426, 58.69073, 2.45608, 1.73882, | |
148 | + .96235, 2.08032, 2.46049 / | |
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 | + .01536, .01464, 67.96285, 2.77226, 2.06006, | |
151 | + 1.29322, 2.39925, 2.77679, | |
152 | + .01604, .01500, 77.35088, 3.09686, 2.38936, | |
153 | + 1.63150, 2.72640, 3.10152, | |
154 | + .01670, .01535, 86.78479, 3.42787, 2.72476, | |
155 | + 1.97520, 3.05979, 3.43264, | |
156 | + .01733, .01569, 96.17627, 3.76277, 3.06378, | |
157 | + 2.32196, 3.39693, 3.76765, | |
158 | + .01794, .01601, 105.56869, 4.10202, 3.40690, | |
159 | + 2.67233, 3.73828, 4.10701, | |
160 | + .01853, .01632, 114.96102, 4.44529, 3.75382, | |
161 | + 3.02605, 4.08353, 4.45038, | |
162 | + .01910, .01662, 124.27915, 4.79055, 4.10254, | |
163 | + 3.38118, 4.43067, 4.79574 / | |
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 | + .01965, .01692, 133.44566, 5.13546, 4.45073, | |
166 | + 3.73543, 4.77736, 5.14073, | |
167 | + .02019, .01720, 142.61754, 5.48368, 4.80209, | |
168 | + 4.09253, 5.12729, 5.48905, | |
169 | + .02071, .01747, 151.59502, 5.82991, 5.15130, | |
170 | + 4.44720, 5.47513, 5.83535, | |
171 | + .02122, .01774, 160.50732, 6.17715, 5.50140, | |
172 | + 4.80249, 5.82393, 6.18268, | |
173 | + .02171, .01800, 169.29832, 6.52380, 5.85078, | |
174 | + 5.15683, 6.17207, 6.52941 / | |
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 | + .01124, .01267, 9.50402, .82967, .10007, | |
177 | + .00000, .44650, .83306, | |
178 | + .01243, .01331, 15.61248, 1.02530, .30523, | |
179 | + .00000, .64724, 1.02888, | |
180 | + .01352, .01389, 22.38003, 1.24334, .53147, | |
181 | + .00000, .86968, 1.24709, | |
182 | + .01452, .01443, 29.56006, 1.47805, .77337, | |
183 | + .04973, 1.10825, 1.48195, | |
184 | + .01547, .01494, 37.12939, 1.72819, 1.02996, | |
185 | + .29868, 1.36185, 1.73222, | |
186 | + .01636, .01541, 44.90087, 1.99002, 1.29766, | |
187 | + .57498, 1.62683, 1.99417, | |
188 | + .01721, .01587, 52.82838, 2.26142, 1.57443, | |
189 | + .86222, 1.90112, 2.26570 / | |
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 | + .01802, .01630, 60.86065, 2.54058, 1.85855, | |
192 | + 1.15536, 2.18294, 2.54497, | |
193 | + .01880, .01671, 68.94741, 2.82588, 2.14844, | |
194 | + 1.45366, 2.47071, 2.83037, | |
195 | + .01954, .01710, 77.03146, 3.11560, 2.44246, | |
196 | + 1.75545, 2.76274, 3.12019, | |
197 | + .02026, .01748, 85.03981, 3.40759, 2.73847, | |
198 | + 2.05872, 3.05689, 3.41227, | |
199 | + .02095, .01785, 93.01374, 3.70232, 3.03698, | |
200 | + 2.36402, 3.35365, 3.70709, | |
201 | + .02162, .01820, 100.95535, 3.99957, 3.33779, | |
202 | + 2.67120, 3.65282, 4.00442, | |
203 | + .02227, .01854, 108.80322, 4.29759, 3.63920, | |
204 | + 2.97861, 3.95266, 4.30253 / | |
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 | + .02290, .01887, 116.49366, 4.59441, 3.93923, | |
207 | + 3.28431, 4.25120, 4.59942, | |
208 | + .02351, .01919, 124.16376, 4.89328, 4.24116, | |
209 | + 3.59162, 4.55172, 4.89837, | |
210 | + .02410, .01950, 131.64481, 5.18962, 4.54042, | |
211 | + 3.89599, 4.84963, 5.19478, | |
212 | + .02468, .01980, 139.04913, 5.48610, 4.83969, | |
213 | + 4.20013, 5.14761, 5.49133, | |
214 | + .02524, .02010, 146.33073, 5.78137, 5.13763, | |
215 | + 4.50270, 5.44431, 5.78667 / | |
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 | + .01284, .01369, 9.15710, .80157, .09548, | |
218 | + .00000, .43061, .80501, | |
219 | + .01416, .01441, 14.85221, .98494, .28822, | |
220 | + .00000, .61899, .98855, | |
221 | + .01537, .01505, 21.09624, 1.18771, .49907, | |
222 | + .00000, .82607, 1.19148, | |
223 | + .01649, .01565, 27.66522, 1.40458, .72301, | |
224 | + .04597, 1.04671, 1.40848, | |
225 | + .01754, .01621, 34.54162, 1.63442, .95921, | |
226 | + .27540, 1.27995, 1.63845, | |
227 | + .01853, .01674, 41.55801, 1.87384, 1.20440, | |
228 | + .52884, 1.52245, 1.87798, | |
229 | + .01948, .01724, 48.67631, 2.12095, 1.45679, | |
230 | + .79116, 1.77238, 2.12520 / | |
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 | + .02038, .01771, 55.85345, 2.37413, 1.71485, | |
233 | + 1.05779, 2.02816, 2.37848, | |
234 | + .02124, .01817, 63.04741, 2.63197, 1.97721, | |
235 | + 1.32814, 2.28842, 2.63641, | |
236 | + .02206, .01860, 70.20945, 2.89295, 2.24241, | |
237 | + 1.60074, 2.55166, 2.89748, | |
238 | + .02286, .01902, 77.27711, 3.15518, 2.50860, | |
239 | + 1.87382, 2.81600, 3.15980, | |
240 | + .02362, .01942, 84.29008, 3.41914, 2.77627, | |
241 | + 2.14794, 3.08194, 3.42383, | |
242 | + .02436, .01981, 91.25224, 3.68466, 3.04531, | |
243 | + 2.42302, 3.34933, 3.68943, | |
244 | + .02508, .02018, 98.11102, 3.95022, 3.31420, | |
245 | + 2.69762, 3.61668, 3.95507 / | |
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 | + .02577, .02055, 104.81170, 4.21409, 3.58122, | |
248 | + 2.97004, 3.88223, 4.21900, | |
249 | + .02645, .02090, 111.47772, 4.47922, 3.84937, | |
250 | + 3.24328, 4.14897, 4.48421, | |
251 | + .02710, .02124, 117.96120, 4.74154, 4.11456, | |
252 | + 3.51333, 4.41283, 4.74659, | |
253 | + .02774, .02157, 124.36292, 5.00349, 4.37925, | |
254 | + 3.78264, 4.67624, 5.00860, | |
255 | + .02835, .02189, 130.64351, 5.26387, 4.64226, | |
256 | + 4.05005, 4.93802, 5.26904 / | |
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 | + .01919, .01748, 8.14996, .71892, .08233, | |
259 | + .00000, .38434, .72280, | |
260 | + .02105, .01846, 12.70285, .86796, .24035, | |
261 | + .00000, .53814, .87200, | |
262 | + .02275, .01936, 17.53416, 1.02876, .40886, | |
263 | + .00000, .70301, 1.03293, | |
264 | + .02431, .02018, 22.48380, 1.19725, .58413, | |
265 | + .03581, .87509, 1.20155, | |
266 | + .02577, .02094, 27.55086, 1.37277, .76573, | |
267 | + .21293, 1.05383, 1.37718, | |
268 | + .02715, .02166, 32.62030, 1.55283, .95131, | |
269 | + .40571, 1.23681, 1.55735, | |
270 | + .02845, .02234, 37.67496, 1.73617, 1.13971, | |
271 | + .60252, 1.42282, 1.74078 / | |
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 | + .02969, .02298, 42.69280, 1.92173, 1.32995, | |
274 | + .80008, 1.61086, 1.92645, | |
275 | + .03088, .02360, 47.65164, 2.10863, 1.52118, | |
276 | + .99810, 1.80004, 2.11343, | |
277 | + .03201, .02418, 52.52433, 2.29587, 1.71247, | |
278 | + 1.19568, 1.98942, 2.30076, | |
279 | + .03310, .02475, 57.27354, 2.48222, 1.90261, | |
280 | + 1.39168, 2.17777, 2.48718, | |
281 | + .03414, .02529, 61.93387, 2.66815, 2.09211, | |
282 | + 1.58667, 2.36559, 2.67320, | |
283 | + .03515, .02580, 66.51328, 2.85368, 2.28100, | |
284 | + 1.78070, 2.55289, 2.85879, | |
285 | + .03612, .02630, 70.97984, 3.03780, 2.46831, | |
286 | + 1.97286, 2.73869, 3.04299 / | |
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 | + .03706, .02679, 75.30048, 3.21937, 2.65291, | |
289 | + 2.16204, 2.92186, 3.22463, | |
290 | + .03797, .02725, 79.56411, 3.40062, 2.83704, | |
291 | + 2.35051, 3.10463, 3.40594, | |
292 | + .03885, .02771, 83.67294, 3.57871, 3.01789, | |
293 | + 2.53548, 3.28418, 3.58410, | |
294 | + .03971, .02815, 87.69898, 3.75548, 3.19728, | |
295 | + 2.71879, 3.46233, 3.76093, | |
296 | + .04054, .02857, 91.61830, 3.93014, 3.37446, | |
297 | + 2.89972, 3.63832, 3.93565 / | |
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 | + .02839, .02246, 7.23420, .64214, .07066, | |
300 | + .00000, .34203, .64692, | |
301 | + .03102, .02381, 10.82860, .76181, .19900, | |
302 | + .00000, .46631, .76679, | |
303 | + .03339, .02503, 14.51802, .88768, .33234, | |
304 | + .00000, .59614, .89285, | |
305 | + .03557, .02615, 18.19586, 1.01687, .46809, | |
306 | + .02761, .72881, 1.02220, | |
307 | + .03759, .02719, 21.87499, 1.14908, .60620, | |
308 | + .16298, .86414, 1.15457, | |
309 | + .03949, .02817, 25.48096, 1.28261, .74508, | |
310 | + .30810, 1.00051, 1.28824, | |
311 | + .04129, .02909, 29.01168, 1.41669, .88408, | |
312 | + .45420, 1.13720, 1.42246 / | |
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 | + .04299, .02995, 32.45984, 1.55073, 1.02264, | |
315 | + .59896, 1.27363, 1.55662, | |
316 | + .04461, .03078, 35.81690, 1.68418, 1.16030, | |
317 | + .74238, 1.40931, 1.69019, | |
318 | + .04615, .03157, 39.07015, 1.81649, 1.29653, | |
319 | + .88393, 1.54370, 1.82261, | |
320 | + .04763, .03232, 42.19911, 1.94685, 1.43058, | |
321 | + 1.02295, 1.67601, 1.95309, | |
322 | + .04905, .03304, 45.23337, 2.07576, 1.56295, | |
323 | + 1.15996, 1.80676, 2.08210, | |
324 | + .05041, .03373, 48.18255, 2.20331, 1.69377, | |
325 | + 1.29513, 1.93604, 2.20975, | |
326 | + .05172, .03439, 51.02823, 2.32888, 1.82243, | |
327 | + 1.42789, 2.06324, 2.33541 / | |
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 | + .05298, .03503, 53.75137, 2.45174, 1.94823, | |
330 | + 1.55756, 2.18766, 2.45836, | |
331 | + .05421, .03565, 56.41547, 2.57354, 2.07284, | |
332 | + 1.68583, 2.31095, 2.58026, | |
333 | + .05539, .03625, 58.95689, 2.69237, 2.19434, | |
334 | + 1.81081, 2.43119, 2.69917, | |
335 | + .05653, .03682, 61.42655, 2.80956, 2.31409, | |
336 | + 1.93388, 2.54973, 2.81645, | |
337 | + .05764, .03738, 63.81034, 2.92464, 2.43161, | |
338 | + 2.05456, 2.66611, 2.93160 / | |
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 | + .03559, .02614, 6.73201, .59928, .06439, | |
341 | + .00000, .31870, .60481, | |
342 | + .03879, .02777, 9.83611, .70370, .17737, | |
343 | + .00000, .42769, .70949, | |
344 | + .04167, .02924, 12.95918, .81187, .29291, | |
345 | + .00000, .53979, .81790, | |
346 | + .04430, .03058, 16.02117, .92151, .40903, | |
347 | + .02356, .65289, .92775, | |
348 | + .04675, .03182, 19.04138, 1.03254, .52587, | |
349 | + .13848, .76702, 1.03898, | |
350 | + .04904, .03298, 21.96433, 1.14361, .64224, | |
351 | + .26058, .88092, 1.15024, | |
352 | + .05119, .03407, 24.79433, 1.25423, .75770, | |
353 | + .38245, .99412, 1.26103 / | |
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 | + .05323, .03510, 27.53029, 1.36396, .87191, | |
356 | + .50227, 1.10624, 1.37092, | |
357 | + .05517, .03608, 30.16933, 1.47247, .98458, | |
358 | + .62014, 1.21697, 1.47958, | |
359 | + .05701, .03701, 32.70458, 1.57935, 1.09534, | |
360 | + .73573, 1.32592, 1.58662, | |
361 | + .05877, .03790, 35.12266, 1.68403, 1.20366, | |
362 | + .84853, 1.43254, 1.69144, | |
363 | + .06045, .03874, 37.45015, 1.78698, 1.31003, | |
364 | + .95909, 1.53731, 1.79451, | |
365 | + .06207, .03956, 39.69685, 1.88831, 1.41460, | |
366 | + 1.06760, 1.64037, 1.89598, | |
367 | + .06362, .04034, 41.84991, 1.98758, 1.51693, | |
368 | + 1.17363, 1.74128, 1.99537 / | |
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 | + .06511, .04109, 43.89595, 2.08424, 1.61649, | |
371 | + 1.27669, 1.83948, 2.09214, | |
372 | + .06656, .04181, 45.88681, 2.17967, 1.71470, | |
373 | + 1.37821, 1.93639, 2.18769, | |
374 | + .06795, .04251, 47.77338, 2.27235, 1.81002, | |
375 | + 1.47668, 2.03048, 2.28047, | |
376 | + .06930, .04319, 49.59703, 2.36340, 1.90360, | |
377 | + 1.57325, 2.12288, 2.37163, | |
378 | + .07061, .04384, 51.34756, 2.45246, 1.99509, | |
379 | + 1.66758, 2.21324, 2.46079 / | |
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 | + .04175, .02922, 6.38704, .56950, .06015, | |
382 | + .00000, .30259, .57567, | |
383 | + .04542, .03108, 9.16992, .66385, .16299, | |
384 | + .00000, .40149, .67033, | |
385 | + .04872, .03275, 11.92927, .76051, .26697, | |
386 | + .00000, .50209, .76728, | |
387 | + .05172, .03427, 14.60186, .85760, .37050, | |
388 | + .02098, .60263, .86462, | |
389 | + .05451, .03568, 17.21076, .95516, .47384, | |
390 | + .12289, .70330, .96242, | |
391 | + .05711, .03699, 19.71207, 1.05210, .57603, | |
392 | + .23046, .80305, 1.05958, | |
393 | + .05956, .03822, 22.11371, 1.14804, .67679, | |
394 | + .33717, .90158, 1.15572 / | |
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 | + .06187, .03938, 24.41806, 1.24269, .77589, | |
397 | + .44149, .99862, 1.25057, | |
398 | + .06406, .04048, 26.62535, 1.33581, .87314, | |
399 | + .54359, 1.09396, 1.34387, | |
400 | + .06614, .04153, 28.73206, 1.42710, .96829, | |
401 | + .64322, 1.18732, 1.43534, | |
402 | + .06812, .04252, 30.72867, 1.51612, 1.06092, | |
403 | + .74002, 1.27828, 1.52452, | |
404 | + .07002, .04347, 32.63969, 1.60330, 1.15150, | |
405 | + .83450, 1.36728, 1.61185, | |
406 | + .07184, .04438, 34.47482, 1.68879, 1.24021, | |
407 | + .92686, 1.45450, 1.69750, | |
408 | + .07358, .04526, 36.22431, 1.77224, 1.32670, | |
409 | + 1.01679, 1.53959, 1.78109 / | |
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 | + .07526, .04609, 37.87795, 1.85319, 1.41055, | |
412 | + 1.10389, 1.62209, 1.86218, | |
413 | + .07688, .04690, 39.48041, 1.93288, 1.49299, | |
414 | + 1.18940, 1.70326, 1.94200, | |
415 | + .07844, .04768, 40.99110, 2.01001, 1.57274, | |
416 | + 1.27208, 1.78180, 2.01926, | |
417 | + .07994, .04843, 42.44547, 2.08556, 1.65081, | |
418 | + 1.35292, 1.85870, 2.09493, | |
419 | + .08140, .04916, 43.83561, 2.15925, 1.72691, | |
420 | + 1.43167, 1.93369, 2.16875 / | |
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 | + .04730, .03206, 6.11918, .54628, .05690, | |
423 | + .00000, .28994, .55285, | |
424 | + .05136, .03412, 8.66098, .63308, .15214, | |
425 | + .00000, .38127, .64000, | |
426 | + .05501, .03596, 11.15140, .72123, .24757, | |
427 | + .00000, .47334, .72847, | |
428 | + .05833, .03764, 13.53957, .80913, .34186, | |
429 | + .01909, .56467, .81664, | |
430 | + .06140, .03919, 15.85095, .89691, .43538, | |
431 | + .11154, .65553, .90467, | |
432 | + .06426, .04063, 18.04998, .98362, .52732, | |
433 | + .20860, .74505, .99163, | |
434 | + .06695, .04199, 20.14686, 1.06902, .61751, | |
435 | + .30439, .83302, 1.07725 / | |
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 | + .06948, .04326, 22.14627, 1.15289, .70580, | |
438 | + .39762, .91927, 1.16133, | |
439 | + .07187, .04446, 24.05030, 1.23506, .79207, | |
440 | + .48846, 1.00364, 1.24370, | |
441 | + .07415, .04561, 25.85773, 1.31529, .87614, | |
442 | + .57675, 1.08593, 1.32412, | |
443 | + .07631, .04669, 27.56176, 1.39324, .95768, | |
444 | + .66223, 1.16581, 1.40225, | |
445 | + .07838, .04772, 29.18496, 1.46933, 1.03715, | |
446 | + .74538, 1.24372, 1.47851, | |
447 | + .08036, .04871, 30.73680, 1.54372, 1.11472, | |
448 | + .82640, 1.31982, 1.55306, | |
449 | + .08226, .04966, 32.20955, 1.61610, 1.19013, | |
450 | + .90505, 1.39383, 1.62560 / | |
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 | + .08408, .05057, 33.59530, 1.68611, 1.26301, | |
453 | + .98100, 1.46538, 1.69576, | |
454 | + .08584, .05145, 34.93357, 1.75486, 1.33449, | |
455 | + 1.05537, 1.53560, 1.76465, | |
456 | + .08753, .05229, 36.18959, 1.82120, 1.40344, | |
457 | + 1.12708, 1.60334, 1.83113, | |
458 | + .08917, .05310, 37.39471, 1.88603, 1.47077, | |
459 | + 1.19702, 1.66952, 1.89609, | |
460 | + .09075, .05388, 38.54248, 1.94912, 1.53625, | |
461 | + 1.26499, 1.73389, 1.95931 / | |
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 | + .06952, .04323, 5.32073, .47579, .04744, | |
464 | + .00000, .25212, .48429, | |
465 | + .07506, .04605, 7.19824, .54146, .12146, | |
466 | + .00000, .32231, .55044, | |
467 | + .08000, .04856, 8.96805, .60630, .19349, | |
468 | + .00000, .39105, .61572, | |
469 | + .08445, .05081, 10.61047, .66943, .26294, | |
470 | + .01403, .45761, .67925, | |
471 | + .08855, .05288, 12.15591, .73122, .33039, | |
472 | + .08132, .52248, .74139, | |
473 | + .09234, .05480, 13.58867, .79114, .39547, | |
474 | + .15075, .58520, .80164, | |
475 | + .09588, .05658, 14.92348, .84919, .45824, | |
476 | + .21815, .64581, .86000 / | |
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 | + .09920, .05825, 16.16949, .90536, .51877, | |
479 | + .28278, .70434, .91645, | |
480 | + .10233, .05982, 17.33282, .95964, .57709, | |
481 | + .34489, .76082, .97100, | |
482 | + .10528, .06129, 18.41656, 1.01197, .63319, | |
483 | + .40449, .81519, 1.02358, | |
484 | + .10808, .06269, 19.41947, 1.06218, .68693, | |
485 | + .46150, .86732, 1.07403, | |
486 | + .11074, .06402, 20.35917, 1.11064, .73873, | |
487 | + .51633, .91759, 1.12273, | |
488 | + .11328, .06528, 21.24398, 1.15754, .78876, | |
489 | + .56922, .96620, 1.16984, | |
490 | + .11570, .06648, 22.07058, 1.20271, .83691, | |
491 | + .62005, 1.01298, 1.21522 / | |
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 | + .11802, .06763, 22.83552, 1.24596, .88298, | |
494 | + .66865, 1.05776, 1.25866, | |
495 | + .12024, .06873, 23.56540, 1.28808, .92778, | |
496 | + .71584, 1.10134, 1.30097, | |
497 | + .12238, .06979, 24.23916, 1.32833, .97059, | |
498 | + .76093, 1.14298, 1.34140, | |
499 | + .12443, .07080, 24.87763, 1.36736, 1.01207, | |
500 | + .80456, 1.18334, 1.38060, | |
501 | + .12641, .07178, 25.47748, 1.40503, 1.05208, | |
502 | + .84663, 1.22228, 1.41843 / | |
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 | + .10183, .05987, 4.54986, .40621, .03875, | |
505 | + .00000, .21523, .41738, | |
506 | + .10920, .06364, 5.87243, .45380, .09457, | |
507 | + .00000, .26733, .46564, | |
508 | + .11569, .06695, 7.06654, .49939, .14723, | |
509 | + .00000, .31680, .51182, | |
510 | + .12149, .06989, 8.13413, .54264, .19669, | |
511 | + .00999, .36344, .55560, | |
512 | + .12679, .07257, 9.10679, .58402, .24364, | |
513 | + .05740, .40788, .59746, | |
514 | + .13165, .07502, 9.98109, .62334, .28801, | |
515 | + .10541, .44997, .63722, | |
516 | + .13615, .07728, 10.77334, .66073, .33002, | |
517 | + .15120, .48989, .67500 / | |
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 | + .14035, .07938, 11.49406, .69630, .36985, | |
520 | + .19438, .52779, .71094, | |
521 | + .14427, .08133, 12.15094, .73013, .40764, | |
522 | + .23527, .56380, .74513, | |
523 | + .14796, .08316, 12.74853, .76227, .44346, | |
524 | + .27394, .59795, .77759, | |
525 | + .15143, .08487, 13.28817, .79266, .47729, | |
526 | + .31043, .63022, .80828, | |
527 | + .15471, .08649, 13.78310, .82162, .50948, | |
528 | + .34510, .66095, .83752, | |
529 | + .15782, .08802, 14.23993, .84930, .54022, | |
530 | + .37816, .69031, .86547, | |
531 | + .16078, .08947, 14.65774, .87565, .56946, | |
532 | + .40958, .71825, .89208 / | |
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 | + .16359, .09084, 15.03555, .90056, .59711, | |
535 | + .43928, .74465, .91723, | |
536 | + .16628, .09215, 15.39035, .92459, .62375, | |
537 | + .46786, .77011, .94149, | |
538 | + .16884, .09340, 15.70975, .94728, .64892, | |
539 | + .49487, .79416, .96439, | |
540 | + .17130, .09459, 16.00706, .96907, .67309, | |
541 | + .52078, .81725, .98639, | |
542 | + .17366, .09573, 16.28069, .98989, .69618, | |
543 | + .54554, .83931, 1.00741 / | |
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 | + .12704, .07318, 4.10945, .36589, .03402, | |
546 | + -.00001, .19421, .37929, | |
547 | + .13560, .07756, 5.15649, .40429, .08053, | |
548 | + -.00001, .23708, .41849, | |
549 | + .14309, .08137, 6.07569, .44036, .12358, | |
550 | + -.00001, .27701, .45526, | |
551 | + .14974, .08473, 6.87711, .47401, .16335, | |
552 | + .00804, .31403, .48953, | |
553 | + .15577, .08776, 7.59138, .50575, .20056, | |
554 | + .04595, .34880, .52182, | |
555 | + .16128, .09051, 8.21990, .53549, .23527, | |
556 | + .08391, .38128, .55207, | |
557 | + .16635, .09303, 8.77835, .56342, .26774, | |
558 | + .11969, .41171, .58045 / | |
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 | + .17105, .09535, 9.27685, .58970, .29819, | |
561 | + .15311, .44029, .60715, | |
562 | + .17543, .09750, 9.72313, .61442, .32679, | |
563 | + .18442, .46715, .63227, | |
564 | + .17952, .09950, 10.12157, .63767, .35365, | |
565 | + .21379, .49239, .65588, | |
566 | + .18335, .10136, 10.47508, .65944, .37878, | |
567 | + .24126, .51601, .67798, | |
568 | + .18695, .10311, 10.79369, .67999, .40250, | |
569 | + .26715, .53830, .69885, | |
570 | + .19036, .10476, 11.08308, .69947, .42497, | |
571 | + .29165, .55943, .71862, | |
572 | + .19359, .10631, 11.34325, .71785, .44617, | |
573 | + .31476, .57937, .73728 / | |
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 | + .19664, .10776, 11.57354, .73508, .46607, | |
576 | + .33645, .59806, .75477, | |
577 | + .19956, .10916, 11.78689, .75158, .48512, | |
578 | + .35720, .61596, .77152, | |
579 | + .20232, .11047, 11.97450, .76703, .50299, | |
580 | + .37668, .63274, .78720, | |
581 | + .20496, .11172, 12.14636, .78176, .52003, | |
582 | + .39525, .64874, .80215, | |
583 | + .20749, .11291, 12.30148, .79572, .53620, | |
584 | + .41288, .66392, .81633 / | |
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 | + .14847, .08474, 3.80001, .33746, .03082, | |
587 | + -.00001, .17952, .35283, | |
588 | + .15790, .08954, 4.67247, .36991, .07129, | |
589 | + -.00001, .21642, .38619, | |
590 | + .16610, .09368, 5.42176, .39996, .10822, | |
591 | + -.00001, .25030, .41703, | |
592 | + .17334, .09730, 6.06215, .42764, .14191, | |
593 | + .00682, .28131, .44537, | |
594 | + .17987, .10055, 6.62285, .45344, .17310, | |
595 | + .03884, .31010, .47179, | |
596 | + .18581, .10347, 7.10755, .47736, .20190, | |
597 | + .07062, .33672, .49625, | |
598 | + .19124, .10613, 7.53107, .49961, .22860, | |
599 | + .10033, .36144, .51899 / | |
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 | + .19626, .10857, 7.90312, .52035, .25344, | |
602 | + .12785, .38444, .54017, | |
603 | + .20092, .11082, 8.23100, .53969, .27658, | |
604 | + .15346, .40589, .55993, | |
605 | + .20525, .11290, 8.51902, .55773, .29816, | |
606 | + .17731, .42588, .57835, | |
607 | + .20929, .11483, 8.77010, .57448, .31820, | |
608 | + .19947, .44445, .59545, | |
609 | + .21307, .11662, 8.99282, .59017, .33699, | |
610 | + .22023, .46185, .61146, | |
611 | + .21665, .11831, 9.19205, .60495, .35469, | |
612 | + .23976, .47824, .62654, | |
613 | + .22002, .11989, 9.36803, .61879, .37129, | |
614 | + .25809, .49360, .64067 / | |
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 | + .22319, .12137, 9.52045, .63165, .38676, | |
617 | + .27519, .50790, .65380, | |
618 | + .22621, .12277, 9.65978, .64391, .40151, | |
619 | + .29147, .52153, .66631, | |
620 | + .22906, .12409, 9.77914, .65529, .41525, | |
621 | + .30666, .53421, .67792, | |
622 | + .23179, .12534, 9.88653, .66608, .42830, | |
623 | + .32109, .54625, .68893, | |
624 | + .23438, .12653, 9.98125, .67625, .44062, | |
625 | + .33472, .55759, .69931 / | |
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 | + .16742, .09510, 3.56194, .31556, .02843, | |
628 | + .00000, .16834, .33280, | |
629 | + .17752, .10020, 4.31078, .34376, .06453, | |
630 | + .00000, .20094, .36197, | |
631 | + .18625, .10456, 4.94205, .36954, .09710, | |
632 | + .00000, .23051, .38859, | |
633 | + .19392, .10835, 5.47237, .39303, .12651, | |
634 | + .00597, .25730, .41279, | |
635 | + .20081, .11172, 5.92952, .41473, .15351, | |
636 | + .03387, .28194, .43512, | |
637 | + .20704, .11474, 6.31857, .43465, .17824, | |
638 | + .06137, .30453, .45561, | |
639 | + .21272, .11747, 6.65323, .45301, .20098, | |
640 | + .08689, .32533, .47449 / | |
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 | + .21795, .11996, 6.94291, .47000, .22200, | |
643 | + .11039, .34455, .49193, | |
644 | + .22278, .12225, 7.19447, .48573, .24146, | |
645 | + .13213, .36235, .50809, | |
646 | + .22725, .12435, 7.41201, .50029, .25949, | |
647 | + .15226, .37883, .52304, | |
648 | + .23140, .12629, 7.59815, .51370, .27614, | |
649 | + .17085, .39403, .53679, | |
650 | + .23529, .12809, 7.76074, .52619, .29166, | |
651 | + .18818, .40819, .54961, | |
652 | + .23895, .12977, 7.90394, .53787, .30621, | |
653 | + .20442, .42146, .56159, | |
654 | + .24238, .13133, 8.02794, .54874, .31978, | |
655 | + .21959, .43382, .57274 / | |
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 | + .24560, .13279, 8.13271, .55876, .33236, | |
658 | + .23366, .44525, .58303, | |
659 | + .24866, .13418, 8.22703, .56827, .34430, | |
660 | + .24701, .45610, .59278, | |
661 | + .25154, .13546, 8.30528, .57703, .35537, | |
662 | + .25942, .46613, .60177, | |
663 | + .25429, .13668, 8.37413, .58529, .36584, | |
664 | + .27116, .47560, .61025, | |
665 | + .25689, .13784, 8.43302, .59303, .37568, | |
666 | + .28220, .48450, .61818 / | |
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 | + .24211, .13656, 2.83402, .24901, .02159, | |
669 | + .00000, .13520, .27440, | |
670 | + .25389, .14207, 3.26176, .26578, .04583, | |
671 | + .00000, .15616, .29224, | |
672 | + .26385, .14663, 3.59715, .28042, .06687, | |
673 | + .00000, .17439, .30777, | |
674 | + .27239, .15047, 3.85963, .29321, .08523, | |
675 | + .00376, .19029, .32127, | |
676 | + .27993, .15379, 4.07124, .30457, .10157, | |
677 | + .02111, .20443, .33326, | |
678 | + .28660, .15667, 4.23844, .31462, .11611, | |
679 | + .03782, .21697, .34384, | |
680 | + .29258, .15921, 4.37203, .32357, .12914, | |
681 | + .05296, .22818, .35323 / | |
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 | + .29797, .16146, 4.47886, .33155, .14089, | |
684 | + .06659, .23824, .36162, | |
685 | + .30287, .16347, 4.56392, .33871, .15151, | |
686 | + .07895, .24731, .36913, | |
687 | + .30734, .16527, 4.63062, .34511, .16114, | |
688 | + .09016, .25549, .37585, | |
689 | + .31141, .16688, 4.68084, .35080, .16983, | |
690 | + .10032, .26282, .38180, | |
691 | + .31516, .16834, 4.71926, .35593, .17777, | |
692 | + .10963, .26949, .38717, | |
693 | + .31863, .16967, 4.74844, .36059, .18507, | |
694 | + .11820, .27559, .39204, | |
695 | + .32184, .17088, 4.76869, .36477, .19175, | |
696 | + .12607, .28113, .39642 / | |
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 | + .32479, .17197, 4.78019, .36848, .19780, | |
699 | + .13326, .28612, .40029, | |
700 | + .32757, .17298, 4.78765, .37191, .20347, | |
701 | + .13998, .29076, .40388, | |
702 | + .33013, .17389, 4.78801, .37493, .20860, | |
703 | + .14611, .29493, .40703, | |
704 | + .33254, .17473, 4.78490, .37768, .21338, | |
705 | + .15183, .29877, .40990, | |
706 | + .33479, .17551, 4.77801, .38016, .21778, | |
707 | + .15713, .30229, .41249 / | |
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 | + .34667, .19296, 2.13435, .18592, .01570, | |
710 | + -.00001, .10515, .22363, | |
711 | + .35823, .19704, 2.32967, .19381, .03056, | |
712 | + -.00002, .11686, .23214, | |
713 | + .36755, .20014, 2.46356, .20018, .04287, | |
714 | + -.00002, .12647, .23892, | |
715 | + .37520, .20251, 2.55316, .20532, .05316, | |
716 | + .00215, .13439, .24434, | |
717 | + .38165, .20439, 2.61393, .20956, .06198, | |
718 | + .01193, .14109, .24876, | |
719 | + .38712, .20585, 2.65115, .21298, .06953, | |
720 | + .02109, .14672, .25231, | |
721 | + .39181, .20699, 2.67179, .21577, .07607, | |
722 | + .02914, .15149, .25516 / | |
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 | + .39585, .20788, 2.68030, .21805, .08177, | |
725 | + .03621, .15558, .25744, | |
726 | + .39936, .20858, 2.67970, .21989, .08675, | |
727 | + .04244, .15907, .25926, | |
728 | + .40242, .20910, 2.67187, .22136, .09113, | |
729 | + .04796, .16206, .26068, | |
730 | + .40505, .20946, 2.65772, .22248, .09495, | |
731 | + .05283, .16458, .26172, | |
732 | + .40736, .20971, 2.63986, .22334, .09834, | |
733 | + .05720, .16676, .26249, | |
734 | + .40941, .20988, 2.61952, .22400, .10137, | |
735 | + .06113, .16864, .26305, | |
736 | + .41121, .20996, 2.59670, .22446, .10404, | |
737 | + .06466, .17024, .26340 / | |
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 | + .41275, .20995, 2.57143, .22470, .10638, | |
740 | + .06779, .17156, .26353, | |
741 | + .41415, .20990, 2.54593, .22485, .10852, | |
742 | + .07067, .17273, .26356, | |
743 | + .41533, .20978, 2.51866, .22484, .11038, | |
744 | + .07324, .17367, .26341, | |
745 | + .41637, .20962, 2.49129, .22475, .11206, | |
746 | + .07559, .17448, .26317, | |
747 | + .41728, .20942, 2.46357, .22455, .11356, | |
748 | + .07772, .17514, .26284 / | |
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 | + .42370, .22997, 1.74889, .15041, .01267, | |
751 | + .00000, .08864, .19608, | |
752 | + .43286, .23156, 1.84451, .15420, .02314, | |
753 | + .00000, .09591, .19969, | |
754 | + .43977, .23239, 1.89737, .15693, .03152, | |
755 | + .00000, .10155, .20211, | |
756 | + .44504, .23267, 1.92141, .15882, .03830, | |
757 | + .00146, .10593, .20365, | |
758 | + .44916, .23261, 1.92811, .16015, .04394, | |
759 | + .00799, .10943, .20457, | |
760 | + .45233, .23228, 1.92135, .16096, .04863, | |
761 | + .01400, .11219, .20498, | |
762 | + .45478, .23174, 1.90595, .16141, .05257, | |
763 | + .01915, .11438, .20500 / | |
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 | + .45666, .23106, 1.88494, .16157, .05591, | |
766 | + .02359, .11611, .20474, | |
767 | + .45808, .23027, 1.86010, .16149, .05874, | |
768 | + .02742, .11748, .20424, | |
769 | + .45911, .22940, 1.83263, .16122, .06117, | |
770 | + .03076, .11853, .20356, | |
771 | + .45977, .22845, 1.80300, .16080, .06322, | |
772 | + .03364, .11930, .20269, | |
773 | + .46019, .22746, 1.77268, .16025, .06498, | |
774 | + .03617, .11986, .20173, | |
775 | + .46042, .22645, 1.74231, .15962, .06651, | |
776 | + .03842, .12028, .20069, | |
777 | + .46044, .22541, 1.71181, .15892, .06782, | |
778 | + .04039, .12054, .19958 / | |
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 | + .46028, .22433, 1.68104, .15812, .06891, | |
781 | + .04212, .12065, .19840, | |
782 | + .46003, .22326, 1.65127, .15730, .06989, | |
783 | + .04368, .12069, .19722, | |
784 | + .45961, .22217, 1.62151, .15642, .07069, | |
785 | + .04504, .12061, .19596, | |
786 | + .45910, .22109, 1.59262, .15553, .07139, | |
787 | + .04626, .12046, .19470, | |
788 | + .45851, .22001, 1.56438, .15461, .07198, | |
789 | + .04734, .12025, .19342 / | |
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 | + .48419, .25441, 1.48949, .12515, .01062, | |
792 | + -.00001, .07661, .17506, | |
793 | + .48982, .25319, 1.52866, .12655, .01845, | |
794 | + .00001, .08116, .17544, | |
795 | + .49342, .25158, 1.53799, .12723, .02453, | |
796 | + .00001, .08445, .17512, | |
797 | + .49556, .24971, 1.52869, .12738, .02930, | |
798 | + .00107, .08681, .17430, | |
799 | + .49677, .24770, 1.50936, .12718, .03318, | |
800 | + .00575, .08854, .17317, | |
801 | + .49719, .24557, 1.48264, .12667, .03630, | |
802 | + .00999, .08974, .17181, | |
803 | + .49702, .24343, 1.45207, .12599, .03885, | |
804 | + .01356, .09056, .17025 / | |
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 | + .49644, .24125, 1.41949, .12515, .04095, | |
807 | + .01659, .09108, .16861, | |
808 | + .49555, .23908, 1.38606, .12420, .04269, | |
809 | + .01917, .09137, .16692, | |
810 | + .49438, .23693, 1.35238, .12316, .04413, | |
811 | + .02136, .09147, .16516, | |
812 | + .49295, .23479, 1.31865, .12206, .04531, | |
813 | + .02323, .09140, .16337, | |
814 | + .49137, .23271, 1.28577, .12094, .04628, | |
815 | + .02485, .09123, .16157, | |
816 | + .48969, .23068, 1.25399, .11980, .04709, | |
817 | + .02625, .09097, .15980, | |
818 | + .48792, .22867, 1.22312, .11865, .04776, | |
819 | + .02747, .09063, .15803 / | |
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 | + .48602, .22669, 1.19301, .11748, .04829, | |
822 | + .02851, .09021, .15625, | |
823 | + .48412, .22477, 1.16439, .11634, .04874, | |
824 | + .02944, .08977, .15453, | |
825 | + .48212, .22288, 1.13654, .11516, .04907, | |
826 | + .03023, .08926, .15283, | |
827 | + .48011, .22104, 1.10994, .11401, .04934, | |
828 | + .03092, .08874, .15116, | |
829 | + .47808, .21924, 1.08438, .11287, .04954, | |
830 | + .03153, .08819, .14952 / | |
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 | + .53222, .26957, 1.29654, .10513, .00901, | |
833 | + .00000, .06660, .15635, | |
834 | + .53360, .26560, 1.29940, .10506, .01506, | |
835 | + -.00001, .06934, .15450, | |
836 | + .53334, .26164, 1.28226, .10454, .01962, | |
837 | + .00000, .07110, .15236, | |
838 | + .53202, .25772, 1.25390, .10369, .02309, | |
839 | + .00080, .07219, .15006, | |
840 | + .53005, .25392, 1.22056, .10265, .02584, | |
841 | + .00429, .07283, .14767, | |
842 | + .52753, .25019, 1.18403, .10144, .02800, | |
843 | + .00742, .07311, .14525, | |
844 | + .52463, .24660, 1.14665, .10018, .02972, | |
845 | + .01001, .07314, .14280 / | |
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 | + .52153, .24311, 1.10960, .09885, .03109, | |
848 | + .01216, .07298, .14042, | |
849 | + .51825, .23978, 1.07348, .09752, .03219, | |
850 | + .01396, .07269, .13804, | |
851 | + .51487, .23655, 1.03854, .09616, .03305, | |
852 | + .01547, .07228, .13575, | |
853 | + .51139, .23341, 1.00477, .09479, .03373, | |
854 | + .01675, .07178, .13352, | |
855 | + .50788, .23041, .97262, .09345, .03427, | |
856 | + .01783, .07123, .13133, | |
857 | + .50437, .22753, .94218, .09214, .03470, | |
858 | + .01875, .07065, .12921, | |
859 | + .50087, .22475, .91321, .09083, .03503, | |
860 | + .01953, .07003, .12718 / | |
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 | + .49735, .22204, .88549, .08955, .03526, | |
863 | + .02019, .06937, .12519, | |
864 | + .49391, .21945, .85945, .08831, .03544, | |
865 | + .02077, .06872, .12328, | |
866 | + .49045, .21693, .83451, .08709, .03554, | |
867 | + .02125, .06804, .12142, | |
868 | + .48705, .21450, .81095, .08591, .03560, | |
869 | + .02166, .06737, .11963, | |
870 | + .48368, .21215, .78857, .08475, .03562, | |
871 | + .02201, .06670, .11789 / | |
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 | + .57768, .27860, 1.10972, .08465, .00739, | |
874 | + -.00001, .05570, .13438, | |
875 | + .57317, .27150, 1.08280, .08352, .01186, | |
876 | + -.00001, .05694, .13078, | |
877 | + .56784, .26489, 1.04541, .08216, .01512, | |
878 | + -.00001, .05750, .12728, | |
879 | + .56198, .25874, 1.00362, .08067, .01753, | |
880 | + .00057, .05761, .12389, | |
881 | + .55594, .25300, .96138, .07913, .01937, | |
882 | + .00308, .05746, .12067, | |
883 | + .54973, .24757, .91949, .07755, .02076, | |
884 | + .00529, .05708, .11757, | |
885 | + .54349, .24249, .87925, .07599, .02182, | |
886 | + .00706, .05657, .11461 / | |
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 | + .53731, .23768, .84116, .07444, .02263, | |
889 | + .00853, .05597, .11180, | |
890 | + .53123, .23314, .80533, .07294, .02326, | |
891 | + .00973, .05531, .10912, | |
892 | + .52525, .22886, .77171, .07147, .02371, | |
893 | + .01072, .05461, .10658, | |
894 | + .51935, .22476, .74008, .07006, .02405, | |
895 | + .01153, .05387, .10414, | |
896 | + .51360, .22088, .71060, .06868, .02429, | |
897 | + .01220, .05312, .10183, | |
898 | + .50803, .21720, .68317, .06736, .02446, | |
899 | + .01278, .05238, .09964, | |
900 | + .50259, .21368, .65749, .06609, .02455, | |
901 | + .01325, .05163, .09756 / | |
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 | + .49724, .21031, .63334, .06485, .02459, | |
904 | + .01364, .05089, .09554, | |
905 | + .49210, .20711, .61090, .06367, .02460, | |
906 | + .01397, .05017, .09364, | |
907 | + .48705, .20402, .58974, .06251, .02456, | |
908 | + .01423, .04944, .09182, | |
909 | + .48215, .20107, .56994, .06141, .02450, | |
910 | + .01445, .04874, .09008, | |
911 | + .47738, .19823, .55132, .06035, .02442, | |
912 | + .01463, .04805, .08839 / | |
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 | + .60908, .27924, .96023, .06775, .00603, | |
915 | + -.00003, .04609, .11373, | |
916 | + .59855, .26938, .91415, .06609, .00941, | |
917 | + -.00002, .04641, .10919, | |
918 | + .58805, .26056, .86497, .06438, .01178, | |
919 | + -.00003, .04629, .10504, | |
920 | + .57778, .25256, .81640, .06263, .01350, | |
921 | + .00041, .04587, .10121, | |
922 | + .56781, .24527, .77057, .06093, .01474, | |
923 | + .00227, .04529, .09769, | |
924 | + .55811, .23855, .72742, .05926, .01566, | |
925 | + .00386, .04460, .09439, | |
926 | + .54873, .23231, .68749, .05767, .01632, | |
927 | + .00512, .04385, .09131 / | |
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 | + .53973, .22650, .65083, .05614, .01680, | |
930 | + .00614, .04307, .08844, | |
931 | + .53110, .22109, .61718, .05468, .01715, | |
932 | + .00696, .04228, .08577, | |
933 | + .52281, .21602, .58623, .05327, .01738, | |
934 | + .00763, .04147, .08327, | |
935 | + .51477, .21126, .55770, .05194, .01752, | |
936 | + .00817, .04068, .08092, | |
937 | + .50708, .20677, .53150, .05067, .01760, | |
938 | + .00861, .03989, .07871, | |
939 | + .49972, .20253, .50745, .04947, .01764, | |
940 | + .00897, .03913, .07663, | |
941 | + .49263, .19853, .48524, .04831, .01763, | |
942 | + .00926, .03838, .07468 / | |
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 | + .48576, .19473, .46460, .04721, .01757, | |
945 | + .00950, .03766, .07282, | |
946 | + .47920, .19114, .44560, .04617, .01750, | |
947 | + .00969, .03696, .07107, | |
948 | + .47281, .18771, .42789, .04517, .01741, | |
949 | + .00984, .03629, .06938, | |
950 | + .46668, .18444, .41147, .04421, .01730, | |
951 | + .00996, .03563, .06780, | |
952 | + .46078, .18130, .39617, .04329, .01718, | |
953 | + .01005, .03500, .06631 / | |
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 | + .62806, .27354, .83506, .05371, .00488, | |
956 | + .00000, .03765, .09460, | |
957 | + .61162, .26146, .77690, .05188, .00745, | |
958 | + -.00001, .03742, .08975, | |
959 | + .59618, .25093, .72139, .05010, .00918, | |
960 | + -.00001, .03689, .08545, | |
961 | + .58170, .24155, .67013, .04836, .01039, | |
962 | + .00031, .03620, .08160, | |
963 | + .56812, .23313, .62381, .04672, .01124, | |
964 | + .00168, .03544, .07810, | |
965 | + .55524, .22545, .58173, .04516, .01184, | |
966 | + .00284, .03461, .07489, | |
967 | + .54310, .21839, .54384, .04366, .01225, | |
968 | + .00375, .03379, .07196 / | |
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 | + .53164, .21191, .50977, .04226, .01252, | |
971 | + .00446, .03297, .06928, | |
972 | + .52081, .20591, .47911, .04093, .01270, | |
973 | + .00502, .03217, .06678, | |
974 | + .51046, .20039, .45140, .03972, .01280, | |
975 | + .00549, .03137, .06448, | |
976 | + .50069, .19517, .42623, .03854, .01283, | |
977 | + .00584, .03061, .06233, | |
978 | + .49137, .19032, .40341, .03744, .01283, | |
979 | + .00612, .02988, .06033, | |
980 | + .48253, .18579, .38269, .03641, .01279, | |
981 | + .00636, .02918, .05846, | |
982 | + .47413, .18151, .36375, .03541, .01273, | |
983 | + .00653, .02850, .05673 / | |
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 | + .46605, .17745, .34637, .03447, .01264, | |
986 | + .00667, .02784, .05509, | |
987 | + .45839, .17364, .33048, .03359, .01255, | |
988 | + .00679, .02722, .05356, | |
989 | + .45099, .17003, .31579, .03275, .01244, | |
990 | + .00685, .02662, .05211, | |
991 | + .44392, .16661, .30227, .03195, .01232, | |
992 | + .00691, .02604, .05075, | |
993 | + .43713, .16336, .28977, .03120, .01218, | |
994 | + .00695, .02549, .04947 / | |
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 | + .63598, .26313, .72699, .04209, .00391, | |
997 | + -.00002, .03030, .07733, | |
998 | + .61397, .24936, .66177, .04030, .00586, | |
999 | + -.00002, .02978, .07258, | |
1000 | + .59402, .23754, .60356, .03861, .00716, | |
1001 | + -.00003, .02909, .06844, | |
1002 | + .57578, .22717, .55228, .03701, .00802, | |
1003 | + .00023, .02829, .06481, | |
1004 | + .55901, .21796, .50736, .03551, .00860, | |
1005 | + .00124, .02748, .06158, | |
1006 | + .54340, .20963, .46766, .03411, .00899, | |
1007 | + .00210, .02667, .05865, | |
1008 | + .52889, .20207, .43270, .03281, .00924, | |
1009 | + .00276, .02586, .05600 / | |
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 | + .51534, .19518, .40182, .03159, .00939, | |
1012 | + .00328, .02510, .05358, | |
1013 | + .50267, .18887, .37448, .03046, .00947, | |
1014 | + .00367, .02434, .05140, | |
1015 | + .49079, .18306, .35008, .02941, .00949, | |
1016 | + .00400, .02363, .04936, | |
1017 | + .47958, .17762, .32821, .02841, .00948, | |
1018 | + .00422, .02295, .04749, | |
1019 | + .46901, .17260, .30863, .02747, .00943, | |
1020 | + .00441, .02229, .04578, | |
1021 | + .45905, .16792, .29102, .02660, .00936, | |
1022 | + .00457, .02167, .04420, | |
1023 | + .44963, .16353, .27507, .02578, .00927, | |
1024 | + .00467, .02110, .04272 / | |
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 | + .44061, .15941, .26058, .02502, .00917, | |
1027 | + .00475, .02053, .04133, | |
1028 | + .43210, .15556, .24741, .02431, .00907, | |
1029 | + .00482, .02000, .04004, | |
1030 | + .42397, .15190, .23533, .02362, .00896, | |
1031 | + .00487, .01950, .03882, | |
1032 | + .41624, .14846, .22428, .02298, .00885, | |
1033 | + .00489, .01902, .03768, | |
1034 | + .40885, .14520, .21412, .02237, .00873, | |
1035 | + .00491, .01856, .03661 / | |
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 | + .63409, .24925, .63191, .03256, .00311, | |
1038 | + -.00002, .02402, .06212, | |
1039 | + .60709, .23428, .56337, .03091, .00460, | |
1040 | + -.00001, .02340, .05775, | |
1041 | + .58315, .22160, .50509, .02939, .00556, | |
1042 | + -.00002, .02266, .05400, | |
1043 | + .56166, .21061, .45550, .02800, .00618, | |
1044 | + .00017, .02189, .05072, | |
1045 | + .54222, .20092, .41323, .02670, .00657, | |
1046 | + .00094, .02111, .04788, | |
1047 | + .52434, .19226, .37672, .02550, .00682, | |
1048 | + .00159, .02036, .04532, | |
1049 | + .50791, .18445, .34510, .02439, .00697, | |
1050 | + .00206, .01964, .04301 / | |
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 | + .49272, .17742, .31765, .02337, .00706, | |
1053 | + .00243, .01895, .04092, | |
1054 | + .47862, .17098, .29361, .02244, .00707, | |
1055 | + .00272, .01830, .03905, | |
1056 | + .46553, .16507, .27249, .02155, .00705, | |
1057 | + .00294, .01767, .03737, | |
1058 | + .45323, .15963, .25374, .02076, .00700, | |
1059 | + .00310, .01708, .03579, | |
1060 | + .44174, .15459, .23712, .02000, .00694, | |
1061 | + .00322, .01654, .03435, | |
1062 | + .43097, .14992, .22231, .01930, .00687, | |
1063 | + .00330, .01602, .03302, | |
1064 | + .42082, .14558, .20899, .01865, .00678, | |
1065 | + .00337, .01553, .03180 / | |
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 | + .41121, .14151, .19699, .01804, .00669, | |
1068 | + .00342, .01506, .03067, | |
1069 | + .40217, .13771, .18619, .01747, .00659, | |
1070 | + .00346, .01462, .02961, | |
1071 | + .39355, .13413, .17636, .01692, .00648, | |
1072 | + .00347, .01421, .02863, | |
1073 | + .38539, .13076, .16740, .01642, .00638, | |
1074 | + .00348, .01382, .02770, | |
1075 | + .37763, .12757, .15920, .01594, .00628, | |
1076 | + .00348, .01344, .02684 / | |
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 | + .62362, .23292, .54730, .02478, .00245, | |
1079 | + .00004, .01879, .04909, | |
1080 | + .59222, .21729, .47841, .02341, .00358, | |
1081 | + .00003, .01813, .04519, | |
1082 | + .56490, .20416, .42198, .02214, .00427, | |
1083 | + .00004, .01741, .04194, | |
1084 | + .54075, .19291, .37533, .02097, .00472, | |
1085 | + .00016, .01670, .03910, | |
1086 | + .51913, .18308, .33641, .01992, .00498, | |
1087 | + .00073, .01601, .03664, | |
1088 | + .49951, .17434, .30342, .01891, .00516, | |
1089 | + .00119, .01536, .03447, | |
1090 | + .48160, .16654, .27534, .01801, .00522, | |
1091 | + .00153, .01472, .03257 / | |
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 | + .46526, .15947, .25126, .01716, .00525, | |
1094 | + .00179, .01413, .03087, | |
1095 | + .45016, .15310, .23048, .01642, .00523, | |
1096 | + .00198, .01357, .02932, | |
1097 | + .43620, .14731, .21241, .01572, .00519, | |
1098 | + .00212, .01307, .02789, | |
1099 | + .42320, .14196, .19653, .01509, .00514, | |
1100 | + .00223, .01257, .02662, | |
1101 | + .41112, .13704, .18256, .01449, .00507, | |
1102 | + .00231, .01212, .02546, | |
1103 | + .39986, .13250, .17021, .01393, .00500, | |
1104 | + .00238, .01171, .02440, | |
1105 | + .38931, .12828, .15923, .01342, .00492, | |
1106 | + .00242, .01130, .02342 / | |
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 | + .37935, .12436, .14938, .01294, .00484, | |
1109 | + .00244, .01093, .02250, | |
1110 | + .37002, .12071, .14055, .01250, .00476, | |
1111 | + .00245, .01058, .02164, | |
1112 | + .36119, .11727, .13258, .01207, .00467, | |
1113 | + .00246, .01026, .02086, | |
1114 | + .35285, .11406, .12537, .01167, .00458, | |
1115 | + .00247, .00995, .02013, | |
1116 | + .34494, .11103, .11883, .01130, .00450, | |
1117 | + .00247, .00966, .01945 / | |
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 | + .60548, .21539, .47197, .01886, .00177, | |
1120 | + -.00013, .01431, .03809, | |
1121 | + .57056, .19940, .40472, .01768, .00266, | |
1122 | + -.00013, .01373, .03478, | |
1123 | + .54060, .18611, .35136, .01660, .00318, | |
1124 | + -.00013, .01312, .03203, | |
1125 | + .51443, .17483, .30834, .01563, .00351, | |
1126 | + -.00001, .01251, .02968, | |
1127 | + .49129, .16502, .27317, .01472, .00369, | |
1128 | + .00043, .01195, .02767, | |
1129 | + .47039, .15644, .24387, .01395, .00380, | |
1130 | + .00080, .01139, .02587, | |
1131 | + .45154, .14874, .21931, .01319, .00383, | |
1132 | + .00106, .01088, .02434 / | |
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 | + .43437, .14189, .19848, .01253, .00384, | |
1135 | + .00124, .01039, .02295, | |
1136 | + .41864, .13573, .18071, .01195, .00383, | |
1137 | + .00138, .00994, .02169, | |
1138 | + .40420, .13012, .16542, .01141, .00379, | |
1139 | + .00150, .00953, .02057, | |
1140 | + .39086, .12497, .15211, .01089, .00373, | |
1141 | + .00158, .00915, .01955, | |
1142 | + .37852, .12026, .14051, .01041, .00367, | |
1143 | + .00163, .00879, .01863, | |
1144 | + .36705, .11594, .13033, .00998, .00361, | |
1145 | + .00167, .00846, .01779, | |
1146 | + .35633, .11194, .12132, .00959, .00354, | |
1147 | + .00170, .00814, .01702 / | |
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 | + .34627, .10822, .11332, .00923, .00348, | |
1150 | + .00171, .00785, .01629, | |
1151 | + .33688, .10478, .10617, .00890, .00341, | |
1152 | + .00171, .00758, .01562, | |
1153 | + .32800, .10157, .09977, .00858, .00334, | |
1154 | + .00172, .00732, .01500, | |
1155 | + .31967, .09856, .09400, .00828, .00326, | |
1156 | + .00172, .00708, .01444, | |
1157 | + .31181, .09573, .08879, .00798, .00318, | |
1158 | + .00171, .00685, .01393 / | |
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 | + .58125, .19655, .40419, .01389, .00138, | |
1161 | + -.00003, .01089, .02909, | |
1162 | + .54349, .18067, .34025, .01297, .00206, | |
1163 | + -.00004, .01036, .02635, | |
1164 | + .51155, .16760, .29093, .01213, .00244, | |
1165 | + -.00003, .00983, .02408, | |
1166 | + .48395, .15657, .25202, .01136, .00266, | |
1167 | + .00005, .00932, .02219, | |
1168 | + .45970, .14709, .22075, .01069, .00278, | |
1169 | + .00036, .00884, .02054, | |
1170 | + .43808, .13875, .19510, .01005, .00284, | |
1171 | + .00063, .00839, .01914, | |
1172 | + .41868, .13139, .17390, .00948, .00286, | |
1173 | + .00081, .00797, .01789 / | |
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 | + .40110, .12485, .15616, .00898, .00285, | |
1176 | + .00094, .00759, .01680, | |
1177 | + .38514, .11898, .14117, .00852, .00282, | |
1178 | + .00104, .00723, .01582, | |
1179 | + .37055, .11366, .12836, .00811, .00278, | |
1180 | + .00111, .00690, .01495, | |
1181 | + .35710, .10883, .11733, .00773, .00272, | |
1182 | + .00115, .00660, .01416, | |
1183 | + .34474, .10443, .10779, .00737, .00267, | |
1184 | + .00119, .00632, .01343, | |
1185 | + .33333, .10040, .09948, .00704, .00262, | |
1186 | + .00122, .00607, .01277, | |
1187 | + .32271, .09666, .09219, .00675, .00256, | |
1188 | + .00123, .00583, .01218 / | |
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 | + .31273, .09322, .08574, .00648, .00250, | |
1191 | + .00123, .00560, .01164, | |
1192 | + .30345, .09004, .08002, .00624, .00244, | |
1193 | + .00123, .00538, .01114, | |
1194 | + .29476, .08706, .07491, .00599, .00238, | |
1195 | + .00122, .00519, .01068, | |
1196 | + .28662, .08428, .07033, .00576, .00232, | |
1197 | + .00122, .00501, .01025, | |
1198 | + .27894, .08169, .06620, .00555, .00227, | |
1199 | + .00121, .00484, .00986 / | |
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 | + .55172, .17761, .34379, .01016, .00104, | |
1202 | + -.00004, .00808, .02180, | |
1203 | + .51202, .16209, .28425, .00944, .00154, | |
1204 | + -.00003, .00766, .01961, | |
1205 | + .47883, .14942, .23945, .00878, .00182, | |
1206 | + -.00004, .00723, .01782, | |
1207 | + .45041, .13880, .20486, .00819, .00198, | |
1208 | + .00003, .00682, .01633, | |
1209 | + .42567, .12975, .17745, .00764, .00207, | |
1210 | + .00027, .00644, .01505, | |
1211 | + .40371, .12187, .15534, .00718, .00208, | |
1212 | + .00046, .00608, .01395, | |
1213 | + .38413, .11495, .13728, .00677, .00209, | |
1214 | + .00059, .00576, .01296 / | |
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 | + .36654, .10881, .12232, .00638, .00207, | |
1217 | + .00069, .00545, .01212, | |
1218 | + .35065, .10332, .10980, .00603, .00204, | |
1219 | + .00075, .00518, .01139, | |
1220 | + .33620, .09838, .09921, .00573, .00200, | |
1221 | + .00079, .00492, .01071, | |
1222 | + .32297, .09390, .09018, .00543, .00196, | |
1223 | + .00083, .00469, .01011, | |
1224 | + .31082, .08983, .08241, .00517, .00192, | |
1225 | + .00085, .00448, .00956, | |
1226 | + .29964, .08612, .07568, .00493, .00187, | |
1227 | + .00086, .00429, .00907, | |
1228 | + .28928, .08270, .06982, .00470, .00183, | |
1229 | + .00086, .00410, .00862 / | |
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 | + .27964, .07955, .06466, .00450, .00178, | |
1232 | + .00087, .00393, .00820, | |
1233 | + .27069, .07665, .06011, .00432, .00174, | |
1234 | + .00087, .00378, .00783, | |
1235 | + .26229, .07394, .05608, .00414, .00168, | |
1236 | + .00086, .00363, .00750, | |
1237 | + .25444, .07143, .05249, .00398, .00163, | |
1238 | + .00085, .00349, .00718, | |
1239 | + .24707, .06909, .04926, .00384, .00159, | |
1240 | + .00084, .00336, .00687 / | |
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 | + .51809, .15875, .29000, .00727, .00080, | |
1243 | + .00001, .00593, .01606, | |
1244 | + .47729, .14387, .23565, .00671, .00115, | |
1245 | + .00000, .00559, .01436, | |
1246 | + .44347, .13181, .19564, .00623, .00137, | |
1247 | + .00000, .00527, .01294, | |
1248 | + .41477, .12182, .16531, .00581, .00148, | |
1249 | + .00005, .00493, .01179, | |
1250 | + .38998, .11332, .14169, .00539, .00152, | |
1251 | + .00023, .00464, .01083, | |
1252 | + .36811, .10598, .12288, .00507, .00154, | |
1253 | + .00036, .00436, .00998, | |
1254 | + .34880, .09954, .10768, .00474, .00153, | |
1255 | + .00045, .00411, .00925 / | |
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 | + .33154, .09386, .09522, .00446, .00151, | |
1258 | + .00051, .00389, .00861, | |
1259 | + .31601, .08881, .08488, .00420, .00148, | |
1260 | + .00055, .00367, .00805, | |
1261 | + .30196, .08429, .07623, .00396, .00145, | |
1262 | + .00058, .00348, .00755, | |
1263 | + .28914, .08021, .06892, .00375, .00141, | |
1264 | + .00060, .00330, .00709, | |
1265 | + .27741, .07652, .06265, .00357, .00137, | |
1266 | + .00061, .00314, .00668, | |
1267 | + .26666, .07315, .05726, .00341, .00133, | |
1268 | + .00062, .00300, .00631, | |
1269 | + .25674, .07007, .05259, .00324, .00130, | |
1270 | + .00062, .00287, .00599 / | |
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 | + .24754, .06723, .04853, .00309, .00126, | |
1273 | + .00062, .00274, .00570, | |
1274 | + .23903, .06462, .04496, .00295, .00122, | |
1275 | + .00062, .00262, .00543, | |
1276 | + .23106, .06220, .04180, .00284, .00118, | |
1277 | + .00062, .00251, .00517, | |
1278 | + .22365, .05995, .03899, .00273, .00115, | |
1279 | + .00061, .00241, .00494, | |
1280 | + .21671, .05785, .03649, .00261, .00111, | |
1281 | + .00060, .00233, .00473 / | |
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 | + .48137, .14038, .24241, .00504, .00061, | |
1284 | + .00005, .00431, .01161, | |
1285 | + .44018, .12637, .19367, .00469, .00088, | |
1286 | + .00005, .00404, .01029, | |
1287 | + .40637, .11510, .15851, .00433, .00102, | |
1288 | + .00004, .00378, .00926, | |
1289 | + .37798, .10580, .13233, .00402, .00109, | |
1290 | + .00007, .00353, .00837, | |
1291 | + .35358, .09793, .11223, .00373, .00111, | |
1292 | + .00020, .00330, .00766, | |
1293 | + .33229, .09118, .09642, .00348, .00112, | |
1294 | + .00027, .00309, .00701, | |
1295 | + .31352, .08529, .08379, .00324, .00111, | |
1296 | + .00034, .00290, .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 | + .29680, .08014, .07355, .00305, .00109, | |
1299 | + .00038, .00273, .00600, | |
1300 | + .28188, .07558, .06515, .00288, .00107, | |
1301 | + .00041, .00257, .00558, | |
1302 | + .26844, .07149, .05816, .00271, .00104, | |
1303 | + .00043, .00243, .00522, | |
1304 | + .25619, .06781, .05229, .00256, .00100, | |
1305 | + .00044, .00230, .00491, | |
1306 | + .24507, .06450, .04730, .00241, .00097, | |
1307 | + .00045, .00219, .00461, | |
1308 | + .23491, .06150, .04303, .00228, .00094, | |
1309 | + .00045, .00208, .00434, | |
1310 | + .22555, .05875, .03935, .00218, .00092, | |
1311 | + .00044, .00198, .00410 / | |
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 | + .21688, .05623, .03617, .00209, .00089, | |
1314 | + .00044, .00189, .00389, | |
1315 | + .20890, .05393, .03339, .00200, .00086, | |
1316 | + .00044, .00181, .00370, | |
1317 | + .20149, .05178, .03094, .00190, .00084, | |
1318 | + .00044, .00173, .00352, | |
1319 | + .19460, .04980, .02877, .00182, .00081, | |
1320 | + .00043, .00165, .00336, | |
1321 | + .18814, .04797, .02685, .00175, .00078, | |
1322 | + .00042, .00159, .00321 / | |
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 | + .44247, .12303, .20083, .00355, .00042, | |
1325 | + .00002, .00301, .00824, | |
1326 | + .40173, .10995, .15777, .00325, .00062, | |
1327 | + .00000, .00284, .00726, | |
1328 | + .36857, .09956, .12734, .00301, .00072, | |
1329 | + .00001, .00263, .00649, | |
1330 | + .34088, .09103, .10505, .00278, .00077, | |
1331 | + .00003, .00245, .00584, | |
1332 | + .31733, .08385, .08816, .00256, .00080, | |
1333 | + .00013, .00229, .00531, | |
1334 | + .29682, .07772, .07506, .00238, .00080, | |
1335 | + .00019, .00214, .00486, | |
1336 | + .27887, .07242, .06472, .00223, .00079, | |
1337 | + .00023, .00200, .00446 / | |
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 | + .26299, .06779, .05642, .00211, .00077, | |
1340 | + .00027, .00188, .00411, | |
1341 | + .24887, .06372, .04964, .00197, .00075, | |
1342 | + .00029, .00177, .00380, | |
1343 | + .23618, .06007, .04406, .00184, .00073, | |
1344 | + .00030, .00166, .00355, | |
1345 | + .22471, .05682, .03939, .00173, .00070, | |
1346 | + .00030, .00157, .00332, | |
1347 | + .21431, .05389, .03547, .00164, .00067, | |
1348 | + .00030, .00148, .00312, | |
1349 | + .20484, .05123, .03213, .00155, .00064, | |
1350 | + .00030, .00140, .00294, | |
1351 | + .19617, .04882, .02927, .00147, .00062, | |
1352 | + .00030, .00133, .00277 / | |
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 | + .18814, .04661, .02680, .00141, .00061, | |
1355 | + .00031, .00127, .00262, | |
1356 | + .18076, .04460, .02466, .00135, .00059, | |
1357 | + .00031, .00121, .00248, | |
1358 | + .17394, .04275, .02278, .00128, .00057, | |
1359 | + .00030, .00116, .00235, | |
1360 | + .16763, .04103, .02112, .00122, .00055, | |
1361 | + .00029, .00110, .00223, | |
1362 | + .16174, .03942, .01965, .00117, .00053, | |
1363 | + .00028, .00105, .00213 / | |
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 | + .40243, .10658, .16457, .00239, .00031, | |
1366 | + .00003, .00209, .00573, | |
1367 | + .36275, .09461, .12720, .00220, .00045, | |
1368 | + .00003, .00195, .00502, | |
1369 | + .33075, .08517, .10131, .00204, .00050, | |
1370 | + .00001, .00181, .00448, | |
1371 | + .30419, .07748, .08261, .00191, .00054, | |
1372 | + .00003, .00168, .00400, | |
1373 | + .28172, .07107, .06864, .00177, .00055, | |
1374 | + .00010, .00156, .00362, | |
1375 | + .26236, .06559, .05792, .00163, .00055, | |
1376 | + .00014, .00145, .00330, | |
1377 | + .24543, .06088, .04954, .00154, .00053, | |
1378 | + .00015, .00134, .00301 / | |
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 | + .23061, .05677, .04289, .00142, .00052, | |
1381 | + .00017, .00126, .00278, | |
1382 | + .21742, .05316, .03750, .00133, .00051, | |
1383 | + .00018, .00118, .00257, | |
1384 | + .20567, .04996, .03310, .00124, .00049, | |
1385 | + .00019, .00110, .00239, | |
1386 | + .19507, .04713, .02944, .00117, .00047, | |
1387 | + .00020, .00103, .00222, | |
1388 | + .18547, .04458, .02638, .00111, .00045, | |
1389 | + .00020, .00098, .00208, | |
1390 | + .17676, .04228, .02380, .00106, .00044, | |
1391 | + .00020, .00093, .00195, | |
1392 | + .16883, .04018, .02160, .00099, .00041, | |
1393 | + .00019, .00087, .00184 / | |
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 | + .16155, .03826, .01971, .00094, .00040, | |
1396 | + .00019, .00083, .00172, | |
1397 | + .15487, .03652, .01807, .00090, .00039, | |
1398 | + .00019, .00079, .00162, | |
1399 | + .14867, .03492, .01664, .00085, .00037, | |
1400 | + .00019, .00075, .00154, | |
1401 | + .14293, .03345, .01538, .00082, .00036, | |
1402 | + .00018, .00072, .00147, | |
1403 | + .13760, .03208, .01428, .00079, .00034, | |
1404 | + .00018, .00068, .00139 / | |
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 | + .36198, .09127, .13326, .00154, .00023, | |
1407 | + .00005, .00145, .00389, | |
1408 | + .32389, .08048, .10131, .00143, .00033, | |
1409 | + .00004, .00134, .00340, | |
1410 | + .29344, .07201, .07958, .00132, .00037, | |
1411 | + .00003, .00124, .00299, | |
1412 | + .26844, .06516, .06412, .00121, .00040, | |
1413 | + .00005, .00114, .00269, | |
1414 | + .24737, .05946, .05274, .00113, .00039, | |
1415 | + .00008, .00105, .00243, | |
1416 | + .22926, .05465, .04412, .00105, .00040, | |
1417 | + .00011, .00099, .00217, | |
1418 | + .21358, .05051, .03743, .00098, .00038, | |
1419 | + .00012, .00091, .00199 / | |
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 | + .19990, .04692, .03217, .00090, .00037, | |
1422 | + .00014, .00085, .00183, | |
1423 | + .18779, .04380, .02796, .00083, .00035, | |
1424 | + .00014, .00080, .00169, | |
1425 | + .17700, .04103, .02451, .00080, .00034, | |
1426 | + .00015, .00075, .00156, | |
1427 | + .16735, .03856, .02170, .00074, .00033, | |
1428 | + .00015, .00070, .00145, | |
1429 | + .15864, .03637, .01936, .00070, .00032, | |
1430 | + .00015, .00066, .00135, | |
1431 | + .15077, .03440, .01739, .00066, .00031, | |
1432 | + .00015, .00062, .00126, | |
1433 | + .14361, .03260, .01572, .00062, .00029, | |
1434 | + .00015, .00058, .00119 / | |
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 | + .13704, .03097, .01429, .00059, .00028, | |
1437 | + .00015, .00055, .00113, | |
1438 | + .13103, .02949, .01306, .00056, .00028, | |
1439 | + .00014, .00053, .00107, | |
1440 | + .12549, .02813, .01199, .00053, .00026, | |
1441 | + .00014, .00050, .00100, | |
1442 | + .12039, .02689, .01106, .00051, .00025, | |
1443 | + .00013, .00048, .00095, | |
1444 | + .11566, .02574, .01023, .00049, .00024, | |
1445 | + .00013, .00045, .00090 / | |
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 | + .32189, .07733, .10660, .00100, .00017, | |
1448 | + .00003, .00097, .00258, | |
1449 | + .28596, .06767, .07967, .00090, .00024, | |
1450 | + .00003, .00089, .00225, | |
1451 | + .25741, .06016, .06170, .00083, .00027, | |
1452 | + .00003, .00083, .00199, | |
1453 | + .23410, .05415, .04913, .00078, .00028, | |
1454 | + .00003, .00077, .00176, | |
1455 | + .21461, .04916, .04000, .00072, .00029, | |
1456 | + .00006, .00071, .00158, | |
1457 | + .19801, .04497, .03316, .00066, .00029, | |
1458 | + .00009, .00067, .00143, | |
1459 | + .18368, .04140, .02792, .00062, .00028, | |
1460 | + .00010, .00062, .00129 / | |
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 | + .17119, .03832, .02382, .00058, .00027, | |
1463 | + .00011, .00057, .00119, | |
1464 | + .16025, .03562, .02057, .00052, .00026, | |
1465 | + .00011, .00054, .00108, | |
1466 | + .15054, .03326, .01795, .00047, .00025, | |
1467 | + .00011, .00050, .00100, | |
1468 | + .14184, .03117, .01581, .00044, .00024, | |
1469 | + .00011, .00047, .00093, | |
1470 | + .13406, .02930, .01404, .00041, .00023, | |
1471 | + .00012, .00044, .00086, | |
1472 | + .12705, .02763, .01256, .00038, .00022, | |
1473 | + .00012, .00042, .00081, | |
1474 | + .12066, .02613, .01132, .00037, .00020, | |
1475 | + .00011, .00039, .00076 / | |
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 | + .11484, .02476, .01025, .00036, .00020, | |
1478 | + .00011, .00037, .00071, | |
1479 | + .10954, .02352, .00933, .00034, .00019, | |
1480 | + .00010, .00035, .00067, | |
1481 | + .10467, .02238, .00854, .00031, .00018, | |
1482 | + .00010, .00033, .00063, | |
1483 | + .10018, .02134, .00786, .00029, .00018, | |
1484 | + .00010, .00032, .00059, | |
1485 | + .09603, .02038, .00726, .00028, .00017, | |
1486 | + .00009, .00030, .00056 / | |
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 | + .28300, .06481, .08425, .00071, .00008, | |
1489 | + -.00002, .00059, .00167, | |
1490 | + .24956, .05635, .06202, .00064, .00012, | |
1491 | + -.00001, .00055, .00145, | |
1492 | + .22326, .04981, .04740, .00059, .00015, | |
1493 | + -.00001, .00051, .00127, | |
1494 | + .20194, .04459, .03734, .00053, .00016, | |
1495 | + -.00002, .00047, .00113, | |
1496 | + .18424, .04031, .03011, .00049, .00016, | |
1497 | + .00001, .00043, .00101, | |
1498 | + .16919, .03671, .02475, .00045, .00016, | |
1499 | + .00003, .00041, .00091, | |
1500 | + .15628, .03365, .02069, .00043, .00016, | |
1501 | + .00004, .00037, .00083 / | |
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 | + .14512, .03104, .01754, .00039, .00016, | |
1504 | + .00005, .00034, .00075, | |
1505 | + .13533, .02877, .01505, .00037, .00016, | |
1506 | + .00006, .00032, .00069, | |
1507 | + .12670, .02677, .01307, .00035, .00015, | |
1508 | + .00006, .00030, .00063, | |
1509 | + .11902, .02501, .01146, .00032, .00013, | |
1510 | + .00006, .00028, .00059, | |
1511 | + .11216, .02345, .01013, .00029, .00013, | |
1512 | + .00005, .00026, .00055, | |
1513 | + .10599, .02205, .00903, .00027, .00012, | |
1514 | + .00005, .00024, .00052, | |
1515 | + .10040, .02079, .00810, .00027, .00012, | |
1516 | + .00005, .00023, .00048 / | |
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 | + .09531, .01966, .00732, .00026, .00011, | |
1519 | + .00005, .00021, .00044, | |
1520 | + .09068, .01863, .00665, .00025, .00011, | |
1521 | + .00005, .00021, .00041, | |
1522 | + .08644, .01769, .00607, .00024, .00010, | |
1523 | + .00005, .00019, .00039, | |
1524 | + .08254, .01684, .00557, .00023, .00009, | |
1525 | + .00005, .00018, .00037, | |
1526 | + .07895, .01605, .00513, .00022, .00009, | |
1527 | + .00005, .00017, .00034 / | |
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 | + .24547, .05341, .06540, .00038, .00008, | |
1530 | + .00002, .00041, .00104, | |
1531 | + .21484, .04613, .04738, .00037, .00011, | |
1532 | + .00003, .00038, .00091, | |
1533 | + .19096, .04052, .03573, .00034, .00011, | |
1534 | + .00002, .00034, .00081, | |
1535 | + .17173, .03609, .02782, .00031, .00012, | |
1536 | + .00003, .00031, .00071, | |
1537 | + .15588, .03246, .02222, .00028, .00012, | |
1538 | + .00002, .00028, .00062, | |
1539 | + .14246, .02944, .01811, .00026, .00012, | |
1540 | + .00003, .00026, .00056, | |
1541 | + .13105, .02688, .01501, .00025, .00011, | |
1542 | + .00005, .00024, .00051 / | |
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 | + .12120, .02469, .01264, .00022, .00011, | |
1545 | + .00004, .00023, .00046, | |
1546 | + .11260, .02281, .01079, .00020, .00010, | |
1547 | + .00004, .00020, .00042, | |
1548 | + .10504, .02115, .00932, .00020, .00010, | |
1549 | + .00005, .00019, .00039, | |
1550 | + .09835, .01970, .00812, .00019, .00009, | |
1551 | + .00004, .00018, .00035, | |
1552 | + .09238, .01841, .00715, .00018, .00009, | |
1553 | + .00004, .00016, .00033, | |
1554 | + .08704, .01726, .00635, .00016, .00009, | |
1555 | + .00004, .00015, .00031, | |
1556 | + .08224, .01623, .00568, .00015, .00008, | |
1557 | + .00004, .00015, .00028 / | |
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 | + .07786, .01531, .00512, .00015, .00007, | |
1560 | + .00004, .00014, .00027, | |
1561 | + .07389, .01448, .00463, .00014, .00007, | |
1562 | + .00004, .00013, .00025, | |
1563 | + .07028, .01372, .00422, .00013, .00007, | |
1564 | + .00003, .00012, .00024, | |
1565 | + .06696, .01302, .00386, .00013, .00006, | |
1566 | + .00003, .00011, .00022, | |
1567 | + .06389, .01238, .00355, .00013, .00006, | |
1568 | + .00003, .00010, .00020 / | |
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 | + .21004, .04347, .04998, .00021, .00006, | |
1571 | + .00003, .00026, .00064, | |
1572 | + .18248, .03727, .03561, .00020, .00009, | |
1573 | + .00003, .00024, .00054, | |
1574 | + .16110, .03253, .02648, .00019, .00008, | |
1575 | + .00003, .00022, .00049, | |
1576 | + .14407, .02879, .02039, .00016, .00009, | |
1577 | + .00002, .00020, .00042, | |
1578 | + .13004, .02577, .01611, .00017, .00009, | |
1579 | + .00003, .00018, .00037, | |
1580 | + .11829, .02325, .01301, .00016, .00008, | |
1581 | + .00003, .00017, .00034, | |
1582 | + .10833, .02115, .01071, .00013, .00008, | |
1583 | + .00004, .00015, .00031 / | |
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 | + .09977, .01935, .00896, .00013, .00008, | |
1586 | + .00004, .00014, .00028, | |
1587 | + .09231, .01780, .00760, .00013, .00007, | |
1588 | + .00004, .00013, .00026, | |
1589 | + .08581, .01646, .00652, .00012, .00006, | |
1590 | + .00003, .00012, .00024, | |
1591 | + .08008, .01527, .00566, .00011, .00006, | |
1592 | + .00004, .00011, .00022, | |
1593 | + .07498, .01423, .00497, .00010, .00006, | |
1594 | + .00004, .00010, .00020, | |
1595 | + .07044, .01331, .00439, .00010, .00006, | |
1596 | + .00004, .00010, .00018, | |
1597 | + .06637, .01248, .00392, .00009, .00005, | |
1598 | + .00003, .00009, .00016 / | |
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 | + .06266, .01174, .00351, .00008, .00005, | |
1601 | + .00003, .00008, .00016, | |
1602 | + .05932, .01106, .00317, .00007, .00005, | |
1603 | + .00003, .00008, .00016, | |
1604 | + .05626, .01046, .00288, .00008, .00005, | |
1605 | + .00003, .00008, .00014, | |
1606 | + .05348, .00991, .00263, .00007, .00005, | |
1607 | + .00003, .00007, .00013, | |
1608 | + .05093, .00940, .00241, .00007, .00004, | |
1609 | + .00003, .00007, .00012 / | |
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 | + .17740, .03492, .03761, .00014, .00002, | |
1612 | + .00000, .00015, .00038, | |
1613 | + .15291, .02970, .02636, .00012, .00004, | |
1614 | + .00000, .00013, .00034, | |
1615 | + .13408, .02578, .01935, .00014, .00004, | |
1616 | + -.00001, .00011, .00028, | |
1617 | + .11920, .02269, .01472, .00012, .00004, | |
1618 | + .00000, .00010, .00025, | |
1619 | + .10703, .02021, .01152, .00012, .00005, | |
1620 | + .00000, .00010, .00023, | |
1621 | + .09690, .01815, .00922, .00010, .00004, | |
1622 | + .00001, .00009, .00021, | |
1623 | + .08836, .01643, .00754, .00008, .00004, | |
1624 | + .00002, .00009, .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 | + .08103, .01498, .00626, .00008, .00004, | |
1627 | + .00002, .00008, .00016, | |
1628 | + .07470, .01372, .00528, .00008, .00004, | |
1629 | + .00001, .00007, .00015, | |
1630 | + .06920, .01264, .00451, .00007, .00004, | |
1631 | + .00001, .00007, .00014, | |
1632 | + .06434, .01170, .00390, .00007, .00003, | |
1633 | + .00002, .00006, .00013, | |
1634 | + .06005, .01087, .00341, .00007, .00003, | |
1635 | + .00001, .00005, .00012, | |
1636 | + .05625, .01013, .00300, .00006, .00003, | |
1637 | + .00001, .00005, .00010, | |
1638 | + .05283, .00948, .00267, .00006, .00003, | |
1639 | + .00001, .00005, .00009 / | |
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 | + .04976, .00889, .00239, .00006, .00002, | |
1642 | + .00001, .00005, .00009, | |
1643 | + .04698, .00836, .00215, .00005, .00002, | |
1644 | + .00001, .00004, .00008, | |
1645 | + .04446, .00788, .00195, .00005, .00002, | |
1646 | + .00001, .00004, .00008, | |
1647 | + .04215, .00745, .00177, .00005, .00002, | |
1648 | + .00001, .00004, .00007, | |
1649 | + .04005, .00705, .00162, .00004, .00002, | |
1650 | + .00001, .00003, .00007 / | |
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 | + .14715, .02747, .02762, .00005, .00004, | |
1653 | + .00004, .00010, .00021, | |
1654 | + .12585, .02319, .01904, .00005, .00004, | |
1655 | + .00002, .00009, .00019, | |
1656 | + .10964, .01999, .01378, .00005, .00003, | |
1657 | + .00002, .00008, .00017, | |
1658 | + .09684, .01749, .01036, .00005, .00003, | |
1659 | + .00002, .00007, .00014, | |
1660 | + .08648, .01549, .00803, .00005, .00004, | |
1661 | + .00002, .00007, .00012, | |
1662 | + .07788, .01386, .00637, .00005, .00003, | |
1663 | + .00001, .00005, .00010, | |
1664 | + .07067, .01248, .00516, .00005, .00003, | |
1665 | + .00002, .00005, .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 | + .06453, .01133, .00426, .00005, .00003, | |
1668 | + .00002, .00005, .00009, | |
1669 | + .05926, .01034, .00357, .00005, .00003, | |
1670 | + .00002, .00004, .00008, | |
1671 | + .05467, .00949, .00303, .00004, .00002, | |
1672 | + .00002, .00004, .00007, | |
1673 | + .05067, .00875, .00261, .00004, .00002, | |
1674 | + .00001, .00004, .00006, | |
1675 | + .04714, .00810, .00227, .00003, .00002, | |
1676 | + .00001, .00004, .00006, | |
1677 | + .04401, .00753, .00199, .00003, .00002, | |
1678 | + .00001, .00003, .00005, | |
1679 | + .04121, .00702, .00177, .00002, .00002, | |
1680 | + .00001, .00003, .00006 / | |
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 | + .03869, .00657, .00157, .00003, .00002, | |
1683 | + .00001, .00003, .00005, | |
1684 | + .03643, .00616, .00141, .00003, .00002, | |
1685 | + .00001, .00003, .00004, | |
1686 | + .03439, .00580, .00128, .00002, .00002, | |
1687 | + .00001, .00003, .00004, | |
1688 | + .03253, .00546, .00116, .00002, .00002, | |
1689 | + .00001, .00002, .00004, | |
1690 | + .03083, .00516, .00106, .00002, .00002, | |
1691 | + .00001, .00002, .00004 / | |
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 | + .09618, .01613, .01396, .00001, .00001, | |
1694 | + .00000, .00003, .00007, | |
1695 | + .08088, .01340, .00929, .00001, .00001, | |
1696 | + .00000, .00003, .00006, | |
1697 | + .06943, .01138, .00653, .00002, .00001, | |
1698 | + .00000, .00002, .00005, | |
1699 | + .06056, .00984, .00479, .00002, .00001, | |
1700 | + .00000, .00002, .00004, | |
1701 | + .05345, .00861, .00364, .00001, .00001, | |
1702 | + .00000, .00002, .00003, | |
1703 | + .04763, .00762, .00283, .00001, .00001, | |
1704 | + .00000, .00002, .00003, | |
1705 | + .04280, .00680, .00226, .00002, .00001, | |
1706 | + .00000, .00002, .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 | + .03873, .00612, .00185, .00002, .00001, | |
1709 | + .00000, .00001, .00002, | |
1710 | + .03526, .00554, .00153, .00001, .00001, | |
1711 | + .00001, .00001, .00002, | |
1712 | + .03227, .00504, .00129, .00002, .00001, | |
1713 | + .00000, .00001, .00002, | |
1714 | + .02970, .00462, .00110, .00001, .00001, | |
1715 | + .00000, .00001, .00002, | |
1716 | + .02743, .00424, .00095, .00000, .00001, | |
1717 | + .00000, .00001, .00002, | |
1718 | + .02543, .00392, .00082, .00001, .00001, | |
1719 | + .00000, .00001, .00002, | |
1720 | + .02367, .00363, .00073, .00001, .00001, | |
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 | + .02209, .00338, .00064, .00001, .00001, | |
1724 | + .00000, .00001, .00001, | |
1725 | + .02069, .00315, .00058, .00001, .00001, | |
1726 | + .00000, .00001, .00001, | |
1727 | + .01941, .00295, .00052, .00001, .00001, | |
1728 | + .00000, .00001, .00001, | |
1729 | + .01826, .00277, .00047, .00001, .00001, | |
1730 | + .00000, .00001, .00001, | |
1731 | + .01722, .00260, .00043, .00001, .00001, | |
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 | + .05747, .00859, .00626, .00001, .00000, | |
1735 | + .00000, .00000, .00001, | |
1736 | + .04747, .00701, .00402, .00001, .00000, | |
1737 | + .00000, .00000, .00001, | |
1738 | + .04012, .00586, .00274, .00001, .00000, | |
1739 | + .00000, .00001, .00001, | |
1740 | + .03451, .00500, .00196, .00000, .00000, | |
1741 | + .00000, .00000, .00001, | |
1742 | + .03008, .00432, .00146, .00000, .00000, | |
1743 | + .00000, .00000, .00001, | |
1744 | + .02650, .00378, .00112, .00001, .00000, | |
1745 | + .00000, .00001, .00000, | |
1746 | + .02356, .00334, .00088, .00000, .00000, | |
1747 | + .00000, .00000, .00000 / | |
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 | + .02111, .00298, .00071, .00000, .00000, | |
1750 | + .00000, .00000, .00001, | |
1751 | + .01905, .00267, .00058, .00000, .00000, | |
1752 | + .00000, .00000, .00000, | |
1753 | + .01729, .00241, .00048, .00000, .00000, | |
1754 | + .00000, .00000, .00000, | |
1755 | + .01577, .00219, .00041, .00000, .00000, | |
1756 | + .00000, .00000, .00000, | |
1757 | + .01446, .00200, .00035, .00000, .00000, | |
1758 | + .00000, .00000, .00000, | |
1759 | + .01331, .00183, .00030, .00000, .00000, | |
1760 | + .00000, .00000, .00000, | |
1761 | + .01230, .00169, .00027, .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 | + .01141, .00156, .00023, .00000, .00000, | |
1765 | + .00000, .00000, .00000, | |
1766 | + .01061, .00145, .00021, .00000, .00000, | |
1767 | + .00000, .00000, .00000, | |
1768 | + .00990, .00135, .00019, .00000, .00000, | |
1769 | + .00000, .00000, .00000, | |
1770 | + .00926, .00125, .00017, .00000, .00000, | |
1771 | + .00000, .00000, .00000, | |
1772 | + .00869, .00117, .00015, .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 | + .03053, .00401, .00239, .00001, .00000, | |
1776 | + .00000, .00000, .00000, | |
1777 | + .02471, .00321, .00148, .00000, .00000, | |
1778 | + .00000, .00000, .00000, | |
1779 | + .02052, .00264, .00098, .00000, .00000, | |
1780 | + .00000, .00000, .00000, | |
1781 | + .01737, .00222, .00068, .00000, .00000, | |
1782 | + .00000, .00000, .00000, | |
1783 | + .01494, .00189, .00050, .00000, .00000, | |
1784 | + .00000, .00000, .00000, | |
1785 | + .01299, .00164, .00037, .00000, .00000, | |
1786 | + .00000, .00000, .00000, | |
1787 | + .01141, .00143, .00029, .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 | + .01011, .00126, .00023, .00000, .00000, | |
1791 | + .00000, .00000, .00000, | |
1792 | + .00903, .00112, .00019, .00000, .00000, | |
1793 | + .00000, .00000, .00000, | |
1794 | + .00812, .00100, .00015, .00000, .00000, | |
1795 | + .00000, .00000, .00000, | |
1796 | + .00734, .00090, .00013, .00000, .00000, | |
1797 | + .00000, .00000, .00000, | |
1798 | + .00667, .00082, .00011, .00000, .00000, | |
1799 | + .00000, .00000, .00000, | |
1800 | + .00609, .00074, .00009, .00000, .00000, | |
1801 | + .00000, .00000, .00000, | |
1802 | + .00559, .00068, .00008, .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 | + .00514, .00062, .00007, .00000, .00000, | |
1806 | + .00000, .00000, .00000, | |
1807 | + .00475, .00057, .00006, .00000, .00000, | |
1808 | + .00000, .00000, .00000, | |
1809 | + .00440, .00053, .00006, .00000, .00000, | |
1810 | + .00000, .00000, .00000, | |
1811 | + .00409, .00049, .00005, .00000, .00000, | |
1812 | + .00000, .00000, .00000, | |
1813 | + .00382, .00046, .00005, .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 | + .01364, .00154, .00072, .00000, .00000, | |
1817 | + .00000, .00000, .00000, | |
1818 | + .01079, .00121, .00043, .00000, .00000, | |
1819 | + .00000, .00000, .00000, | |
1820 | + .00878, .00098, .00027, .00000, .00000, | |
1821 | + .00000, .00000, .00000, | |
1822 | + .00731, .00081, .00019, .00000, .00000, | |
1823 | + .00000, .00000, .00000, | |
1824 | + .00618, .00068, .00013, .00000, .00000, | |
1825 | + .00000, .00000, .00000, | |
1826 | + .00529, .00058, .00010, .00000, .00000, | |
1827 | + .00000, .00000, .00000, | |
1828 | + .00459, .00050, .00007, .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 | + .00401, .00043, .00006, .00000, .00000, | |
1832 | + .00000, .00000, .00000, | |
1833 | + .00354, .00038, .00005, .00000, .00000, | |
1834 | + .00000, .00000, .00000, | |
1835 | + .00315, .00034, .00004, .00000, .00000, | |
1836 | + .00000, .00000, .00000, | |
1837 | + .00282, .00030, .00003, .00000, .00000, | |
1838 | + .00000, .00000, .00000, | |
1839 | + .00254, .00027, .00003, .00000, .00000, | |
1840 | + .00000, .00000, .00000, | |
1841 | + .00229, .00024, .00002, .00000, .00000, | |
1842 | + .00000, .00000, .00000, | |
1843 | + .00209, .00022, .00002, .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 | + .00190, .00020, .00002, .00000, .00000, | |
1847 | + .00000, .00000, .00000, | |
1848 | + .00174, .00018, .00002, .00000, .00000, | |
1849 | + .00000, .00000, .00000, | |
1850 | + .00160, .00017, .00001, .00000, .00000, | |
1851 | + .00000, .00000, .00000, | |
1852 | + .00148, .00015, .00001, .00000, .00000, | |
1853 | + .00000, .00000, .00000, | |
1854 | + .00137, .00014, .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 | + .00101, .00008, .00002, .00000, .00000, | |
1858 | + .00000, .00000, .00000, | |
1859 | + .00075, .00006, .00001, .00000, .00000, | |
1860 | + .00000, .00000, .00000, | |
1861 | + .00057, .00004, .00001, .00000, .00000, | |
1862 | + .00000, .00000, .00000, | |
1863 | + .00045, .00003, .00000, .00000, .00000, | |
1864 | + .00000, .00000, .00000, | |
1865 | + .00037, .00003, .00000, .00000, .00000, | |
1866 | + .00000, .00000, .00000, | |
1867 | + .00030, .00002, .00000, .00000, .00000, | |
1868 | + .00000, .00000, .00000, | |
1869 | + .00025, .00002, .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 | + .00021, .00002, .00000, .00000, .00000, | |
1873 | + .00000, .00000, .00000, | |
1874 | + .00018, .00001, .00000, .00000, .00000, | |
1875 | + .00000, .00000, .00000, | |
1876 | + .00015, .00001, .00000, .00000, .00000, | |
1877 | + .00000, .00000, .00000, | |
1878 | + .00013, .00001, .00000, .00000, .00000, | |
1879 | + .00000, .00000, .00000, | |
1880 | + .00012, .00001, .00000, .00000, .00000, | |
1881 | + .00000, .00000, .00000, | |
1882 | + .00010, .00001, .00000, .00000, .00000, | |
1883 | + .00000, .00000, .00000, | |
1884 | + .00009, .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 | + .00008, .00001, .00000, .00000, .00000, | |
1888 | + .00000, .00000, .00000, | |
1889 | + .00007, .00001, .00000, .00000, .00000, | |
1890 | + .00000, .00000, .00000, | |
1891 | + .00006, .00001, .00000, .00000, .00000, | |
1892 | + .00000, .00000, .00000, | |
1893 | + .00006, .00001, .00000, .00000, .00000, | |
1894 | + .00000, .00000, .00000, | |
1895 | + .00005, .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(65,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 | ||
1967 | x=xsave | |
1968 | ||
1969 | RETURN | |
1970 | END |