]> git.uio.no Git - u/mrichter/AliRoot.git/blob - spdf/sfkbmr5.F
Update master to aliroot
[u/mrichter/AliRoot.git] / spdf / sfkbmr5.F
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.2  1996/10/30 08:29:56  cernlib
6 * Version 7.04
7 *
8 * Revision 1.1.1.1  1996/04/12 15:29:37  plothow
9 * Version 7.01
10 *
11 *
12 #include "pdf/pilot.h"
13 C-----------------------------------------------------------------------
14       SUBROUTINE SFKBMR5(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GL)
15
16 C :::::::::::: KMRS (B-5) sea=ubar=dbar=2sbar at Q0**2
17 C :::::::::::: WEAK (R=5 GEV^-1) SHADOWING
18 #include "pdf/impdp.inc"
19       PARAMETER(NX=47)
20       PARAMETER(NTENTH=21)
21       DIMENSION F(7,NX,19),G(7),XX(NX),N0(7)
22       DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),K=1,19)/
23      + 0.01543 ,0.00139 ,53.93732 ,0.63661 ,0.12466 ,0.00000 ,0.39043
24      +,0.01576 ,0.00155 ,63.10207 ,1.11724 ,0.61895 ,0.00000 ,0.87808
25      +,0.01606 ,0.00170 ,74.88754 ,1.62592 ,1.13950 ,0.00000 ,1.39283
26      +,0.01634 ,0.00185 ,88.49773 ,2.17548 ,1.69955 ,0.00000 ,1.94775
27      +,0.01661 ,0.00199,103.64189 ,2.74630 ,2.27974 ,0.03434 ,2.52332
28      +,0.01687 ,0.00213,119.96683 ,3.34482 ,2.88673 ,0.41047 ,3.12614
29      +,0.01712 ,0.00226,137.32428 ,3.96990 ,3.51955 ,1.12883 ,3.75513
30      +,0.01735 ,0.00238,155.57675 ,4.61957 ,4.17635 ,1.81277 ,4.40839
31      +,0.01758 ,0.00251,174.60330 ,5.29151 ,4.85488 ,2.52565 ,5.08363
32      +,0.01780 ,0.00263,194.22980 ,5.97685 ,5.54637 ,3.24753 ,5.77204
33      +,0.01802 ,0.00275,214.41457 ,6.68100 ,6.25624 ,3.98602 ,6.47905
34      +,0.01823 ,0.00286,235.11403 ,7.40355 ,6.98414 ,4.74082 ,7.20426
35      +,0.01843 ,0.00297,256.26099 ,8.14156 ,7.72719 ,5.50918 ,7.94477
36      +,0.01863 ,0.00308,277.64917 ,8.88635 ,8.47670 ,6.28268 ,8.69189
37      +,0.01882 ,0.00319,299.44775 ,9.64876 ,9.24358 ,7.07223 ,9.45650
38      +,0.01901 ,0.00330,321.44849,10.41849,10.01756 ,7.86776,10.22833
39      +,0.01920 ,0.00340,343.66235,11.19838,10.80146 ,8.67219,11.01019
40      +,0.01938 ,0.00350,366.11255,11.98933,11.59624 ,9.48654,11.80302
41      +,0.01956 ,0.00360,388.60059,12.78468,12.39522,10.30423,12.60014/
42       DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),K=1,19)/
43      + 0.01901 ,0.00212 ,40.82663 ,0.53503 ,0.10148 ,0.00000 ,0.32359
44      +,0.01947 ,0.00237 ,47.97343 ,0.90621 ,0.48300 ,0.00000 ,0.70005
45      +,0.01990 ,0.00259 ,56.87790 ,1.29361 ,0.87938 ,0.00000 ,1.09202
46      +,0.02030 ,0.00281 ,66.98347 ,1.70741 ,1.30109 ,0.00000 ,1.50984
47      +,0.02067 ,0.00301 ,78.05980 ,2.13325 ,1.73398 ,0.02554 ,1.93925
48      +,0.02103 ,0.00321 ,89.86069 ,2.57601 ,2.18313 ,0.30363 ,2.38524
49      +,0.02137 ,0.00339,102.27707 ,3.03490 ,2.64784 ,0.83251 ,2.84707
50      +,0.02169 ,0.00358,115.20901 ,3.50846 ,3.12677 ,1.33215 ,3.32333
51      +,0.02200 ,0.00376,128.56944 ,3.99505 ,3.61830 ,1.84965 ,3.81239
52      +,0.02231 ,0.00393,142.22670 ,4.48812 ,4.11599 ,2.37032 ,4.30778
53      +,0.02260 ,0.00410,156.16287 ,4.99174 ,4.62390 ,2.89984 ,4.81354
54      +,0.02288 ,0.00426,170.35071 ,5.50565 ,5.14184 ,3.43806 ,5.32945
55      +,0.02316 ,0.00442,184.74261 ,6.02779 ,5.66775 ,3.98306 ,5.85347
56      +,0.02343 ,0.00458,199.18904 ,6.55175 ,6.19528 ,4.52864 ,6.37920
57      +,0.02369 ,0.00473,213.82605 ,7.08566 ,6.73256 ,5.08297 ,6.91478
58      +,0.02394 ,0.00488,228.50055 ,7.62202 ,7.27210 ,5.63873 ,7.45272
59      +,0.02419 ,0.00503,243.22897 ,8.16297 ,7.81606 ,6.19812 ,7.99515
60      +,0.02443 ,0.00517,258.03198 ,8.70927 ,8.36522 ,6.76197 ,8.54285
61      +,0.02466 ,0.00531,272.77148 ,9.25607 ,8.91475 ,7.32555 ,9.09100/
62       DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),K=1,19)/
63      + 0.02333 ,0.00325 ,30.89745 ,0.44958 ,0.08262 ,0.00000 ,0.26823
64      +,0.02397 ,0.00361 ,36.46609 ,0.73538 ,0.37616 ,0.00000 ,0.55793
65      +,0.02456 ,0.00394 ,43.19214 ,1.02992 ,0.67739 ,0.00000 ,0.85584
66      +,0.02510 ,0.00425 ,50.69005 ,1.34103 ,0.99439 ,0.00000 ,1.16991
67      +,0.02562 ,0.00455 ,58.77997 ,1.65825 ,1.31685 ,0.01896 ,1.48976
68      +,0.02610 ,0.00483 ,67.29413 ,1.98530 ,1.64862 ,0.22426 ,1.81918
69      +,0.02656 ,0.00511 ,76.15483 ,2.32165 ,1.98928 ,0.61307 ,2.15768
70      +,0.02700 ,0.00537 ,85.29123 ,2.66627 ,2.33786 ,0.97749 ,2.50428
71      +,0.02743 ,0.00563 ,94.64334 ,3.01798 ,2.69324 ,1.35253 ,2.85782
72      +,0.02783 ,0.00587,104.11266 ,3.37205 ,3.05070 ,1.72740 ,3.21357
73      +,0.02823 ,0.00611,113.69696 ,3.73149 ,3.41331 ,2.10636 ,3.57458
74      +,0.02861 ,0.00635,123.38087 ,4.09622 ,3.78100 ,2.48940 ,3.94078
75      +,0.02898 ,0.00657,133.13214 ,4.46477 ,4.15233 ,2.87515 ,4.31071
76      +,0.02934 ,0.00680,142.84274 ,4.83248 ,4.52266 ,3.25910 ,4.67971
77      +,0.02968 ,0.00701,152.62146 ,5.20543 ,4.89807 ,3.64738 ,5.05388
78      +,0.03002 ,0.00722,162.35721 ,5.57817 ,5.27315 ,4.03467 ,5.42777
79      +,0.03035 ,0.00743,172.06805 ,5.95232 ,5.64952 ,4.42266 ,5.80301
80      +,0.03067 ,0.00763,181.77232 ,6.32851 ,6.02781 ,4.81201 ,6.18024
81      +,0.03099 ,0.00783,191.37398 ,6.70328 ,6.40459 ,5.19935 ,6.55599/
82       DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),K=1,19)/
83      + 0.02623 ,0.00417 ,26.24622 ,0.40609 ,0.07329 ,0.00000 ,0.24044
84      +,0.02700 ,0.00462 ,31.05679 ,0.65102 ,0.32471 ,0.00000 ,0.48861
85      +,0.02771 ,0.00503 ,36.76364 ,0.90172 ,0.58101 ,0.00000 ,0.74210
86      +,0.02836 ,0.00542 ,43.05748 ,1.16481 ,0.84903 ,0.00000 ,1.00765
87      +,0.02897 ,0.00579 ,49.78372 ,1.43164 ,1.12022 ,0.01592 ,1.27664
88      +,0.02955 ,0.00614 ,56.81024 ,1.70537 ,1.39788 ,0.18769 ,1.55232
89      +,0.03010 ,0.00648 ,64.07402 ,1.98559 ,1.68168 ,0.51221 ,1.83432
90      +,0.03063 ,0.00681 ,71.51833 ,2.27147 ,1.97085 ,0.81493 ,2.12183
91      +,0.03113 ,0.00712 ,79.09543 ,2.56209 ,2.26450 ,1.12531 ,2.41394
92      +,0.03162 ,0.00743 ,86.72331 ,2.85348 ,2.55871 ,1.43434 ,2.70673
93      +,0.03208 ,0.00772 ,94.40572 ,3.14824 ,2.85608 ,1.74562 ,3.00277
94      +,0.03253 ,0.00801,102.13243 ,3.44631 ,3.15661 ,2.05919 ,3.30206
95      +,0.03297 ,0.00829,109.87839 ,3.74654 ,3.45914 ,2.37397 ,3.60342
96      +,0.03340 ,0.00856,117.55438 ,4.04504 ,3.75979 ,2.68619 ,3.90298
97      +,0.03381 ,0.00883,125.25586 ,4.34695 ,4.06374 ,3.00107 ,4.20588
98      +,0.03421 ,0.00908,132.89099 ,4.64777 ,4.36649 ,3.31418 ,4.50765
99      +,0.03459 ,0.00934,140.47804 ,4.94886 ,4.66941 ,3.62696 ,4.80964
100      +,0.03497 ,0.00958,148.03319 ,5.25080 ,4.97308 ,3.94001 ,5.11242
101      +,0.03534 ,0.00982,155.47989 ,5.55075 ,5.27469 ,4.25057 ,5.41318/
102       DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),K=1,19)/
103      + 0.02848 ,0.00498 ,23.37486 ,0.37786 ,0.06736 ,0.00000 ,0.22257
104      +,0.02935 ,0.00550 ,27.71025 ,0.59724 ,0.29245 ,0.00000 ,0.44478
105      +,0.03015 ,0.00599 ,32.78838 ,0.82077 ,0.52090 ,0.00000 ,0.67074
106      +,0.03090 ,0.00644 ,38.34554 ,1.05428 ,0.75872 ,0.00000 ,0.90638
107      +,0.03159 ,0.00688 ,44.24344 ,1.29019 ,0.99846 ,0.01406 ,1.14418
108      +,0.03224 ,0.00729 ,50.37109 ,1.53135 ,1.24305 ,0.16535 ,1.38703
109      +,0.03286 ,0.00768 ,56.67496 ,1.77742 ,1.49224 ,0.45069 ,1.63464
110      +,0.03346 ,0.00806 ,63.10699 ,2.02769 ,1.74538 ,0.71597 ,1.88631
111      +,0.03402 ,0.00842 ,69.62662 ,2.28136 ,2.00170 ,0.98722 ,2.14129
112      +,0.03457 ,0.00878 ,76.16223 ,2.53501 ,2.25778 ,1.25653 ,2.39613
113      +,0.03510 ,0.00912 ,82.72104 ,2.79090 ,2.51596 ,1.52710 ,2.65313
114      +,0.03561 ,0.00945 ,89.29575 ,3.04905 ,2.77624 ,1.79901 ,2.91233
115      +,0.03610 ,0.00977 ,95.86514 ,3.30846 ,3.03764 ,2.07134 ,3.17271
116      +,0.03658 ,0.01008,102.35211 ,3.56572 ,3.29677 ,2.34078 ,3.43088
117      +,0.03704 ,0.01039,108.84338 ,3.82539 ,3.55821 ,2.61195 ,3.69141
118      +,0.03749 ,0.01069,115.25858 ,4.08355 ,3.81805 ,2.88102 ,3.95039
119      +,0.03793 ,0.01098,121.61571 ,4.34141 ,4.07750 ,3.14925 ,4.20903
120      +,0.03835 ,0.01126,127.93025 ,4.59953 ,4.33711 ,3.41722 ,4.46787
121      +,0.03877 ,0.01154,134.13638 ,4.85539 ,4.59441 ,3.68248 ,4.72443/
122       DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),K=1,19)/
123      + 0.03034 ,0.00571 ,21.36412 ,0.35737 ,0.06311 ,0.00000 ,0.20970
124      +,0.03130 ,0.00630 ,25.36305 ,0.55871 ,0.26962 ,0.00000 ,0.41358
125      +,0.03218 ,0.00685 ,30.00117 ,0.76316 ,0.47850 ,0.00000 ,0.62020
126      +,0.03300 ,0.00737 ,35.04601 ,0.97598 ,0.69521 ,0.00000 ,0.83493
127      +,0.03376 ,0.00785 ,40.37053 ,1.19036 ,0.91303 ,0.01276 ,1.05100
128      +,0.03448 ,0.00831 ,45.87875 ,1.40889 ,1.13464 ,0.14983 ,1.27103
129      +,0.03516 ,0.00876 ,51.52362 ,1.63130 ,1.35985 ,0.40800 ,1.49481
130      +,0.03581 ,0.00918 ,57.26280 ,1.85696 ,1.58808 ,0.64739 ,1.72172
131      +,0.03643 ,0.00959 ,63.06140 ,2.08517 ,1.81867 ,0.89164 ,1.95109
132      +,0.03703 ,0.00999 ,68.85457 ,2.31285 ,2.04853 ,1.13361 ,2.17983
133      +,0.03761 ,0.01037 ,74.65167 ,2.54207 ,2.27979 ,1.37622 ,2.41005
134      +,0.03817 ,0.01074 ,80.44727 ,2.77288 ,2.51250 ,1.61958 ,2.64178
135      +,0.03871 ,0.01110 ,86.22357 ,3.00438 ,2.74579 ,1.86286 ,2.87415
136      +,0.03923 ,0.01145 ,91.91116 ,3.23350 ,2.97658 ,2.10309 ,3.10408
137      +,0.03974 ,0.01179 ,97.59048 ,3.46442 ,3.20908 ,2.34449 ,3.33576
138      +,0.04023 ,0.01212,103.18921 ,3.69358 ,3.43973 ,2.58358 ,3.56564
139      +,0.04071 ,0.01244,108.72531 ,3.92211 ,3.66968 ,2.82155 ,3.79486
140      +,0.04117 ,0.01276,114.21329 ,4.15052 ,3.89943 ,3.05894 ,4.02392
141      +,0.04163 ,0.01307,119.59454 ,4.37657 ,4.12676 ,3.29355 ,4.25059/
142       DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),K=1,19)/
143      + 0.03681 ,0.00875 ,16.14552 ,0.30109 ,0.05178 ,0.00000 ,0.17481
144      +,0.03809 ,0.00961 ,19.25462 ,0.45499 ,0.20942 ,0.00000 ,0.33051
145      +,0.03927 ,0.01041 ,22.75180 ,0.60975 ,0.36735 ,0.00000 ,0.48678
146      +,0.04035 ,0.01116 ,26.48170 ,0.76906 ,0.52944 ,0.00000 ,0.64743
147      +,0.04137 ,0.01186 ,30.34851 ,0.92805 ,0.69087 ,0.00943 ,0.80758
148      +,0.04233 ,0.01252 ,34.29292 ,1.08868 ,0.85367 ,0.11013 ,0.96924
149      +,0.04324 ,0.01316 ,38.28462 ,1.25083 ,1.01779 ,0.29897 ,1.13233
150      +,0.04410 ,0.01376 ,42.29669 ,1.41408 ,1.18284 ,0.47263 ,1.29644
151      +,0.04493 ,0.01435 ,46.30734 ,1.57800 ,1.34842 ,0.64859 ,1.46114
152      +,0.04573 ,0.01491 ,50.27022 ,1.74036 ,1.51230 ,0.82170 ,1.62423
153      +,0.04650 ,0.01545 ,54.19905 ,1.90276 ,1.67611 ,0.99415 ,1.78729
154      +,0.04724 ,0.01597 ,58.09349 ,2.06528 ,1.83995 ,1.16609 ,1.95044
155      +,0.04795 ,0.01648 ,61.94232 ,2.22733 ,2.00323 ,1.33697 ,2.11307
156      +,0.04865 ,0.01697 ,65.69666 ,2.38670 ,2.16374 ,1.50466 ,2.27298
157      +,0.04931 ,0.01744 ,69.42009 ,2.54649 ,2.32462 ,1.67230 ,2.43329
158      +,0.04996 ,0.01791 ,73.06088 ,2.70419 ,2.48334 ,1.83743 ,2.59146
159      +,0.05060 ,0.01836 ,76.63516 ,2.86063 ,2.64075 ,2.00093 ,2.74836
160      +,0.05121 ,0.01879 ,80.15533 ,3.01623 ,2.79727 ,2.16325 ,2.90440
161      +,0.05181 ,0.01922 ,83.58142 ,3.16943 ,2.95133 ,2.32283 ,3.05800/
162       DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),K=1,19)/
163      + 0.04452 ,0.01340 ,12.18017 ,0.25526 ,0.04301 ,0.00000 ,0.14702
164      +,0.04622 ,0.01466 ,14.59403 ,0.37256 ,0.16293 ,0.00000 ,0.26555
165      +,0.04778 ,0.01582 ,17.22517 ,0.48942 ,0.28201 ,0.00000 ,0.38345
166      +,0.04922 ,0.01690 ,19.97301 ,0.60835 ,0.40286 ,0.00000 ,0.50327
167      +,0.05057 ,0.01790 ,22.76669 ,0.72587 ,0.52206 ,0.00695 ,0.62157
168      +,0.05184 ,0.01885 ,25.57291 ,0.84350 ,0.64118 ,0.08064 ,0.73990
169      +,0.05305 ,0.01975 ,28.37378 ,0.96122 ,0.76023 ,0.21823 ,0.85823
170      +,0.05420 ,0.02061 ,31.15359 ,1.07877 ,0.87901 ,0.34363 ,0.97635
171      +,0.05530 ,0.02143 ,33.90024 ,1.19590 ,0.99725 ,0.46979 ,1.09399
172      +,0.05636 ,0.02222 ,36.58125 ,1.31103 ,1.11340 ,0.59299 ,1.20960
173      +,0.05737 ,0.02298 ,39.21225 ,1.42539 ,1.22870 ,0.71488 ,1.32439
174      +,0.05835 ,0.02371 ,41.79572 ,1.53909 ,1.34327 ,0.83563 ,1.43849
175      +,0.05930 ,0.02442 ,44.32555 ,1.65174 ,1.45675 ,0.95490 ,1.55152
176      +,0.06021 ,0.02509 ,46.76761 ,1.76177 ,1.56753 ,1.07116 ,1.66190
177      +,0.06110 ,0.02575 ,49.17183 ,1.87151 ,1.67799 ,1.18677 ,1.77197
178      +,0.06195 ,0.02639 ,51.50127 ,1.97915 ,1.78629 ,1.29996 ,1.87992
179      +,0.06279 ,0.02701 ,53.77014 ,2.08534 ,1.89312 ,1.41143 ,1.98640
180      +,0.06360 ,0.02761 ,55.98872 ,2.19043 ,1.99880 ,1.52153 ,2.09176
181      +,0.06439 ,0.02820 ,58.12968 ,2.29330 ,2.10224 ,1.62918 ,2.19489/
182       DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),K=1,19)/
183      + 0.04979 ,0.01721 ,10.31383 ,0.23324 ,0.03900 ,0.00000 ,0.13388
184      +,0.05180 ,0.01877 ,12.39349 ,0.33317 ,0.14102 ,0.00000 ,0.23478
185      +,0.05364 ,0.02020 ,14.61718 ,0.43217 ,0.24177 ,0.00000 ,0.33459
186      +,0.05535 ,0.02153 ,16.90881 ,0.53220 ,0.34332 ,0.00000 ,0.43532
187      +,0.05694 ,0.02277 ,19.20958 ,0.63046 ,0.44289 ,0.00580 ,0.53419
188      +,0.05844 ,0.02393 ,21.49785 ,0.72823 ,0.54182 ,0.06702 ,0.63249
189      +,0.05987 ,0.02503 ,23.76151 ,0.82553 ,0.64016 ,0.18100 ,0.73027
190      +,0.06123 ,0.02607 ,25.98984 ,0.92220 ,0.73777 ,0.28431 ,0.82737
191      +,0.06253 ,0.02707 ,28.17500 ,1.01805 ,0.83449 ,0.38778 ,0.92362
192      +,0.06377 ,0.02803 ,30.29117 ,1.11182 ,0.92904 ,0.48834 ,1.01775
193      +,0.06497 ,0.02895 ,32.35403 ,1.20455 ,1.02249 ,0.58742 ,1.11080
194      +,0.06613 ,0.02983 ,34.36743 ,1.29636 ,1.11497 ,0.68518 ,1.20292
195      +,0.06724 ,0.03068 ,36.32730 ,1.38697 ,1.20621 ,0.78137 ,1.29382
196      +,0.06832 ,0.03150 ,38.20624 ,1.47509 ,1.29491 ,0.87474 ,1.38220
197      +,0.06936 ,0.03229 ,40.04732 ,1.56268 ,1.38303 ,0.96728 ,1.47004
198      +,0.07037 ,0.03305 ,41.82056 ,1.64826 ,1.46912 ,1.05754 ,1.55585
199      +,0.07135 ,0.03379 ,43.53870 ,1.73239 ,1.55373 ,1.14612 ,1.64020
200      +,0.07230 ,0.03451 ,45.21095 ,1.81539 ,1.63718 ,1.23334 ,1.72340
201      +,0.07322 ,0.03521 ,46.81567 ,1.89633 ,1.71855 ,1.31832 ,1.80454/
202       DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),K=1,19)/
203      + 0.05400 ,0.02055  ,9.15638 ,0.21988 ,0.03667 ,0.00000 ,0.12595
204      +,0.05627 ,0.02237 ,11.02626 ,0.30899 ,0.12752 ,0.00000 ,0.21587
205      +,0.05835 ,0.02403 ,12.99722 ,0.39691 ,0.21689 ,0.00000 ,0.30446
206      +,0.06028 ,0.02556 ,15.00798 ,0.48527 ,0.30650 ,0.00000 ,0.39340
207      +,0.06208 ,0.02699 ,17.00743 ,0.57167 ,0.39398 ,0.00509 ,0.48029
208      +,0.06377 ,0.02832 ,18.98090 ,0.65726 ,0.48052 ,0.05865 ,0.56632
209      +,0.06538 ,0.02958 ,20.91975 ,0.74208 ,0.56619 ,0.15817 ,0.65153
210      +,0.06691 ,0.03078 ,22.81633 ,0.82603 ,0.65091 ,0.24800 ,0.73583
211      +,0.06837 ,0.03193 ,24.66537 ,0.90896 ,0.73454 ,0.33767 ,0.81908
212      +,0.06978 ,0.03302 ,26.44504 ,0.98980 ,0.81601 ,0.42452 ,0.90021
213      +,0.07113 ,0.03406 ,28.17111 ,1.06947 ,0.89626 ,0.50980 ,0.98015
214      +,0.07243 ,0.03507 ,29.84787 ,1.14810 ,0.97544 ,0.59370 ,1.05903
215      +,0.07368 ,0.03603 ,31.47249 ,1.22548 ,1.05331 ,0.67601 ,1.13663
216      +,0.07489 ,0.03696 ,33.02176 ,1.30048 ,1.12878 ,0.75565 ,1.21185
217      +,0.07606 ,0.03786 ,34.53430 ,1.37484 ,1.20357 ,0.83439 ,1.28640
218      +,0.07719 ,0.03873 ,35.98442 ,1.44728 ,1.27641 ,0.91098 ,1.35903
219      +,0.07829 ,0.03956 ,37.38385 ,1.51831 ,1.34783 ,0.98594 ,1.43024
220      +,0.07936 ,0.04037 ,38.74081 ,1.58821 ,1.41808 ,1.05958 ,1.50030
221      +,0.08040 ,0.04116 ,40.03738 ,1.65620 ,1.48641 ,1.13114 ,1.56844/
222       DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),K=1,19)/
223      + 0.05783 ,0.02359  ,8.32439 ,0.21193 ,0.03531 ,0.00000 ,0.12103
224      +,0.06035 ,0.02563 ,10.04638 ,0.29332 ,0.11813 ,0.00000 ,0.20307
225      +,0.06266 ,0.02748 ,11.83913 ,0.37333 ,0.19933 ,0.00000 ,0.28362
226      +,0.06480 ,0.02919 ,13.65271 ,0.45338 ,0.28040 ,0.00000 ,0.36414
227      +,0.06679 ,0.03078 ,15.44065 ,0.53137 ,0.35927 ,0.00459 ,0.44252
228      +,0.06867 ,0.03226 ,17.19397 ,0.60835 ,0.43701 ,0.05271 ,0.51984
229      +,0.07045 ,0.03366 ,18.90512 ,0.68439 ,0.51373 ,0.14197 ,0.59619
230      +,0.07214 ,0.03498 ,20.57022 ,0.75937 ,0.58933 ,0.22226 ,0.67145
231      +,0.07376 ,0.03625 ,22.18562 ,0.83322 ,0.66373 ,0.30217 ,0.74555
232      +,0.07530 ,0.03745 ,23.73164 ,0.90500 ,0.73601 ,0.37936 ,0.81755
233      +,0.07679 ,0.03860 ,25.22469 ,0.97553 ,0.80700 ,0.45494 ,0.88829
234      +,0.07822 ,0.03970 ,26.66899 ,1.04495 ,0.87685 ,0.52910 ,0.95791
235      +,0.07960 ,0.04076 ,28.06227 ,1.11309 ,0.94540 ,0.60169 ,1.02623
236      +,0.08093 ,0.04178 ,29.38585 ,1.17895 ,1.01161 ,0.67172 ,1.09225
237      +,0.08222 ,0.04276 ,30.67355 ,1.24410 ,1.07711 ,0.74083 ,1.15756
238      +,0.08346 ,0.04371 ,31.90166 ,1.30745 ,1.14077 ,0.80791 ,1.22105
239      +,0.08467 ,0.04462 ,33.08351 ,1.36942 ,1.20304 ,0.87343 ,1.28316
240      +,0.08584 ,0.04551 ,34.22668 ,1.43027 ,1.26417 ,0.93765 ,1.34414
241      +,0.08698 ,0.04636 ,35.31464 ,1.48932 ,1.32347 ,0.99990 ,1.40330/
242       DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),K=1,19)/
243      + 0.07221 ,0.03622  ,6.20471 ,0.19265 ,0.03253 ,0.00000 ,0.10925
244      +,0.07572 ,0.03908  ,7.53009 ,0.25384 ,0.09429 ,0.00000 ,0.17068
245      +,0.07894 ,0.04166  ,8.85575 ,0.31332 ,0.15422 ,0.00000 ,0.23035
246      +,0.08190 ,0.04402 ,10.15744 ,0.37195 ,0.21322 ,0.00000 ,0.28913
247      +,0.08465 ,0.04619 ,11.40411 ,0.42836 ,0.26992 ,0.00330 ,0.34566
248      +,0.08722 ,0.04820 ,12.59865 ,0.48332 ,0.32514 ,0.03756 ,0.40073
249      +,0.08966 ,0.05009 ,13.74018 ,0.53696 ,0.37900 ,0.10071 ,0.45447
250      +,0.09197 ,0.05187 ,14.82975 ,0.58927 ,0.43149 ,0.15686 ,0.50686
251      +,0.09417 ,0.05356 ,15.86806 ,0.64023 ,0.48262 ,0.21220 ,0.55790
252      +,0.09627 ,0.05515 ,16.84302 ,0.68925 ,0.53178 ,0.26513 ,0.60698
253      +,0.09828 ,0.05666 ,17.76987 ,0.73695 ,0.57960 ,0.31649 ,0.65473
254      +,0.10020 ,0.05811 ,18.65359 ,0.78347 ,0.62623 ,0.36645 ,0.70130
255      +,0.10206 ,0.05950 ,19.49396 ,0.82873 ,0.67160 ,0.41494 ,0.74662
256      +,0.10384 ,0.06082 ,20.27901 ,0.87207 ,0.71502 ,0.46132 ,0.79000
257      +,0.10556 ,0.06209 ,21.03439 ,0.91462 ,0.75766 ,0.50675 ,0.83259
258      +,0.10722 ,0.06331 ,21.74411 ,0.95564 ,0.79875 ,0.55050 ,0.87366
259      +,0.10882 ,0.06448 ,22.41852 ,0.99547 ,0.83865 ,0.59292 ,0.91352
260      +,0.11037 ,0.06561 ,23.06354 ,1.03430 ,0.87754 ,0.63422 ,0.95239
261      +,0.11187 ,0.06670 ,23.66867 ,1.07168 ,0.91498 ,0.67395 ,0.98980/
262       DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),K=1,19)/
263      + 0.09312 ,0.05563  ,4.66224 ,0.18453 ,0.03280 ,0.00001 ,0.10409
264      +,0.09811 ,0.05951  ,5.66851 ,0.23030 ,0.07842 ,0.00001 ,0.14977
265      +,0.10262 ,0.06296  ,6.62779 ,0.27407 ,0.12197 ,0.00001 ,0.19344
266      +,0.10677 ,0.06609  ,7.53575 ,0.31640 ,0.16403 ,0.00001 ,0.23566
267      +,0.11057 ,0.06893  ,8.37418 ,0.35651 ,0.20386 ,0.00235 ,0.27566
268      +,0.11411 ,0.07155  ,9.15495 ,0.39497 ,0.24202 ,0.02625 ,0.31402
269      +,0.11744 ,0.07398  ,9.88215 ,0.43194 ,0.27870 ,0.06998 ,0.35089
270      +,0.12059 ,0.07625 ,10.55849 ,0.46749 ,0.31397 ,0.10832 ,0.38636
271      +,0.12358 ,0.07839 ,11.18888 ,0.50168 ,0.34789 ,0.14567 ,0.42047
272      +,0.12639 ,0.08040 ,11.76665 ,0.53415 ,0.38009 ,0.18098 ,0.45286
273      +,0.12907 ,0.08230 ,12.30516 ,0.56537 ,0.41107 ,0.21488 ,0.48401
274      +,0.13164 ,0.08409 ,12.80933 ,0.59547 ,0.44094 ,0.24750 ,0.51405
275      +,0.13411 ,0.08580 ,13.28011 ,0.62443 ,0.46968 ,0.27884 ,0.54295
276      +,0.13645 ,0.08742 ,13.70901 ,0.65186 ,0.49690 ,0.30853 ,0.57033
277      +,0.13871 ,0.08897 ,14.11578 ,0.67853 ,0.52339 ,0.33735 ,0.59696
278      +,0.14087 ,0.09044 ,14.49054 ,0.70397 ,0.54865 ,0.36483 ,0.62237
279      +,0.14296 ,0.09185 ,14.84033 ,0.72844 ,0.57296 ,0.39126 ,0.64681
280      +,0.14497 ,0.09321 ,15.16953 ,0.75211 ,0.59648 ,0.41679 ,0.67045
281      +,0.14690 ,0.09451 ,15.47151 ,0.77468 ,0.61891 ,0.44114 ,0.69300/
282       DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),K=1,19)/
283      + 0.11004 ,0.07143  ,3.98202 ,0.18435 ,0.03454 ,0.00000 ,0.10387
284      +,0.11615 ,0.07595  ,4.82406 ,0.22279 ,0.07197 ,0.00001 ,0.14195
285      +,0.12164 ,0.07994  ,5.60145 ,0.25911 ,0.10725 ,0.00001 ,0.17790
286      +,0.12666 ,0.08352  ,6.31919 ,0.29375 ,0.14090 ,0.00002 ,0.21222
287      +,0.13123 ,0.08676  ,6.96638 ,0.32620 ,0.17243 ,0.00191 ,0.24437
288      +,0.13548 ,0.08971  ,7.55670 ,0.35696 ,0.20235 ,0.02104 ,0.27487
289      +,0.13944 ,0.09244  ,8.09600 ,0.38622 ,0.23082 ,0.05585 ,0.30389
290      +,0.14315 ,0.09499  ,8.59029 ,0.41407 ,0.25797 ,0.08606 ,0.33154
291      +,0.14667 ,0.09736  ,9.04313 ,0.44058 ,0.28385 ,0.11524 ,0.35788
292      +,0.14997 ,0.09958  ,9.44929 ,0.46554 ,0.30825 ,0.14265 ,0.38269
293      +,0.15311 ,0.10165  ,9.82335 ,0.48932 ,0.33152 ,0.16876 ,0.40634
294      +,0.15611 ,0.10361 ,10.16862 ,0.51208 ,0.35382 ,0.19371 ,0.42899
295      +,0.15898 ,0.10546 ,10.48552 ,0.53382 ,0.37516 ,0.21755 ,0.45065
296      +,0.16168 ,0.10721 ,10.76995 ,0.55423 ,0.39521 ,0.23995 ,0.47098
297      +,0.16427 ,0.10889 ,11.03682 ,0.57394 ,0.41460 ,0.26156 ,0.49064
298      +,0.16674 ,0.11047 ,11.27858 ,0.59261 ,0.43297 ,0.28204 ,0.50925
299      +,0.16912 ,0.11198 ,11.50030 ,0.61043 ,0.45055 ,0.30162 ,0.52705
300      +,0.17141 ,0.11342 ,11.70569 ,0.62756 ,0.46747 ,0.32044 ,0.54417
301      +,0.17361 ,0.11478 ,11.89111 ,0.64379 ,0.48350 ,0.33829 ,0.56038/
302       DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),K=1,19)/
303      + 0.12517 ,0.08518  ,3.58700 ,0.18589 ,0.03826 ,0.00000 ,0.10522
304      +,0.13220 ,0.09014  ,4.31517 ,0.22035 ,0.06844 ,0.00001 ,0.13830
305      +,0.13847 ,0.09449  ,4.97278 ,0.25234 ,0.09716 ,0.00001 ,0.16925
306      +,0.14418 ,0.09837  ,5.56900 ,0.28237 ,0.12461 ,0.00002 ,0.19850
307      +,0.14935 ,0.10184  ,6.09696 ,0.31014 ,0.15037 ,0.00163 ,0.22567
308      +,0.15413 ,0.10500  ,6.57108 ,0.33616 ,0.17477 ,0.01784 ,0.25123
309      +,0.15857 ,0.10790  ,6.99776 ,0.36066 ,0.19793 ,0.04720 ,0.27536
310      +,0.16272 ,0.11059  ,7.38339 ,0.38376 ,0.21994 ,0.07250 ,0.29818
311      +,0.16663 ,0.11308  ,7.73195 ,0.40555 ,0.24084 ,0.09677 ,0.31976
312      +,0.17028 ,0.11540  ,8.03964 ,0.42590 ,0.26049 ,0.11944 ,0.33996
313      +,0.17375 ,0.11756  ,8.31943 ,0.44515 ,0.27915 ,0.14090 ,0.35909
314      +,0.17704 ,0.11959  ,8.57450 ,0.46343 ,0.29695 ,0.16131 ,0.37730
315      +,0.18019 ,0.12150  ,8.80560 ,0.48078 ,0.31392 ,0.18070 ,0.39461
316      +,0.18313 ,0.12330  ,9.00943 ,0.49694 ,0.32981 ,0.19882 ,0.41077
317      +,0.18595 ,0.12501  ,9.19873 ,0.51247 ,0.34510 ,0.21623 ,0.42630
318      +,0.18864 ,0.12663  ,9.36740 ,0.52708 ,0.35952 ,0.23264 ,0.44093
319      +,0.19122 ,0.12816  ,9.51984 ,0.54094 ,0.37327 ,0.24826 ,0.45484
320      +,0.19369 ,0.12961  ,9.65919 ,0.55419 ,0.38646 ,0.26321 ,0.46816
321      +,0.19605 ,0.13099  ,9.78253 ,0.56667 ,0.39890 ,0.27732 ,0.48070/
322       DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),K=1,19)/
323      + 0.13915 ,0.09753  ,3.30557 ,0.19566 ,0.02282 ,0.00001 ,0.10599
324      +,0.14693 ,0.10279  ,3.95197 ,0.22563 ,0.05093 ,0.00001 ,0.13546
325      +,0.15386 ,0.10738  ,4.52497 ,0.25328 ,0.07734 ,0.00003 ,0.16284
326      +,0.16012 ,0.11144  ,5.03676 ,0.27906 ,0.10228 ,0.00003 ,0.18847
327      +,0.16579 ,0.11505  ,5.48213 ,0.30276 ,0.12545 ,0.00144 ,0.21211
328      +,0.17098 ,0.11833  ,5.87767 ,0.32483 ,0.14720 ,0.01561 ,0.23421
329      +,0.17579 ,0.12132  ,6.22917 ,0.34549 ,0.16770 ,0.04122 ,0.25494
330      +,0.18028 ,0.12407  ,6.54153 ,0.36485 ,0.18702 ,0.06314 ,0.27441
331      +,0.18449 ,0.12663  ,6.82112 ,0.38303 ,0.20527 ,0.08408 ,0.29274
332      +,0.18842 ,0.12896  ,7.06442 ,0.39990 ,0.22228 ,0.10350 ,0.30978
333      +,0.19212 ,0.13115  ,7.28276 ,0.41576 ,0.23835 ,0.12181 ,0.32583
334      +,0.19561 ,0.13321  ,7.47966 ,0.43076 ,0.25359 ,0.13915 ,0.34103
335      +,0.19892 ,0.13514  ,7.65621 ,0.44491 ,0.26803 ,0.15554 ,0.35540
336      +,0.20207 ,0.13692  ,7.80800 ,0.45802 ,0.28147 ,0.17079 ,0.36874
337      +,0.20507 ,0.13862  ,7.94756 ,0.47056 ,0.29435 ,0.18538 ,0.38151
338      +,0.20790 ,0.14022  ,8.07020 ,0.48229 ,0.30645 ,0.19909 ,0.39348
339      +,0.21060 ,0.14173  ,8.17916 ,0.49338 ,0.31793 ,0.21209 ,0.40481
340      +,0.21319 ,0.14317  ,8.27721 ,0.50395 ,0.32889 ,0.22449 ,0.41562
341      +,0.21566 ,0.14452  ,8.36267 ,0.51382 ,0.33917 ,0.23613 ,0.42573/
342       DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),K=1,19)/
343      + 0.19991 ,0.14688  ,2.56857 ,0.20356 ,0.00711 ,0.00001 ,0.10533
344      +,0.21019 ,0.15254  ,2.99495 ,0.22228 ,0.02802 ,0.00001 ,0.12516
345      +,0.21910 ,0.15734  ,3.34596 ,0.23905 ,0.04686 ,0.00001 ,0.14297
346      +,0.22699 ,0.16149  ,3.63998 ,0.25422 ,0.06402 ,0.00003 ,0.15913
347      +,0.23400 ,0.16506  ,3.87944 ,0.26775 ,0.07943 ,0.00093 ,0.17362
348      +,0.24029 ,0.16823  ,4.07874 ,0.28001 ,0.09347 ,0.00993 ,0.18676
349      +,0.24606 ,0.17103  ,4.24636 ,0.29117 ,0.10634 ,0.02601 ,0.19879
350      +,0.25132 ,0.17358  ,4.38604 ,0.30135 ,0.11816 ,0.03945 ,0.20978
351      +,0.25620 ,0.17587  ,4.50338 ,0.31067 ,0.12907 ,0.05204 ,0.21990
352      +,0.26066 ,0.17794  ,4.59779 ,0.31908 ,0.13902 ,0.06354 ,0.22908
353      +,0.26482 ,0.17982  ,4.67682 ,0.32680 ,0.14823 ,0.07418 ,0.23756
354      +,0.26871 ,0.18153  ,4.74333 ,0.33392 ,0.15679 ,0.08407 ,0.24540
355      +,0.27237 ,0.18310  ,4.79852 ,0.34047 ,0.16472 ,0.09327 ,0.25262
356      +,0.27573 ,0.18453  ,4.83939 ,0.34638 ,0.17196 ,0.10168 ,0.25920
357      +,0.27891 ,0.18586  ,4.87400 ,0.35192 ,0.17879 ,0.10962 ,0.26539
358      +,0.28189 ,0.18707  ,4.89970 ,0.35696 ,0.18508 ,0.11698 ,0.27106
359      +,0.28469 ,0.18819  ,4.91915 ,0.36160 ,0.19095 ,0.12385 ,0.27631
360      +,0.28733 ,0.18924  ,4.93388 ,0.36593 ,0.19645 ,0.13030 ,0.28122
361      +,0.28983 ,0.19020  ,4.94179 ,0.36985 ,0.20152 ,0.13628 ,0.28572/
362       DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),K=1,19)/
363      + 0.29948 ,0.21337  ,2.04845 ,0.19404 ,0.00483 ,-0.00010 ,0.09937
364      +,0.31092 ,0.21753  ,2.27595 ,0.20328 ,0.01874 ,-0.00012 ,0.11097
365      +,0.32048 ,0.22075  ,2.44221 ,0.21105 ,0.03070 ,-0.00010 ,0.12084
366      +,0.32863 ,0.22337  ,2.56593 ,0.21765 ,0.04111 ,-0.00010 ,0.12936
367      +,0.33561 ,0.22543  ,2.65341 ,0.22316 ,0.05012 ,0.00044 ,0.13659
368      +,0.34167 ,0.22710  ,2.71640 ,0.22783 ,0.05802 ,0.00569 ,0.14289
369      +,0.34701 ,0.22845  ,2.76002 ,0.23182 ,0.06504 ,0.01492 ,0.14841
370      +,0.35181 ,0.22956  ,2.78894 ,0.23518 ,0.07128 ,0.02236 ,0.15319
371      +,0.35602 ,0.23048  ,2.80658 ,0.23809 ,0.07685 ,0.02920 ,0.15744
372      +,0.35979 ,0.23116  ,2.81290 ,0.24050 ,0.08180 ,0.03529 ,0.16111
373      +,0.36315 ,0.23172  ,2.81250 ,0.24252 ,0.08622 ,0.04077 ,0.16433
374      +,0.36619 ,0.23218  ,2.80692 ,0.24424 ,0.09022 ,0.04577 ,0.16720
375      +,0.36895 ,0.23254  ,2.79675 ,0.24571 ,0.09386 ,0.05033 ,0.16976
376      +,0.37142 ,0.23274  ,2.78153 ,0.24682 ,0.09705 ,0.05439 ,0.17191
377      +,0.37369 ,0.23289  ,2.76475 ,0.24779 ,0.09998 ,0.05813 ,0.17386
378      +,0.37572 ,0.23297  ,2.74485 ,0.24855 ,0.10259 ,0.06150 ,0.17554
379      +,0.37757 ,0.23298  ,2.72337 ,0.24913 ,0.10497 ,0.06461 ,0.17702
380      +,0.37928 ,0.23295  ,2.70103 ,0.24957 ,0.10716 ,0.06750 ,0.17833
381      +,0.38080 ,0.23286  ,2.67672 ,0.24984 ,0.10911 ,0.07011 ,0.17945/
382       DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),K=1,19)/
383      + 0.38126 ,0.25604  ,1.79396 ,0.17629 ,0.00380 ,-0.00001 ,0.09005
384      +,0.39110 ,0.25769  ,1.91498 ,0.18055 ,0.01416 ,-0.00002 ,0.09736
385      +,0.39904 ,0.25855  ,1.98993 ,0.18373 ,0.02282 ,0.00000 ,0.10325
386      +,0.40550 ,0.25893  ,2.03529 ,0.18613 ,0.03005 ,-0.00004 ,0.10812
387      +,0.41073 ,0.25893  ,2.05700 ,0.18784 ,0.03618 ,0.00034 ,0.11200
388      +,0.41500 ,0.25874  ,2.06374 ,0.18907 ,0.04137 ,0.00391 ,0.11523
389      +,0.41863 ,0.25826  ,2.05972 ,0.18987 ,0.04590 ,0.01016 ,0.11791
390      +,0.42159 ,0.25773  ,2.04798 ,0.19034 ,0.04981 ,0.01510 ,0.12009
391      +,0.42417 ,0.25700  ,2.03085 ,0.19056 ,0.05319 ,0.01947 ,0.12189
392      +,0.42618 ,0.25624  ,2.00807 ,0.19047 ,0.05609 ,0.02333 ,0.12331
393      +,0.42791 ,0.25534  ,1.98283 ,0.19024 ,0.05866 ,0.02674 ,0.12447
394      +,0.42935 ,0.25442  ,1.95617 ,0.18988 ,0.06093 ,0.02979 ,0.12542
395      +,0.43046 ,0.25351  ,1.92842 ,0.18940 ,0.06290 ,0.03252 ,0.12619
396      +,0.43137 ,0.25247  ,1.89878 ,0.18878 ,0.06462 ,0.03494 ,0.12673
397      +,0.43215 ,0.25143  ,1.86957 ,0.18813 ,0.06617 ,0.03715 ,0.12716
398      +,0.43271 ,0.25035  ,1.83978 ,0.18737 ,0.06749 ,0.03909 ,0.12744
399      +,0.43311 ,0.24929  ,1.81008 ,0.18653 ,0.06865 ,0.04083 ,0.12761
400      +,0.43340 ,0.24824  ,1.78084 ,0.18564 ,0.06968 ,0.04240 ,0.12770
401      +,0.43355 ,0.24714  ,1.75159 ,0.18471 ,0.07058 ,0.04382 ,0.12769/
402       DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),K=1,19)/
403      + 0.44870 ,0.28373  ,1.61128 ,0.15564 ,0.00303 ,0.00010 ,0.07935
404      +,0.45580 ,0.28235  ,1.66371 ,0.15679 ,0.01117 ,0.00005 ,0.08403
405      +,0.46076 ,0.28076  ,1.68337 ,0.15732 ,0.01772 ,0.00007 ,0.08757
406      +,0.46441 ,0.27894  ,1.68385 ,0.15740 ,0.02310 ,0.00010 ,0.09029
407      +,0.46708 ,0.27688  ,1.67003 ,0.15701 ,0.02751 ,0.00037 ,0.09232
408      +,0.46889 ,0.27477  ,1.64818 ,0.15643 ,0.03110 ,0.00293 ,0.09382
409      +,0.47013 ,0.27260  ,1.62095 ,0.15561 ,0.03417 ,0.00742 ,0.09496
410      +,0.47092 ,0.27042  ,1.59028 ,0.15461 ,0.03683 ,0.01091 ,0.09576
411      +,0.47132 ,0.26823  ,1.55792 ,0.15353 ,0.03906 ,0.01391 ,0.09634
412      +,0.47123 ,0.26605  ,1.52371 ,0.15234 ,0.04089 ,0.01653 ,0.09665
413      +,0.47092 ,0.26389  ,1.48946 ,0.15108 ,0.04247 ,0.01885 ,0.09681
414      +,0.47042 ,0.26178  ,1.45568 ,0.14979 ,0.04383 ,0.02090 ,0.09685
415      +,0.46972 ,0.25973  ,1.42249 ,0.14849 ,0.04500 ,0.02270 ,0.09680
416      +,0.46888 ,0.25763  ,1.38923 ,0.14711 ,0.04598 ,0.02424 ,0.09659
417      +,0.46797 ,0.25560  ,1.35737 ,0.14576 ,0.04683 ,0.02561 ,0.09633
418      +,0.46689 ,0.25358  ,1.32614 ,0.14439 ,0.04751 ,0.02680 ,0.09601
419      +,0.46572 ,0.25162  ,1.29596 ,0.14303 ,0.04810 ,0.02787 ,0.09562
420      +,0.46450 ,0.24972  ,1.26696 ,0.14168 ,0.04862 ,0.02882 ,0.09520
421      +,0.46318 ,0.24784  ,1.23864 ,0.14032 ,0.04905 ,0.02965 ,0.09472/
422       DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),K=1,19)/
423      + 0.50376 ,0.30039  ,1.45795 ,0.13461 ,0.00250 ,0.00007 ,0.06855
424      +,0.50691 ,0.29630  ,1.46342 ,0.13392 ,0.00896 ,0.00004 ,0.07149
425      +,0.50837 ,0.29228  ,1.44746 ,0.13289 ,0.01403 ,0.00007 ,0.07347
426      +,0.50881 ,0.28830  ,1.42062 ,0.13164 ,0.01807 ,0.00010 ,0.07489
427      +,0.50845 ,0.28434  ,1.38623 ,0.13012 ,0.02137 ,0.00026 ,0.07578
428      +,0.50743 ,0.28059  ,1.34861 ,0.12857 ,0.02399 ,0.00224 ,0.07628
429      +,0.50600 ,0.27694  ,1.30958 ,0.12693 ,0.02617 ,0.00553 ,0.07656
430      +,0.50427 ,0.27337  ,1.27032 ,0.12526 ,0.02794 ,0.00801 ,0.07660
431      +,0.50246 ,0.26983  ,1.23161 ,0.12357 ,0.02939 ,0.01029 ,0.07650
432      +,0.50014 ,0.26653  ,1.19322 ,0.12188 ,0.03060 ,0.01213 ,0.07625
433      +,0.49778 ,0.26327  ,1.15625 ,0.12018 ,0.03162 ,0.01369 ,0.07592
434      +,0.49537 ,0.26012  ,1.12090 ,0.11851 ,0.03249 ,0.01507 ,0.07552
435      +,0.49290 ,0.25712  ,1.08707 ,0.11685 ,0.03322 ,0.01631 ,0.07505
436      +,0.49026 ,0.25415  ,1.05432 ,0.11523 ,0.03375 ,0.01733 ,0.07452
437      +,0.48765 ,0.25132  ,1.02342 ,0.11366 ,0.03421 ,0.01824 ,0.07398
438      +,0.48498 ,0.24860  ,0.99371 ,0.11208 ,0.03460 ,0.01905 ,0.07339
439      +,0.48235 ,0.24590  ,0.96543 ,0.11057 ,0.03489 ,0.01973 ,0.07277
440      +,0.47976 ,0.24326  ,0.93859 ,0.10911 ,0.03512 ,0.02032 ,0.07215
441      +,0.47706 ,0.24076  ,0.91286 ,0.10765 ,0.03529 ,0.02083 ,0.07150/
442       DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),K=1,19)/
443      + 0.55658 ,0.30965  ,1.28851 ,0.10984 ,0.00195 ,0.00011 ,0.05591
444      +,0.55439 ,0.30227  ,1.25479 ,0.10791 ,0.00690 ,0.00007 ,0.05748
445      +,0.55088 ,0.29557  ,1.21109 ,0.10589 ,0.01068 ,0.00011 ,0.05833
446      +,0.54699 ,0.28926  ,1.16434 ,0.10379 ,0.01362 ,0.00007 ,0.05878
447      +,0.54263 ,0.28332  ,1.11618 ,0.10171 ,0.01590 ,0.00029 ,0.05886
448      +,0.53803 ,0.27776  ,1.06920 ,0.09963 ,0.01769 ,0.00164 ,0.05871
449      +,0.53327 ,0.27255  ,1.02396 ,0.09758 ,0.01917 ,0.00394 ,0.05841
450      +,0.52853 ,0.26749  ,0.98095 ,0.09562 ,0.02030 ,0.00576 ,0.05803
451      +,0.52369 ,0.26282  ,0.94027 ,0.09369 ,0.02126 ,0.00727 ,0.05755
452      +,0.51887 ,0.25827  ,0.90156 ,0.09181 ,0.02198 ,0.00849 ,0.05695
453      +,0.51404 ,0.25397  ,0.86528 ,0.09000 ,0.02253 ,0.00955 ,0.05634
454      +,0.50931 ,0.24988  ,0.83139 ,0.08825 ,0.02300 ,0.01047 ,0.05571
455      +,0.50471 ,0.24594  ,0.79967 ,0.08655 ,0.02342 ,0.01125 ,0.05506
456      +,0.50009 ,0.24218  ,0.76968 ,0.08491 ,0.02367 ,0.01187 ,0.05435
457      +,0.49560 ,0.23861  ,0.74175 ,0.08336 ,0.02387 ,0.01242 ,0.05366
458      +,0.49111 ,0.23518  ,0.71535 ,0.08185 ,0.02401 ,0.01292 ,0.05298
459      +,0.48677 ,0.23185  ,0.69060 ,0.08038 ,0.02411 ,0.01332 ,0.05232
460      +,0.48259 ,0.22862  ,0.66742 ,0.07896 ,0.02418 ,0.01366 ,0.05168
461      +,0.47838 ,0.22555  ,0.64549 ,0.07759 ,0.02421 ,0.01395 ,0.05104/
462       DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),K=1,19)/
463      + 0.59361 ,0.30895  ,1.13516 ,0.08787 ,0.00156 ,0.00014 ,0.04480
464      +,0.58554 ,0.29901  ,1.07703 ,0.08545 ,0.00537 ,0.00016 ,0.04552
465      +,0.57720 ,0.29004  ,1.01756 ,0.08306 ,0.00823 ,0.00011 ,0.04570
466      +,0.56892 ,0.28188  ,0.96068 ,0.08073 ,0.01039 ,0.00013 ,0.04562
467      +,0.56062 ,0.27441  ,0.90671 ,0.07853 ,0.01197 ,0.00025 ,0.04530
468      +,0.55254 ,0.26754  ,0.85669 ,0.07639 ,0.01321 ,0.00128 ,0.04487
469      +,0.54467 ,0.26109  ,0.81042 ,0.07431 ,0.01423 ,0.00294 ,0.04435
470      +,0.53711 ,0.25501  ,0.76781 ,0.07235 ,0.01497 ,0.00423 ,0.04371
471      +,0.52969 ,0.24940  ,0.72861 ,0.07051 ,0.01552 ,0.00526 ,0.04307
472      +,0.52254 ,0.24397  ,0.69222 ,0.06871 ,0.01599 ,0.00605 ,0.04238
473      +,0.51552 ,0.23893  ,0.65872 ,0.06702 ,0.01631 ,0.00676 ,0.04168
474      +,0.50873 ,0.23419  ,0.62794 ,0.06541 ,0.01656 ,0.00739 ,0.04099
475      +,0.50218 ,0.22970  ,0.59959 ,0.06388 ,0.01675 ,0.00795 ,0.04032
476      +,0.49581 ,0.22538  ,0.57319 ,0.06238 ,0.01685 ,0.00834 ,0.03969
477      +,0.48971 ,0.22129  ,0.54889 ,0.06096 ,0.01694 ,0.00868 ,0.03907
478      +,0.48378 ,0.21739  ,0.52625 ,0.05959 ,0.01700 ,0.00901 ,0.03845
479      +,0.47803 ,0.21366  ,0.50520 ,0.05831 ,0.01700 ,0.00927 ,0.03781
480      +,0.47247 ,0.21010  ,0.48562 ,0.05711 ,0.01696 ,0.00949 ,0.03717
481      +,0.46695 ,0.20673  ,0.46733 ,0.05595 ,0.01692 ,0.00967 ,0.03655/
482       DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),K=1,19)/
483      + 0.61603 ,0.30141  ,0.99469 ,0.06915 ,0.00119 ,0.00003 ,0.03516
484      +,0.60244 ,0.28929  ,0.92223 ,0.06666 ,0.00416 ,0.00005 ,0.03545
485      +,0.58935 ,0.27863  ,0.85485 ,0.06424 ,0.00634 ,0.00007 ,0.03535
486      +,0.57704 ,0.26901  ,0.79400 ,0.06198 ,0.00794 ,0.00007 ,0.03507
487      +,0.56529 ,0.26026  ,0.73894 ,0.05989 ,0.00906 ,0.00011 ,0.03456
488      +,0.55423 ,0.25225  ,0.68958 ,0.05787 ,0.00994 ,0.00089 ,0.03399
489      +,0.54359 ,0.24493  ,0.64508 ,0.05600 ,0.01063 ,0.00219 ,0.03338
490      +,0.53344 ,0.23817  ,0.60497 ,0.05420 ,0.01112 ,0.00303 ,0.03282
491      +,0.52377 ,0.23196  ,0.56882 ,0.05253 ,0.01153 ,0.00373 ,0.03215
492      +,0.51454 ,0.22602  ,0.53586 ,0.05097 ,0.01175 ,0.00446 ,0.03148
493      +,0.50564 ,0.22053  ,0.50608 ,0.04949 ,0.01194 ,0.00498 ,0.03083
494      +,0.49718 ,0.21538  ,0.47905 ,0.04808 ,0.01209 ,0.00536 ,0.03020
495      +,0.48916 ,0.21049  ,0.45439 ,0.04675 ,0.01218 ,0.00564 ,0.02960
496      +,0.48137 ,0.20580  ,0.43172 ,0.04549 ,0.01223 ,0.00594 ,0.02899
497      +,0.47396 ,0.20141  ,0.41102 ,0.04431 ,0.01225 ,0.00620 ,0.02842
498      +,0.46684 ,0.19727  ,0.39191 ,0.04317 ,0.01223 ,0.00640 ,0.02786
499      +,0.45997 ,0.19333  ,0.37429 ,0.04210 ,0.01220 ,0.00655 ,0.02730
500      +,0.45336 ,0.18958  ,0.35803 ,0.04109 ,0.01214 ,0.00668 ,0.02675
501      +,0.44697 ,0.18603  ,0.34292 ,0.04013 ,0.01206 ,0.00680 ,0.02622/
502       DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),K=1,19)/
503      + 0.62597 ,0.28845  ,0.86626 ,0.05356 ,0.00094 ,0.00001 ,0.02728
504      +,0.60716 ,0.27483  ,0.78661 ,0.05122 ,0.00324 ,0.00000 ,0.02725
505      +,0.58995 ,0.26272  ,0.71662 ,0.04907 ,0.00482 ,0.00002 ,0.02697
506      +,0.57392 ,0.25223  ,0.65589 ,0.04705 ,0.00597 ,0.00001 ,0.02657
507      +,0.55910 ,0.24275  ,0.60254 ,0.04515 ,0.00680 ,0.00017 ,0.02608
508      +,0.54518 ,0.23422  ,0.55593 ,0.04343 ,0.00740 ,0.00075 ,0.02550
509      +,0.53225 ,0.22641  ,0.51483 ,0.04177 ,0.00787 ,0.00159 ,0.02495
510      +,0.51998 ,0.21929  ,0.47842 ,0.04025 ,0.00820 ,0.00218 ,0.02436
511      +,0.50857 ,0.21256  ,0.44613 ,0.03882 ,0.00851 ,0.00277 ,0.02376
512      +,0.49765 ,0.20632  ,0.41715 ,0.03753 ,0.00863 ,0.00318 ,0.02313
513      +,0.48741 ,0.20050  ,0.39111 ,0.03630 ,0.00871 ,0.00355 ,0.02255
514      +,0.47765 ,0.19512  ,0.36774 ,0.03513 ,0.00878 ,0.00384 ,0.02201
515      +,0.46823 ,0.19018  ,0.34671 ,0.03401 ,0.00886 ,0.00403 ,0.02150
516      +,0.45927 ,0.18551  ,0.32746 ,0.03300 ,0.00885 ,0.00419 ,0.02096
517      +,0.45080 ,0.18112  ,0.31006 ,0.03206 ,0.00882 ,0.00434 ,0.02044
518      +,0.44268 ,0.17694  ,0.29425 ,0.03117 ,0.00877 ,0.00447 ,0.01994
519      +,0.43498 ,0.17295  ,0.27977 ,0.03032 ,0.00870 ,0.00456 ,0.01949
520      +,0.42768 ,0.16914  ,0.26647 ,0.02949 ,0.00862 ,0.00462 ,0.01908
521      +,0.42057 ,0.16558  ,0.25421 ,0.02873 ,0.00855 ,0.00469 ,0.01866/
522       DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),K=1,19)/
523      + 0.62507 ,0.27162  ,0.74926 ,0.04089 ,0.00073 ,0.00007 ,0.02078
524      +,0.60163 ,0.25694  ,0.66761 ,0.03888 ,0.00241 ,0.00009 ,0.02070
525      +,0.58059 ,0.24423  ,0.59856 ,0.03698 ,0.00365 ,0.00008 ,0.02038
526      +,0.56153 ,0.23313  ,0.54029 ,0.03527 ,0.00455 ,0.00012 ,0.01987
527      +,0.54412 ,0.22318  ,0.49062 ,0.03362 ,0.00516 ,0.00008 ,0.01948
528      +,0.52807 ,0.21424  ,0.44808 ,0.03220 ,0.00555 ,0.00053 ,0.01896
529      +,0.51323 ,0.20613  ,0.41099 ,0.03086 ,0.00587 ,0.00124 ,0.01841
530      +,0.49937 ,0.19875  ,0.37872 ,0.02964 ,0.00610 ,0.00174 ,0.01782
531      +,0.48615 ,0.19234  ,0.35026 ,0.02843 ,0.00625 ,0.00213 ,0.01741
532      +,0.47407 ,0.18591  ,0.32509 ,0.02738 ,0.00634 ,0.00235 ,0.01686
533      +,0.46275 ,0.17998  ,0.30280 ,0.02638 ,0.00637 ,0.00256 ,0.01641
534      +,0.45198 ,0.17462  ,0.28299 ,0.02546 ,0.00638 ,0.00276 ,0.01599
535      +,0.44161 ,0.16982  ,0.26531 ,0.02459 ,0.00640 ,0.00296 ,0.01557
536      +,0.43197 ,0.16505  ,0.24933 ,0.02376 ,0.00641 ,0.00300 ,0.01514
537      +,0.42290 ,0.16060  ,0.23495 ,0.02300 ,0.00639 ,0.00305 ,0.01473
538      +,0.41424 ,0.15648  ,0.22192 ,0.02228 ,0.00631 ,0.00314 ,0.01433
539      +,0.40598 ,0.15262  ,0.21008 ,0.02163 ,0.00622 ,0.00320 ,0.01394
540      +,0.39811 ,0.14898  ,0.19929 ,0.02104 ,0.00610 ,0.00322 ,0.01357
541      +,0.39058 ,0.14552  ,0.18932 ,0.02043 ,0.00605 ,0.00325 ,0.01324/
542       DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),K=1,19)/
543      + 0.61450 ,0.25244  ,0.64331 ,0.03080 ,0.00052 ,0.00011 ,0.01564
544      +,0.58728 ,0.23712  ,0.56308 ,0.02904 ,0.00192 ,0.00015 ,0.01552
545      +,0.56319 ,0.22392  ,0.49752 ,0.02744 ,0.00286 ,0.00011 ,0.01523
546      +,0.54158 ,0.21255  ,0.44347 ,0.02607 ,0.00346 ,0.00011 ,0.01482
547      +,0.52205 ,0.20250  ,0.39804 ,0.02476 ,0.00389 ,0.00010 ,0.01441
548      +,0.50423 ,0.19359  ,0.35969 ,0.02362 ,0.00421 ,0.00039 ,0.01389
549      +,0.48803 ,0.18543  ,0.32695 ,0.02251 ,0.00441 ,0.00082 ,0.01350
550      +,0.47287 ,0.17818  ,0.29880 ,0.02153 ,0.00450 ,0.00122 ,0.01312
551      +,0.45880 ,0.17156  ,0.27419 ,0.02060 ,0.00464 ,0.00150 ,0.01267
552      +,0.44565 ,0.16542  ,0.25290 ,0.01976 ,0.00470 ,0.00164 ,0.01227
553      +,0.43343 ,0.15976  ,0.23412 ,0.01898 ,0.00473 ,0.00181 ,0.01185
554      +,0.42200 ,0.15455  ,0.21755 ,0.01826 ,0.00474 ,0.00197 ,0.01145
555      +,0.41124 ,0.14973  ,0.20289 ,0.01758 ,0.00474 ,0.00210 ,0.01109
556      +,0.40102 ,0.14525  ,0.18969 ,0.01697 ,0.00466 ,0.00212 ,0.01076
557      +,0.39148 ,0.14104  ,0.17790 ,0.01640 ,0.00458 ,0.00215 ,0.01046
558      +,0.38256 ,0.13699  ,0.16729 ,0.01584 ,0.00450 ,0.00224 ,0.01019
559      +,0.37413 ,0.13321  ,0.15772 ,0.01530 ,0.00444 ,0.00228 ,0.00991
560      +,0.36617 ,0.12968  ,0.14905 ,0.01478 ,0.00439 ,0.00228 ,0.00964
561      +,0.35837 ,0.12640  ,0.14120 ,0.01431 ,0.00436 ,0.00229 ,0.00939/
562       DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),K=1,19)/
563      + 0.59623 ,0.23145  ,0.54806 ,0.02279 ,0.00038 ,0.00012 ,0.01174
564      +,0.56581 ,0.21603  ,0.47176 ,0.02130 ,0.00160 ,0.00006 ,0.01156
565      +,0.53921 ,0.20287  ,0.41101 ,0.02008 ,0.00225 ,0.00002 ,0.01127
566      +,0.51569 ,0.19152  ,0.36177 ,0.01904 ,0.00265 ,0.00010 ,0.01089
567      +,0.49454 ,0.18168  ,0.32130 ,0.01807 ,0.00289 ,0.00013 ,0.01049
568      +,0.47561 ,0.17287  ,0.28773 ,0.01714 ,0.00308 ,0.00038 ,0.01011
569      +,0.45816 ,0.16510  ,0.25947 ,0.01629 ,0.00322 ,0.00063 ,0.00979
570      +,0.44227 ,0.15800  ,0.23510 ,0.01550 ,0.00336 ,0.00085 ,0.00941
571      +,0.42747 ,0.15168  ,0.21433 ,0.01481 ,0.00339 ,0.00111 ,0.00905
572      +,0.41388 ,0.14565  ,0.19618 ,0.01414 ,0.00341 ,0.00124 ,0.00883
573      +,0.40122 ,0.14023  ,0.18062 ,0.01354 ,0.00341 ,0.00137 ,0.00852
574      +,0.38955 ,0.13525  ,0.16695 ,0.01297 ,0.00337 ,0.00146 ,0.00821
575      +,0.37884 ,0.13058  ,0.15475 ,0.01239 ,0.00331 ,0.00147 ,0.00796
576      +,0.36842 ,0.12632  ,0.14412 ,0.01194 ,0.00331 ,0.00151 ,0.00768
577      +,0.35864 ,0.12237  ,0.13466 ,0.01151 ,0.00329 ,0.00155 ,0.00742
578      +,0.34943 ,0.11866  ,0.12614 ,0.01110 ,0.00323 ,0.00158 ,0.00719
579      +,0.34083 ,0.11515  ,0.11846 ,0.01071 ,0.00319 ,0.00162 ,0.00699
580      +,0.33278 ,0.11185  ,0.11153 ,0.01033 ,0.00315 ,0.00167 ,0.00681
581      +,0.32505 ,0.10879  ,0.10526 ,0.01000 ,0.00311 ,0.00168 ,0.00661/
582       DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),K=1,19)/
583      + 0.57130 ,0.20986  ,0.46344 ,0.01658 ,0.00040 ,0.00012 ,0.00859
584      +,0.53839 ,0.19460  ,0.39234 ,0.01560 ,0.00113 ,0.00004 ,0.00838
585      +,0.51006 ,0.18167  ,0.33718 ,0.01460 ,0.00163 ,0.00007 ,0.00820
586      +,0.48504 ,0.17081  ,0.29329 ,0.01375 ,0.00199 ,0.00008 ,0.00786
587      +,0.46317 ,0.16108  ,0.25779 ,0.01294 ,0.00224 ,0.00005 ,0.00757
588      +,0.44311 ,0.15286  ,0.22866 ,0.01223 ,0.00237 ,0.00026 ,0.00734
589      +,0.42527 ,0.14530  ,0.20423 ,0.01156 ,0.00247 ,0.00054 ,0.00707
590      +,0.40900 ,0.13851  ,0.18388 ,0.01100 ,0.00251 ,0.00064 ,0.00677
591      +,0.39407 ,0.13233  ,0.16670 ,0.01043 ,0.00258 ,0.00084 ,0.00656
592      +,0.38013 ,0.12685  ,0.15168 ,0.00997 ,0.00254 ,0.00094 ,0.00628
593      +,0.36755 ,0.12174  ,0.13875 ,0.00945 ,0.00251 ,0.00099 ,0.00607
594      +,0.35580 ,0.11706  ,0.12757 ,0.00900 ,0.00248 ,0.00104 ,0.00588
595      +,0.34458 ,0.11280  ,0.11785 ,0.00869 ,0.00246 ,0.00110 ,0.00565
596      +,0.33440 ,0.10874  ,0.10917 ,0.00834 ,0.00244 ,0.00116 ,0.00542
597      +,0.32484 ,0.10502  ,0.10150 ,0.00801 ,0.00243 ,0.00119 ,0.00522
598      +,0.31562 ,0.10166  ,0.09469 ,0.00770 ,0.00240 ,0.00118 ,0.00509
599      +,0.30708 ,0.09846  ,0.08859 ,0.00741 ,0.00234 ,0.00117 ,0.00492
600      +,0.29915 ,0.09543  ,0.08310 ,0.00716 ,0.00226 ,0.00117 ,0.00474
601      +,0.29158 ,0.09261  ,0.07819 ,0.00689 ,0.00221 ,0.00116 ,0.00460/
602       DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),K=1,19)/
603      + 0.54087 ,0.18863  ,0.38868 ,0.01208 ,0.00017 ,-0.00010 ,0.00608
604      +,0.50635 ,0.17383  ,0.32407 ,0.01125 ,0.00078 ,-0.00006 ,0.00598
605      +,0.47690 ,0.16143  ,0.27493 ,0.01049 ,0.00114 ,-0.00005 ,0.00585
606      +,0.45143 ,0.15077  ,0.23668 ,0.00984 ,0.00143 ,-0.00013 ,0.00559
607      +,0.42885 ,0.14169  ,0.20586 ,0.00925 ,0.00156 ,-0.00006 ,0.00536
608      +,0.40888 ,0.13362  ,0.18126 ,0.00863 ,0.00176 ,0.00006 ,0.00521
609      +,0.39078 ,0.12668  ,0.16072 ,0.00818 ,0.00179 ,0.00029 ,0.00495
610      +,0.37456 ,0.12039  ,0.14364 ,0.00771 ,0.00177 ,0.00046 ,0.00473
611      +,0.35932 ,0.11465  ,0.12922 ,0.00735 ,0.00181 ,0.00047 ,0.00454
612      +,0.34590 ,0.10943  ,0.11698 ,0.00696 ,0.00180 ,0.00065 ,0.00442
613      +,0.33328 ,0.10475  ,0.10653 ,0.00659 ,0.00177 ,0.00066 ,0.00426
614      +,0.32159 ,0.10049  ,0.09748 ,0.00628 ,0.00175 ,0.00067 ,0.00408
615      +,0.31082 ,0.09657  ,0.08956 ,0.00604 ,0.00176 ,0.00075 ,0.00390
616      +,0.30066 ,0.09293  ,0.08264 ,0.00578 ,0.00174 ,0.00080 ,0.00379
617      +,0.29120 ,0.08957  ,0.07654 ,0.00555 ,0.00171 ,0.00083 ,0.00367
618      +,0.28231 ,0.08644  ,0.07111 ,0.00534 ,0.00167 ,0.00080 ,0.00352
619      +,0.27407 ,0.08350  ,0.06631 ,0.00514 ,0.00165 ,0.00080 ,0.00339
620      +,0.26640 ,0.08075  ,0.06203 ,0.00494 ,0.00163 ,0.00083 ,0.00326
621      +,0.25912 ,0.07819  ,0.05821 ,0.00477 ,0.00157 ,0.00083 ,0.00313/
622       DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),K=1,19)/
623      + 0.50654 ,0.16707  ,0.32224 ,0.00836 ,0.00036 ,0.00011 ,0.00448
624      +,0.47131 ,0.15282  ,0.26495 ,0.00782 ,0.00072 ,0.00017 ,0.00438
625      +,0.44126 ,0.14122  ,0.22192 ,0.00730 ,0.00101 ,0.00004 ,0.00416
626      +,0.41532 ,0.13150  ,0.18881 ,0.00679 ,0.00117 ,0.00014 ,0.00404
627      +,0.39285 ,0.12299  ,0.16307 ,0.00636 ,0.00128 ,0.00011 ,0.00386
628      +,0.37297 ,0.11550  ,0.14219 ,0.00602 ,0.00135 ,0.00021 ,0.00372
629      +,0.35503 ,0.10899  ,0.12521 ,0.00567 ,0.00132 ,0.00029 ,0.00358
630      +,0.33913 ,0.10320  ,0.11113 ,0.00528 ,0.00134 ,0.00035 ,0.00337
631      +,0.32436 ,0.09807  ,0.09940 ,0.00501 ,0.00128 ,0.00048 ,0.00321
632      +,0.31099 ,0.09337  ,0.08947 ,0.00477 ,0.00132 ,0.00054 ,0.00308
633      +,0.29848 ,0.08915  ,0.08101 ,0.00457 ,0.00133 ,0.00052 ,0.00294
634      +,0.28707 ,0.08527  ,0.07377 ,0.00436 ,0.00130 ,0.00051 ,0.00281
635      +,0.27682 ,0.08165  ,0.06754 ,0.00412 ,0.00124 ,0.00053 ,0.00268
636      +,0.26723 ,0.07835  ,0.06204 ,0.00390 ,0.00125 ,0.00054 ,0.00263
637      +,0.25829 ,0.07534  ,0.05722 ,0.00372 ,0.00124 ,0.00055 ,0.00255
638      +,0.24981 ,0.07260  ,0.05297 ,0.00358 ,0.00122 ,0.00056 ,0.00241
639      +,0.24191 ,0.06999  ,0.04924 ,0.00346 ,0.00116 ,0.00056 ,0.00229
640      +,0.23455 ,0.06751  ,0.04593 ,0.00335 ,0.00110 ,0.00055 ,0.00219
641      +,0.22769 ,0.06522  ,0.04298 ,0.00322 ,0.00104 ,0.00054 ,0.00212/
642       DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),K=1,19)/
643      + 0.46927 ,0.14695  ,0.26593 ,0.00598 ,0.00013 ,-0.00003 ,0.00295
644      +,0.43382 ,0.13366  ,0.21530 ,0.00551 ,0.00043 ,0.00004 ,0.00299
645      +,0.40386 ,0.12282  ,0.17816 ,0.00512 ,0.00065 ,-0.00006 ,0.00290
646      +,0.37847 ,0.11367  ,0.15016 ,0.00480 ,0.00073 ,-0.00001 ,0.00270
647      +,0.35640 ,0.10583  ,0.12827 ,0.00445 ,0.00093 ,0.00001 ,0.00266
648      +,0.33666 ,0.09913  ,0.11097 ,0.00419 ,0.00090 ,0.00008 ,0.00254
649      +,0.31938 ,0.09314  ,0.09697 ,0.00395 ,0.00092 ,0.00016 ,0.00241
650      +,0.30376 ,0.08793  ,0.08552 ,0.00369 ,0.00091 ,0.00025 ,0.00227
651      +,0.28964 ,0.08316  ,0.07609 ,0.00350 ,0.00091 ,0.00030 ,0.00215
652      +,0.27663 ,0.07905  ,0.06815 ,0.00334 ,0.00087 ,0.00027 ,0.00207
653      +,0.26490 ,0.07524  ,0.06138 ,0.00316 ,0.00087 ,0.00030 ,0.00196
654      +,0.25424 ,0.07172  ,0.05559 ,0.00298 ,0.00087 ,0.00033 ,0.00186
655      +,0.24445 ,0.06848  ,0.05063 ,0.00282 ,0.00084 ,0.00033 ,0.00180
656      +,0.23524 ,0.06555  ,0.04634 ,0.00274 ,0.00083 ,0.00038 ,0.00173
657      +,0.22676 ,0.06288  ,0.04261 ,0.00264 ,0.00081 ,0.00040 ,0.00166
658      +,0.21898 ,0.06046  ,0.03935 ,0.00246 ,0.00076 ,0.00034 ,0.00158
659      +,0.21169 ,0.05818  ,0.03647 ,0.00234 ,0.00075 ,0.00035 ,0.00153
660      +,0.20487 ,0.05604  ,0.03393 ,0.00225 ,0.00079 ,0.00041 ,0.00149
661      +,0.19838 ,0.05405  ,0.03164 ,0.00219 ,0.00076 ,0.00039 ,0.00143/
662       DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),K=1,19)/
663      + 0.43009 ,0.12748  ,0.21607 ,0.00400 ,0.00019 ,0.00004 ,0.00215
664      +,0.39534 ,0.11524  ,0.17289 ,0.00370 ,0.00034 ,0.00006 ,0.00209
665      +,0.36578 ,0.10533  ,0.14144 ,0.00354 ,0.00049 ,0.00003 ,0.00204
666      +,0.34110 ,0.09703  ,0.11799 ,0.00322 ,0.00057 ,-0.00001 ,0.00194
667      +,0.31934 ,0.09006  ,0.09988 ,0.00303 ,0.00059 ,0.00002 ,0.00183
668      +,0.30080 ,0.08395  ,0.08574 ,0.00282 ,0.00063 ,0.00009 ,0.00174
669      +,0.28407 ,0.07862  ,0.07449 ,0.00265 ,0.00067 ,0.00015 ,0.00164
670      +,0.26930 ,0.07392  ,0.06520 ,0.00245 ,0.00068 ,0.00014 ,0.00157
671      +,0.25601 ,0.06967  ,0.05768 ,0.00234 ,0.00063 ,0.00020 ,0.00147
672      +,0.24384 ,0.06594  ,0.05133 ,0.00218 ,0.00062 ,0.00025 ,0.00144
673      +,0.23282 ,0.06263  ,0.04601 ,0.00206 ,0.00063 ,0.00025 ,0.00137
674      +,0.22278 ,0.05960  ,0.04151 ,0.00196 ,0.00063 ,0.00025 ,0.00129
675      +,0.21358 ,0.05679  ,0.03766 ,0.00186 ,0.00061 ,0.00027 ,0.00120
676      +,0.20497 ,0.05427  ,0.03436 ,0.00177 ,0.00060 ,0.00025 ,0.00119
677      +,0.19705 ,0.05195  ,0.03148 ,0.00169 ,0.00058 ,0.00024 ,0.00116
678      +,0.18975 ,0.04974  ,0.02897 ,0.00164 ,0.00053 ,0.00025 ,0.00109
679      +,0.18302 ,0.04774  ,0.02676 ,0.00157 ,0.00052 ,0.00026 ,0.00103
680      +,0.17679 ,0.04590  ,0.02482 ,0.00148 ,0.00052 ,0.00027 ,0.00098
681      +,0.17091 ,0.04418  ,0.02310 ,0.00142 ,0.00051 ,0.00026 ,0.00094/
682       DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),K=1,19)/
683      + 0.39010 ,0.10947  ,0.17418 ,0.00270 ,0.00020 ,0.00008 ,0.00144
684      +,0.35623 ,0.09848  ,0.13754 ,0.00250 ,0.00029 ,0.00007 ,0.00145
685      +,0.32772 ,0.08962  ,0.11130 ,0.00239 ,0.00034 ,0.00006 ,0.00135
686      +,0.30394 ,0.08214  ,0.09197 ,0.00227 ,0.00034 ,0.00004 ,0.00124
687      +,0.28366 ,0.07586  ,0.07721 ,0.00208 ,0.00042 ,0.00001 ,0.00121
688      +,0.26605 ,0.07053  ,0.06569 ,0.00187 ,0.00042 ,0.00004 ,0.00117
689      +,0.25030 ,0.06575  ,0.05664 ,0.00182 ,0.00041 ,0.00006 ,0.00109
690      +,0.23643 ,0.06159  ,0.04939 ,0.00169 ,0.00041 ,0.00008 ,0.00101
691      +,0.22394 ,0.05798  ,0.04334 ,0.00157 ,0.00041 ,0.00012 ,0.00094
692      +,0.21274 ,0.05471  ,0.03839 ,0.00148 ,0.00035 ,0.00010 ,0.00088
693      +,0.20253 ,0.05173  ,0.03428 ,0.00143 ,0.00038 ,0.00014 ,0.00084
694      +,0.19326 ,0.04906  ,0.03081 ,0.00137 ,0.00039 ,0.00018 ,0.00080
695      +,0.18482 ,0.04669  ,0.02786 ,0.00129 ,0.00037 ,0.00017 ,0.00078
696      +,0.17699 ,0.04447  ,0.02530 ,0.00121 ,0.00036 ,0.00014 ,0.00073
697      +,0.16982 ,0.04245  ,0.02309 ,0.00114 ,0.00036 ,0.00012 ,0.00069
698      +,0.16322 ,0.04061  ,0.02119 ,0.00108 ,0.00036 ,0.00014 ,0.00069
699      +,0.15707 ,0.03891  ,0.01952 ,0.00103 ,0.00035 ,0.00014 ,0.00066
700      +,0.15133 ,0.03733  ,0.01806 ,0.00101 ,0.00034 ,0.00012 ,0.00062
701      +,0.14601 ,0.03587  ,0.01677 ,0.00096 ,0.00031 ,0.00013 ,0.00059/
702       DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),K=1,19)/
703      + 0.35004 ,0.09294  ,0.13907 ,0.00180 ,0.00010 ,0.00004 ,0.00095
704      +,0.31737 ,0.08312  ,0.10821 ,0.00165 ,0.00023 ,0.00006 ,0.00097
705      +,0.29045 ,0.07514  ,0.08640 ,0.00161 ,0.00024 ,0.00002 ,0.00090
706      +,0.26790 ,0.06854  ,0.07057 ,0.00144 ,0.00027 ,-0.00002 ,0.00082
707      +,0.24881 ,0.06300  ,0.05871 ,0.00137 ,0.00033 ,0.00001 ,0.00083
708      +,0.23243 ,0.05822  ,0.04963 ,0.00123 ,0.00036 ,-0.00001 ,0.00080
709      +,0.21802 ,0.05416  ,0.04246 ,0.00108 ,0.00034 ,0.00007 ,0.00077
710      +,0.20518 ,0.05055  ,0.03673 ,0.00105 ,0.00031 ,0.00012 ,0.00073
711      +,0.19356 ,0.04737  ,0.03206 ,0.00101 ,0.00034 ,0.00010 ,0.00070
712      +,0.18306 ,0.04457  ,0.02827 ,0.00098 ,0.00028 ,0.00009 ,0.00062
713      +,0.17381 ,0.04206  ,0.02511 ,0.00092 ,0.00027 ,0.00010 ,0.00058
714      +,0.16547 ,0.03979  ,0.02246 ,0.00084 ,0.00028 ,0.00010 ,0.00056
715      +,0.15782 ,0.03771  ,0.02021 ,0.00077 ,0.00029 ,0.00010 ,0.00054
716      +,0.15077 ,0.03583  ,0.01830 ,0.00074 ,0.00026 ,0.00011 ,0.00051
717      +,0.14435 ,0.03412  ,0.01665 ,0.00071 ,0.00025 ,0.00011 ,0.00048
718      +,0.13851 ,0.03255  ,0.01523 ,0.00065 ,0.00026 ,0.00011 ,0.00046
719      +,0.13301 ,0.03110  ,0.01400 ,0.00061 ,0.00027 ,0.00011 ,0.00045
720      +,0.12784 ,0.02978  ,0.01291 ,0.00058 ,0.00027 ,0.00012 ,0.00044
721      +,0.12314 ,0.02855  ,0.01196 ,0.00054 ,0.00027 ,0.00013 ,0.00043/
722       DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),K=1,19)/
723      + 0.31041 ,0.07819  ,0.10961 ,0.00122 ,0.00000 ,-0.00001 ,0.00057
724      +,0.28003 ,0.06934  ,0.08414 ,0.00107 ,0.00005 ,-0.00007 ,0.00058
725      +,0.25490 ,0.06240  ,0.06652 ,0.00099 ,0.00010 ,-0.00006 ,0.00051
726      +,0.23402 ,0.05671  ,0.05372 ,0.00090 ,0.00022 ,-0.00006 ,0.00057
727      +,0.21610 ,0.05186  ,0.04437 ,0.00091 ,0.00018 ,-0.00004 ,0.00050
728      +,0.20101 ,0.04778  ,0.03720 ,0.00081 ,0.00017 ,-0.00003 ,0.00046
729      +,0.18765 ,0.04429  ,0.03161 ,0.00078 ,0.00021 ,0.00000 ,0.00045
730      +,0.17596 ,0.04117  ,0.02717 ,0.00073 ,0.00016 ,0.00000 ,0.00041
731      +,0.16558 ,0.03845  ,0.02361 ,0.00069 ,0.00015 ,0.00001 ,0.00037
732      +,0.15630 ,0.03605  ,0.02070 ,0.00064 ,0.00017 ,0.00002 ,0.00036
733      +,0.14789 ,0.03391  ,0.01831 ,0.00063 ,0.00019 ,0.00003 ,0.00037
734      +,0.14032 ,0.03199  ,0.01631 ,0.00061 ,0.00019 ,0.00005 ,0.00037
735      +,0.13352 ,0.03026  ,0.01461 ,0.00054 ,0.00018 ,0.00006 ,0.00035
736      +,0.12727 ,0.02869  ,0.01320 ,0.00050 ,0.00016 ,0.00004 ,0.00034
737      +,0.12155 ,0.02727  ,0.01198 ,0.00047 ,0.00016 ,0.00004 ,0.00032
738      +,0.11621 ,0.02597  ,0.01093 ,0.00045 ,0.00016 ,0.00004 ,0.00028
739      +,0.11133 ,0.02476  ,0.01001 ,0.00043 ,0.00016 ,0.00005 ,0.00026
740      +,0.10685 ,0.02364  ,0.00921 ,0.00041 ,0.00016 ,0.00006 ,0.00025
741      +,0.10270 ,0.02262  ,0.00851 ,0.00039 ,0.00017 ,0.00007 ,0.00026/
742       DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),K=1,19)/
743      + 0.27216 ,0.06472  ,0.08524 ,0.00077 ,0.00005 ,-0.00002 ,0.00031
744      +,0.24361 ,0.05712  ,0.06454 ,0.00076 ,0.00007 ,-0.00002 ,0.00034
745      +,0.22060 ,0.05111  ,0.05042 ,0.00069 ,0.00007 ,-0.00003 ,0.00035
746      +,0.20136 ,0.04619  ,0.04041 ,0.00072 ,0.00010 ,-0.00005 ,0.00031
747      +,0.18541 ,0.04214  ,0.03304 ,0.00059 ,0.00009 ,-0.00005 ,0.00027
748      +,0.17174 ,0.03862  ,0.02750 ,0.00053 ,0.00012 ,-0.00004 ,0.00027
749      +,0.15981 ,0.03566  ,0.02321 ,0.00050 ,0.00011 ,-0.00001 ,0.00027
750      +,0.14926 ,0.03305  ,0.01983 ,0.00049 ,0.00011 ,-0.00002 ,0.00025
751      +,0.14021 ,0.03079  ,0.01714 ,0.00038 ,0.00011 ,0.00000 ,0.00024
752      +,0.13194 ,0.02876  ,0.01494 ,0.00038 ,0.00012 ,0.00001 ,0.00024
753      +,0.12455 ,0.02697  ,0.01316 ,0.00033 ,0.00011 ,0.00002 ,0.00022
754      +,0.11781 ,0.02538  ,0.01168 ,0.00032 ,0.00012 ,0.00002 ,0.00021
755      +,0.11158 ,0.02393  ,0.01043 ,0.00037 ,0.00013 ,0.00003 ,0.00022
756      +,0.10609 ,0.02263  ,0.00939 ,0.00034 ,0.00012 ,0.00004 ,0.00021
757      +,0.10110 ,0.02146  ,0.00849 ,0.00031 ,0.00012 ,0.00005 ,0.00020
758      +,0.09652 ,0.02039  ,0.00772 ,0.00027 ,0.00011 ,0.00004 ,0.00019
759      +,0.09227 ,0.01940  ,0.00706 ,0.00026 ,0.00011 ,0.00004 ,0.00018
760      +,0.08834 ,0.01850  ,0.00648 ,0.00026 ,0.00011 ,0.00005 ,0.00018
761      +,0.08473 ,0.01766  ,0.00597 ,0.00023 ,0.00010 ,0.00004 ,0.00017/
762       DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),K=1,19)/
763      + 0.23580 ,0.05296  ,0.06531 ,0.00046 ,-0.00001 ,-0.00005 ,0.00019
764      +,0.20963 ,0.04647  ,0.04878 ,0.00047 ,0.00001 ,-0.00007 ,0.00018
765      +,0.18873 ,0.04129  ,0.03764 ,0.00038 ,-0.00001 ,-0.00010 ,0.00021
766      +,0.17139 ,0.03714  ,0.02982 ,0.00041 ,0.00006 ,-0.00007 ,0.00017
767      +,0.15703 ,0.03369  ,0.02418 ,0.00039 ,0.00010 ,-0.00003 ,0.00018
768      +,0.14488 ,0.03077  ,0.01996 ,0.00031 ,0.00006 ,-0.00005 ,0.00016
769      +,0.13432 ,0.02826  ,0.01673 ,0.00029 ,0.00005 ,-0.00001 ,0.00018
770      +,0.12494 ,0.02611  ,0.01420 ,0.00031 ,0.00007 ,-0.00001 ,0.00017
771      +,0.11681 ,0.02421  ,0.01220 ,0.00027 ,0.00010 ,-0.00003 ,0.00016
772      +,0.10961 ,0.02256  ,0.01060 ,0.00024 ,0.00008 ,0.00001 ,0.00014
773      +,0.10319 ,0.02109  ,0.00929 ,0.00021 ,0.00008 ,0.00001 ,0.00013
774      +,0.09742 ,0.01978  ,0.00821 ,0.00018 ,0.00009 ,0.00002 ,0.00014
775      +,0.09222 ,0.01861  ,0.00731 ,0.00014 ,0.00011 ,0.00003 ,0.00015
776      +,0.08733 ,0.01755  ,0.00655 ,0.00017 ,0.00010 ,0.00004 ,0.00015
777      +,0.08293 ,0.01660  ,0.00591 ,0.00018 ,0.00009 ,0.00003 ,0.00014
778      +,0.07901 ,0.01571  ,0.00536 ,0.00014 ,0.00009 ,0.00003 ,0.00013
779      +,0.07535 ,0.01492  ,0.00489 ,0.00013 ,0.00008 ,0.00003 ,0.00012
780      +,0.07193 ,0.01420  ,0.00447 ,0.00013 ,0.00007 ,0.00003 ,0.00012
781      +,0.06878 ,0.01353  ,0.00412 ,0.00013 ,0.00008 ,0.00004 ,0.00012/
782       DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),K=1,19)/
783      + 0.20148 ,0.04259  ,0.04912 ,0.00029 ,-0.00005 ,-0.00004 ,0.00009
784      +,0.17780 ,0.03712  ,0.03620 ,0.00028 ,-0.00003 ,-0.00009 ,0.00007
785      +,0.15932 ,0.03277  ,0.02759 ,0.00022 ,0.00002 ,-0.00006 ,0.00009
786      +,0.14400 ,0.02932  ,0.02161 ,0.00019 ,0.00004 ,-0.00007 ,0.00012
787      +,0.13120 ,0.02649  ,0.01739 ,0.00022 ,0.00009 ,-0.00001 ,0.00015
788      +,0.12053 ,0.02408  ,0.01424 ,0.00015 ,0.00004 ,-0.00004 ,0.00012
789      +,0.11121 ,0.02203  ,0.01185 ,0.00016 ,0.00008 ,-0.00001 ,0.00011
790      +,0.10300 ,0.02027  ,0.01000 ,0.00020 ,0.00009 ,0.00002 ,0.00014
791      +,0.09596 ,0.01872  ,0.00855 ,0.00016 ,0.00007 ,0.00001 ,0.00013
792      +,0.08974 ,0.01739  ,0.00738 ,0.00014 ,0.00008 ,0.00002 ,0.00012
793      +,0.08411 ,0.01621  ,0.00644 ,0.00014 ,0.00008 ,0.00002 ,0.00013
794      +,0.07913 ,0.01517  ,0.00567 ,0.00012 ,0.00008 ,0.00003 ,0.00013
795      +,0.07477 ,0.01423  ,0.00503 ,0.00008 ,0.00006 ,0.00004 ,0.00012
796      +,0.07067 ,0.01338  ,0.00450 ,0.00007 ,0.00007 ,0.00003 ,0.00010
797      +,0.06694 ,0.01262  ,0.00404 ,0.00007 ,0.00008 ,0.00002 ,0.00008
798      +,0.06354 ,0.01193  ,0.00366 ,0.00007 ,0.00008 ,0.00002 ,0.00008
799      +,0.06046 ,0.01129  ,0.00332 ,0.00006 ,0.00007 ,0.00002 ,0.00008
800      +,0.05765 ,0.01071  ,0.00304 ,0.00005 ,0.00006 ,0.00002 ,0.00007
801      +,0.05503 ,0.01018  ,0.00279 ,0.00005 ,0.00006 ,0.00002 ,0.00008/
802       DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),K=1,19)/
803      + 0.16982 ,0.03391  ,0.03654 ,0.00022 ,-0.00005 ,-0.00008 ,0.00000
804      +,0.14910 ,0.02933  ,0.02652 ,0.00017 ,0.00000 ,-0.00006 ,0.00006
805      +,0.13261 ,0.02576  ,0.01999 ,0.00017 ,0.00002 ,-0.00005 ,0.00007
806      +,0.11933 ,0.02290  ,0.01555 ,0.00015 ,0.00001 ,-0.00006 ,0.00005
807      +,0.10818 ,0.02059  ,0.01237 ,0.00012 ,0.00001 ,-0.00007 ,0.00005
808      +,0.09891 ,0.01863  ,0.01006 ,0.00012 ,0.00002 ,-0.00005 ,0.00004
809      +,0.09081 ,0.01699  ,0.00833 ,0.00014 ,0.00002 ,-0.00003 ,0.00005
810      +,0.08399 ,0.01558  ,0.00698 ,0.00011 ,0.00003 ,-0.00003 ,0.00006
811      +,0.07803 ,0.01436  ,0.00594 ,0.00008 ,0.00006 ,-0.00001 ,0.00006
812      +,0.07263 ,0.01328  ,0.00512 ,0.00008 ,0.00003 ,0.00000 ,0.00006
813      +,0.06789 ,0.01235  ,0.00445 ,0.00008 ,0.00004 ,0.00002 ,0.00006
814      +,0.06370 ,0.01152  ,0.00390 ,0.00007 ,0.00004 ,0.00002 ,0.00006
815      +,0.05995 ,0.01076  ,0.00345 ,0.00005 ,0.00004 ,0.00001 ,0.00005
816      +,0.05651 ,0.01009  ,0.00307 ,0.00006 ,0.00004 ,0.00001 ,0.00005
817      +,0.05340 ,0.00949  ,0.00276 ,0.00006 ,0.00004 ,0.00001 ,0.00005
818      +,0.05058 ,0.00896  ,0.00249 ,0.00005 ,0.00002 ,0.00001 ,0.00004
819      +,0.04801 ,0.00847  ,0.00226 ,0.00005 ,0.00002 ,0.00001 ,0.00004
820      +,0.04565 ,0.00801  ,0.00206 ,0.00005 ,0.00003 ,0.00001 ,0.00005
821      +,0.04349 ,0.00760  ,0.00189 ,0.00005 ,0.00003 ,0.00001 ,0.00004/
822       DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),K=1,19)/
823      + 0.14066 ,0.02631  ,0.02643 ,0.00010 ,-0.00002 ,-0.00003 ,0.00002
824      +,0.12272 ,0.02264  ,0.01901 ,0.00009 ,0.00001 ,-0.00002 ,0.00004
825      +,0.10852 ,0.01979  ,0.01419 ,0.00011 ,0.00001 ,-0.00001 ,0.00004
826      +,0.09708 ,0.01752  ,0.01092 ,0.00012 ,0.00001 ,0.00000 ,0.00004
827      +,0.08776 ,0.01570  ,0.00863 ,0.00008 ,0.00001 ,-0.00002 ,0.00002
828      +,0.07982 ,0.01414  ,0.00698 ,0.00008 ,0.00000 ,-0.00003 ,0.00001
829      +,0.07317 ,0.01286  ,0.00575 ,0.00007 ,0.00000 ,-0.00002 ,0.00001
830      +,0.06737 ,0.01175  ,0.00479 ,0.00006 ,0.00001 ,0.00000 ,0.00003
831      +,0.06228 ,0.01080  ,0.00406 ,0.00007 ,0.00000 ,0.00001 ,0.00002
832      +,0.05786 ,0.00997  ,0.00348 ,0.00005 ,0.00002 ,0.00001 ,0.00003
833      +,0.05389 ,0.00923  ,0.00301 ,0.00006 ,0.00003 ,0.00001 ,0.00003
834      +,0.05037 ,0.00859  ,0.00263 ,0.00007 ,0.00002 ,0.00000 ,0.00002
835      +,0.04725 ,0.00802  ,0.00232 ,0.00006 ,0.00000 ,0.00000 ,0.00002
836      +,0.04446 ,0.00750  ,0.00206 ,0.00005 ,0.00001 ,0.00000 ,0.00002
837      +,0.04193 ,0.00704  ,0.00184 ,0.00004 ,0.00001 ,0.00000 ,0.00002
838      +,0.03960 ,0.00662  ,0.00166 ,0.00004 ,0.00000 ,0.00000 ,0.00002
839      +,0.03749 ,0.00625  ,0.00151 ,0.00004 ,0.00000 ,0.00000 ,0.00001
840      +,0.03558 ,0.00590  ,0.00137 ,0.00004 ,0.00000 ,0.00000 ,0.00001
841      +,0.03383 ,0.00559  ,0.00125 ,0.00004 ,0.00001 ,0.00000 ,0.00001/
842       DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),K=1,19)/
843      + 0.09154 ,0.01495  ,0.01296 ,0.00005 ,-0.00001 ,0.00000 ,0.00001
844      +,0.07871 ,0.01266  ,0.00902 ,0.00002 ,-0.00001 ,-0.00002 ,0.00001
845      +,0.06870 ,0.01093  ,0.00657 ,0.00004 ,0.00000 ,0.00000 ,0.00001
846      +,0.06074 ,0.00957  ,0.00496 ,0.00004 ,0.00001 ,-0.00001 ,0.00001
847      +,0.05433 ,0.00847  ,0.00385 ,0.00002 ,0.00000 ,0.00000 ,0.00001
848      +,0.04900 ,0.00757  ,0.00306 ,0.00001 ,0.00002 ,0.00000 ,0.00002
849      +,0.04447 ,0.00682  ,0.00249 ,0.00001 ,0.00001 ,0.00000 ,0.00001
850      +,0.04060 ,0.00618  ,0.00205 ,0.00001 ,0.00002 ,0.00000 ,0.00002
851      +,0.03725 ,0.00563  ,0.00171 ,0.00000 ,0.00001 ,0.00001 ,0.00001
852      +,0.03430 ,0.00515  ,0.00146 ,0.00001 ,0.00001 ,0.00000 ,0.00001
853      +,0.03174 ,0.00474  ,0.00125 ,0.00002 ,0.00001 ,0.00001 ,0.00001
854      +,0.02948 ,0.00438  ,0.00108 ,0.00002 ,0.00002 ,0.00001 ,0.00001
855      +,0.02745 ,0.00406  ,0.00095 ,0.00002 ,0.00001 ,0.00001 ,0.00001
856      +,0.02567 ,0.00378  ,0.00084 ,0.00001 ,0.00001 ,0.00000 ,0.00001
857      +,0.02408 ,0.00353  ,0.00075 ,0.00001 ,0.00001 ,0.00000 ,0.00000
858      +,0.02263 ,0.00330  ,0.00067 ,0.00001 ,0.00001 ,0.00000 ,0.00001
859      +,0.02132 ,0.00310  ,0.00060 ,0.00001 ,0.00001 ,0.00000 ,0.00001
860      +,0.02014 ,0.00291  ,0.00055 ,0.00000 ,0.00001 ,0.00000 ,0.00001
861      +,0.01905 ,0.00274  ,0.00050 ,0.00000 ,0.00001 ,0.00000 ,0.00001/
862       DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),K=1,19)/
863      + 0.05476 ,0.00773  ,0.00569 ,0.00002 ,-0.00002 ,-0.00002 ,-0.00002
864      +,0.04631 ,0.00644  ,0.00384 ,0.00003 ,0.00000 ,-0.00001 ,0.00000
865      +,0.03992 ,0.00548  ,0.00273 ,0.00001 ,0.00000 ,-0.00001 ,0.00000
866      +,0.03487 ,0.00474  ,0.00201 ,0.00001 ,0.00000 ,0.00000 ,0.00001
867      +,0.03084 ,0.00415  ,0.00153 ,0.00000 ,0.00000 ,-0.00001 ,0.00000
868      +,0.02748 ,0.00367  ,0.00120 ,0.00000 ,0.00000 ,-0.00001 ,0.00000
869      +,0.02471 ,0.00327  ,0.00096 ,0.00000 ,0.00000 ,0.00000 ,0.00001
870      +,0.02233 ,0.00294  ,0.00078 ,0.00001 ,0.00000 ,0.00000 ,0.00001
871      +,0.02034 ,0.00266  ,0.00065 ,0.00000 ,0.00000 ,0.00000 ,0.00000
872      +,0.01857 ,0.00241  ,0.00055 ,0.00000 ,0.00000 ,0.00000 ,0.00000
873      +,0.01705 ,0.00220  ,0.00047 ,0.00000 ,0.00001 ,0.00000 ,0.00000
874      +,0.01573 ,0.00202  ,0.00040 ,0.00000 ,0.00000 ,0.00000 ,0.00000
875      +,0.01457 ,0.00186  ,0.00035 ,0.00000 ,0.00000 ,0.00000 ,0.00000
876      +,0.01352 ,0.00172  ,0.00031 ,0.00000 ,0.00000 ,0.00000 ,0.00000
877      +,0.01259 ,0.00159  ,0.00027 ,0.00000 ,0.00000 ,0.00000 ,0.00000
878      +,0.01177 ,0.00148  ,0.00024 ,0.00000 ,0.00000 ,0.00000 ,0.00000
879      +,0.01103 ,0.00138  ,0.00022 ,0.00000 ,0.00000 ,0.00000 ,0.00000
880      +,0.01036 ,0.00129  ,0.00020 ,0.00000 ,0.00000 ,0.00000 ,0.00000
881      +,0.00974 ,0.00121  ,0.00018 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
882       DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),K=1,19)/
883      + 0.02907 ,0.00346  ,0.00212 ,0.00001 ,0.00000 ,0.00000 ,-0.00001
884      +,0.02418 ,0.00284  ,0.00139 ,0.00001 ,0.00000 ,-0.00001 ,0.00000
885      +,0.02051 ,0.00238  ,0.00096 ,0.00001 ,0.00000 ,0.00000 ,0.00000
886      +,0.01765 ,0.00203  ,0.00069 ,0.00001 ,0.00000 ,0.00000 ,0.00000
887      +,0.01541 ,0.00176  ,0.00052 ,0.00001 ,0.00000 ,0.00000 ,0.00000
888      +,0.01361 ,0.00154  ,0.00040 ,0.00000 ,0.00000 ,0.00000 ,0.00000
889      +,0.01209 ,0.00135  ,0.00032 ,0.00000 ,0.00000 ,0.00000 ,0.00000
890      +,0.01082 ,0.00120  ,0.00026 ,0.00001 ,0.00000 ,0.00000 ,0.00000
891      +,0.00976 ,0.00108  ,0.00021 ,0.00000 ,0.00000 ,0.00000 ,0.00000
892      +,0.00885 ,0.00097  ,0.00017 ,0.00000 ,0.00000 ,0.00000 ,0.00000
893      +,0.00806 ,0.00088  ,0.00015 ,0.00000 ,0.00000 ,0.00000 ,0.00000
894      +,0.00737 ,0.00080  ,0.00013 ,0.00000 ,0.00000 ,0.00000 ,0.00000
895      +,0.00677 ,0.00073  ,0.00011 ,0.00000 ,0.00000 ,0.00000 ,0.00000
896      +,0.00625 ,0.00067  ,0.00010 ,0.00000 ,0.00000 ,0.00000 ,0.00000
897      +,0.00578 ,0.00062  ,0.00009 ,0.00000 ,0.00000 ,0.00000 ,0.00000
898      +,0.00536 ,0.00057  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
899      +,0.00499 ,0.00053  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
900      +,0.00466 ,0.00049  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000
901      +,0.00436 ,0.00046  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
902       DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),K=1,19)/
903      + 0.01312 ,0.00128  ,0.00063 ,0.00000 ,0.00000 ,0.00000 ,0.00000
904      +,0.01068 ,0.00103  ,0.00040 ,0.00000 ,0.00000 ,0.00000 ,0.00000
905      +,0.00889 ,0.00085  ,0.00027 ,0.00000 ,0.00000 ,0.00000 ,0.00000
906      +,0.00754 ,0.00071  ,0.00019 ,0.00000 ,0.00000 ,0.00000 ,0.00000
907      +,0.00648 ,0.00060  ,0.00014 ,0.00000 ,0.00000 ,0.00000 ,0.00000
908      +,0.00563 ,0.00052  ,0.00010 ,0.00000 ,0.00000 ,0.00000 ,0.00000
909      +,0.00494 ,0.00045  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
910      +,0.00437 ,0.00040  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
911      +,0.00390 ,0.00035  ,0.00005 ,0.00000 ,0.00000 ,0.00000 ,0.00000
912      +,0.00349 ,0.00031  ,0.00004 ,0.00000 ,0.00000 ,0.00000 ,0.00000
913      +,0.00315 ,0.00028  ,0.00004 ,0.00000 ,0.00000 ,0.00000 ,0.00000
914      +,0.00285 ,0.00025  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
915      +,0.00260 ,0.00023  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
916      +,0.00238 ,0.00021  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
917      +,0.00218 ,0.00019  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
918      +,0.00201 ,0.00018  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
919      +,0.00185 ,0.00016  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
920      +,0.00172 ,0.00015  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
921      +,0.00160 ,0.00014  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
922       DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),K=1,19)/
923      + 0.00099 ,0.00005  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
924      +,0.00076 ,0.00004  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
925      +,0.00060 ,0.00003  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
926      +,0.00049 ,0.00003  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
927      +,0.00040 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
928      +,0.00034 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
929      +,0.00028 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
930      +,0.00024 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
931      +,0.00021 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
932      +,0.00018 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
933      +,0.00016 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
934      +,0.00014 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
935      +,0.00013 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
936      +,0.00011 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
937      +,0.00010 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
938      +,0.00009 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
939      +,0.00008 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
940      +,0.00007 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
941      +,0.00007 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
942       DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5,
943      .        1.D-4,2.D-4,4.D-4,6.D-4,8.D-4,
944      .        1.D-3,2.D-3,4.D-3,6.D-3,8.D-3,
945      .        1.D-2,2.D-2,4.D-2,6.D-2,8.D-2,
946      .     .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0,
947      .     .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0,
948      .     .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0,
949      .     .8D0,.9D0,1.D0/
950       DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/
951       DATA N0/2,5,4,5,0,0,5/
952       DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
953       DATA INIT/0/
954 C
955 C
956       XSAVE=X
957 C
958       IF(INIT.NE.0) GOTO 10
959       INIT=1
960       DO 20 N=1,NX-1
961       DO 20 M=1,19
962 C     READ(58,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),
963 C    .          F(6,N,M)
964 C 1=UV 2=DV 3=GLUE 4=(UBAR+DBAR)/2 5=CBAR 7=BBAR 6=SBAR
965          DO 25 I=1,7
966   25     F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
967   20  CONTINUE
968       DO 30 J=1,NTENTH-1
969       XX(J)= LOG10(XX(J))+ONEDO
970       DO 30 I=1,6
971       DO 30 K=1,19
972   30  F(I,J,K) = LOG( F(I,J,K))*F(I,NTENTH,K)/ LOG( F(I,NTENTH,K))
973   50  FORMAT(7F10.5)
974       DO 40 I=1,7
975       DO 40 M=1,19
976   40  F(I,NX,M)=ZEROD
977   10  CONTINUE
978       IF(X.LT.XMIN) X=XMIN
979       IF(X.GT.XMAX) X=XMAX
980       QSQ=SCALE**2
981       IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
982       IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
983       XXX=X
984       IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
985       N=0
986   70  N=N+1
987       IF(XXX.GT.XX(N+1)) GOTO 70
988       A=(XXX-XX(N))/(XX(N+1)-XX(N))
989       RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
990       B=RM-AINT(RM)
991       M=1+  INT(RM)
992       DO 60 I=1,7
993       G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
994      .    + A*(ONED-B)*F(I,N+1,M)  + A*B*F(I,N+1,M+1)
995       IF(N.GE.NTENTH) GOTO 65
996       IF(I.EQ.7) GOTO 65
997           FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
998           G(I)=FAC**(G(I)/FAC)
999   65  CONTINUE
1000       G(I)=G(I)*(ONED-X)**N0(I)
1001   60  CONTINUE
1002       UPV=G(1)
1003       DNV=G(2)
1004 C...    THIS SEA IS (UBAR+DBAR)/2
1005       SEA=G(4)
1006       STR=G(6)
1007       CHM=G(5)
1008       GL =G(3)
1009       BOT=G(7)
1010 C
1011       X=XSAVE
1012 C
1013       RETURN
1014       END