]> git.uio.no Git - u/mrichter/AliRoot.git/blob - PDF/spdf/strkb05.F
Coding conventions
[u/mrichter/AliRoot.git] / PDF / spdf / strkb05.F
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.2  1996/10/30 08:31:39  cernlib
6 * Version 7.04
7 *
8 * Revision 1.1.1.1  1996/04/12 15:30:03  plothow
9 * Version 7.01
10 *
11 *
12 #include "pdf/pilot.h"
13 C
14 C-----------------------------------------------------------------------
15       SUBROUTINE STRKB05(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GL)
16 C
17 C :::::::::::: MRS (B235) sea=ubar=dbar=2sbar at Q0**2
18 C
19 #include "pdf/impdp.inc"
20       PARAMETER(NX=47)
21       PARAMETER(NTENTH=21)
22       DIMENSION F(7,NX,19),G(7),XX(NX),N0(7)
23       DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),K=1,19)/
24      + 0.01571 ,0.00106  ,4.28544 ,0.25159 ,0.04304 ,0.00000 ,0.14820
25      +,0.01585 ,0.00122 ,10.61627 ,0.42818 ,0.21989 ,0.00000 ,0.32504
26      +,0.01600 ,0.00137 ,19.16457 ,0.66305 ,0.45498 ,0.00000 ,0.56012
27      +,0.01616 ,0.00151 ,29.45746 ,0.94584 ,0.73797 ,0.00000 ,0.84311
28      +,0.01631 ,0.00165 ,41.52361 ,1.27675 ,1.06905 ,0.00000 ,1.17419
29      +,0.01647 ,0.00178 ,55.12427 ,1.65113 ,1.44360 ,0.11565 ,1.54875
30      +,0.01662 ,0.00191 ,70.10855 ,2.06693 ,1.85955 ,0.52832 ,1.96469
31      +,0.01678 ,0.00204 ,86.31143 ,2.52081 ,2.31357 ,0.99766 ,2.41873
32      +,0.01694 ,0.00216,103.60295 ,3.00982 ,2.80271 ,1.49834 ,2.90787
33      +,0.01709 ,0.00228,121.87346 ,3.53168 ,3.32469 ,2.03209 ,3.42986
34      +,0.01724 ,0.00240,141.04709 ,4.08467 ,3.87779 ,2.59583 ,3.98296
35      +,0.01739 ,0.00251,161.07639 ,4.66761 ,4.46084 ,3.18898 ,4.56602
36      +,0.01754 ,0.00262,181.48669 ,5.26928 ,5.06261 ,3.80026 ,5.16780
37      +,0.01769 ,0.00273,202.59399 ,5.89707 ,5.69049 ,4.43713 ,5.79569
38      +,0.01783 ,0.00284,224.40771 ,6.55126 ,6.34477 ,5.09993 ,6.44998
39      +,0.01798 ,0.00294,246.26395 ,7.21506 ,7.00865 ,5.77192 ,7.11386
40      +,0.01812 ,0.00304,268.80029 ,7.90435 ,7.69802 ,6.46900 ,7.80324
41      +,0.01826 ,0.00314,291.47339 ,8.60564 ,8.39938 ,7.17774 ,8.50461
42      +,0.01840 ,0.00324,314.53711 ,9.32491 ,9.11871 ,7.90412 ,9.22395/
43       DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),K=1,19)/
44      + 0.01888 ,0.00167  ,4.16070 ,0.24925 ,0.03969 ,0.00000 ,0.14503
45      +,0.01917 ,0.00191  ,9.69975 ,0.40683 ,0.19746 ,0.00000 ,0.30278
46      +,0.01944 ,0.00213 ,16.87122 ,0.60908 ,0.39987 ,0.00000 ,0.50519
47      +,0.01972 ,0.00235 ,25.24316 ,0.84632 ,0.63726 ,0.00000 ,0.74256
48      +,0.01998 ,0.00255 ,34.81721 ,1.11810 ,0.90916 ,0.00000 ,1.01447
49      +,0.02023 ,0.00275 ,45.38509 ,1.42018 ,1.21136 ,0.09295 ,1.31666
50      +,0.02048 ,0.00293 ,56.81831 ,1.75055 ,1.54183 ,0.42170 ,1.64714
51      +,0.02072 ,0.00312 ,68.98438 ,2.10632 ,1.89771 ,0.79079 ,2.00301
52      +,0.02096 ,0.00329 ,81.78163 ,2.48498 ,2.27646 ,1.17961 ,2.38177
53      +,0.02119 ,0.00347 ,95.12801 ,2.88463 ,2.67620 ,1.58955 ,2.78151
54      +,0.02142 ,0.00364,108.96863 ,3.30387 ,3.09552 ,2.01812 ,3.20083
55      +,0.02164 ,0.00380,123.26973 ,3.74174 ,3.53346 ,2.46483 ,3.63878
56      +,0.02186 ,0.00396,137.68819 ,4.18970 ,3.98149 ,2.92111 ,4.08681
57      +,0.02208 ,0.00412,152.46057 ,4.65338 ,4.44524 ,3.39266 ,4.55056
58      +,0.02228 ,0.00427,167.59599 ,5.13300 ,4.92493 ,3.87973 ,5.03025
59      +,0.02249 ,0.00442,182.62357 ,5.61608 ,5.40807 ,4.36991 ,5.51340
60      +,0.02269 ,0.00457,198.00436 ,6.11450 ,5.90655 ,4.87507 ,6.01188
61      +,0.02289 ,0.00471,213.35815 ,6.61831 ,6.41040 ,5.38531 ,6.51574
62      +,0.02309 ,0.00485,228.86781 ,7.13196 ,6.92411 ,5.90512 ,7.02945/
63       DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),K=1,19)/
64      + 0.02257 ,0.00262  ,4.03928 ,0.24677 ,0.03638 ,0.00000 ,0.14187
65      +,0.02306 ,0.00298  ,8.86095 ,0.38660 ,0.17633 ,0.00000 ,0.28181
66      +,0.02351 ,0.00332 ,14.84878 ,0.55989 ,0.34973 ,0.00000 ,0.45519
67      +,0.02394 ,0.00364 ,21.62544 ,0.75796 ,0.54791 ,0.00000 ,0.65336
68      +,0.02434 ,0.00394 ,29.18390 ,0.98014 ,0.77018 ,0.00000 ,0.87562
69      +,0.02473 ,0.00422 ,37.35239 ,1.22276 ,1.01288 ,0.07438 ,1.11831
70      +,0.02510 ,0.00450 ,46.02846 ,1.48405 ,1.27424 ,0.33521 ,1.37966
71      +,0.02546 ,0.00477 ,55.11102 ,1.76161 ,1.55188 ,0.62425 ,1.65729
72      +,0.02581 ,0.00502 ,64.52583 ,2.05344 ,1.84377 ,0.92494 ,1.94918
73      +,0.02615 ,0.00527 ,74.21518 ,2.35804 ,2.14843 ,1.23845 ,2.25384
74      +,0.02648 ,0.00552 ,84.14223 ,2.67434 ,2.46479 ,1.56285 ,2.57019
75      +,0.02680 ,0.00575 ,94.28624 ,3.00161 ,2.79212 ,1.89780 ,2.89752
76      +,0.02711 ,0.00598,104.40158 ,3.33344 ,3.12400 ,2.23685 ,3.22940
77      +,0.02741 ,0.00621,114.66719 ,3.67418 ,3.46479 ,2.58440 ,3.57018
78      +,0.02771 ,0.00643,125.09326 ,4.02399 ,3.81465 ,2.94067 ,3.92004
79      +,0.02800 ,0.00664,135.34789 ,4.37369 ,4.16440 ,3.29652 ,4.26978
80      +,0.02828 ,0.00685,145.76483 ,4.73216 ,4.52291 ,3.66083 ,4.62829
81      +,0.02856 ,0.00705,156.07919 ,5.09209 ,4.88289 ,4.02635 ,4.98826
82      +,0.02883 ,0.00725,166.42487 ,5.45689 ,5.24773 ,4.39649 ,5.35310/
83       DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),K=1,19)/
84      + 0.02499 ,0.00342  ,3.96967 ,0.24526 ,0.03445 ,0.00000 ,0.14003
85      +,0.02562 ,0.00387  ,8.40320 ,0.37525 ,0.16455 ,0.00000 ,0.27010
86      +,0.02619 ,0.00430 ,13.77740 ,0.53312 ,0.32252 ,0.00000 ,0.42805
87      +,0.02674 ,0.00470 ,19.74977 ,0.71090 ,0.50038 ,0.00000 ,0.60590
88      +,0.02725 ,0.00507 ,26.31377 ,0.90788 ,0.69744 ,0.00000 ,0.80294
89      +,0.02773 ,0.00543 ,33.31931 ,1.12077 ,0.91039 ,0.06513 ,1.01588
90      +,0.02819 ,0.00578 ,40.67944 ,1.34798 ,1.13767 ,0.29244 ,1.24314
91      +,0.02864 ,0.00611 ,48.31024 ,1.58742 ,1.37717 ,0.54240 ,1.48263
92      +,0.02907 ,0.00643 ,56.15128 ,1.83736 ,1.62717 ,0.80053 ,1.73262
93      +,0.02949 ,0.00674 ,64.15742 ,2.09653 ,1.88640 ,1.06791 ,1.99184
94      +,0.02989 ,0.00704 ,72.30115 ,2.36405 ,2.15396 ,1.34288 ,2.25939
95      +,0.03028 ,0.00733 ,80.56773 ,2.63934 ,2.42930 ,1.62524 ,2.53472
96      +,0.03067 ,0.00761 ,88.75687 ,2.91697 ,2.70699 ,1.90952 ,2.81240
97      +,0.03104 ,0.00789 ,97.02061 ,3.20071 ,2.99077 ,2.19954 ,3.09617
98      +,0.03139 ,0.00816,105.36964 ,3.49072 ,3.28083 ,2.49551 ,3.38622
99      +,0.03175 ,0.00842,113.53455 ,3.77935 ,3.56950 ,2.78979 ,3.67487
100      +,0.03209 ,0.00868,121.79201 ,4.07407 ,3.86426 ,3.08989 ,3.96963
101      +,0.03243 ,0.00893,129.92789 ,4.36884 ,4.15907 ,3.38980 ,4.26443
102      +,0.03275 ,0.00917,138.05397 ,4.66653 ,4.45680 ,3.69241 ,4.56215/
103       DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),K=1,19)/
104      + 0.02683 ,0.00413  ,3.92084 ,0.24415 ,0.03309 ,0.00000 ,0.13873
105      +,0.02757 ,0.00466  ,8.09207 ,0.36739 ,0.15643 ,0.00000 ,0.26204
106      +,0.02825 ,0.00517 ,13.06263 ,0.51497 ,0.30410 ,0.00000 ,0.40968
107      +,0.02888 ,0.00563 ,18.51527 ,0.67941 ,0.46861 ,0.00000 ,0.57417
108      +,0.02948 ,0.00607 ,24.44534 ,0.86003 ,0.64931 ,0.00000 ,0.75485
109      +,0.03004 ,0.00649 ,30.71794 ,1.05381 ,0.84315 ,0.05921 ,0.94867
110      +,0.03058 ,0.00690 ,37.25661 ,1.25930 ,1.04870 ,0.26513 ,1.15421
111      +,0.03110 ,0.00728 ,43.98882 ,1.47463 ,1.26409 ,0.49037 ,1.36958
112      +,0.03160 ,0.00766 ,50.86322 ,1.69825 ,1.48776 ,0.72173 ,1.59323
113      +,0.03208 ,0.00802 ,57.84256 ,1.92905 ,1.71861 ,0.96027 ,1.82407
114      +,0.03254 ,0.00837 ,64.90501 ,2.16626 ,1.95588 ,1.20452 ,2.06131
115      +,0.03299 ,0.00871 ,72.04008 ,2.40940 ,2.19906 ,1.45433 ,2.30449
116      +,0.03343 ,0.00903 ,79.07454 ,2.65369 ,2.44341 ,1.70490 ,2.54881
117      +,0.03386 ,0.00935 ,86.14417 ,2.90249 ,2.69226 ,1.95963 ,2.79765
118      +,0.03427 ,0.00967 ,93.25969 ,3.15600 ,2.94581 ,2.21875 ,3.05119
119      +,0.03467 ,0.00997,100.18959 ,3.40748 ,3.19733 ,2.47557 ,3.30270
120      +,0.03506 ,0.01027,107.17564 ,3.66358 ,3.45347 ,2.73675 ,3.55882
121      +,0.03544 ,0.01055,114.03403 ,3.91899 ,3.70892 ,2.99701 ,3.81425
122      +,0.03582 ,0.01084,120.86346 ,4.17627 ,3.96625 ,3.25893 ,4.07156/
123       DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),K=1,19)/
124      + 0.02833 ,0.00477  ,3.88325 ,0.24328 ,0.03204 ,0.00000 ,0.13772
125      +,0.02916 ,0.00539  ,7.85814 ,0.36141 ,0.15027 ,0.00000 ,0.25592
126      +,0.02993 ,0.00595 ,12.53256 ,0.50135 ,0.29029 ,0.00000 ,0.39591
127      +,0.03064 ,0.00648 ,17.60883 ,0.65600 ,0.44503 ,0.00000 ,0.55062
128      +,0.03131 ,0.00698 ,23.08447 ,0.82474 ,0.61383 ,0.00000 ,0.71940
129      +,0.03194 ,0.00746 ,28.83600 ,1.00474 ,0.79390 ,0.05495 ,0.89944
130      +,0.03255 ,0.00791 ,34.79494 ,1.19468 ,0.98389 ,0.24555 ,1.08941
131      +,0.03312 ,0.00835 ,40.89676 ,1.39282 ,1.18210 ,0.45315 ,1.28760
132      +,0.03368 ,0.00877 ,47.09708 ,1.59777 ,1.38710 ,0.66552 ,1.49258
133      +,0.03422 ,0.00917 ,53.36401 ,1.80853 ,1.59792 ,0.88368 ,1.70337
134      +,0.03473 ,0.00957 ,59.67972 ,2.02443 ,1.81386 ,1.10631 ,1.91930
135      +,0.03523 ,0.00995 ,66.03656 ,2.24504 ,2.03453 ,1.33330 ,2.13994
136      +,0.03572 ,0.01032 ,72.28004 ,2.46603 ,2.25557 ,1.56030 ,2.36097
137      +,0.03619 ,0.01067 ,78.53471 ,2.69052 ,2.48011 ,1.79046 ,2.58548
138      +,0.03665 ,0.01102 ,84.81154 ,2.91869 ,2.70833 ,2.02400 ,2.81369
139      +,0.03710 ,0.01136 ,90.90424 ,3.14446 ,2.93414 ,2.25488 ,3.03948
140      +,0.03753 ,0.01169 ,97.03088 ,3.37388 ,3.16361 ,2.48916 ,3.26893
141      +,0.03796 ,0.01201,103.02873 ,3.60218 ,3.39195 ,2.72210 ,3.49725
142      +,0.03837 ,0.01233,108.98671 ,3.83170 ,3.62152 ,2.95605 ,3.72679/
143       DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),K=1,19)/
144      + 0.03341 ,0.00751  ,3.76771 ,0.24045 ,0.02880 ,0.00000 ,0.13461
145      +,0.03459 ,0.00842  ,7.16936 ,0.34343 ,0.13189 ,0.00000 ,0.23765
146      +,0.03568 ,0.00926 ,11.00938 ,0.46141 ,0.24997 ,0.00000 ,0.35568
147      +,0.03668 ,0.01004 ,15.04971 ,0.58857 ,0.37723 ,0.00000 ,0.48289
148      +,0.03762 ,0.01077 ,19.29665 ,0.72444 ,0.51318 ,0.00000 ,0.61880
149      +,0.03851 ,0.01146 ,23.66005 ,0.86683 ,0.65565 ,0.04337 ,0.76122
150      +,0.03935 ,0.01212 ,28.09384 ,1.01474 ,0.80364 ,0.19256 ,0.90918
151      +,0.04016 ,0.01275 ,32.55615 ,1.16692 ,0.95590 ,0.35294 ,1.06140
152      +,0.04093 ,0.01335 ,37.01991 ,1.32237 ,1.11142 ,0.51490 ,1.21688
153      +,0.04168 ,0.01393 ,41.46793 ,1.48039 ,1.26952 ,0.67938 ,1.37494
154      +,0.04239 ,0.01449 ,45.89276 ,1.64058 ,1.42978 ,0.84546 ,1.53515
155      +,0.04308 ,0.01503 ,50.29343 ,1.80268 ,1.59195 ,1.01314 ,1.69730
156      +,0.04375 ,0.01556 ,54.56339 ,1.96355 ,1.75289 ,1.17925 ,1.85819
157      +,0.04440 ,0.01606 ,58.79712 ,2.12559 ,1.91500 ,1.34625 ,2.02026
158      +,0.04503 ,0.01655 ,63.00609 ,2.28901 ,2.07849 ,1.51437 ,2.18372
159      +,0.04564 ,0.01703 ,67.04770 ,2.44942 ,2.23896 ,1.67925 ,2.34416
160      +,0.04623 ,0.01749 ,71.07954 ,2.61133 ,2.40094 ,1.84541 ,2.50610
161      +,0.04681 ,0.01795 ,74.99039 ,2.77131 ,2.56099 ,2.00945 ,2.66611
162      +,0.04738 ,0.01838 ,78.84502 ,2.93113 ,2.72088 ,2.17315 ,2.82596/
163       DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),K=1,19)/
164      + 0.03927 ,0.01181  ,3.65290 ,0.23749 ,0.02560 ,0.00000 ,0.13152
165      +,0.04090 ,0.01316  ,6.53043 ,0.32631 ,0.11459 ,0.00000 ,0.22043
166      +,0.04240 ,0.01439  ,9.64846 ,0.42478 ,0.21322 ,0.00000 ,0.31898
167      +,0.04379 ,0.01553 ,12.82465 ,0.52830 ,0.31689 ,0.00000 ,0.42258
168      +,0.04509 ,0.01659 ,16.07530 ,0.63660 ,0.42533 ,0.00000 ,0.53095
169      +,0.04631 ,0.01758 ,19.33925 ,0.74807 ,0.53693 ,0.03391 ,0.64248
170      +,0.04747 ,0.01853 ,22.58934 ,0.86203 ,0.65103 ,0.14963 ,0.75651
171      +,0.04858 ,0.01943 ,25.80148 ,0.97763 ,0.76675 ,0.27237 ,0.87216
172      +,0.04965 ,0.02029 ,28.96214 ,1.09418 ,0.88343 ,0.39468 ,0.98878
173      +,0.05067 ,0.02112 ,32.06468 ,1.21128 ,1.00065 ,0.51744 ,1.10593
174      +,0.05165 ,0.02191 ,35.10886 ,1.32869 ,1.11819 ,0.64005 ,1.22341
175      +,0.05259 ,0.02267 ,38.09839 ,1.44633 ,1.23595 ,0.76260 ,1.34111
176      +,0.05351 ,0.02340 ,40.96114 ,1.56193 ,1.35167 ,0.88282 ,1.45676
177      +,0.05439 ,0.02411 ,43.76888 ,1.67737 ,1.46723 ,1.00263 ,1.57225
178      +,0.05525 ,0.02480 ,46.53241 ,1.79286 ,1.58283 ,1.12226 ,1.68780
179      +,0.05608 ,0.02546 ,49.15466 ,1.90525 ,1.69534 ,1.23859 ,1.80024
180      +,0.05689 ,0.02611 ,51.74867 ,2.01792 ,1.80812 ,1.35500 ,1.91296
181      +,0.05767 ,0.02673 ,54.23944 ,2.12841 ,1.91873 ,1.46908 ,2.02351
182      +,0.05844 ,0.02734 ,56.67404 ,2.23808 ,2.02850 ,1.58217 ,2.13323/
183       DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),K=1,19)/
184      + 0.04323 ,0.01539  ,3.58518 ,0.23573 ,0.02376 ,0.00000 ,0.12973
185      +,0.04521 ,0.01708  ,6.17517 ,0.31668 ,0.10494 ,0.00000 ,0.21081
186      +,0.04701 ,0.01862  ,8.91422 ,0.40475 ,0.19322 ,0.00000 ,0.29899
187      +,0.04869 ,0.02002 ,11.65031 ,0.49597 ,0.28465 ,0.00000 ,0.39032
188      +,0.05025 ,0.02134 ,14.40541 ,0.59020 ,0.37908 ,0.00000 ,0.48465
189      +,0.05172 ,0.02256 ,17.13310 ,0.68614 ,0.47521 ,0.02919 ,0.58069
190      +,0.05312 ,0.02373 ,19.81555 ,0.78330 ,0.57256 ,0.12834 ,0.67795
191      +,0.05445 ,0.02483 ,22.43706 ,0.88100 ,0.67043 ,0.23266 ,0.77573
192      +,0.05573 ,0.02588 ,24.99033 ,0.97874 ,0.76835 ,0.33577 ,0.87356
193      +,0.05696 ,0.02688 ,27.47321 ,1.07623 ,0.86602 ,0.43854 ,0.97114
194      +,0.05813 ,0.02785 ,29.88857 ,1.17335 ,0.96330 ,0.54049 ,1.06834
195      +,0.05927 ,0.02877 ,32.24193 ,1.27005 ,1.06018 ,0.64178 ,1.16513
196      +,0.06036 ,0.02966 ,34.47665 ,1.36451 ,1.15480 ,0.74055 ,1.25967
197      +,0.06142 ,0.03052 ,36.65347 ,1.45833 ,1.24879 ,0.83845 ,1.35357
198      +,0.06245 ,0.03134 ,38.78255 ,1.55174 ,1.34235 ,0.93572 ,1.44706
199      +,0.06344 ,0.03214 ,40.78740 ,1.64216 ,1.43293 ,1.02982 ,1.53756
200      +,0.06441 ,0.03292 ,42.76015 ,1.73242 ,1.52334 ,1.12358 ,1.62789
201      +,0.06535 ,0.03366 ,44.64198 ,1.82053 ,1.61161 ,1.21504 ,1.71607
202      +,0.06626 ,0.03439 ,46.47165 ,1.90762 ,1.69886 ,1.30533 ,1.80324/
203       DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),K=1,19)/
204      + 0.04645 ,0.01857  ,3.53637 ,0.23447 ,0.02246 ,0.00000 ,0.12847
205      +,0.04870 ,0.02054  ,5.92933 ,0.31002 ,0.09831 ,0.00000 ,0.20418
206      +,0.05077 ,0.02234  ,8.41583 ,0.39110 ,0.17965 ,0.00000 ,0.28540
207      +,0.05269 ,0.02397 ,10.86427 ,0.47418 ,0.26300 ,0.00000 ,0.36863
208      +,0.05448 ,0.02549 ,13.30040 ,0.55923 ,0.34829 ,0.00000 ,0.45381
209      +,0.05616 ,0.02691 ,15.68735 ,0.64514 ,0.43444 ,0.02615 ,0.53984
210      +,0.05775 ,0.02825 ,18.01306 ,0.73153 ,0.52106 ,0.11469 ,0.62635
211      +,0.05927 ,0.02952 ,20.26704 ,0.81785 ,0.60761 ,0.20728 ,0.71278
212      +,0.06073 ,0.03072 ,22.44556 ,0.90370 ,0.69369 ,0.29827 ,0.79876
213      +,0.06213 ,0.03187 ,24.54930 ,0.98889 ,0.77910 ,0.38848 ,0.88406
214      +,0.06347 ,0.03297 ,26.58261 ,1.07333 ,0.86375 ,0.47755 ,0.96861
215      +,0.06476 ,0.03403 ,28.55199 ,1.15705 ,0.94768 ,0.56563 ,1.05243
216      +,0.06601 ,0.03504 ,30.41013 ,1.23845 ,1.02928 ,0.65114 ,1.13393
217      +,0.06721 ,0.03601 ,32.21078 ,1.31898 ,1.11002 ,0.73557 ,1.21457
218      +,0.06837 ,0.03696 ,33.96370 ,1.39887 ,1.19011 ,0.81915 ,1.29456
219      +,0.06950 ,0.03786 ,35.60449 ,1.47590 ,1.26734 ,0.89969 ,1.37169
220      +,0.07060 ,0.03874 ,37.21265 ,1.55255 ,1.34418 ,0.97969 ,1.44844
221      +,0.07166 ,0.03958 ,38.73889 ,1.62712 ,1.41894 ,1.05746 ,1.52310
222      +,0.07270 ,0.04040 ,40.21678 ,1.70061 ,1.49263 ,1.13401 ,1.59669/
223       DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),K=1,19)/
224      + 0.04962 ,0.02149  ,3.49738 ,0.23353 ,0.02147 ,0.00000 ,0.12749
225      +,0.05216 ,0.02371  ,5.73806 ,0.30498 ,0.09326 ,0.00000 ,0.19913
226      +,0.05449 ,0.02571  ,8.03282 ,0.38079 ,0.16939 ,0.00000 ,0.27511
227      +,0.05664 ,0.02754 ,10.26560 ,0.45780 ,0.24670 ,0.00000 ,0.35227
228      +,0.05864 ,0.02924 ,12.46565 ,0.53604 ,0.32522 ,0.00000 ,0.43066
229      +,0.06052 ,0.03082 ,14.60323 ,0.61455 ,0.40402 ,0.02392 ,0.50931
230      +,0.06230 ,0.03230 ,16.66962 ,0.69305 ,0.48279 ,0.10468 ,0.58795
231      +,0.06400 ,0.03371 ,18.65865 ,0.77107 ,0.56109 ,0.18873 ,0.66611
232      +,0.06562 ,0.03504 ,20.56854 ,0.84831 ,0.63858 ,0.27091 ,0.74348
233      +,0.06718 ,0.03631 ,22.40211 ,0.92460 ,0.71513 ,0.35204 ,0.81990
234      +,0.06867 ,0.03753 ,24.16449 ,0.99991 ,0.79070 ,0.43181 ,0.89534
235      +,0.07010 ,0.03869 ,25.86209 ,1.07431 ,0.86534 ,0.51041 ,0.96986
236      +,0.07149 ,0.03980 ,27.45621 ,1.14639 ,0.93766 ,0.58646 ,1.04207
237      +,0.07282 ,0.04087 ,28.99522 ,1.21745 ,1.00896 ,0.66128 ,1.11325
238      +,0.07411 ,0.04190 ,30.48828 ,1.28771 ,1.07945 ,0.73510 ,1.18362
239      +,0.07536 ,0.04289 ,31.87639 ,1.35527 ,1.14724 ,0.80605 ,1.25130
240      +,0.07657 ,0.04385 ,33.23264 ,1.42232 ,1.21453 ,0.87634 ,1.31847
241      +,0.07775 ,0.04477 ,34.51457 ,1.48738 ,1.27981 ,0.94448 ,1.38363
242      +,0.07889 ,0.04567 ,35.75165 ,1.55132 ,1.34397 ,1.01139 ,1.44769/
243       DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),K=1,19)/
244      + 0.06179 ,0.03379  ,3.37123 ,0.23038 ,0.01843 ,0.00000 ,0.12441
245      +,0.06547 ,0.03693  ,5.16261 ,0.28957 ,0.07820 ,0.00000 ,0.18391
246      +,0.06882 ,0.03975  ,6.91377 ,0.35018 ,0.13936 ,0.00000 ,0.24481
247      +,0.07190 ,0.04230  ,8.55339 ,0.41003 ,0.19973 ,0.00000 ,0.30493
248      +,0.07475 ,0.04463 ,10.11749 ,0.46937 ,0.25958 ,0.00000 ,0.36453
249      +,0.07741 ,0.04680 ,11.59450 ,0.52768 ,0.31836 ,0.01788 ,0.42308
250      +,0.07992 ,0.04882 ,12.98613 ,0.58488 ,0.37604 ,0.07768 ,0.48053
251      +,0.08231 ,0.05071 ,14.29461 ,0.64078 ,0.43239 ,0.13895 ,0.53666
252      +,0.08458 ,0.05250 ,15.52417 ,0.69525 ,0.48730 ,0.19792 ,0.59135
253      +,0.08674 ,0.05419 ,16.68115 ,0.74828 ,0.54076 ,0.25531 ,0.64460
254      +,0.08881 ,0.05580 ,17.77272 ,0.79995 ,0.59285 ,0.31102 ,0.69648
255      +,0.09079 ,0.05734 ,18.80626 ,0.85037 ,0.64368 ,0.36526 ,0.74711
256      +,0.09269 ,0.05879 ,19.75838 ,0.89861 ,0.69232 ,0.41711 ,0.79555
257      +,0.09452 ,0.06018 ,20.66383 ,0.94566 ,0.73977 ,0.46758 ,0.84280
258      +,0.09629 ,0.06153 ,21.53035 ,0.99173 ,0.78622 ,0.51689 ,0.88906
259      +,0.09799 ,0.06280 ,22.32066 ,1.03553 ,0.83039 ,0.56378 ,0.93305
260      +,0.09963 ,0.06404 ,23.08412 ,1.07863 ,0.87387 ,0.60983 ,0.97634
261      +,0.10122 ,0.06522 ,23.79428 ,1.12005 ,0.91565 ,0.65407 ,1.01794
262      +,0.10276 ,0.06636 ,24.47107 ,1.16043 ,0.95638 ,0.69715 ,1.05849/
263       DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),K=1,19)/
264      + 0.08074 ,0.05305  ,3.23068 ,0.22668 ,0.01548 ,0.00001 ,0.12107
265      +,0.08612 ,0.05734  ,4.60204 ,0.27428 ,0.06409 ,0.00001 ,0.16920
266      +,0.09096 ,0.06114  ,5.87570 ,0.32119 ,0.11194 ,0.00001 ,0.21659
267      +,0.09536 ,0.06454  ,7.01789 ,0.36610 ,0.15774 ,0.00002 ,0.26196
268      +,0.09940 ,0.06762  ,8.06763 ,0.40943 ,0.20192 ,0.00001 ,0.30572
269      +,0.10316 ,0.07044  ,9.02627 ,0.45103 ,0.24433 ,0.01299 ,0.34773
270      +,0.10667 ,0.07305  ,9.90259 ,0.49096 ,0.28505 ,0.05587 ,0.38806
271      +,0.10998 ,0.07549 ,10.70396 ,0.52923 ,0.32406 ,0.09906 ,0.42671
272      +,0.11310 ,0.07776 ,11.43771 ,0.56587 ,0.36143 ,0.13991 ,0.46371
273      +,0.11606 ,0.07990 ,12.11115 ,0.60097 ,0.39724 ,0.17907 ,0.49917
274      +,0.11888 ,0.08192 ,12.73175 ,0.63465 ,0.43160 ,0.21653 ,0.53320
275      +,0.12157 ,0.08382 ,13.30676 ,0.66704 ,0.46466 ,0.25248 ,0.56592
276      +,0.12412 ,0.08562 ,13.82238 ,0.69760 ,0.49585 ,0.28641 ,0.59680
277      +,0.12657 ,0.08734 ,14.30373 ,0.72703 ,0.52592 ,0.31905 ,0.62655
278      +,0.12893 ,0.08898 ,14.75668 ,0.75552 ,0.55503 ,0.35059 ,0.65535
279      +,0.13119 ,0.09052 ,15.15785 ,0.78224 ,0.58234 ,0.38022 ,0.68237
280      +,0.13337 ,0.09200 ,15.54004 ,0.80828 ,0.60897 ,0.40904 ,0.70870
281      +,0.13545 ,0.09342 ,15.88782 ,0.83300 ,0.63426 ,0.43642 ,0.73371
282      +,0.13746 ,0.09478 ,16.21324 ,0.85687 ,0.65869 ,0.46284 ,0.75786/
283       DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),K=1,19)/
284      + 0.09673 ,0.06890  ,3.13674 ,0.22387 ,0.01378 ,0.00000 ,0.11883
285      +,0.10340 ,0.07393  ,4.27683 ,0.26494 ,0.05623 ,0.00001 ,0.16060
286      +,0.10937 ,0.07834  ,5.30167 ,0.30445 ,0.09703 ,0.00002 ,0.20077
287      +,0.11473 ,0.08225  ,6.19422 ,0.34150 ,0.13530 ,0.00002 ,0.23844
288      +,0.11966 ,0.08575  ,6.99441 ,0.37665 ,0.17159 ,0.00002 ,0.27416
289      +,0.12419 ,0.08895  ,7.70960 ,0.40987 ,0.20589 ,0.01057 ,0.30794
290      +,0.12841 ,0.09190  ,8.34956 ,0.44132 ,0.23840 ,0.04522 ,0.33992
291      +,0.13235 ,0.09461  ,8.92297 ,0.47107 ,0.26916 ,0.07974 ,0.37018
292      +,0.13607 ,0.09714  ,9.43685 ,0.49923 ,0.29827 ,0.11203 ,0.39882
293      +,0.13958 ,0.09949  ,9.90085 ,0.52589 ,0.32587 ,0.14266 ,0.42595
294      +,0.14289 ,0.10171 ,10.32203 ,0.55122 ,0.35210 ,0.17169 ,0.45174
295      +,0.14603 ,0.10380 ,10.70588 ,0.57539 ,0.37713 ,0.19937 ,0.47633
296      +,0.14902 ,0.10574 ,11.04231 ,0.59791 ,0.40049 ,0.22519 ,0.49927
297      +,0.15187 ,0.10759 ,11.35069 ,0.61942 ,0.42283 ,0.24985 ,0.52120
298      +,0.15460 ,0.10935 ,11.63615 ,0.64010 ,0.44430 ,0.27351 ,0.54228
299      +,0.15719 ,0.11100 ,11.88402 ,0.65930 ,0.46427 ,0.29556 ,0.56186
300      +,0.15968 ,0.11259 ,12.11747 ,0.67789 ,0.48361 ,0.31689 ,0.58083
301      +,0.16207 ,0.11410 ,12.32524 ,0.69540 ,0.50186 ,0.33702 ,0.59871
302      +,0.16438 ,0.11554 ,12.51643 ,0.71218 ,0.51936 ,0.35631 ,0.61585/
303       DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),K=1,19)/
304      + 0.11135 ,0.08280  ,3.06218 ,0.22140 ,0.01259 ,0.00000 ,0.11699
305      +,0.11908 ,0.08834  ,4.04479 ,0.25790 ,0.05083 ,0.00001 ,0.15437
306      +,0.12595 ,0.09315  ,4.90600 ,0.29238 ,0.08692 ,0.00002 ,0.18968
307      +,0.13209 ,0.09738  ,5.63922 ,0.32422 ,0.12026 ,0.00002 ,0.22227
308      +,0.13769 ,0.10116  ,6.28367 ,0.35403 ,0.15148 ,0.00002 ,0.25279
309      +,0.14282 ,0.10457  ,6.84914 ,0.38187 ,0.18064 ,0.00904 ,0.28130
310      +,0.14757 ,0.10770  ,7.34629 ,0.40793 ,0.20800 ,0.03850 ,0.30802
311      +,0.15200 ,0.11057  ,7.78427 ,0.43234 ,0.23363 ,0.06762 ,0.33304
312      +,0.15615 ,0.11322  ,8.17015 ,0.45522 ,0.25767 ,0.09462 ,0.35650
313      +,0.16005 ,0.11569  ,8.51305 ,0.47670 ,0.28028 ,0.12004 ,0.37855
314      +,0.16372 ,0.11799  ,8.81956 ,0.49695 ,0.30161 ,0.14397 ,0.39934
315      +,0.16719 ,0.12016  ,9.09474 ,0.51611 ,0.32181 ,0.16662 ,0.41902
316      +,0.17047 ,0.12216  ,9.33093 ,0.53381 ,0.34052 ,0.18762 ,0.43722
317      +,0.17359 ,0.12406  ,9.54419 ,0.55061 ,0.35829 ,0.20754 ,0.45451
318      +,0.17657 ,0.12586  ,9.73890 ,0.56666 ,0.37529 ,0.22656 ,0.47103
319      +,0.17938 ,0.12754  ,9.90358 ,0.58142 ,0.39097 ,0.24417 ,0.48626
320      +,0.18209 ,0.12914 ,10.05697 ,0.59566 ,0.40610 ,0.26113 ,0.50094
321      +,0.18468 ,0.13067 ,10.19029 ,0.60896 ,0.42027 ,0.27704 ,0.51468
322      +,0.18716 ,0.13212 ,10.31081 ,0.62164 ,0.43380 ,0.29223 ,0.52779/
323       DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),K=1,19)/
324      + 0.12505 ,0.09535  ,2.99865 ,0.21906 ,0.01169 ,0.00001 ,0.11537
325      +,0.13367 ,0.10122  ,3.86313 ,0.25206 ,0.04674 ,0.00002 ,0.14941
326      +,0.14128 ,0.10631  ,4.60471 ,0.28277 ,0.07936 ,0.00004 ,0.18109
327      +,0.14805 ,0.11074  ,5.22486 ,0.31075 ,0.10911 ,0.00003 ,0.20996
328      +,0.15418 ,0.11469  ,5.76002 ,0.33667 ,0.13668 ,0.00004 ,0.23671
329      +,0.15978 ,0.11823  ,6.22221 ,0.36062 ,0.16218 ,0.00796 ,0.26145
330      +,0.16495 ,0.12144  ,6.62214 ,0.38285 ,0.18590 ,0.03376 ,0.28442
331      +,0.16974 ,0.12440  ,6.96846 ,0.40349 ,0.20794 ,0.05909 ,0.30576
332      +,0.17423 ,0.12709  ,7.26977 ,0.42267 ,0.22848 ,0.08240 ,0.32562
333      +,0.17842 ,0.12959  ,7.53316 ,0.44056 ,0.24766 ,0.10423 ,0.34415
334      +,0.18235 ,0.13192  ,7.76433 ,0.45729 ,0.26563 ,0.12465 ,0.36151
335      +,0.18607 ,0.13409  ,7.96831 ,0.47300 ,0.28255 ,0.14386 ,0.37784
336      +,0.18955 ,0.13611  ,8.14085 ,0.48742 ,0.29813 ,0.16159 ,0.39283
337      +,0.19286 ,0.13800  ,8.29439 ,0.50103 ,0.31285 ,0.17833 ,0.40700
338      +,0.19601 ,0.13978  ,8.43273 ,0.51396 ,0.32685 ,0.19425 ,0.42047
339      +,0.19897 ,0.14145  ,8.54521 ,0.52575 ,0.33968 ,0.20890 ,0.43278
340      +,0.20183 ,0.14304  ,8.64857 ,0.53706 ,0.35201 ,0.22293 ,0.44459
341      +,0.20455 ,0.14451  ,8.73552 ,0.54754 ,0.36348 ,0.23602 ,0.45557
342      +,0.20715 ,0.14592  ,8.81301 ,0.55750 ,0.37439 ,0.24848 ,0.46601/
343       DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),K=1,19)/
344      + 0.18593 ,0.14581  ,2.75243 ,0.20798 ,0.00887 ,0.00001 ,0.10842
345      +,0.19742 ,0.15217  ,3.27580 ,0.23018 ,0.03450 ,0.00001 ,0.13235
346      +,0.20733 ,0.15750  ,3.69016 ,0.24976 ,0.05719 ,0.00000 ,0.15350
347      +,0.21592 ,0.16202  ,4.00893 ,0.26677 ,0.07703 ,0.00002 ,0.17193
348      +,0.22355 ,0.16593  ,4.26638 ,0.28187 ,0.09473 ,0.00001 ,0.18832
349      +,0.23038 ,0.16937  ,4.47213 ,0.29529 ,0.11060 ,0.00509 ,0.20297
350      +,0.23662 ,0.17237  ,4.63749 ,0.30731 ,0.12488 ,0.02127 ,0.21613
351      +,0.24226 ,0.17507  ,4.76875 ,0.31808 ,0.13780 ,0.03682 ,0.22797
352      +,0.24746 ,0.17748  ,4.87407 ,0.32774 ,0.14951 ,0.05078 ,0.23867
353      +,0.25223 ,0.17968  ,4.95741 ,0.33647 ,0.16017 ,0.06356 ,0.24836
354      +,0.25665 ,0.18167  ,5.02320 ,0.34439 ,0.16993 ,0.07529 ,0.25720
355      +,0.26078 ,0.18347  ,5.07566 ,0.35164 ,0.17895 ,0.08614 ,0.26533
356      +,0.26458 ,0.18510  ,5.11152 ,0.35803 ,0.18701 ,0.09592 ,0.27255
357      +,0.26815 ,0.18659  ,5.13823 ,0.36391 ,0.19449 ,0.10501 ,0.27923
358      +,0.27150 ,0.18799  ,5.15808 ,0.36936 ,0.20148 ,0.11352 ,0.28545
359      +,0.27463 ,0.18922  ,5.16607 ,0.37412 ,0.20772 ,0.12119 ,0.29096
360      +,0.27760 ,0.19038  ,5.17111 ,0.37859 ,0.21362 ,0.12845 ,0.29616
361      +,0.28034 ,0.19147  ,5.16968 ,0.38258 ,0.21899 ,0.13511 ,0.30084
362      +,0.28294 ,0.19248  ,5.16440 ,0.38627 ,0.22401 ,0.14136 ,0.30519/
363       DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),K=1,19)/
364      + 0.28767 ,0.21432  ,2.39222 ,0.18612 ,0.00607 ,-0.00010 ,0.09606
365      +,0.30055 ,0.21902  ,2.62332 ,0.19778 ,0.02300 ,-0.00011 ,0.11034
366      +,0.31126 ,0.22267  ,2.78007 ,0.20723 ,0.03716 ,-0.00010 ,0.12216
367      +,0.32011 ,0.22555  ,2.88036 ,0.21480 ,0.04890 ,-0.00009 ,0.13182
368      +,0.32772 ,0.22777  ,2.94563 ,0.22104 ,0.05893 ,-0.00010 ,0.13997
369      +,0.33434 ,0.22957  ,2.98514 ,0.22619 ,0.06753 ,0.00276 ,0.14683
370      +,0.34012 ,0.23099  ,3.00532 ,0.23044 ,0.07497 ,0.01179 ,0.15269
371      +,0.34517 ,0.23216  ,3.01080 ,0.23395 ,0.08146 ,0.02025 ,0.15767
372      +,0.34968 ,0.23307  ,3.00529 ,0.23687 ,0.08712 ,0.02762 ,0.16196
373      +,0.35368 ,0.23380  ,2.99200 ,0.23925 ,0.09212 ,0.03419 ,0.16565
374      +,0.35724 ,0.23438  ,2.97319 ,0.24121 ,0.09654 ,0.04007 ,0.16885
375      +,0.36047 ,0.23484  ,2.95048 ,0.24285 ,0.10048 ,0.04536 ,0.17164
376      +,0.36333 ,0.23511  ,2.92218 ,0.24406 ,0.10389 ,0.05002 ,0.17396
377      +,0.36592 ,0.23530  ,2.89250 ,0.24505 ,0.10694 ,0.05427 ,0.17597
378      +,0.36829 ,0.23542  ,2.86223 ,0.24589 ,0.10971 ,0.05816 ,0.17776
379      +,0.37038 ,0.23544  ,2.82866 ,0.24637 ,0.11211 ,0.06156 ,0.17919
380      +,0.37233 ,0.23542  ,2.79574 ,0.24676 ,0.11431 ,0.06472 ,0.18049
381      +,0.37406 ,0.23535  ,2.76165 ,0.24696 ,0.11621 ,0.06756 ,0.18156
382      +,0.37564 ,0.23523  ,2.72777 ,0.24705 ,0.11795 ,0.07018 ,0.18247/
383       DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),K=1,19)/
384      + 0.37177 ,0.25864  ,2.10408 ,0.16441 ,0.00458 ,0.00002 ,0.08450
385      +,0.38314 ,0.26041  ,2.19625 ,0.17037 ,0.01693 ,0.00003 ,0.09365
386      +,0.39202 ,0.26146  ,2.24095 ,0.17474 ,0.02679 ,-0.00002 ,0.10076
387      +,0.39901 ,0.26192  ,2.25233 ,0.17778 ,0.03477 ,0.00005 ,0.10627
388      +,0.40468 ,0.26195  ,2.24546 ,0.17996 ,0.04130 ,0.00002 ,0.11063
389      +,0.40942 ,0.26166  ,2.22580 ,0.18145 ,0.04674 ,0.00187 ,0.11411
390      +,0.41319 ,0.26125  ,2.19771 ,0.18243 ,0.05132 ,0.00781 ,0.11687
391      +,0.41637 ,0.26058  ,2.16409 ,0.18299 ,0.05521 ,0.01320 ,0.11909
392      +,0.41901 ,0.25980  ,2.12686 ,0.18322 ,0.05847 ,0.01785 ,0.12085
393      +,0.42122 ,0.25888  ,2.08777 ,0.18318 ,0.06127 ,0.02189 ,0.12223
394      +,0.42305 ,0.25790  ,2.04797 ,0.18293 ,0.06370 ,0.02542 ,0.12332
395      +,0.42451 ,0.25696  ,2.00821 ,0.18250 ,0.06581 ,0.02858 ,0.12419
396      +,0.42564 ,0.25590  ,1.96741 ,0.18190 ,0.06754 ,0.03133 ,0.12476
397      +,0.42658 ,0.25479  ,1.92753 ,0.18122 ,0.06905 ,0.03376 ,0.12517
398      +,0.42737 ,0.25366  ,1.88892 ,0.18049 ,0.07039 ,0.03593 ,0.12548
399      +,0.42785 ,0.25253  ,1.85027 ,0.17961 ,0.07147 ,0.03785 ,0.12559
400      +,0.42826 ,0.25140  ,1.81339 ,0.17873 ,0.07245 ,0.03960 ,0.12564
401      +,0.42852 ,0.25020  ,1.77709 ,0.17777 ,0.07328 ,0.04110 ,0.12555
402      +,0.42864 ,0.24906  ,1.74214 ,0.17678 ,0.07400 ,0.04247 ,0.12541/
403       DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),K=1,19)/
404      + 0.44158 ,0.28737  ,1.85610 ,0.14348 ,0.00361 ,0.00007 ,0.07357
405      +,0.44956 ,0.28604  ,1.86922 ,0.14592 ,0.01298 ,0.00008 ,0.07950
406      +,0.45525 ,0.28440  ,1.85428 ,0.14729 ,0.02019 ,0.00009 ,0.08382
407      +,0.45923 ,0.28236  ,1.82130 ,0.14778 ,0.02590 ,0.00008 ,0.08687
408      +,0.46215 ,0.28014  ,1.78059 ,0.14777 ,0.03041 ,0.00005 ,0.08913
409      +,0.46418 ,0.27786  ,1.73562 ,0.14741 ,0.03405 ,0.00137 ,0.09080
410      +,0.46546 ,0.27557  ,1.68829 ,0.14673 ,0.03708 ,0.00551 ,0.09194
411      +,0.46625 ,0.27320  ,1.64046 ,0.14583 ,0.03956 ,0.00927 ,0.09274
412      +,0.46658 ,0.27085  ,1.59297 ,0.14479 ,0.04160 ,0.01242 ,0.09325
413      +,0.46649 ,0.26855  ,1.54666 ,0.14365 ,0.04331 ,0.01510 ,0.09352
414      +,0.46618 ,0.26625  ,1.50200 ,0.14242 ,0.04475 ,0.01740 ,0.09362
415      +,0.46579 ,0.26392  ,1.45920 ,0.14112 ,0.04594 ,0.01941 ,0.09359
416      +,0.46497 ,0.26167  ,1.41729 ,0.13979 ,0.04686 ,0.02114 ,0.09338
417      +,0.46404 ,0.25948  ,1.37754 ,0.13845 ,0.04765 ,0.02266 ,0.09310
418      +,0.46302 ,0.25736  ,1.33998 ,0.13712 ,0.04835 ,0.02402 ,0.09277
419      +,0.46182 ,0.25520  ,1.30352 ,0.13571 ,0.04888 ,0.02517 ,0.09233
420      +,0.46061 ,0.25313  ,1.26917 ,0.13434 ,0.04934 ,0.02621 ,0.09187
421      +,0.45929 ,0.25111  ,1.23608 ,0.13298 ,0.04968 ,0.02714 ,0.09138
422      +,0.45792 ,0.24913  ,1.20470 ,0.13165 ,0.04996 ,0.02796 ,0.09086/
423       DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),K=1,19)/
424      + 0.49841 ,0.30498  ,1.63771 ,0.12383 ,0.00281 ,0.00006 ,0.06336
425      +,0.50210 ,0.30061  ,1.60289 ,0.12408 ,0.01005 ,0.00005 ,0.06710
426      +,0.50392 ,0.29630  ,1.55396 ,0.12358 ,0.01557 ,0.00010 ,0.06962
427      +,0.50443 ,0.29193  ,1.49785 ,0.12265 ,0.01968 ,0.00003 ,0.07117
428      +,0.50409 ,0.28771  ,1.44115 ,0.12143 ,0.02291 ,0.00008 ,0.07219
429      +,0.50312 ,0.28362  ,1.38530 ,0.12004 ,0.02545 ,0.00104 ,0.07279
430      +,0.50162 ,0.27967  ,1.33102 ,0.11852 ,0.02754 ,0.00399 ,0.07304
431      +,0.49970 ,0.27589  ,1.27907 ,0.11696 ,0.02916 ,0.00664 ,0.07305
432      +,0.49757 ,0.27222  ,1.22971 ,0.11529 ,0.03050 ,0.00885 ,0.07293
433      +,0.49529 ,0.26862  ,1.18314 ,0.11363 ,0.03157 ,0.01070 ,0.07264
434      +,0.49287 ,0.26515  ,1.13936 ,0.11200 ,0.03241 ,0.01228 ,0.07225
435      +,0.49032 ,0.26188  ,1.09831 ,0.11041 ,0.03311 ,0.01370 ,0.07179
436      +,0.48759 ,0.25866  ,1.05932 ,0.10880 ,0.03361 ,0.01487 ,0.07124
437      +,0.48485 ,0.25555  ,1.02284 ,0.10724 ,0.03403 ,0.01588 ,0.07067
438      +,0.48213 ,0.25257  ,0.98875 ,0.10573 ,0.03438 ,0.01677 ,0.07009
439      +,0.47928 ,0.24967  ,0.95627 ,0.10418 ,0.03462 ,0.01748 ,0.06944
440      +,0.47652 ,0.24689  ,0.92600 ,0.10269 ,0.03482 ,0.01812 ,0.06880
441      +,0.47377 ,0.24415  ,0.89730 ,0.10123 ,0.03497 ,0.01869 ,0.06813
442      +,0.47103 ,0.24151  ,0.87031 ,0.09982 ,0.03506 ,0.01917 ,0.06747/
443       DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),K=1,19)/
444      + 0.55309 ,0.31501  ,1.39900 ,0.10150 ,0.00220 ,0.00007 ,0.05185
445      +,0.55081 ,0.30709  ,1.32944 ,0.10014 ,0.00752 ,0.00011 ,0.05386
446      +,0.54743 ,0.29970  ,1.25866 ,0.09845 ,0.01147 ,0.00005 ,0.05498
447      +,0.54316 ,0.29287  ,1.18944 ,0.09657 ,0.01430 ,0.00006 ,0.05547
448      +,0.53858 ,0.28646  ,1.12512 ,0.09460 ,0.01652 ,0.00009 ,0.05560
449      +,0.53372 ,0.28058  ,1.06557 ,0.09266 ,0.01818 ,0.00077 ,0.05545
450      +,0.52873 ,0.27497  ,1.01052 ,0.09070 ,0.01951 ,0.00282 ,0.05517
451      +,0.52366 ,0.26968  ,0.95968 ,0.08879 ,0.02049 ,0.00463 ,0.05472
452      +,0.51851 ,0.26468  ,0.91282 ,0.08694 ,0.02127 ,0.00605 ,0.05416
453      +,0.51342 ,0.25988  ,0.86968 ,0.08512 ,0.02190 ,0.00727 ,0.05355
454      +,0.50844 ,0.25533  ,0.83001 ,0.08336 ,0.02240 ,0.00831 ,0.05292
455      +,0.50359 ,0.25103  ,0.79355 ,0.08167 ,0.02278 ,0.00919 ,0.05226
456      +,0.49863 ,0.24693  ,0.75960 ,0.08003 ,0.02299 ,0.00993 ,0.05155
457      +,0.49383 ,0.24299  ,0.72824 ,0.07844 ,0.02316 ,0.01056 ,0.05087
458      +,0.48920 ,0.23922  ,0.69926 ,0.07692 ,0.02330 ,0.01110 ,0.05021
459      +,0.48461 ,0.23557  ,0.67216 ,0.07549 ,0.02333 ,0.01154 ,0.04945
460      +,0.48015 ,0.23213  ,0.64711 ,0.07411 ,0.02334 ,0.01192 ,0.04875
461      +,0.47566 ,0.22886  ,0.62363 ,0.07274 ,0.02334 ,0.01223 ,0.04812
462      +,0.47132 ,0.22570  ,0.60177 ,0.07143 ,0.02331 ,0.01250 ,0.04750/
463       DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),K=1,19)/
464      + 0.59154 ,0.31486  ,1.19212 ,0.08196 ,0.00172 ,0.00011 ,0.04191
465      +,0.58290 ,0.30406  ,1.10493 ,0.07979 ,0.00569 ,0.00018 ,0.04283
466      +,0.57418 ,0.29429  ,1.02498 ,0.07756 ,0.00857 ,0.00014 ,0.04312
467      +,0.56522 ,0.28546  ,0.95231 ,0.07535 ,0.01055 ,0.00016 ,0.04298
468      +,0.55652 ,0.27740  ,0.88769 ,0.07316 ,0.01207 ,0.00014 ,0.04264
469      +,0.54795 ,0.27007  ,0.82998 ,0.07107 ,0.01323 ,0.00063 ,0.04221
470      +,0.53981 ,0.26311  ,0.77811 ,0.06909 ,0.01403 ,0.00203 ,0.04163
471      +,0.53180 ,0.25670  ,0.73143 ,0.06717 ,0.01465 ,0.00325 ,0.04099
472      +,0.52392 ,0.25076  ,0.68926 ,0.06535 ,0.01513 ,0.00428 ,0.04029
473      +,0.51632 ,0.24517  ,0.65117 ,0.06361 ,0.01549 ,0.00510 ,0.03962
474      +,0.50908 ,0.23987  ,0.61668 ,0.06195 ,0.01573 ,0.00577 ,0.03895
475      +,0.50221 ,0.23487  ,0.58536 ,0.06038 ,0.01589 ,0.00634 ,0.03826
476      +,0.49535 ,0.23016  ,0.55652 ,0.05888 ,0.01599 ,0.00680 ,0.03756
477      +,0.48874 ,0.22571  ,0.53025 ,0.05747 ,0.01606 ,0.00719 ,0.03687
478      +,0.48239 ,0.22152  ,0.50624 ,0.05614 ,0.01610 ,0.00751 ,0.03619
479      +,0.47624 ,0.21745  ,0.48403 ,0.05485 ,0.01605 ,0.00784 ,0.03555
480      +,0.47035 ,0.21358  ,0.46366 ,0.05363 ,0.01601 ,0.00811 ,0.03493
481      +,0.46460 ,0.20983  ,0.44482 ,0.05246 ,0.01596 ,0.00827 ,0.03431
482      +,0.45905 ,0.20630  ,0.42731 ,0.05135 ,0.01590 ,0.00841 ,0.03372/
483       DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),K=1,19)/
484      + 0.61515 ,0.30765  ,1.01225 ,0.06528 ,0.00122 ,0.00004 ,0.03324
485      +,0.60062 ,0.29427  ,0.91794 ,0.06281 ,0.00425 ,0.00006 ,0.03360
486      +,0.58659 ,0.28273  ,0.83634 ,0.06044 ,0.00641 ,0.00003 ,0.03345
487      +,0.57336 ,0.27239  ,0.76535 ,0.05818 ,0.00784 ,0.00001 ,0.03304
488      +,0.56093 ,0.26307  ,0.70414 ,0.05606 ,0.00888 ,0.00004 ,0.03255
489      +,0.54929 ,0.25455  ,0.65085 ,0.05410 ,0.00966 ,0.00035 ,0.03190
490      +,0.53817 ,0.24677  ,0.60395 ,0.05218 ,0.01028 ,0.00140 ,0.03130
491      +,0.52763 ,0.23955  ,0.56248 ,0.05042 ,0.01063 ,0.00232 ,0.03067
492      +,0.51747 ,0.23298  ,0.52557 ,0.04879 ,0.01090 ,0.00308 ,0.02999
493      +,0.50782 ,0.22680  ,0.49271 ,0.04725 ,0.01111 ,0.00367 ,0.02932
494      +,0.49866 ,0.22101  ,0.46331 ,0.04579 ,0.01126 ,0.00413 ,0.02869
495      +,0.48993 ,0.21566  ,0.43688 ,0.04443 ,0.01133 ,0.00452 ,0.02807
496      +,0.48154 ,0.21054  ,0.41300 ,0.04315 ,0.01139 ,0.00484 ,0.02740
497      +,0.47359 ,0.20569  ,0.39138 ,0.04195 ,0.01137 ,0.00510 ,0.02679
498      +,0.46606 ,0.20112  ,0.37173 ,0.04083 ,0.01131 ,0.00530 ,0.02624
499      +,0.45871 ,0.19678  ,0.35364 ,0.03971 ,0.01131 ,0.00545 ,0.02567
500      +,0.45168 ,0.19274  ,0.33719 ,0.03867 ,0.01128 ,0.00558 ,0.02512
501      +,0.44477 ,0.18898  ,0.32219 ,0.03773 ,0.01119 ,0.00571 ,0.02457
502      +,0.43821 ,0.18536  ,0.30830 ,0.03682 ,0.01109 ,0.00581 ,0.02406/
503       DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),K=1,19)/
504      + 0.62611 ,0.29483  ,0.85630 ,0.05122 ,0.00093 ,0.00006 ,0.02609
505      +,0.60577 ,0.27984  ,0.76143 ,0.04881 ,0.00321 ,0.00000 ,0.02601
506      +,0.58726 ,0.26691  ,0.68254 ,0.04654 ,0.00475 ,0.00001 ,0.02570
507      +,0.57019 ,0.25543  ,0.61608 ,0.04448 ,0.00580 ,0.00001 ,0.02515
508      +,0.55450 ,0.24529  ,0.56016 ,0.04256 ,0.00652 ,0.00008 ,0.02457
509      +,0.53998 ,0.23614  ,0.51235 ,0.04077 ,0.00705 ,0.00035 ,0.02404
510      +,0.52643 ,0.22783  ,0.47101 ,0.03915 ,0.00741 ,0.00109 ,0.02338
511      +,0.51353 ,0.22039  ,0.43510 ,0.03767 ,0.00764 ,0.00174 ,0.02271
512      +,0.50162 ,0.21333  ,0.40353 ,0.03626 ,0.00780 ,0.00221 ,0.02210
513      +,0.49045 ,0.20674  ,0.37571 ,0.03493 ,0.00795 ,0.00255 ,0.02149
514      +,0.47983 ,0.20072  ,0.35107 ,0.03371 ,0.00806 ,0.00283 ,0.02088
515      +,0.46969 ,0.19525  ,0.32910 ,0.03259 ,0.00807 ,0.00310 ,0.02031
516      +,0.46007 ,0.19003  ,0.30943 ,0.03150 ,0.00804 ,0.00332 ,0.01983
517      +,0.45102 ,0.18512  ,0.29171 ,0.03050 ,0.00799 ,0.00349 ,0.01934
518      +,0.44252 ,0.18050  ,0.27571 ,0.02959 ,0.00794 ,0.00364 ,0.01884
519      +,0.43410 ,0.17625  ,0.26131 ,0.02870 ,0.00791 ,0.00373 ,0.01837
520      +,0.42616 ,0.17224  ,0.24819 ,0.02788 ,0.00786 ,0.00383 ,0.01793
521      +,0.41862 ,0.16836  ,0.23609 ,0.02712 ,0.00775 ,0.00393 ,0.01753
522      +,0.41146 ,0.16467  ,0.22508 ,0.02639 ,0.00767 ,0.00399 ,0.01713/
523       DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),K=1,19)/
524      + 0.62579 ,0.27822  ,0.72125 ,0.03968 ,0.00068 ,0.00003 ,0.02012
525      +,0.60056 ,0.26198  ,0.62992 ,0.03746 ,0.00237 ,0.00002 ,0.01990
526      +,0.57808 ,0.24811  ,0.55630 ,0.03544 ,0.00351 ,0.00009 ,0.01952
527      +,0.55770 ,0.23612  ,0.49585 ,0.03360 ,0.00428 ,0.00007 ,0.01899
528      +,0.53926 ,0.22555  ,0.44593 ,0.03195 ,0.00481 ,0.00002 ,0.01842
529      +,0.52251 ,0.21605  ,0.40404 ,0.03044 ,0.00516 ,0.00020 ,0.01786
530      +,0.50699 ,0.20751  ,0.36829 ,0.02907 ,0.00543 ,0.00084 ,0.01727
531      +,0.49244 ,0.19983  ,0.33741 ,0.02786 ,0.00552 ,0.00127 ,0.01670
532      +,0.47912 ,0.19259  ,0.31067 ,0.02667 ,0.00564 ,0.00161 ,0.01619
533      +,0.46655 ,0.18607  ,0.28741 ,0.02557 ,0.00571 ,0.00186 ,0.01573
534      +,0.45476 ,0.18009  ,0.26698 ,0.02459 ,0.00575 ,0.00205 ,0.01524
535      +,0.44385 ,0.17443  ,0.24890 ,0.02371 ,0.00578 ,0.00219 ,0.01471
536      +,0.43318 ,0.16937  ,0.23289 ,0.02287 ,0.00569 ,0.00237 ,0.01433
537      +,0.42325 ,0.16460  ,0.21862 ,0.02207 ,0.00566 ,0.00246 ,0.01392
538      +,0.41398 ,0.16013  ,0.20582 ,0.02131 ,0.00567 ,0.00249 ,0.01349
539      +,0.40518 ,0.15581  ,0.19419 ,0.02065 ,0.00555 ,0.00257 ,0.01310
540      +,0.39686 ,0.15181  ,0.18368 ,0.02002 ,0.00546 ,0.00264 ,0.01274
541      +,0.38882 ,0.14812  ,0.17409 ,0.01940 ,0.00543 ,0.00271 ,0.01238
542      +,0.38120 ,0.14462  ,0.16541 ,0.01881 ,0.00538 ,0.00274 ,0.01207/
543       DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),K=1,19)/
544      + 0.61599 ,0.25895  ,0.60433 ,0.03025 ,0.00055 ,0.00007 ,0.01535
545      +,0.58641 ,0.24209  ,0.51904 ,0.02832 ,0.00181 ,0.00009 ,0.01510
546      +,0.56089 ,0.22761  ,0.45219 ,0.02657 ,0.00264 ,0.00023 ,0.01468
547      +,0.53784 ,0.21527  ,0.39823 ,0.02504 ,0.00321 ,0.00005 ,0.01422
548      +,0.51726 ,0.20452  ,0.35430 ,0.02366 ,0.00360 ,0.00004 ,0.01369
549      +,0.49859 ,0.19513  ,0.31809 ,0.02243 ,0.00385 ,0.00018 ,0.01319
550      +,0.48181 ,0.18640  ,0.28744 ,0.02133 ,0.00399 ,0.00059 ,0.01270
551      +,0.46591 ,0.17889  ,0.26151 ,0.02032 ,0.00412 ,0.00092 ,0.01221
552      +,0.45125 ,0.17203  ,0.23917 ,0.01942 ,0.00411 ,0.00109 ,0.01179
553      +,0.43788 ,0.16558  ,0.21998 ,0.01858 ,0.00410 ,0.00128 ,0.01138
554      +,0.42544 ,0.15964  ,0.20325 ,0.01778 ,0.00414 ,0.00144 ,0.01100
555      +,0.41369 ,0.15428  ,0.18842 ,0.01700 ,0.00420 ,0.00152 ,0.01068
556      +,0.40275 ,0.14918  ,0.17545 ,0.01636 ,0.00418 ,0.00166 ,0.01026
557      +,0.39250 ,0.14448  ,0.16402 ,0.01576 ,0.00410 ,0.00175 ,0.00990
558      +,0.38288 ,0.14015  ,0.15388 ,0.01522 ,0.00397 ,0.00180 ,0.00959
559      +,0.37359 ,0.13613  ,0.14466 ,0.01470 ,0.00391 ,0.00184 ,0.00930
560      +,0.36489 ,0.13238  ,0.13637 ,0.01420 ,0.00386 ,0.00187 ,0.00902
561      +,0.35668 ,0.12883  ,0.12886 ,0.01372 ,0.00381 ,0.00189 ,0.00874
562      +,0.34898 ,0.12544  ,0.12209 ,0.01326 ,0.00378 ,0.00190 ,0.00849/
563       DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),K=1,19)/
564      + 0.59823 ,0.23791  ,0.50373 ,0.02268 ,0.00040 ,0.00011 ,0.01172
565      +,0.56542 ,0.22068  ,0.42589 ,0.02109 ,0.00143 ,0.00007 ,0.01126
566      +,0.53693 ,0.20635  ,0.36581 ,0.01967 ,0.00200 ,0.00011 ,0.01093
567      +,0.51186 ,0.19421  ,0.31863 ,0.01841 ,0.00243 ,0.00007 ,0.01053
568      +,0.48971 ,0.18361  ,0.28090 ,0.01733 ,0.00268 ,0.00006 ,0.01008
569      +,0.46996 ,0.17420  ,0.24995 ,0.01635 ,0.00286 ,0.00018 ,0.00964
570      +,0.45164 ,0.16615  ,0.22413 ,0.01553 ,0.00293 ,0.00043 ,0.00922
571      +,0.43528 ,0.15859  ,0.20249 ,0.01471 ,0.00301 ,0.00063 ,0.00882
572      +,0.42020 ,0.15179  ,0.18404 ,0.01396 ,0.00305 ,0.00085 ,0.00848
573      +,0.40621 ,0.14564  ,0.16828 ,0.01332 ,0.00305 ,0.00097 ,0.00812
574      +,0.39326 ,0.14003  ,0.15466 ,0.01274 ,0.00302 ,0.00104 ,0.00781
575      +,0.38126 ,0.13488  ,0.14274 ,0.01217 ,0.00295 ,0.00108 ,0.00761
576      +,0.37023 ,0.13011  ,0.13244 ,0.01162 ,0.00291 ,0.00118 ,0.00731
577      +,0.35980 ,0.12573  ,0.12329 ,0.01115 ,0.00286 ,0.00122 ,0.00705
578      +,0.34996 ,0.12168  ,0.11512 ,0.01073 ,0.00281 ,0.00124 ,0.00683
579      +,0.34071 ,0.11782  ,0.10788 ,0.01035 ,0.00278 ,0.00132 ,0.00657
580      +,0.33206 ,0.11423  ,0.10138 ,0.00999 ,0.00274 ,0.00136 ,0.00634
581      +,0.32388 ,0.11087  ,0.09548 ,0.00960 ,0.00269 ,0.00135 ,0.00616
582      +,0.31612 ,0.10771  ,0.09019 ,0.00925 ,0.00266 ,0.00135 ,0.00599/
583       DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),K=1,19)/
584      + 0.57396 ,0.21594  ,0.41751 ,0.01678 ,0.00036 ,0.00006 ,0.00864
585      +,0.53831 ,0.19906  ,0.34744 ,0.01542 ,0.00117 ,0.00010 ,0.00838
586      +,0.50801 ,0.18500  ,0.29476 ,0.01435 ,0.00155 ,0.00004 ,0.00802
587      +,0.48162 ,0.17304  ,0.25378 ,0.01341 ,0.00178 ,0.00005 ,0.00765
588      +,0.45843 ,0.16279  ,0.22154 ,0.01252 ,0.00199 ,0.00006 ,0.00734
589      +,0.43773 ,0.15393  ,0.19543 ,0.01173 ,0.00213 ,0.00015 ,0.00705
590      +,0.41906 ,0.14612  ,0.17396 ,0.01107 ,0.00215 ,0.00032 ,0.00672
591      +,0.40223 ,0.13894  ,0.15615 ,0.01048 ,0.00220 ,0.00048 ,0.00638
592      +,0.38685 ,0.13245  ,0.14118 ,0.00993 ,0.00218 ,0.00061 ,0.00614
593      +,0.37280 ,0.12666  ,0.12840 ,0.00940 ,0.00218 ,0.00072 ,0.00589
594      +,0.35993 ,0.12140  ,0.11742 ,0.00891 ,0.00217 ,0.00081 ,0.00563
595      +,0.34806 ,0.11658  ,0.10796 ,0.00847 ,0.00213 ,0.00086 ,0.00538
596      +,0.33660 ,0.11217  ,0.09963 ,0.00813 ,0.00216 ,0.00091 ,0.00522
597      +,0.32608 ,0.10811  ,0.09235 ,0.00779 ,0.00212 ,0.00093 ,0.00502
598      +,0.31639 ,0.10436  ,0.08594 ,0.00746 ,0.00204 ,0.00094 ,0.00481
599      +,0.30733 ,0.10079  ,0.08025 ,0.00716 ,0.00201 ,0.00094 ,0.00463
600      +,0.29882 ,0.09749  ,0.07518 ,0.00690 ,0.00197 ,0.00094 ,0.00447
601      +,0.29067 ,0.09439  ,0.07063 ,0.00666 ,0.00193 ,0.00093 ,0.00433
602      +,0.28301 ,0.09152  ,0.06654 ,0.00642 ,0.00189 ,0.00092 ,0.00419/
603       DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),K=1,19)/
604      + 0.54390 ,0.19458  ,0.34416 ,0.01236 ,0.00015 ,-0.00010 ,0.00618
605      +,0.50663 ,0.17804  ,0.28213 ,0.01126 ,0.00079 ,-0.00004 ,0.00602
606      +,0.47501 ,0.16455  ,0.23639 ,0.01044 ,0.00110 ,0.00001 ,0.00567
607      +,0.44807 ,0.15293  ,0.20148 ,0.00968 ,0.00126 ,-0.00003 ,0.00544
608      +,0.42431 ,0.14327  ,0.17437 ,0.00903 ,0.00136 ,-0.00002 ,0.00518
609      +,0.40345 ,0.13485  ,0.15276 ,0.00845 ,0.00144 ,-0.00006 ,0.00487
610      +,0.38467 ,0.12741  ,0.13502 ,0.00790 ,0.00153 ,0.00017 ,0.00470
611      +,0.36794 ,0.12074  ,0.12044 ,0.00741 ,0.00150 ,0.00030 ,0.00447
612      +,0.35259 ,0.11478  ,0.10815 ,0.00698 ,0.00154 ,0.00035 ,0.00428
613      +,0.33857 ,0.10936  ,0.09786 ,0.00664 ,0.00155 ,0.00041 ,0.00408
614      +,0.32575 ,0.10448  ,0.08909 ,0.00631 ,0.00154 ,0.00046 ,0.00389
615      +,0.31394 ,0.10016  ,0.08147 ,0.00596 ,0.00155 ,0.00047 ,0.00375
616      +,0.30293 ,0.09603  ,0.07500 ,0.00573 ,0.00145 ,0.00055 ,0.00356
617      +,0.29267 ,0.09230  ,0.06931 ,0.00548 ,0.00139 ,0.00060 ,0.00344
618      +,0.28310 ,0.08891  ,0.06427 ,0.00523 ,0.00137 ,0.00065 ,0.00337
619      +,0.27440 ,0.08565  ,0.05987 ,0.00500 ,0.00137 ,0.00064 ,0.00318
620      +,0.26627 ,0.08265  ,0.05595 ,0.00478 ,0.00136 ,0.00062 ,0.00303
621      +,0.25850 ,0.07988  ,0.05241 ,0.00457 ,0.00128 ,0.00058 ,0.00295
622      +,0.25121 ,0.07729  ,0.04924 ,0.00439 ,0.00125 ,0.00057 ,0.00286/
623       DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),K=1,19)/
624      + 0.51018 ,0.17253  ,0.28091 ,0.00872 ,0.00030 ,0.00012 ,0.00459
625      +,0.47177 ,0.15689  ,0.22698 ,0.00797 ,0.00067 ,0.00012 ,0.00438
626      +,0.43970 ,0.14411  ,0.18805 ,0.00734 ,0.00086 ,0.00007 ,0.00414
627      +,0.41218 ,0.13354  ,0.15885 ,0.00679 ,0.00094 ,0.00007 ,0.00393
628      +,0.38866 ,0.12442  ,0.13626 ,0.00625 ,0.00104 ,0.00007 ,0.00378
629      +,0.36776 ,0.11659  ,0.11836 ,0.00585 ,0.00111 ,0.00016 ,0.00358
630      +,0.34939 ,0.10973  ,0.10393 ,0.00546 ,0.00116 ,0.00026 ,0.00337
631      +,0.33260 ,0.10368  ,0.09218 ,0.00515 ,0.00118 ,0.00031 ,0.00317
632      +,0.31775 ,0.09814  ,0.08234 ,0.00483 ,0.00120 ,0.00034 ,0.00300
633      +,0.30425 ,0.09318  ,0.07413 ,0.00452 ,0.00116 ,0.00039 ,0.00287
634      +,0.29174 ,0.08877  ,0.06717 ,0.00429 ,0.00108 ,0.00041 ,0.00274
635      +,0.28012 ,0.08481  ,0.06116 ,0.00415 ,0.00102 ,0.00036 ,0.00261
636      +,0.26954 ,0.08123  ,0.05607 ,0.00390 ,0.00104 ,0.00040 ,0.00245
637      +,0.25975 ,0.07792  ,0.05162 ,0.00371 ,0.00103 ,0.00044 ,0.00235
638      +,0.25068 ,0.07485  ,0.04771 ,0.00358 ,0.00101 ,0.00046 ,0.00228
639      +,0.24233 ,0.07191  ,0.04427 ,0.00342 ,0.00095 ,0.00044 ,0.00215
640      +,0.23456 ,0.06922  ,0.04123 ,0.00328 ,0.00090 ,0.00042 ,0.00205
641      +,0.22718 ,0.06677  ,0.03854 ,0.00314 ,0.00089 ,0.00040 ,0.00198
642      +,0.22027 ,0.06449  ,0.03614 ,0.00302 ,0.00088 ,0.00040 ,0.00192/
643       DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),K=1,19)/
644      + 0.47325 ,0.15204  ,0.22797 ,0.00623 ,0.00009 ,-0.00003 ,0.00321
645      +,0.43461 ,0.13739  ,0.18192 ,0.00566 ,0.00038 ,-0.00002 ,0.00305
646      +,0.40268 ,0.12544  ,0.14898 ,0.00520 ,0.00055 ,0.00000 ,0.00284
647      +,0.37554 ,0.11557  ,0.12458 ,0.00476 ,0.00063 ,0.00002 ,0.00276
648      +,0.35236 ,0.10724  ,0.10601 ,0.00439 ,0.00072 ,-0.00001 ,0.00257
649      +,0.33213 ,0.10006  ,0.09139 ,0.00405 ,0.00075 ,0.00001 ,0.00243
650      +,0.31403 ,0.09378  ,0.07983 ,0.00389 ,0.00075 ,0.00015 ,0.00227
651      +,0.29813 ,0.08826  ,0.07026 ,0.00355 ,0.00076 ,0.00012 ,0.00215
652      +,0.28375 ,0.08331  ,0.06242 ,0.00334 ,0.00073 ,0.00017 ,0.00203
653      +,0.27061 ,0.07890  ,0.05593 ,0.00317 ,0.00071 ,0.00019 ,0.00192
654      +,0.25865 ,0.07496  ,0.05046 ,0.00299 ,0.00072 ,0.00018 ,0.00183
655      +,0.24775 ,0.07140  ,0.04581 ,0.00281 ,0.00074 ,0.00018 ,0.00177
656      +,0.23776 ,0.06811  ,0.04182 ,0.00268 ,0.00072 ,0.00020 ,0.00169
657      +,0.22861 ,0.06511  ,0.03838 ,0.00254 ,0.00069 ,0.00023 ,0.00160
658      +,0.22020 ,0.06235  ,0.03539 ,0.00242 ,0.00066 ,0.00027 ,0.00152
659      +,0.21234 ,0.05982  ,0.03275 ,0.00230 ,0.00064 ,0.00029 ,0.00146
660      +,0.20504 ,0.05750  ,0.03042 ,0.00220 ,0.00062 ,0.00030 ,0.00140
661      +,0.19812 ,0.05536  ,0.02835 ,0.00211 ,0.00060 ,0.00027 ,0.00133
662      +,0.19170 ,0.05335  ,0.02652 ,0.00202 ,0.00058 ,0.00026 ,0.00127/
663       DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),K=1,19)/
664      + 0.43433 ,0.13227  ,0.18329 ,0.00426 ,0.00017 ,0.00007 ,0.00226
665      +,0.39630 ,0.11863  ,0.14439 ,0.00386 ,0.00033 ,0.00006 ,0.00214
666      +,0.36484 ,0.10777  ,0.11696 ,0.00351 ,0.00047 ,-0.00009 ,0.00205
667      +,0.33856 ,0.09885  ,0.09677 ,0.00321 ,0.00050 ,0.00005 ,0.00192
668      +,0.31594 ,0.09125  ,0.08167 ,0.00302 ,0.00056 ,0.00001 ,0.00173
669      +,0.29656 ,0.08481  ,0.06987 ,0.00280 ,0.00055 ,0.00005 ,0.00163
670      +,0.27944 ,0.07919  ,0.06061 ,0.00259 ,0.00052 ,0.00006 ,0.00153
671      +,0.26413 ,0.07424  ,0.05310 ,0.00242 ,0.00052 ,0.00013 ,0.00146
672      +,0.25033 ,0.06987  ,0.04698 ,0.00227 ,0.00052 ,0.00013 ,0.00134
673      +,0.23812 ,0.06594  ,0.04189 ,0.00212 ,0.00053 ,0.00015 ,0.00130
674      +,0.22707 ,0.06242  ,0.03762 ,0.00199 ,0.00053 ,0.00018 ,0.00126
675      +,0.21683 ,0.05930  ,0.03403 ,0.00189 ,0.00050 ,0.00018 ,0.00119
676      +,0.20768 ,0.05647  ,0.03095 ,0.00175 ,0.00049 ,0.00021 ,0.00115
677      +,0.19914 ,0.05387  ,0.02831 ,0.00165 ,0.00047 ,0.00020 ,0.00109
678      +,0.19119 ,0.05147  ,0.02603 ,0.00158 ,0.00044 ,0.00017 ,0.00102
679      +,0.18386 ,0.04923  ,0.02401 ,0.00154 ,0.00042 ,0.00017 ,0.00095
680      +,0.17712 ,0.04719  ,0.02225 ,0.00148 ,0.00040 ,0.00018 ,0.00090
681      +,0.17086 ,0.04531  ,0.02071 ,0.00141 ,0.00038 ,0.00021 ,0.00088
682      +,0.16502 ,0.04359  ,0.01934 ,0.00133 ,0.00038 ,0.00021 ,0.00085/
683       DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),K=1,19)/
684      + 0.39463 ,0.11389  ,0.14623 ,0.00286 ,0.00012 ,0.00005 ,0.00158
685      +,0.35769 ,0.10159  ,0.11376 ,0.00258 ,0.00028 ,0.00003 ,0.00147
686      +,0.32705 ,0.09184  ,0.09127 ,0.00247 ,0.00036 ,0.00001 ,0.00130
687      +,0.30202 ,0.08375  ,0.07481 ,0.00225 ,0.00032 ,0.00002 ,0.00123
688      +,0.28058 ,0.07695  ,0.06256 ,0.00211 ,0.00034 ,-0.00003 ,0.00113
689      +,0.26237 ,0.07125  ,0.05320 ,0.00186 ,0.00035 ,0.00000 ,0.00108
690      +,0.24600 ,0.06628  ,0.04583 ,0.00179 ,0.00033 ,0.00004 ,0.00099
691      +,0.23178 ,0.06195  ,0.03995 ,0.00164 ,0.00032 ,0.00004 ,0.00091
692      +,0.21926 ,0.05809  ,0.03515 ,0.00149 ,0.00032 ,0.00007 ,0.00087
693      +,0.20771 ,0.05472  ,0.03119 ,0.00142 ,0.00033 ,0.00009 ,0.00084
694      +,0.19731 ,0.05170  ,0.02791 ,0.00135 ,0.00034 ,0.00010 ,0.00081
695      +,0.18820 ,0.04889  ,0.02518 ,0.00123 ,0.00031 ,0.00011 ,0.00076
696      +,0.17928 ,0.04642  ,0.02280 ,0.00125 ,0.00031 ,0.00008 ,0.00069
697      +,0.17139 ,0.04416  ,0.02078 ,0.00121 ,0.00029 ,0.00007 ,0.00065
698      +,0.16434 ,0.04210  ,0.01904 ,0.00113 ,0.00027 ,0.00009 ,0.00061
699      +,0.15778 ,0.04021  ,0.01753 ,0.00105 ,0.00025 ,0.00008 ,0.00057
700      +,0.15174 ,0.03848  ,0.01621 ,0.00097 ,0.00023 ,0.00008 ,0.00055
701      +,0.14612 ,0.03688  ,0.01505 ,0.00091 ,0.00025 ,0.00009 ,0.00054
702      +,0.14086 ,0.03540  ,0.01402 ,0.00085 ,0.00025 ,0.00009 ,0.00053/
703       DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),K=1,19)/
704      + 0.35448 ,0.09708  ,0.11549 ,0.00198 ,0.00005 ,0.00001 ,0.00102
705      +,0.31886 ,0.08596  ,0.08853 ,0.00180 ,0.00014 ,0.00002 ,0.00096
706      +,0.29028 ,0.07719  ,0.07005 ,0.00157 ,0.00024 ,0.00001 ,0.00089
707      +,0.26652 ,0.06986  ,0.05699 ,0.00146 ,0.00024 ,0.00000 ,0.00086
708      +,0.24643 ,0.06398  ,0.04726 ,0.00132 ,0.00030 ,0.00001 ,0.00081
709      +,0.22913 ,0.05895  ,0.03986 ,0.00129 ,0.00024 ,-0.00001 ,0.00073
710      +,0.21436 ,0.05457  ,0.03413 ,0.00112 ,0.00026 ,-0.00001 ,0.00066
711      +,0.20130 ,0.05082  ,0.02953 ,0.00099 ,0.00024 ,0.00001 ,0.00063
712      +,0.18929 ,0.04753  ,0.02586 ,0.00097 ,0.00023 ,0.00002 ,0.00058
713      +,0.17871 ,0.04460  ,0.02285 ,0.00093 ,0.00023 ,0.00005 ,0.00055
714      +,0.16937 ,0.04199  ,0.02035 ,0.00086 ,0.00023 ,0.00007 ,0.00054
715      +,0.16091 ,0.03968  ,0.01826 ,0.00079 ,0.00021 ,0.00005 ,0.00052
716      +,0.15318 ,0.03754  ,0.01650 ,0.00074 ,0.00022 ,0.00007 ,0.00049
717      +,0.14615 ,0.03560  ,0.01500 ,0.00070 ,0.00022 ,0.00009 ,0.00047
718      +,0.13974 ,0.03384  ,0.01371 ,0.00069 ,0.00022 ,0.00011 ,0.00045
719      +,0.13379 ,0.03224  ,0.01259 ,0.00063 ,0.00020 ,0.00009 ,0.00041
720      +,0.12833 ,0.03077  ,0.01161 ,0.00058 ,0.00019 ,0.00008 ,0.00039
721      +,0.12330 ,0.02939  ,0.01075 ,0.00055 ,0.00018 ,0.00007 ,0.00038
722      +,0.11861 ,0.02814  ,0.00999 ,0.00052 ,0.00018 ,0.00008 ,0.00037/
723       DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),K=1,19)/
724      + 0.31515 ,0.08181  ,0.09041 ,0.00133 ,0.00003 ,-0.00003 ,0.00064
725      +,0.28168 ,0.07191  ,0.06845 ,0.00119 ,0.00007 ,0.00000 ,0.00062
726      +,0.25480 ,0.06416  ,0.05361 ,0.00105 ,0.00012 ,-0.00002 ,0.00057
727      +,0.23277 ,0.05790  ,0.04312 ,0.00098 ,0.00015 ,0.00000 ,0.00055
728      +,0.21430 ,0.05272  ,0.03549 ,0.00086 ,0.00014 ,-0.00002 ,0.00050
729      +,0.19858 ,0.04835  ,0.02976 ,0.00079 ,0.00018 ,-0.00002 ,0.00047
730      +,0.18481 ,0.04466  ,0.02532 ,0.00074 ,0.00019 ,0.00004 ,0.00047
731      +,0.17272 ,0.04143  ,0.02180 ,0.00070 ,0.00016 ,0.00004 ,0.00040
732      +,0.16206 ,0.03862  ,0.01900 ,0.00065 ,0.00015 ,0.00003 ,0.00038
733      +,0.15264 ,0.03612  ,0.01671 ,0.00058 ,0.00015 ,0.00000 ,0.00036
734      +,0.14418 ,0.03389  ,0.01483 ,0.00054 ,0.00015 ,-0.00001 ,0.00032
735      +,0.13648 ,0.03187  ,0.01326 ,0.00057 ,0.00013 ,0.00002 ,0.00030
736      +,0.12962 ,0.03013  ,0.01194 ,0.00049 ,0.00012 ,0.00003 ,0.00028
737      +,0.12344 ,0.02852  ,0.01082 ,0.00044 ,0.00014 ,0.00004 ,0.00027
738      +,0.11784 ,0.02702  ,0.00986 ,0.00040 ,0.00016 ,0.00006 ,0.00027
739      +,0.11247 ,0.02568  ,0.00904 ,0.00040 ,0.00016 ,0.00005 ,0.00027
740      +,0.10760 ,0.02447  ,0.00832 ,0.00038 ,0.00015 ,0.00005 ,0.00026
741      +,0.10322 ,0.02336  ,0.00768 ,0.00033 ,0.00013 ,0.00006 ,0.00024
742      +,0.09913 ,0.02233  ,0.00712 ,0.00031 ,0.00013 ,0.00007 ,0.00023/
743       DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),K=1,19)/
744      + 0.27681 ,0.06790  ,0.06983 ,0.00083 ,0.00002 ,-0.00002 ,0.00042
745      +,0.24556 ,0.05938  ,0.05220 ,0.00080 ,0.00002 ,-0.00003 ,0.00034
746      +,0.22108 ,0.05270  ,0.04039 ,0.00071 ,0.00009 ,-0.00004 ,0.00039
747      +,0.20070 ,0.04733  ,0.03224 ,0.00064 ,0.00006 ,-0.00003 ,0.00031
748      +,0.18395 ,0.04290  ,0.02632 ,0.00056 ,0.00008 ,-0.00003 ,0.00028
749      +,0.16959 ,0.03916  ,0.02190 ,0.00053 ,0.00008 ,-0.00003 ,0.00026
750      +,0.15712 ,0.03603  ,0.01851 ,0.00052 ,0.00010 ,-0.00003 ,0.00023
751      +,0.14664 ,0.03330  ,0.01588 ,0.00039 ,0.00009 ,-0.00002 ,0.00024
752      +,0.13699 ,0.03093  ,0.01377 ,0.00041 ,0.00009 ,-0.00001 ,0.00021
753      +,0.12855 ,0.02884  ,0.01205 ,0.00040 ,0.00009 ,-0.00001 ,0.00019
754      +,0.12114 ,0.02699  ,0.01065 ,0.00035 ,0.00009 ,-0.00001 ,0.00019
755      +,0.11442 ,0.02534  ,0.00949 ,0.00031 ,0.00009 ,-0.00001 ,0.00020
756      +,0.10847 ,0.02383  ,0.00852 ,0.00028 ,0.00008 ,0.00001 ,0.00020
757      +,0.10300 ,0.02250  ,0.00769 ,0.00026 ,0.00008 ,0.00002 ,0.00019
758      +,0.09797 ,0.02131  ,0.00699 ,0.00024 ,0.00009 ,0.00003 ,0.00017
759      +,0.09334 ,0.02020  ,0.00639 ,0.00023 ,0.00009 ,0.00004 ,0.00018
760      +,0.08911 ,0.01920  ,0.00587 ,0.00022 ,0.00010 ,0.00004 ,0.00018
761      +,0.08520 ,0.01828  ,0.00542 ,0.00022 ,0.00010 ,0.00003 ,0.00016
762      +,0.08158 ,0.01744  ,0.00502 ,0.00022 ,0.00009 ,0.00003 ,0.00015/
763       DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),K=1,19)/
764      + 0.24016 ,0.05578  ,0.05331 ,0.00058 ,-0.00004 ,-0.00007 ,0.00021
765      +,0.21197 ,0.04834  ,0.03923 ,0.00047 ,0.00002 ,-0.00006 ,0.00020
766      +,0.18938 ,0.04260  ,0.03003 ,0.00041 ,0.00002 ,-0.00007 ,0.00018
767      +,0.17093 ,0.03811  ,0.02371 ,0.00041 ,0.00003 ,-0.00007 ,0.00017
768      +,0.15580 ,0.03436  ,0.01918 ,0.00038 ,0.00005 ,-0.00005 ,0.00017
769      +,0.14332 ,0.03123  ,0.01586 ,0.00030 ,0.00008 ,-0.00003 ,0.00020
770      +,0.13220 ,0.02863  ,0.01333 ,0.00031 ,0.00009 ,0.00001 ,0.00019
771      +,0.12274 ,0.02632  ,0.01135 ,0.00025 ,0.00007 ,-0.00004 ,0.00015
772      +,0.11443 ,0.02435  ,0.00979 ,0.00024 ,0.00009 ,-0.00002 ,0.00017
773      +,0.10695 ,0.02263  ,0.00854 ,0.00025 ,0.00009 ,0.00001 ,0.00016
774      +,0.10037 ,0.02111  ,0.00752 ,0.00023 ,0.00009 ,0.00002 ,0.00015
775      +,0.09470 ,0.01976  ,0.00667 ,0.00017 ,0.00009 ,0.00002 ,0.00015
776      +,0.08938 ,0.01853  ,0.00598 ,0.00016 ,0.00007 ,0.00001 ,0.00014
777      +,0.08458 ,0.01744  ,0.00539 ,0.00015 ,0.00007 ,0.00001 ,0.00013
778      +,0.08023 ,0.01646  ,0.00488 ,0.00015 ,0.00007 ,0.00001 ,0.00011
779      +,0.07627 ,0.01558  ,0.00445 ,0.00013 ,0.00007 ,0.00001 ,0.00012
780      +,0.07266 ,0.01478  ,0.00408 ,0.00012 ,0.00007 ,0.00002 ,0.00012
781      +,0.06930 ,0.01403  ,0.00375 ,0.00013 ,0.00007 ,0.00003 ,0.00010
782      +,0.06622 ,0.01335  ,0.00347 ,0.00012 ,0.00007 ,0.00004 ,0.00010/
783       DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),K=1,19)/
784      + 0.20587 ,0.04501  ,0.03998 ,0.00030 ,-0.00005 ,-0.00007 ,0.00013
785      +,0.18001 ,0.03878  ,0.02903 ,0.00030 ,-0.00003 ,-0.00006 ,0.00011
786      +,0.16000 ,0.03399  ,0.02194 ,0.00022 ,-0.00002 ,-0.00008 ,0.00008
787      +,0.14363 ,0.03015  ,0.01716 ,0.00026 ,0.00003 ,-0.00003 ,0.00012
788      +,0.13029 ,0.02707  ,0.01378 ,0.00023 ,0.00005 ,-0.00004 ,0.00011
789      +,0.11908 ,0.02449  ,0.01129 ,0.00022 ,0.00007 ,-0.00002 ,0.00012
790      +,0.10954 ,0.02233  ,0.00944 ,0.00017 ,0.00007 ,-0.00001 ,0.00013
791      +,0.10126 ,0.02045  ,0.00799 ,0.00015 ,0.00006 ,-0.00001 ,0.00012
792      +,0.09406 ,0.01887  ,0.00686 ,0.00012 ,0.00006 ,0.00000 ,0.00011
793      +,0.08772 ,0.01748  ,0.00596 ,0.00010 ,0.00008 ,0.00002 ,0.00011
794      +,0.08208 ,0.01624  ,0.00523 ,0.00010 ,0.00009 ,0.00003 ,0.00012
795      +,0.07704 ,0.01513  ,0.00463 ,0.00010 ,0.00008 ,0.00003 ,0.00012
796      +,0.07252 ,0.01417  ,0.00412 ,0.00009 ,0.00007 ,0.00003 ,0.00011
797      +,0.06844 ,0.01331  ,0.00370 ,0.00007 ,0.00007 ,0.00003 ,0.00010
798      +,0.06475 ,0.01253  ,0.00335 ,0.00007 ,0.00006 ,0.00002 ,0.00008
799      +,0.06134 ,0.01181  ,0.00305 ,0.00008 ,0.00007 ,0.00003 ,0.00009
800      +,0.05826 ,0.01117  ,0.00279 ,0.00008 ,0.00007 ,0.00003 ,0.00009
801      +,0.05547 ,0.01058  ,0.00256 ,0.00007 ,0.00005 ,0.00002 ,0.00008
802      +,0.05291 ,0.01005  ,0.00236 ,0.00006 ,0.00005 ,0.00002 ,0.00007/
803       DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),K=1,19)/
804      + 0.17389 ,0.03591  ,0.02965 ,0.00029 ,-0.00005 ,-0.00008 ,0.00000
805      +,0.15124 ,0.03071  ,0.02123 ,0.00021 ,-0.00003 ,-0.00010 ,0.00001
806      +,0.13355 ,0.02674  ,0.01589 ,0.00016 ,0.00000 ,-0.00009 ,0.00005
807      +,0.11932 ,0.02361  ,0.01230 ,0.00015 ,0.00002 ,-0.00003 ,0.00006
808      +,0.10764 ,0.02109  ,0.00980 ,0.00015 ,0.00001 ,-0.00004 ,0.00006
809      +,0.09798 ,0.01899  ,0.00799 ,0.00013 ,0.00004 ,-0.00004 ,0.00007
810      +,0.08951 ,0.01727  ,0.00664 ,0.00015 ,0.00003 ,-0.00002 ,0.00005
811      +,0.08245 ,0.01577  ,0.00560 ,0.00013 ,0.00003 ,-0.00001 ,0.00005
812      +,0.07647 ,0.01447  ,0.00478 ,0.00007 ,0.00002 ,-0.00001 ,0.00006
813      +,0.07106 ,0.01336  ,0.00414 ,0.00006 ,0.00002 ,0.00000 ,0.00005
814      +,0.06625 ,0.01238  ,0.00362 ,0.00007 ,0.00003 ,0.00000 ,0.00004
815      +,0.06208 ,0.01151  ,0.00319 ,0.00004 ,0.00002 ,0.00000 ,0.00006
816      +,0.05815 ,0.01074  ,0.00284 ,0.00007 ,0.00003 ,0.00001 ,0.00006
817      +,0.05473 ,0.01006  ,0.00255 ,0.00006 ,0.00003 ,0.00000 ,0.00005
818      +,0.05171 ,0.00945  ,0.00230 ,0.00004 ,0.00002 ,-0.00001 ,0.00003
819      +,0.04883 ,0.00890  ,0.00209 ,0.00005 ,0.00002 ,0.00000 ,0.00003
820      +,0.04625 ,0.00839  ,0.00190 ,0.00006 ,0.00003 ,0.00000 ,0.00004
821      +,0.04397 ,0.00793  ,0.00174 ,0.00005 ,0.00004 ,0.00001 ,0.00004
822      +,0.04186 ,0.00751  ,0.00161 ,0.00004 ,0.00004 ,0.00001 ,0.00004/
823       DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),K=1,19)/
824      + 0.14470 ,0.02798  ,0.02148 ,0.00013 ,-0.00003 ,-0.00001 ,0.00001
825      +,0.12483 ,0.02379  ,0.01521 ,0.00011 ,-0.00002 ,-0.00004 ,0.00002
826      +,0.10968 ,0.02063  ,0.01129 ,0.00008 ,-0.00002 ,-0.00003 ,0.00002
827      +,0.09731 ,0.01813  ,0.00869 ,0.00012 ,-0.00001 ,-0.00002 ,0.00003
828      +,0.08747 ,0.01610  ,0.00686 ,0.00010 ,0.00002 ,-0.00001 ,0.00003
829      +,0.07916 ,0.01446  ,0.00556 ,0.00009 ,0.00001 ,-0.00002 ,0.00003
830      +,0.07222 ,0.01309  ,0.00460 ,0.00008 ,0.00000 ,-0.00001 ,0.00003
831      +,0.06635 ,0.01192  ,0.00386 ,0.00005 ,0.00001 ,-0.00001 ,0.00002
832      +,0.06117 ,0.01091  ,0.00328 ,0.00004 ,0.00001 ,0.00000 ,0.00002
833      +,0.05663 ,0.01003  ,0.00283 ,0.00004 ,0.00001 ,0.00000 ,0.00002
834      +,0.05264 ,0.00928  ,0.00246 ,0.00003 ,0.00001 ,-0.00001 ,0.00002
835      +,0.04911 ,0.00861  ,0.00217 ,0.00004 ,0.00001 ,0.00000 ,0.00001
836      +,0.04595 ,0.00801  ,0.00192 ,0.00004 ,0.00000 ,0.00000 ,0.00001
837      +,0.04315 ,0.00748  ,0.00172 ,0.00004 ,0.00000 ,-0.00001 ,0.00001
838      +,0.04065 ,0.00701  ,0.00155 ,0.00002 ,-0.00001 ,-0.00002 ,0.00000
839      +,0.03829 ,0.00658  ,0.00140 ,0.00003 ,0.00000 ,-0.00002 ,0.00001
840      +,0.03618 ,0.00620  ,0.00128 ,0.00004 ,0.00001 ,-0.00001 ,0.00001
841      +,0.03428 ,0.00584  ,0.00117 ,0.00004 ,0.00000 ,0.00000 ,0.00001
842      +,0.03255 ,0.00552  ,0.00107 ,0.00004 ,0.00000 ,0.00000 ,0.00000/
843       DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),K=1,19)/
844      + 0.09486 ,0.01606  ,0.01058 ,0.00004 ,0.00000 ,0.00000 ,0.00001
845      +,0.08066 ,0.01342  ,0.00728 ,0.00002 ,-0.00001 ,-0.00001 ,0.00002
846      +,0.06974 ,0.01147  ,0.00526 ,0.00004 ,-0.00001 ,0.00000 ,0.00000
847      +,0.06120 ,0.00996  ,0.00396 ,0.00004 ,0.00001 ,-0.00001 ,0.00001
848      +,0.05441 ,0.00875  ,0.00308 ,0.00002 ,0.00000 ,-0.00001 ,0.00001
849      +,0.04882 ,0.00777  ,0.00246 ,0.00001 ,0.00001 ,0.00000 ,0.00001
850      +,0.04411 ,0.00697  ,0.00200 ,0.00000 ,0.00001 ,0.00001 ,0.00002
851      +,0.04004 ,0.00630  ,0.00166 ,0.00002 ,0.00001 ,0.00000 ,0.00002
852      +,0.03662 ,0.00571  ,0.00140 ,0.00001 ,0.00001 ,0.00000 ,0.00001
853      +,0.03366 ,0.00521  ,0.00120 ,0.00000 ,0.00001 ,0.00000 ,0.00001
854      +,0.03106 ,0.00478  ,0.00104 ,0.00001 ,0.00001 ,0.00000 ,0.00001
855      +,0.02877 ,0.00441  ,0.00090 ,0.00001 ,0.00001 ,0.00001 ,0.00001
856      +,0.02675 ,0.00407  ,0.00080 ,0.00001 ,0.00001 ,0.00000 ,0.00001
857      +,0.02495 ,0.00378  ,0.00071 ,0.00001 ,0.00001 ,0.00000 ,0.00001
858      +,0.02335 ,0.00352  ,0.00063 ,0.00001 ,0.00001 ,0.00000 ,0.00001
859      +,0.02190 ,0.00329  ,0.00057 ,0.00001 ,0.00001 ,0.00000 ,0.00001
860      +,0.02059 ,0.00308  ,0.00052 ,0.00001 ,0.00001 ,0.00000 ,0.00000
861      +,0.01942 ,0.00289  ,0.00047 ,0.00001 ,0.00000 ,0.00000 ,0.00000
862      +,0.01835 ,0.00272  ,0.00043 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
863       DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),K=1,19)/
864      + 0.05725 ,0.00838  ,0.00471 ,0.00003 ,0.00000 ,-0.00001 ,-0.00001
865      +,0.04784 ,0.00689  ,0.00314 ,0.00001 ,-0.00001 ,-0.00002 ,-0.00001
866      +,0.04084 ,0.00579  ,0.00221 ,0.00000 ,0.00000 ,-0.00002 ,0.00000
867      +,0.03534 ,0.00497  ,0.00163 ,0.00001 ,0.00000 ,0.00000 ,0.00001
868      +,0.03100 ,0.00431  ,0.00124 ,0.00001 ,0.00000 ,0.00000 ,0.00000
869      +,0.02748 ,0.00379  ,0.00098 ,0.00001 ,0.00000 ,-0.00001 ,0.00000
870      +,0.02460 ,0.00336  ,0.00079 ,0.00000 ,0.00000 ,0.00000 ,0.00000
871      +,0.02214 ,0.00300  ,0.00065 ,0.00000 ,0.00001 ,0.00000 ,0.00000
872      +,0.02005 ,0.00270  ,0.00054 ,0.00000 ,0.00000 ,0.00000 ,0.00000
873      +,0.01827 ,0.00245  ,0.00046 ,0.00000 ,0.00000 ,0.00000 ,0.00000
874      +,0.01673 ,0.00223  ,0.00039 ,0.00000 ,0.00000 ,0.00000 ,0.00000
875      +,0.01541 ,0.00204  ,0.00034 ,0.00000 ,0.00000 ,0.00000 ,0.00000
876      +,0.01421 ,0.00187  ,0.00030 ,0.00000 ,0.00000 ,0.00000 ,0.00000
877      +,0.01317 ,0.00173  ,0.00026 ,0.00000 ,0.00000 ,0.00000 ,0.00000
878      +,0.01227 ,0.00160  ,0.00024 ,0.00000 ,0.00000 ,0.00000 ,0.00000
879      +,0.01143 ,0.00148  ,0.00021 ,0.00000 ,0.00000 ,0.00000 ,0.00000
880      +,0.01068 ,0.00138  ,0.00019 ,0.00000 ,0.00000 ,0.00000 ,0.00000
881      +,0.01002 ,0.00129  ,0.00017 ,0.00000 ,0.00000 ,0.00000 ,0.00000
882      +,0.00942 ,0.00121  ,0.00016 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
883       DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),K=1,19)/
884      + 0.03076 ,0.00380  ,0.00180 ,0.00001 ,-0.00001 ,-0.00001 ,-0.00001
885      +,0.02523 ,0.00307  ,0.00116 ,0.00001 ,0.00000 ,0.00000 ,0.00000
886      +,0.02118 ,0.00255  ,0.00080 ,0.00000 ,0.00000 ,0.00000 ,0.00000
887      +,0.01808 ,0.00215  ,0.00058 ,0.00000 ,0.00000 ,0.00000 ,0.00000
888      +,0.01564 ,0.00184  ,0.00043 ,0.00000 ,0.00000 ,0.00000 ,0.00000
889      +,0.01371 ,0.00160  ,0.00033 ,0.00000 ,0.00000 ,0.00000 ,0.00000
890      +,0.01212 ,0.00141  ,0.00027 ,0.00000 ,0.00000 ,0.00000 ,0.00000
891      +,0.01081 ,0.00124  ,0.00022 ,0.00000 ,0.00000 ,0.00000 ,0.00000
892      +,0.00970 ,0.00111  ,0.00018 ,0.00000 ,0.00000 ,0.00000 ,0.00000
893      +,0.00876 ,0.00099  ,0.00015 ,0.00000 ,0.00000 ,0.00000 ,0.00000
894      +,0.00795 ,0.00090  ,0.00013 ,0.00000 ,0.00000 ,0.00000 ,0.00000
895      +,0.00725 ,0.00081  ,0.00011 ,0.00000 ,0.00000 ,0.00000 ,0.00000
896      +,0.00665 ,0.00074  ,0.00010 ,0.00000 ,0.00000 ,0.00000 ,0.00000
897      +,0.00611 ,0.00068  ,0.00009 ,0.00000 ,0.00000 ,0.00000 ,0.00000
898      +,0.00565 ,0.00063  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
899      +,0.00523 ,0.00058  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
900      +,0.00487 ,0.00053  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000
901      +,0.00453 ,0.00049  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000
902      +,0.00423 ,0.00046  ,0.00005 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
903       DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),K=1,19)/
904      + 0.01409 ,0.00143  ,0.00056 ,0.00000 ,0.00000 ,0.00000 ,0.00000
905      +,0.01129 ,0.00113  ,0.00034 ,0.00000 ,0.00000 ,0.00000 ,0.00000
906      +,0.00928 ,0.00092  ,0.00023 ,0.00000 ,0.00000 ,0.00000 ,0.00000
907      +,0.00778 ,0.00076  ,0.00016 ,0.00000 ,0.00000 ,0.00000 ,0.00000
908      +,0.00663 ,0.00064  ,0.00012 ,0.00000 ,0.00000 ,0.00000 ,0.00000
909      +,0.00572 ,0.00055  ,0.00009 ,0.00000 ,0.00000 ,0.00000 ,0.00000
910      +,0.00499 ,0.00047  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
911      +,0.00439 ,0.00042  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000
912      +,0.00390 ,0.00037  ,0.00005 ,0.00000 ,0.00000 ,0.00000 ,0.00000
913      +,0.00348 ,0.00033  ,0.00004 ,0.00000 ,0.00000 ,0.00000 ,0.00000
914      +,0.00313 ,0.00029  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
915      +,0.00283 ,0.00026  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
916      +,0.00257 ,0.00024  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
917      +,0.00234 ,0.00021  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
918      +,0.00214 ,0.00020  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
919      +,0.00197 ,0.00018  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
920      +,0.00182 ,0.00016  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
921      +,0.00168 ,0.00015  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
922      +,0.00156 ,0.00014  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
923       DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),K=1,19)/
924      + 0.00111 ,0.00006  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
925      +,0.00084 ,0.00005  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
926      +,0.00065 ,0.00004  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
927      +,0.00052 ,0.00003  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
928      +,0.00043 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
929      +,0.00035 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
930      +,0.00030 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
931      +,0.00025 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
932      +,0.00022 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
933      +,0.00019 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
934      +,0.00016 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
935      +,0.00014 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
936      +,0.00013 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
937      +,0.00011 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
938      +,0.00010 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
939      +,0.00009 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
940      +,0.00008 ,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      +,0.00007 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
943       DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5,
944      .        1.D-4,2.D-4,4.D-4,6.D-4,8.D-4,
945      .        1.D-3,2.D-3,4.D-3,6.D-3,8.D-3,
946      .        1.D-2,2.D-2,4.D-2,6.D-2,8.D-2,
947      .     .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0,
948      .     .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0,
949      .     .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0,
950      .     .8D0,.9D0,1.D0/
951       DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/
952       DATA N0/2,5,4,5,0,0,5/
953       DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
954       DATA INIT/0/
955 C
956 C
957       XSAVE=X
958 C
959       IF(INIT.NE.0) GOTO 10
960       INIT=1
961       DO 20 N=1,NX-1
962       DO 20 M=1,19
963 C     READ(40,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),
964 C    .          F(6,N,M)
965 C 1=UV 2=DV 3=GLUE 4=(UBAR+DBAR)/2 5=CBAR 7=BBAR 6=SBAR
966          DO 25 I=1,7
967   25     F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
968   20  CONTINUE
969       DO 30 J=1,NTENTH-1
970       XX(J)= LOG10(XX(J))+ONEDO
971       DO 30 I=1,6
972       DO 30 K=1,19
973   30  F(I,J,K) = LOG( F(I,J,K))*F(I,NTENTH,K)/ LOG( F(I,NTENTH,K))
974   50  FORMAT(7F10.5)
975       DO 40 I=1,7
976       DO 40 M=1,19
977   40  F(I,NX,M)=ZEROD
978   10  CONTINUE
979       IF(X.LT.XMIN) X=XMIN
980       IF(X.GT.XMAX) X=XMAX
981       QSQ=SCALE**2
982       IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
983       IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
984       XXX=X
985       IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
986       N=0
987   70  N=N+1
988       IF(XXX.GT.XX(N+1)) GOTO 70
989       A=(XXX-XX(N))/(XX(N+1)-XX(N))
990       RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
991       B=RM-AINT(RM)
992       M=1+  INT(RM)
993       DO 60 I=1,7
994       G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
995      .    + A*(ONED-B)*F(I,N+1,M)  + A*B*F(I,N+1,M+1)
996       IF(N.GE.NTENTH) GOTO 65
997       IF(I.EQ.7) GOTO 65
998           FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
999           G(I)=FAC**(G(I)/FAC)
1000   65  CONTINUE
1001       G(I)=G(I)*(ONED-X)**N0(I)
1002   60  CONTINUE
1003       UPV=G(1)
1004       DNV=G(2)
1005 C...    THIS SEA IS (UBAR+DBAR)/2
1006       SEA=G(4)
1007       STR=G(6)
1008       CHM=G(5)
1009       GL =G(3)
1010       BOT=G(7)
1011 C
1012       X=XSAVE
1013 C
1014       RETURN
1015       END