]> git.uio.no Git - u/mrichter/AliRoot.git/blob - PDF/spdf/strh3b.F
Adding include path for dependencies
[u/mrichter/AliRoot.git] / PDF / spdf / strh3b.F
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.2  1996/10/30 08:31:22  cernlib
6 * Version 7.04
7 *
8 * Revision 1.1.1.1  1996/04/12 15:29:51  plothow
9 * Version 7.01
10 *
11 *
12 #include "pdf/pilot.h"
13 C-----------------------------------------------------------------------
14       SUBROUTINE STRH3B(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GL)
15 C
16 C :::::::::::: HARRIMAN MARTIN ROBERTS STIRLING (B) SEA=UBAR=DBAR=2SBAR
17 C
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.03058 ,0.00527  ,4.08922 ,0.02979 ,0.01975 ,0.00000 ,0.02488
24      +,0.03107 ,0.00557  ,9.48665 ,0.17397 ,0.16338 ,0.00000 ,0.16879
25      +,0.03150 ,0.00585 ,16.62898 ,0.36677 ,0.35568 ,0.00000 ,0.36134
26      +,0.03188 ,0.00610 ,25.51256 ,0.60807 ,0.59651 ,0.00000 ,0.60241
27      +,0.03223 ,0.00634 ,35.76358 ,0.88471 ,0.87272 ,0.01645 ,0.87883
28      +,0.03255 ,0.00657 ,47.37782 ,1.19935 ,1.18695 ,0.20922 ,1.19327
29      +,0.03285 ,0.00678 ,60.25429 ,1.55066 ,1.53787 ,0.59326 ,1.54438
30      +,0.03313 ,0.00699 ,74.28833 ,1.93674 ,1.92356 ,0.98402 ,1.93027
31      +,0.03339 ,0.00719 ,89.37677 ,2.35546 ,2.34192 ,1.41194 ,2.34881
32      +,0.03364 ,0.00738,105.22414 ,2.79911 ,2.78523 ,1.86325 ,2.79229
33      +,0.03388 ,0.00756,121.91693 ,3.27114 ,3.25692 ,2.34258 ,3.26415
34      +,0.03410 ,0.00774,139.42232 ,3.77087 ,3.75634 ,2.84921 ,3.76372
35      +,0.03431 ,0.00791,157.62695 ,4.29545 ,4.28060 ,3.38028 ,4.28814
36      +,0.03452 ,0.00808,176.17290 ,4.83573 ,4.82058 ,3.92673 ,4.82827
37      +,0.03472 ,0.00824,195.43625 ,5.40186 ,5.38642 ,4.49870 ,5.39425
38      +,0.03491 ,0.00840,215.02991 ,5.98345 ,5.96773 ,5.08587 ,5.97570
39      +,0.03509 ,0.00855,235.02951 ,6.58267 ,6.56666 ,5.69039 ,6.57478
40      +,0.03527 ,0.00870,255.46199 ,7.20017 ,7.18390 ,6.31296 ,7.19214
41      +,0.03544 ,0.00885,276.03955 ,7.82835 ,7.81182 ,6.94601 ,7.82020/
42       DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),K=1,19)/
43      + 0.03521 ,0.00708  ,3.98786 ,0.03432 ,0.02076 ,0.00000 ,0.02763
44      +,0.03580 ,0.00747  ,8.74942 ,0.16685 ,0.15261 ,0.00000 ,0.15982
45      +,0.03632 ,0.00784 ,14.80289 ,0.33457 ,0.31970 ,0.00000 ,0.32723
46      +,0.03679 ,0.00818 ,22.10773 ,0.53845 ,0.52300 ,0.00000 ,0.53082
47      +,0.03722 ,0.00849 ,30.33257 ,0.76736 ,0.75136 ,0.01349 ,0.75946
48      +,0.03761 ,0.00879 ,39.46127 ,1.02323 ,1.00672 ,0.16967 ,1.01507
49      +,0.03798 ,0.00907 ,49.40271 ,1.30467 ,1.28767 ,0.47810 ,1.29626
50      +,0.03832 ,0.00934 ,60.06714 ,1.60987 ,1.59241 ,0.78732 ,1.60123
51      +,0.03865 ,0.00960 ,71.37088 ,1.93699 ,1.91908 ,1.12210 ,1.92813
52      +,0.03896 ,0.00985 ,83.08710 ,2.27981 ,2.26148 ,1.47133 ,2.27074
53      +,0.03925 ,0.01009 ,95.28409 ,2.64097 ,2.62224 ,1.83859 ,2.63170
54      +,0.03953 ,0.01032,107.93694 ,3.01990 ,3.00077 ,2.22327 ,3.01043
55      +,0.03980 ,0.01054,120.96298 ,3.41430 ,3.39479 ,2.62308 ,3.40464
56      +,0.04006 ,0.01076,134.10249 ,3.81719 ,3.79732 ,3.03111 ,3.80735
57      +,0.04031 ,0.01097,147.63477 ,4.23633 ,4.21611 ,3.45512 ,4.22632
58      +,0.04055 ,0.01117,161.28113 ,4.66386 ,4.64329 ,3.88727 ,4.65368
59      +,0.04078 ,0.01137,175.10072 ,5.10144 ,5.08054 ,4.32927 ,5.09109
60      +,0.04100 ,0.01156,189.11591 ,5.54961 ,5.52838 ,4.78165 ,5.53910
61      +,0.04122 ,0.01175,203.12679 ,6.00272 ,5.98118 ,5.23879 ,5.99205/
62       DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),K=1,19)/
63      + 0.04040 ,0.00951  ,3.88872 ,0.03965 ,0.02149 ,0.00000 ,0.03063
64      +,0.04110 ,0.01003  ,8.06820 ,0.16045 ,0.14142 ,0.00000 ,0.15100
65      +,0.04172 ,0.01051 ,13.17443 ,0.30573 ,0.28591 ,0.00000 ,0.29589
66      +,0.04229 ,0.01095 ,19.15204 ,0.47739 ,0.45684 ,0.00000 ,0.46719
67      +,0.04281 ,0.01137 ,25.71803 ,0.66620 ,0.64497 ,0.01103 ,0.65565
68      +,0.04329 ,0.01176 ,32.85580 ,0.87359 ,0.85173 ,0.13715 ,0.86273
69      +,0.04374 ,0.01213 ,40.48959 ,1.09830 ,1.07584 ,0.38405 ,1.08714
70      +,0.04417 ,0.01248 ,48.54814 ,1.33876 ,1.31573 ,0.62794 ,1.32732
71      +,0.04457 ,0.01281 ,56.96704 ,1.59341 ,1.56983 ,0.88897 ,1.58170
72      +,0.04495 ,0.01314 ,65.57672 ,1.85735 ,1.83325 ,1.15824 ,1.84538
73      +,0.04531 ,0.01345 ,74.43279 ,2.13265 ,2.10805 ,1.43861 ,2.12043
74      +,0.04566 ,0.01375 ,83.51952 ,2.41885 ,2.39378 ,1.72960 ,2.40639
75      +,0.04600 ,0.01404 ,92.77809 ,2.71420 ,2.68867 ,2.02945 ,2.70152
76      +,0.04632 ,0.01432,102.02321 ,3.01339 ,2.98742 ,2.33290 ,3.00048
77      +,0.04663 ,0.01459,111.46268 ,3.32240 ,3.29599 ,2.64594 ,3.30928
78      +,0.04693 ,0.01485,120.89806 ,3.63529 ,3.60848 ,2.96268 ,3.62197
79      +,0.04722 ,0.01511,130.37598 ,3.95341 ,3.92620 ,3.28445 ,3.93989
80      +,0.04750 ,0.01536,139.91663 ,4.27719 ,4.24959 ,3.61172 ,4.26348
81      +,0.04777 ,0.01560,149.38116 ,4.60249 ,4.57451 ,3.94036 ,4.58859/
82       DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),K=1,19)/
83      + 0.04369 ,0.01130  ,3.83163 ,0.04322 ,0.02174 ,0.00000 ,0.03252
84      +,0.04446 ,0.01191  ,7.69361 ,0.15711 ,0.13462 ,0.00000 ,0.14591
85      +,0.04516 ,0.01248 ,12.30392 ,0.29039 ,0.26700 ,0.00000 ,0.27874
86      +,0.04579 ,0.01300 ,17.60576 ,0.44534 ,0.42112 ,0.00000 ,0.43328
87      +,0.04637 ,0.01348 ,23.34528 ,0.61373 ,0.58874 ,0.00978 ,0.60129
88      +,0.04691 ,0.01394 ,29.50838 ,0.79684 ,0.77113 ,0.12088 ,0.78405
89      +,0.04742 ,0.01437 ,36.02960 ,0.99348 ,0.96710 ,0.33728 ,0.98035
90      +,0.04789 ,0.01478 ,42.84837 ,1.20226 ,1.17523 ,0.54918 ,1.18880
91      +,0.04835 ,0.01518 ,49.91127 ,1.42179 ,1.39415 ,0.77443 ,1.40803
92      +,0.04878 ,0.01555 ,57.07645 ,1.64784 ,1.61961 ,1.00527 ,1.63379
93      +,0.04919 ,0.01591 ,64.39452 ,1.88223 ,1.85345 ,1.24421 ,1.86791
94      +,0.04959 ,0.01626 ,71.85414 ,2.12459 ,2.09527 ,1.49085 ,2.11000
95      +,0.04997 ,0.01660 ,79.40825 ,2.37343 ,2.34360 ,1.74372 ,2.35858
96      +,0.05033 ,0.01693 ,86.90562 ,2.62425 ,2.59391 ,1.99835 ,2.60915
97      +,0.05069 ,0.01724 ,94.52112 ,2.88218 ,2.85137 ,2.25989 ,2.86685
98      +,0.05103 ,0.01754,102.09319 ,3.14224 ,3.11096 ,2.52338 ,3.12667
99      +,0.05136 ,0.01784,109.66273 ,3.40557 ,3.37386 ,2.78999 ,3.38979
100      +,0.05168 ,0.01813,117.24805 ,3.67260 ,3.64046 ,3.06013 ,3.65660
101      +,0.05199 ,0.01841,124.73839 ,3.93988 ,3.90731 ,3.33039 ,3.92367/
102       DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),K=1,19)/
103      + 0.04614 ,0.01277  ,3.79148 ,0.04599 ,0.02181 ,0.00000 ,0.03392
104      +,0.04697 ,0.01346  ,7.43775 ,0.15495 ,0.12967 ,0.00000 ,0.14234
105      +,0.04772 ,0.01409 ,11.71989 ,0.28019 ,0.25391 ,0.00000 ,0.26709
106      +,0.04840 ,0.01468 ,16.58229 ,0.42415 ,0.39696 ,0.00000 ,0.41060
107      +,0.04903 ,0.01522 ,21.79163 ,0.57929 ,0.55126 ,0.00898 ,0.56532
108      +,0.04961 ,0.01573 ,27.33653 ,0.74676 ,0.71795 ,0.11042 ,0.73240
109      +,0.05016 ,0.01621 ,33.15884 ,0.92548 ,0.89593 ,0.30732 ,0.91076
110      +,0.05068 ,0.01667 ,39.20529 ,1.11416 ,1.08391 ,0.49893 ,1.09909
111      +,0.05118 ,0.01711 ,45.42992 ,1.31156 ,1.28064 ,0.70161 ,1.29616
112      +,0.05165 ,0.01753 ,51.70831 ,1.51387 ,1.48232 ,0.90835 ,1.49815
113      +,0.05210 ,0.01793 ,58.08784 ,1.72276 ,1.69060 ,1.12144 ,1.70674
114      +,0.05253 ,0.01832 ,64.56018 ,1.93791 ,1.90517 ,1.34055 ,1.92160
115      +,0.05294 ,0.01869 ,71.08572 ,2.15801 ,2.12471 ,1.56437 ,2.14143
116      +,0.05335 ,0.01906 ,77.53363 ,2.37907 ,2.34523 ,1.78895 ,2.36221
117      +,0.05373 ,0.01941 ,84.05920 ,2.60569 ,2.57135 ,2.01891 ,2.58859
118      +,0.05410 ,0.01974 ,90.52246 ,2.83347 ,2.79862 ,2.24985 ,2.81611
119      +,0.05447 ,0.02007 ,96.96104 ,3.06346 ,3.02814 ,2.48286 ,3.04587
120      +,0.05482 ,0.02039,103.39223 ,3.29607 ,3.26028 ,2.71835 ,3.27824
121      +,0.05516 ,0.02070,109.72153 ,3.52824 ,3.49201 ,2.95327 ,3.51020/
122       DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),K=1,19)/
123      + 0.04811 ,0.01404  ,3.76048 ,0.04828 ,0.02179 ,0.00000 ,0.03505
124      +,0.04899 ,0.01480  ,7.24466 ,0.15341 ,0.12574 ,0.00000 ,0.13960
125      +,0.04978 ,0.01549 ,11.28492 ,0.27267 ,0.24393 ,0.00000 ,0.25833
126      +,0.05050 ,0.01612 ,15.82767 ,0.40857 ,0.37886 ,0.00000 ,0.39375
127      +,0.05117 ,0.01672 ,20.65517 ,0.55408 ,0.52346 ,0.00840 ,0.53880
128      +,0.05179 ,0.01727 ,25.75856 ,0.71027 ,0.67881 ,0.10288 ,0.69458
129      +,0.05238 ,0.01780 ,31.08519 ,0.87612 ,0.84387 ,0.28577 ,0.86004
130      +,0.05293 ,0.01830 ,36.58746 ,1.05045 ,1.01745 ,0.46288 ,1.03400
131      +,0.05346 ,0.01877 ,42.22459 ,1.23213 ,1.19841 ,0.64951 ,1.21532
132      +,0.05396 ,0.01923 ,47.88467 ,1.41763 ,1.38325 ,0.83919 ,1.40049
133      +,0.05444 ,0.01967 ,53.61290 ,1.60853 ,1.57350 ,1.03404 ,1.59107
134      +,0.05491 ,0.02009 ,59.40306 ,1.80456 ,1.76891 ,1.23379 ,1.78679
135      +,0.05535 ,0.02050 ,65.22054 ,2.00453 ,1.96829 ,1.43726 ,1.98647
136      +,0.05578 ,0.02089 ,70.94905 ,2.20480 ,2.16799 ,1.64083 ,2.18645
137      +,0.05619 ,0.02127 ,76.72957 ,2.40962 ,2.37227 ,1.84879 ,2.39101
138      +,0.05659 ,0.02164 ,82.43753 ,2.61498 ,2.57710 ,2.05713 ,2.59611
139      +,0.05698 ,0.02199 ,88.10817 ,2.82188 ,2.78349 ,2.26685 ,2.80275
140      +,0.05736 ,0.02234 ,93.75775 ,3.03068 ,2.99181 ,2.47836 ,3.01131
141      +,0.05772 ,0.02268 ,99.30321 ,3.23867 ,3.19931 ,2.68892 ,3.21906/
142       DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),K=1,19)/
143      + 0.05459 ,0.01886  ,3.66479 ,0.05636 ,0.02132 ,0.00000 ,0.03884
144      +,0.05564 ,0.01986  ,6.67233 ,0.14956 ,0.11303 ,0.00000 ,0.13130
145      +,0.05658 ,0.02076 ,10.02563 ,0.25162 ,0.21376 ,0.00000 ,0.23270
146      +,0.05745 ,0.02160 ,13.68131 ,0.36487 ,0.32580 ,0.00000 ,0.34535
147      +,0.05826 ,0.02237 ,17.46809 ,0.48370 ,0.44351 ,0.00679 ,0.46363
148      +,0.05901 ,0.02310 ,21.38564 ,0.60902 ,0.56779 ,0.08228 ,0.58843
149      +,0.05973 ,0.02378 ,25.39764 ,0.74004 ,0.69785 ,0.22717 ,0.71898
150      +,0.06041 ,0.02443 ,29.47232 ,0.87586 ,0.83276 ,0.36532 ,0.85435
151      +,0.06105 ,0.02505 ,33.58351 ,1.01564 ,0.97168 ,0.50918 ,0.99370
152      +,0.06167 ,0.02565 ,37.65213 ,1.15672 ,1.11194 ,0.65369 ,1.13438
153      +,0.06227 ,0.02621 ,41.71727 ,1.30040 ,1.25484 ,0.80061 ,1.27766
154      +,0.06284 ,0.02676 ,45.77841 ,1.44651 ,1.40021 ,0.94978 ,1.42341
155      +,0.06339 ,0.02728 ,49.81369 ,1.59422 ,1.54720 ,1.10036 ,1.57076
156      +,0.06392 ,0.02778 ,53.74281 ,1.74083 ,1.69314 ,1.24969 ,1.71704
157      +,0.06444 ,0.02827 ,57.67126 ,1.88963 ,1.84129 ,1.40106 ,1.86552
158      +,0.06494 ,0.02874 ,61.51282 ,2.03768 ,1.98871 ,1.55154 ,2.01325
159      +,0.06542 ,0.02920 ,65.29541 ,2.18576 ,2.13619 ,1.70195 ,2.16103
160      +,0.06589 ,0.02964 ,69.03334 ,2.33422 ,2.28407 ,1.85262 ,2.30921
161      +,0.06635 ,0.03007 ,72.67062 ,2.48110 ,2.43039 ,2.00161 ,2.45581/
162       DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),K=1,19)/
163      + 0.06165 ,0.02533  ,3.56884 ,0.06627 ,0.02011 ,0.00000 ,0.04318
164      +,0.06290 ,0.02664  ,6.13570 ,0.14761 ,0.09961 ,0.00000 ,0.12361
165      +,0.06404 ,0.02783  ,8.88707 ,0.23436 ,0.18472 ,0.00000 ,0.20955
166      +,0.06510 ,0.02893 ,11.79339 ,0.32814 ,0.27701 ,0.00000 ,0.30260
167      +,0.06609 ,0.02993 ,14.72557 ,0.42456 ,0.37206 ,0.00546 ,0.39834
168      +,0.06701 ,0.03088 ,17.69170 ,0.52440 ,0.47066 ,0.06533 ,0.49756
169      +,0.06789 ,0.03176 ,20.66995 ,0.62714 ,0.57222 ,0.17925 ,0.59971
170      +,0.06873 ,0.03261 ,23.64166 ,0.73211 ,0.67610 ,0.28617 ,0.70415
171      +,0.06953 ,0.03341 ,26.59232 ,0.83876 ,0.78171 ,0.39613 ,0.81028
172      +,0.07031 ,0.03417 ,29.46802 ,0.94510 ,0.88708 ,0.50527 ,0.91614
173      +,0.07105 ,0.03490 ,32.30273 ,1.05222 ,0.99327 ,0.61503 ,1.02280
174      +,0.07176 ,0.03559 ,35.09972 ,1.16007 ,1.10025 ,0.72537 ,1.13022
175      +,0.07245 ,0.03627 ,37.84637 ,1.26807 ,1.20741 ,0.83572 ,1.23780
176      +,0.07312 ,0.03691 ,40.48859 ,1.37427 ,1.31281 ,0.94413 ,1.34361
177      +,0.07376 ,0.03753 ,43.10493 ,1.48121 ,1.41899 ,1.05316 ,1.45017
178      +,0.07439 ,0.03813 ,45.63638 ,1.58673 ,1.52378 ,1.16066 ,1.55532
179      +,0.07500 ,0.03871 ,48.10538 ,1.69149 ,1.62784 ,1.26731 ,1.65973
180      +,0.07559 ,0.03927 ,50.52383 ,1.79579 ,1.73147 ,1.37342 ,1.76370
181      +,0.07616 ,0.03981 ,52.85509 ,1.89824 ,1.83327 ,1.47758 ,1.86583/
182       DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),K=1,19)/
183      + 0.06607 ,0.03011  ,3.51170 ,0.07319 ,0.01905 ,0.00000 ,0.04612
184      +,0.06748 ,0.03164  ,5.83451 ,0.14773 ,0.09153 ,0.00000 ,0.11964
185      +,0.06878 ,0.03303  ,8.26671 ,0.22631 ,0.16827 ,0.00000 ,0.19731
186      +,0.06998 ,0.03431 ,10.78742 ,0.30996 ,0.25025 ,0.00000 ,0.28013
187      +,0.07110 ,0.03548 ,13.29012 ,0.39491 ,0.33369 ,0.00478 ,0.36433
188      +,0.07216 ,0.03658 ,15.78728 ,0.48191 ,0.41931 ,0.05680 ,0.45065
189      +,0.07316 ,0.03761 ,18.26443 ,0.57056 ,0.50667 ,0.15527 ,0.53866
190      +,0.07412 ,0.03858 ,20.70937 ,0.66036 ,0.59526 ,0.24680 ,0.62786
191      +,0.07504 ,0.03951 ,23.11299 ,0.75087 ,0.68463 ,0.34022 ,0.71781
192      +,0.07593 ,0.04039 ,25.43332 ,0.84045 ,0.77314 ,0.43227 ,0.80686
193      +,0.07678 ,0.04122 ,27.70137 ,0.93008 ,0.86177 ,0.52424 ,0.89599
194      +,0.07760 ,0.04203 ,29.92200 ,1.01977 ,0.95050 ,0.61613 ,0.98520
195      +,0.07839 ,0.04280 ,32.08669 ,1.10907 ,1.03889 ,0.70750 ,1.07405
196      +,0.07916 ,0.04354 ,34.15303 ,1.19637 ,1.12533 ,0.79675 ,1.16092
197      +,0.07990 ,0.04425 ,36.18681 ,1.28385 ,1.21199 ,0.88608 ,1.24800
198      +,0.08062 ,0.04494 ,38.14140 ,1.36974 ,1.29708 ,0.97372 ,1.33349
199      +,0.08133 ,0.04560 ,40.03619 ,1.45461 ,1.38120 ,1.06027 ,1.41799
200      +,0.08201 ,0.04624 ,41.88197 ,1.53876 ,1.46462 ,1.14600 ,1.50177
201      +,0.08267 ,0.04686 ,43.65033 ,1.62104 ,1.54621 ,1.22981 ,1.58371/
202       DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),K=1,19)/
203      + 0.06937 ,0.03403  ,3.47019 ,0.07875 ,0.01819 ,0.00000 ,0.04847
204      +,0.07092 ,0.03575  ,5.62475 ,0.14860 ,0.08580 ,0.00000 ,0.11721
205      +,0.07235 ,0.03730  ,7.84285 ,0.22169 ,0.15691 ,0.00000 ,0.18932
206      +,0.07368 ,0.03872 ,10.10991 ,0.29861 ,0.23205 ,0.00000 ,0.26536
207      +,0.07492 ,0.04002 ,12.33434 ,0.37604 ,0.30786 ,0.00434 ,0.34199
208      +,0.07610 ,0.04124 ,14.53153 ,0.45471 ,0.38505 ,0.05127 ,0.41993
209      +,0.07721 ,0.04238 ,16.69162 ,0.53429 ,0.46326 ,0.13977 ,0.49883
210      +,0.07828 ,0.04346 ,18.80637 ,0.61439 ,0.54207 ,0.22145 ,0.57829
211      +,0.07930 ,0.04448 ,20.87015 ,0.69464 ,0.62112 ,0.30436 ,0.65795
212      +,0.08028 ,0.04545 ,22.84810 ,0.77364 ,0.69900 ,0.38562 ,0.73639
213      +,0.08123 ,0.04637 ,24.76938 ,0.85230 ,0.77660 ,0.46642 ,0.81452
214      +,0.08214 ,0.04726 ,26.63959 ,0.93065 ,0.85394 ,0.54678 ,0.89237
215      +,0.08302 ,0.04811 ,28.45264 ,1.00833 ,0.93067 ,0.62634 ,0.96958
216      +,0.08388 ,0.04892 ,30.17313 ,1.08394 ,1.00538 ,0.70374 ,1.04474
217      +,0.08470 ,0.04970 ,31.85884 ,1.15944 ,1.08001 ,0.78093 ,1.11981
218      +,0.08551 ,0.05046 ,33.47061 ,1.23328 ,1.15303 ,0.85638 ,1.19324
219      +,0.08629 ,0.05118 ,35.02592 ,1.30600 ,1.22497 ,0.93064 ,1.26557
220      +,0.08704 ,0.05188 ,36.53461 ,1.37787 ,1.29608 ,1.00397 ,1.33707
221      +,0.08778 ,0.05256 ,37.97313 ,1.44791 ,1.36540 ,1.07541 ,1.40675/
222       DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),K=1,19)/
223      + 0.07206 ,0.03743  ,3.43673 ,0.08374 ,0.01766 ,0.00000 ,0.05070
224      +,0.07376 ,0.03930  ,5.46072 ,0.15029 ,0.08186 ,0.00000 ,0.11609
225      +,0.07534 ,0.04098  ,7.51555 ,0.21920 ,0.14869 ,0.00000 ,0.18397
226      +,0.07680 ,0.04251  ,9.59158 ,0.29103 ,0.21866 ,0.00000 ,0.25488
227      +,0.07817 ,0.04392 ,11.60947 ,0.36281 ,0.28876 ,0.00401 ,0.32583
228      +,0.07946 ,0.04524 ,13.58551 ,0.43527 ,0.35967 ,0.04715 ,0.39752
229      +,0.08069 ,0.04647 ,15.51396 ,0.50813 ,0.43111 ,0.12826 ,0.46968
230      +,0.08186 ,0.04763 ,17.38969 ,0.58108 ,0.50274 ,0.20267 ,0.54197
231      +,0.08299 ,0.04873 ,19.20937 ,0.65383 ,0.57425 ,0.27788 ,0.61410
232      +,0.08407 ,0.04978 ,20.94220 ,0.72512 ,0.64438 ,0.35125 ,0.68482
233      +,0.08511 ,0.05077 ,22.61665 ,0.79581 ,0.71398 ,0.42393 ,0.75497
234      +,0.08612 ,0.05172 ,24.23828 ,0.86596 ,0.78311 ,0.49594 ,0.82461
235      +,0.08709 ,0.05263 ,25.80212 ,0.93527 ,0.85144 ,0.56700 ,0.89343
236      +,0.08803 ,0.05350 ,27.27946 ,1.00250 ,0.91775 ,0.63589 ,0.96021
237      +,0.08894 ,0.05434 ,28.72205 ,1.06942 ,0.98379 ,0.70439 ,1.02669
238      +,0.08982 ,0.05514 ,30.09645 ,1.13466 ,1.04820 ,0.77113 ,1.09152
239      +,0.09068 ,0.05592 ,31.41641 ,1.19873 ,1.11147 ,0.83663 ,1.15519
240      +,0.09151 ,0.05667 ,32.69127 ,1.26188 ,1.17386 ,0.90114 ,1.21796
241      +,0.09232 ,0.05739 ,33.90266 ,1.32328 ,1.23453 ,0.96384 ,1.27900/
242       DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),K=1,19)/
243      + 0.08136 ,0.05032  ,3.32706 ,0.10185 ,0.01561 ,0.00000 ,0.05874
244      +,0.08371 ,0.05272  ,4.96203 ,0.15814 ,0.06924 ,0.00000 ,0.11371
245      +,0.08588 ,0.05486  ,6.54963 ,0.21481 ,0.12361 ,0.00000 ,0.16924
246      +,0.08789 ,0.05682  ,8.09529 ,0.27217 ,0.17891 ,0.00000 ,0.22558
247      +,0.08978 ,0.05860  ,9.55042 ,0.32818 ,0.23310 ,0.00310 ,0.28069
248      +,0.09156 ,0.06025 ,10.93655 ,0.38353 ,0.28679 ,0.03588 ,0.33522
249      +,0.09325 ,0.06179 ,12.25621 ,0.43814 ,0.33988 ,0.09689 ,0.38907
250      +,0.09487 ,0.06324 ,13.51123 ,0.49188 ,0.39222 ,0.15184 ,0.44212
251      +,0.09641 ,0.06461 ,14.70377 ,0.54463 ,0.44369 ,0.20655 ,0.49424
252      +,0.09790 ,0.06590 ,15.81629 ,0.59558 ,0.49345 ,0.25918 ,0.54459
253      +,0.09933 ,0.06712 ,16.87210 ,0.64544 ,0.54219 ,0.31063 ,0.59389
254      +,0.10070 ,0.06829 ,17.87775 ,0.69431 ,0.59001 ,0.36101 ,0.64224
255      +,0.10202 ,0.06940 ,18.83202 ,0.74202 ,0.63674 ,0.41016 ,0.68947
256      +,0.10331 ,0.07046 ,19.71770 ,0.78778 ,0.68158 ,0.45728 ,0.73477
257      +,0.10455 ,0.07147 ,20.57143 ,0.83288 ,0.72581 ,0.50367 ,0.77944
258      +,0.10575 ,0.07245 ,21.37230 ,0.87640 ,0.76851 ,0.54843 ,0.82255
259      +,0.10691 ,0.07338 ,22.13072 ,0.91873 ,0.81007 ,0.59195 ,0.86449
260      +,0.10804 ,0.07428 ,22.85400 ,0.96009 ,0.85069 ,0.63445 ,0.90549
261      +,0.10913 ,0.07515 ,23.53099 ,0.99994 ,0.88984 ,0.67539 ,0.94499/
262       DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),K=1,19)/
263      + 0.09351 ,0.06771  ,3.20171 ,0.12487 ,0.01347 ,0.00000 ,0.06917
264      +,0.09698 ,0.07073  ,4.46716 ,0.17149 ,0.05741 ,0.00001 ,0.11447
265      +,0.10016 ,0.07342  ,5.63738 ,0.21686 ,0.10050 ,0.00001 ,0.15871
266      +,0.10311 ,0.07583  ,6.73078 ,0.26131 ,0.14296 ,0.00001 ,0.20217
267      +,0.10585 ,0.07803  ,7.72335 ,0.30365 ,0.18357 ,0.00234 ,0.24365
268      +,0.10842 ,0.08004  ,8.63923 ,0.34450 ,0.22288 ,0.02651 ,0.28375
269      +,0.11086 ,0.08191  ,9.48631 ,0.38397 ,0.26096 ,0.07099 ,0.32253
270      +,0.11317 ,0.08366 ,10.27026 ,0.42207 ,0.29780 ,0.11021 ,0.36000
271      +,0.11537 ,0.08530 ,10.99608 ,0.45882 ,0.33343 ,0.14866 ,0.39620
272      +,0.11747 ,0.08684 ,11.65758 ,0.49375 ,0.36732 ,0.18508 ,0.43060
273      +,0.11948 ,0.08828 ,12.27108 ,0.52739 ,0.40001 ,0.22014 ,0.46377
274      +,0.12142 ,0.08965 ,12.84349 ,0.55990 ,0.43164 ,0.25401 ,0.49585
275      +,0.12328 ,0.09095 ,13.37608 ,0.59123 ,0.46217 ,0.28665 ,0.52678
276      +,0.12506 ,0.09219 ,13.85854 ,0.62088 ,0.49107 ,0.31756 ,0.55607
277      +,0.12677 ,0.09337 ,14.31589 ,0.64978 ,0.51928 ,0.34765 ,0.58462
278      +,0.12842 ,0.09449 ,14.73570 ,0.67733 ,0.54619 ,0.37636 ,0.61185
279      +,0.13002 ,0.09557 ,15.12574 ,0.70386 ,0.57212 ,0.40399 ,0.63808
280      +,0.13157 ,0.09659 ,15.49132 ,0.72952 ,0.59723 ,0.43073 ,0.66346
281      +,0.13307 ,0.09758 ,15.82613 ,0.75395 ,0.62114 ,0.45620 ,0.68763/
282       DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),K=1,19)/
283      + 0.10326 ,0.08061  ,3.11612 ,0.14043 ,0.01213 ,0.00000 ,0.07628
284      +,0.10769 ,0.08403  ,4.17517 ,0.18140 ,0.05065 ,0.00000 ,0.11604
285      +,0.11174 ,0.08703  ,5.12491 ,0.22044 ,0.08765 ,0.00001 ,0.15407
286      +,0.11546 ,0.08972  ,5.98819 ,0.25792 ,0.12339 ,0.00000 ,0.19069
287      +,0.11891 ,0.09215  ,6.75237 ,0.29305 ,0.15705 ,0.00195 ,0.22509
288      +,0.12212 ,0.09437  ,7.44348 ,0.32645 ,0.18915 ,0.02182 ,0.25785
289      +,0.12513 ,0.09642  ,8.07010 ,0.35827 ,0.21984 ,0.05809 ,0.28911
290      +,0.12799 ,0.09832  ,8.63920 ,0.38861 ,0.24917 ,0.08968 ,0.31894
291      +,0.13072 ,0.10009  ,9.15746 ,0.41754 ,0.27721 ,0.12031 ,0.34744
292      +,0.13328 ,0.10175  ,9.61910 ,0.44472 ,0.30360 ,0.14902 ,0.37423
293      +,0.13576 ,0.10329 ,10.04073 ,0.47067 ,0.32884 ,0.17645 ,0.39982
294      +,0.13811 ,0.10475 ,10.42849 ,0.49551 ,0.35303 ,0.20271 ,0.42434
295      +,0.14035 ,0.10614 ,10.78409 ,0.51923 ,0.37617 ,0.22778 ,0.44777
296      +,0.14249 ,0.10745 ,11.09968 ,0.54147 ,0.39790 ,0.25134 ,0.46976
297      +,0.14456 ,0.10870 ,11.39471 ,0.56299 ,0.41894 ,0.27412 ,0.49104
298      +,0.14654 ,0.10988 ,11.65968 ,0.58335 ,0.43888 ,0.29570 ,0.51119
299      +,0.14845 ,0.11100 ,11.90307 ,0.60279 ,0.45793 ,0.31632 ,0.53044
300      +,0.15029 ,0.11208 ,12.12888 ,0.62144 ,0.47623 ,0.33612 ,0.54892
301      +,0.15207 ,0.11310 ,12.33107 ,0.63909 ,0.49356 ,0.35488 ,0.56641/
302       DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),K=1,19)/
303      + 0.11226 ,0.09128  ,3.04712 ,0.15215 ,0.01118 ,0.00000 ,0.08166
304      +,0.11756 ,0.09496  ,3.96439 ,0.18909 ,0.04601 ,0.00000 ,0.11756
305      +,0.12236 ,0.09818  ,4.76750 ,0.22371 ,0.07891 ,0.00001 ,0.15134
306      +,0.12676 ,0.10104  ,5.48237 ,0.25644 ,0.11023 ,0.00000 ,0.18337
307      +,0.13081 ,0.10362  ,6.10293 ,0.28675 ,0.13936 ,0.00170 ,0.21310
308      +,0.13456 ,0.10596  ,6.65449 ,0.31523 ,0.16685 ,0.01880 ,0.24109
309      +,0.13807 ,0.10811  ,7.14640 ,0.34208 ,0.19285 ,0.04986 ,0.26751
310      +,0.14138 ,0.11010  ,7.58617 ,0.36743 ,0.21747 ,0.07665 ,0.29250
311      +,0.14452 ,0.11193  ,7.98072 ,0.39139 ,0.24081 ,0.10240 ,0.31616
312      +,0.14747 ,0.11365  ,8.32616 ,0.41371 ,0.26260 ,0.12638 ,0.33822
313      +,0.15030 ,0.11524  ,8.63717 ,0.43485 ,0.28328 ,0.14911 ,0.35913
314      +,0.15299 ,0.11674  ,8.91931 ,0.45493 ,0.30296 ,0.17073 ,0.37902
315      +,0.15553 ,0.11816  ,9.17439 ,0.47398 ,0.32166 ,0.19124 ,0.39789
316      +,0.15796 ,0.11949  ,9.39650 ,0.49171 ,0.33911 ,0.21040 ,0.41547
317      +,0.16029 ,0.12076  ,9.60171 ,0.50876 ,0.35591 ,0.22882 ,0.43240
318      +,0.16251 ,0.12196  ,9.78256 ,0.52478 ,0.37172 ,0.24617 ,0.44832
319      +,0.16466 ,0.12309  ,9.94610 ,0.53997 ,0.38674 ,0.26266 ,0.46343
320      +,0.16673 ,0.12417 ,10.09570 ,0.55448 ,0.40110 ,0.27842 ,0.47787
321      +,0.16871 ,0.12519 ,10.22665 ,0.56812 ,0.41462 ,0.29327 ,0.49145/
322       DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),K=1,19)/
323      + 0.12090 ,0.10055  ,2.98762 ,0.16139 ,0.01042 ,0.00001 ,0.08591
324      +,0.12699 ,0.10441  ,3.79791 ,0.19514 ,0.04245 ,0.00001 ,0.11881
325      +,0.13248 ,0.10776  ,4.49330 ,0.22634 ,0.07231 ,0.00001 ,0.14935
326      +,0.13745 ,0.11076  ,5.10179 ,0.25548 ,0.10038 ,0.00002 ,0.17796
327      +,0.14202 ,0.11341  ,5.62094 ,0.28219 ,0.12625 ,0.00154 ,0.20426
328      +,0.14623 ,0.11582  ,6.07552 ,0.30703 ,0.15041 ,0.01665 ,0.22877
329      +,0.15016 ,0.11803  ,6.47398 ,0.33027 ,0.17309 ,0.04400 ,0.25173
330      +,0.15386 ,0.12005  ,6.82576 ,0.35202 ,0.19440 ,0.06740 ,0.27327
331      +,0.15732 ,0.12194  ,7.13773 ,0.37242 ,0.21444 ,0.08972 ,0.29348
332      +,0.16061 ,0.12366  ,7.40581 ,0.39131 ,0.23305 ,0.11041 ,0.31224
333      +,0.16371 ,0.12527  ,7.64383 ,0.40904 ,0.25058 ,0.12989 ,0.32988
334      +,0.16665 ,0.12678  ,7.85698 ,0.42580 ,0.26718 ,0.14832 ,0.34656
335      +,0.16944 ,0.12820  ,8.04713 ,0.44160 ,0.28288 ,0.16574 ,0.36231
336      +,0.17211 ,0.12952  ,8.20920 ,0.45621 ,0.29742 ,0.18189 ,0.37688
337      +,0.17465 ,0.13077  ,8.35750 ,0.47018 ,0.31135 ,0.19736 ,0.39083
338      +,0.17705 ,0.13197  ,8.48647 ,0.48323 ,0.32440 ,0.21187 ,0.40389
339      +,0.17937 ,0.13309  ,8.60006 ,0.49554 ,0.33674 ,0.22560 ,0.41621
340      +,0.18161 ,0.13414  ,8.70144 ,0.50725 ,0.34849 ,0.23866 ,0.42794
341      +,0.18375 ,0.13513  ,8.78857 ,0.51816 ,0.35948 ,0.25091 ,0.43889/
342       DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),K=1,19)/
343      + 0.16272 ,0.13592  ,2.75365 ,0.18772 ,0.00802 ,0.00000 ,0.09786
344      +,0.17169 ,0.14011  ,3.25087 ,0.21098 ,0.03165 ,0.00001 ,0.12132
345      +,0.17957 ,0.14368  ,3.64634 ,0.23147 ,0.05270 ,0.00002 ,0.14210
346      +,0.18660 ,0.14677  ,3.96819 ,0.24979 ,0.07169 ,0.00002 ,0.16076
347      +,0.19290 ,0.14944  ,4.22544 ,0.26595 ,0.08859 ,0.00102 ,0.17729
348      +,0.19861 ,0.15181  ,4.43481 ,0.28045 ,0.10388 ,0.01082 ,0.19219
349      +,0.20387 ,0.15392  ,4.60711 ,0.29356 ,0.11782 ,0.02828 ,0.20571
350      +,0.20869 ,0.15584  ,4.74841 ,0.30545 ,0.13055 ,0.04282 ,0.21803
351      +,0.21322 ,0.15756  ,4.86409 ,0.31626 ,0.14224 ,0.05639 ,0.22927
352      +,0.21738 ,0.15911  ,4.95573 ,0.32596 ,0.15281 ,0.06868 ,0.23942
353      +,0.22124 ,0.16054  ,5.02992 ,0.33484 ,0.16256 ,0.08004 ,0.24873
354      +,0.22487 ,0.16186  ,5.09020 ,0.34300 ,0.17160 ,0.09058 ,0.25733
355      +,0.22830 ,0.16308  ,5.13809 ,0.35048 ,0.17994 ,0.10033 ,0.26525
356      +,0.23149 ,0.16416  ,5.17207 ,0.35718 ,0.18752 ,0.10923 ,0.27239
357      +,0.23452 ,0.16518  ,5.19977 ,0.36346 ,0.19466 ,0.11762 ,0.27911
358      +,0.23736 ,0.16613  ,5.21821 ,0.36916 ,0.20122 ,0.12536 ,0.28524
359      +,0.24005 ,0.16701  ,5.23022 ,0.37440 ,0.20729 ,0.13255 ,0.29089
360      +,0.24260 ,0.16782  ,5.23743 ,0.37925 ,0.21296 ,0.13929 ,0.29615
361      +,0.24501 ,0.16856  ,5.23768 ,0.38364 ,0.21817 ,0.14552 ,0.30095/
362       DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),K=1,19)/
363      + 0.24385 ,0.18324  ,2.40488 ,0.19841 ,0.00554 ,-0.00007 ,0.10195
364      +,0.25524 ,0.18672  ,2.62889 ,0.21038 ,0.02135 ,-0.00010 ,0.11584
365      +,0.26489 ,0.18946  ,2.78332 ,0.22016 ,0.03468 ,-0.00009 ,0.12739
366      +,0.27318 ,0.19171  ,2.89196 ,0.22832 ,0.04613 ,-0.00011 ,0.13719
367      +,0.28039 ,0.19353  ,2.96283 ,0.23499 ,0.05587 ,0.00048 ,0.14541
368      +,0.28675 ,0.19498  ,3.00880 ,0.24057 ,0.06436 ,0.00615 ,0.15245
369      +,0.29238 ,0.19625  ,3.03626 ,0.24528 ,0.07181 ,0.01609 ,0.15853
370      +,0.29750 ,0.19726  ,3.04954 ,0.24926 ,0.07839 ,0.02412 ,0.16380
371      +,0.30198 ,0.19817  ,3.05237 ,0.25262 ,0.08421 ,0.03136 ,0.16841
372      +,0.30611 ,0.19883  ,3.04464 ,0.25537 ,0.08931 ,0.03778 ,0.17231
373      +,0.30984 ,0.19941  ,3.03094 ,0.25768 ,0.09384 ,0.04355 ,0.17575
374      +,0.31321 ,0.19991  ,3.01300 ,0.25964 ,0.09792 ,0.04878 ,0.17878
375      +,0.31625 ,0.20034  ,2.99145 ,0.26127 ,0.10163 ,0.05353 ,0.18143
376      +,0.31907 ,0.20063  ,2.96561 ,0.26251 ,0.10482 ,0.05770 ,0.18366
377      +,0.32170 ,0.20086  ,2.93888 ,0.26358 ,0.10777 ,0.06157 ,0.18567
378      +,0.32407 ,0.20104  ,2.90967 ,0.26440 ,0.11042 ,0.06511 ,0.18740
379      +,0.32623 ,0.20116  ,2.87941 ,0.26502 ,0.11278 ,0.06830 ,0.18889
380      +,0.32824 ,0.20125  ,2.84877 ,0.26550 ,0.11492 ,0.07121 ,0.19021
381      +,0.33007 ,0.20128  ,2.81695 ,0.26577 ,0.11681 ,0.07384 ,0.19128/
382       DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),K=1,19)/
383      + 0.31918 ,0.21571  ,2.12278 ,0.18810 ,0.00425 ,0.00000 ,0.09618
384      +,0.33020 ,0.21764  ,2.21533 ,0.19370 ,0.01583 ,0.00000 ,0.10476
385      +,0.33916 ,0.21889  ,2.26265 ,0.19772 ,0.02526 ,-0.00002 ,0.11149
386      +,0.34646 ,0.21982  ,2.28235 ,0.20070 ,0.03306 ,0.00001 ,0.11689
387      +,0.35271 ,0.22023  ,2.28125 ,0.20274 ,0.03958 ,0.00039 ,0.12117
388      +,0.35793 ,0.22047  ,2.26756 ,0.20417 ,0.04505 ,0.00420 ,0.12463
389      +,0.36234 ,0.22053  ,2.24534 ,0.20509 ,0.04970 ,0.01076 ,0.12741
390      +,0.36611 ,0.22046  ,2.21718 ,0.20560 ,0.05369 ,0.01593 ,0.12966
391      +,0.36954 ,0.22020  ,2.18516 ,0.20583 ,0.05714 ,0.02059 ,0.13152
392      +,0.37237 ,0.21983  ,2.14954 ,0.20571 ,0.06007 ,0.02453 ,0.13293
393      +,0.37481 ,0.21939  ,2.11250 ,0.20541 ,0.06261 ,0.02807 ,0.13404
394      +,0.37692 ,0.21893  ,2.07518 ,0.20495 ,0.06486 ,0.03123 ,0.13493
395      +,0.37872 ,0.21845  ,2.03793 ,0.20433 ,0.06685 ,0.03402 ,0.13563
396      +,0.38028 ,0.21787  ,1.99970 ,0.20356 ,0.06849 ,0.03642 ,0.13605
397      +,0.38167 ,0.21726  ,1.96268 ,0.20274 ,0.06996 ,0.03862 ,0.13638
398      +,0.38283 ,0.21658  ,1.92592 ,0.20184 ,0.07126 ,0.04059 ,0.13657
399      +,0.38382 ,0.21590  ,1.88989 ,0.20088 ,0.07237 ,0.04237 ,0.13664
400      +,0.38468 ,0.21522  ,1.85487 ,0.19988 ,0.07333 ,0.04398 ,0.13661
401      +,0.38536 ,0.21449  ,1.82032 ,0.19879 ,0.07413 ,0.04538 ,0.13649/
402       DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),K=1,19)/
403      + 0.38617 ,0.23920  ,1.87850 ,0.16998 ,0.00336 ,0.00005 ,0.08671
404      +,0.39508 ,0.23914  ,1.89558 ,0.17158 ,0.01226 ,0.00010 ,0.09193
405      +,0.40179 ,0.23864  ,1.88476 ,0.17225 ,0.01921 ,0.00005 ,0.09576
406      +,0.40701 ,0.23796  ,1.85946 ,0.17230 ,0.02488 ,0.00007 ,0.09862
407      +,0.41102 ,0.23697  ,1.82378 ,0.17184 ,0.02937 ,0.00036 ,0.10063
408      +,0.41415 ,0.23582  ,1.78318 ,0.17107 ,0.03314 ,0.00307 ,0.10213
409      +,0.41667 ,0.23455  ,1.74005 ,0.17004 ,0.03624 ,0.00766 ,0.10319
410      +,0.41855 ,0.23326  ,1.69588 ,0.16887 ,0.03884 ,0.01129 ,0.10389
411      +,0.41995 ,0.23196  ,1.65157 ,0.16754 ,0.04101 ,0.01443 ,0.10433
412      +,0.42097 ,0.23051  ,1.60718 ,0.16609 ,0.04283 ,0.01709 ,0.10451
413      +,0.42166 ,0.22908  ,1.56390 ,0.16458 ,0.04439 ,0.01940 ,0.10452
414      +,0.42212 ,0.22767  ,1.52219 ,0.16305 ,0.04571 ,0.02145 ,0.10441
415      +,0.42237 ,0.22626  ,1.48206 ,0.16151 ,0.04681 ,0.02330 ,0.10421
416      +,0.42227 ,0.22485  ,1.44281 ,0.15988 ,0.04774 ,0.02482 ,0.10386
417      +,0.42209 ,0.22345  ,1.40558 ,0.15829 ,0.04854 ,0.02619 ,0.10348
418      +,0.42181 ,0.22204  ,1.36957 ,0.15669 ,0.04919 ,0.02738 ,0.10300
419      +,0.42138 ,0.22064  ,1.33506 ,0.15511 ,0.04974 ,0.02843 ,0.10249
420      +,0.42085 ,0.21924  ,1.30214 ,0.15357 ,0.05020 ,0.02937 ,0.10194
421      +,0.42019 ,0.21787  ,1.27042 ,0.15201 ,0.05056 ,0.03018 ,0.10135/
422       DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),K=1,19)/
423      + 0.44386 ,0.25577  ,1.66263 ,0.14925 ,0.00263 ,0.00009 ,0.07599
424      +,0.44940 ,0.25367  ,1.63313 ,0.14844 ,0.00957 ,0.00009 ,0.07901
425      +,0.45300 ,0.25141  ,1.58907 ,0.14712 ,0.01484 ,0.00006 ,0.08102
426      +,0.45541 ,0.24896  ,1.53953 ,0.14551 ,0.01899 ,0.00005 ,0.08229
427      +,0.45662 ,0.24653  ,1.48670 ,0.14366 ,0.02234 ,0.00026 ,0.08305
428      +,0.45725 ,0.24404  ,1.43396 ,0.14173 ,0.02496 ,0.00227 ,0.08338
429      +,0.45733 ,0.24154  ,1.38248 ,0.13976 ,0.02712 ,0.00565 ,0.08346
430      +,0.45685 ,0.23917  ,1.33270 ,0.13772 ,0.02890 ,0.00818 ,0.08332
431      +,0.45616 ,0.23670  ,1.28515 ,0.13570 ,0.03037 ,0.01047 ,0.08303
432      +,0.45514 ,0.23429  ,1.23938 ,0.13367 ,0.03153 ,0.01229 ,0.08260
433      +,0.45393 ,0.23194  ,1.19606 ,0.13163 ,0.03249 ,0.01388 ,0.08208
434      +,0.45253 ,0.22968  ,1.15524 ,0.12965 ,0.03327 ,0.01527 ,0.08151
435      +,0.45090 ,0.22753  ,1.11674 ,0.12775 ,0.03389 ,0.01646 ,0.08089
436      +,0.44913 ,0.22536  ,1.07996 ,0.12588 ,0.03439 ,0.01746 ,0.08018
437      +,0.44736 ,0.22326  ,1.04554 ,0.12407 ,0.03482 ,0.01837 ,0.07947
438      +,0.44553 ,0.22117  ,1.01285 ,0.12227 ,0.03515 ,0.01919 ,0.07875
439      +,0.44366 ,0.21912  ,0.98195 ,0.12051 ,0.03541 ,0.01985 ,0.07802
440      +,0.44178 ,0.21711  ,0.95280 ,0.11880 ,0.03561 ,0.02041 ,0.07728
441      +,0.43980 ,0.21517  ,0.92508 ,0.11714 ,0.03574 ,0.02091 ,0.07651/
442       DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),K=1,19)/
443      + 0.50239 ,0.26849  ,1.42545 ,0.12335 ,0.00203 ,0.00010 ,0.06272
444      +,0.50287 ,0.26370  ,1.36207 ,0.12089 ,0.00720 ,0.00009 ,0.06408
445      +,0.50187 ,0.25913  ,1.29594 ,0.11830 ,0.01103 ,0.00008 ,0.06470
446      +,0.50011 ,0.25475  ,1.23169 ,0.11567 ,0.01400 ,0.00008 ,0.06486
447      +,0.49757 ,0.25052  ,1.17010 ,0.11312 ,0.01623 ,0.00023 ,0.06472
448      +,0.49469 ,0.24651  ,1.11249 ,0.11055 ,0.01800 ,0.00160 ,0.06433
449      +,0.49146 ,0.24267  ,1.05878 ,0.10809 ,0.01940 ,0.00397 ,0.06382
450      +,0.48815 ,0.23889  ,1.00887 ,0.10573 ,0.02052 ,0.00578 ,0.06316
451      +,0.48462 ,0.23534  ,0.96264 ,0.10344 ,0.02137 ,0.00726 ,0.06247
452      +,0.48091 ,0.23189  ,0.91942 ,0.10120 ,0.02207 ,0.00849 ,0.06173
453      +,0.47725 ,0.22855  ,0.87942 ,0.09905 ,0.02265 ,0.00950 ,0.06093
454      +,0.47357 ,0.22536  ,0.84242 ,0.09701 ,0.02309 ,0.01038 ,0.06011
455      +,0.46986 ,0.22232  ,0.80807 ,0.09509 ,0.02340 ,0.01118 ,0.05928
456      +,0.46606 ,0.21936  ,0.77593 ,0.09317 ,0.02366 ,0.01181 ,0.05847
457      +,0.46236 ,0.21654  ,0.74620 ,0.09136 ,0.02385 ,0.01236 ,0.05767
458      +,0.45870 ,0.21382  ,0.71836 ,0.08963 ,0.02393 ,0.01282 ,0.05686
459      +,0.45507 ,0.21119  ,0.69241 ,0.08795 ,0.02401 ,0.01320 ,0.05607
460      +,0.45150 ,0.20866  ,0.66821 ,0.08633 ,0.02406 ,0.01351 ,0.05531
461      +,0.44797 ,0.20617  ,0.64538 ,0.08478 ,0.02407 ,0.01380 ,0.05454/
462       DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),K=1,19)/
463      + 0.54606 ,0.27369  ,1.21914 ,0.09956 ,0.00165 ,0.00016 ,0.05068
464      +,0.54085 ,0.26659  ,1.13805 ,0.09646 ,0.00547 ,0.00011 ,0.05103
465      +,0.53502 ,0.25993  ,1.06207 ,0.09340 ,0.00831 ,0.00017 ,0.05090
466      +,0.52881 ,0.25381  ,0.99302 ,0.09055 ,0.01037 ,0.00019 ,0.05048
467      +,0.52247 ,0.24810  ,0.93017 ,0.08773 ,0.01197 ,0.00025 ,0.04994
468      +,0.51610 ,0.24271  ,0.87338 ,0.08515 ,0.01313 ,0.00122 ,0.04922
469      +,0.50984 ,0.23761  ,0.82194 ,0.08266 ,0.01409 ,0.00289 ,0.04842
470      +,0.50355 ,0.23282  ,0.77534 ,0.08032 ,0.01481 ,0.00415 ,0.04762
471      +,0.49739 ,0.22827  ,0.73298 ,0.07808 ,0.01535 ,0.00516 ,0.04683
472      +,0.49128 ,0.22399  ,0.69419 ,0.07596 ,0.01576 ,0.00594 ,0.04598
473      +,0.48530 ,0.21989  ,0.65887 ,0.07398 ,0.01608 ,0.00661 ,0.04512
474      +,0.47950 ,0.21599  ,0.62666 ,0.07212 ,0.01631 ,0.00722 ,0.04427
475      +,0.47387 ,0.21230  ,0.59715 ,0.07035 ,0.01647 ,0.00779 ,0.04342
476      +,0.46835 ,0.20871  ,0.56986 ,0.06863 ,0.01655 ,0.00810 ,0.04267
477      +,0.46301 ,0.20534  ,0.54484 ,0.06700 ,0.01661 ,0.00840 ,0.04193
478      +,0.45769 ,0.20217  ,0.52167 ,0.06545 ,0.01667 ,0.00877 ,0.04116
479      +,0.45261 ,0.19904  ,0.50019 ,0.06400 ,0.01666 ,0.00903 ,0.04041
480      +,0.44775 ,0.19597  ,0.48027 ,0.06262 ,0.01661 ,0.00922 ,0.03970
481      +,0.44294 ,0.19306  ,0.46181 ,0.06128 ,0.01659 ,0.00941 ,0.03899/
482       DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),K=1,19)/
483      + 0.57559 ,0.27298  ,1.03895 ,0.07893 ,0.00118 ,0.00006 ,0.04009
484      +,0.56481 ,0.26367  ,0.95032 ,0.07566 ,0.00418 ,0.00005 ,0.03992
485      +,0.55418 ,0.25518  ,0.87197 ,0.07263 ,0.00619 ,0.00007 ,0.03946
486      +,0.54393 ,0.24747  ,0.80345 ,0.06980 ,0.00778 ,0.00002 ,0.03883
487      +,0.53385 ,0.24047  ,0.74305 ,0.06712 ,0.00893 ,0.00012 ,0.03816
488      +,0.52424 ,0.23402  ,0.68996 ,0.06469 ,0.00971 ,0.00086 ,0.03740
489      +,0.51505 ,0.22795  ,0.64286 ,0.06243 ,0.01033 ,0.00202 ,0.03659
490      +,0.50625 ,0.22226  ,0.60090 ,0.06031 ,0.01086 ,0.00288 ,0.03572
491      +,0.49762 ,0.21714  ,0.56335 ,0.05834 ,0.01115 ,0.00374 ,0.03495
492      +,0.48935 ,0.21215  ,0.52948 ,0.05652 ,0.01141 ,0.00435 ,0.03407
493      +,0.48161 ,0.20729  ,0.49902 ,0.05478 ,0.01160 ,0.00480 ,0.03327
494      +,0.47415 ,0.20277  ,0.47153 ,0.05315 ,0.01172 ,0.00517 ,0.03253
495      +,0.46681 ,0.19868  ,0.44657 ,0.05164 ,0.01174 ,0.00550 ,0.03182
496      +,0.45977 ,0.19464  ,0.42381 ,0.05020 ,0.01177 ,0.00579 ,0.03111
497      +,0.45302 ,0.19087  ,0.40312 ,0.04882 ,0.01181 ,0.00602 ,0.03044
498      +,0.44638 ,0.18739  ,0.38415 ,0.04747 ,0.01189 ,0.00615 ,0.02981
499      +,0.44006 ,0.18399  ,0.36669 ,0.04624 ,0.01186 ,0.00629 ,0.02919
500      +,0.43403 ,0.18070  ,0.35059 ,0.04511 ,0.01176 ,0.00643 ,0.02857
501      +,0.42817 ,0.17758  ,0.33568 ,0.04402 ,0.01169 ,0.00652 ,0.02795/
502       DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),K=1,19)/
503      + 0.59230 ,0.26710  ,0.88214 ,0.06149 ,0.00095 ,0.00005 ,0.03123
504      +,0.57617 ,0.25599  ,0.79223 ,0.05846 ,0.00314 ,0.00006 ,0.03076
505      +,0.56107 ,0.24606  ,0.71585 ,0.05566 ,0.00466 ,0.00001 ,0.03019
506      +,0.54698 ,0.23725  ,0.65105 ,0.05309 ,0.00576 ,0.00002 ,0.02955
507      +,0.53365 ,0.22923  ,0.59520 ,0.05077 ,0.00657 ,0.00020 ,0.02880
508      +,0.52115 ,0.22193  ,0.54709 ,0.04869 ,0.00714 ,0.00071 ,0.02798
509      +,0.50957 ,0.21506  ,0.50519 ,0.04676 ,0.00755 ,0.00150 ,0.02718
510      +,0.49834 ,0.20892  ,0.46840 ,0.04496 ,0.00782 ,0.00214 ,0.02647
511      +,0.48777 ,0.20323  ,0.43569 ,0.04324 ,0.00809 ,0.00264 ,0.02577
512      +,0.47783 ,0.19771  ,0.40681 ,0.04169 ,0.00827 ,0.00306 ,0.02502
513      +,0.46826 ,0.19269  ,0.38098 ,0.04022 ,0.00838 ,0.00342 ,0.02434
514      +,0.45917 ,0.18800  ,0.35789 ,0.03887 ,0.00843 ,0.00368 ,0.02370
515      +,0.45056 ,0.18356  ,0.33720 ,0.03763 ,0.00841 ,0.00382 ,0.02310
516      +,0.44232 ,0.17928  ,0.31830 ,0.03646 ,0.00839 ,0.00400 ,0.02251
517      +,0.43450 ,0.17528  ,0.30124 ,0.03537 ,0.00835 ,0.00415 ,0.02194
518      +,0.42694 ,0.17156  ,0.28574 ,0.03435 ,0.00830 ,0.00426 ,0.02137
519      +,0.41971 ,0.16803  ,0.27158 ,0.03336 ,0.00825 ,0.00435 ,0.02085
520      +,0.41280 ,0.16467  ,0.25859 ,0.03241 ,0.00822 ,0.00442 ,0.02038
521      +,0.40616 ,0.16143  ,0.24678 ,0.03154 ,0.00815 ,0.00450 ,0.01990/
522       DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),K=1,19)/
523      + 0.59752 ,0.25712  ,0.74572 ,0.04722 ,0.00064 ,0.00006 ,0.02392
524      +,0.57646 ,0.24466  ,0.65865 ,0.04445 ,0.00237 ,0.00002 ,0.02355
525      +,0.55729 ,0.23375  ,0.58676 ,0.04207 ,0.00349 ,0.00004 ,0.02287
526      +,0.53987 ,0.22404  ,0.52711 ,0.03994 ,0.00427 ,0.00009 ,0.02214
527      +,0.52381 ,0.21525  ,0.47719 ,0.03799 ,0.00485 ,0.00016 ,0.02146
528      +,0.50890 ,0.20742  ,0.43449 ,0.03623 ,0.00524 ,0.00051 ,0.02075
529      +,0.49500 ,0.20026  ,0.39767 ,0.03458 ,0.00560 ,0.00109 ,0.02007
530      +,0.48211 ,0.19366  ,0.36567 ,0.03312 ,0.00573 ,0.00153 ,0.01941
531      +,0.47010 ,0.18752  ,0.33790 ,0.03175 ,0.00587 ,0.00187 ,0.01881
532      +,0.45867 ,0.18177  ,0.31340 ,0.03047 ,0.00599 ,0.00225 ,0.01826
533      +,0.44787 ,0.17654  ,0.29180 ,0.02929 ,0.00602 ,0.00243 ,0.01772
534      +,0.43769 ,0.17167  ,0.27263 ,0.02822 ,0.00603 ,0.00255 ,0.01719
535      +,0.42809 ,0.16706  ,0.25551 ,0.02723 ,0.00604 ,0.00269 ,0.01670
536      +,0.41900 ,0.16267  ,0.24014 ,0.02631 ,0.00602 ,0.00282 ,0.01618
537      +,0.41042 ,0.15859  ,0.22632 ,0.02544 ,0.00599 ,0.00291 ,0.01569
538      +,0.40218 ,0.15480  ,0.21379 ,0.02462 ,0.00595 ,0.00294 ,0.01524
539      +,0.39431 ,0.15124  ,0.20244 ,0.02386 ,0.00588 ,0.00300 ,0.01480
540      +,0.38680 ,0.14788  ,0.19212 ,0.02317 ,0.00579 ,0.00308 ,0.01439
541      +,0.37960 ,0.14467  ,0.18271 ,0.02247 ,0.00574 ,0.00311 ,0.01404/
542       DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),K=1,19)/
543      + 0.59248 ,0.24405  ,0.62737 ,0.03565 ,0.00049 ,0.00000 ,0.01815
544      +,0.56726 ,0.23053  ,0.54538 ,0.03335 ,0.00179 ,0.00007 ,0.01773
545      +,0.54487 ,0.21867  ,0.47960 ,0.03130 ,0.00274 ,0.00011 ,0.01714
546      +,0.52453 ,0.20850  ,0.42595 ,0.02955 ,0.00330 ,0.00004 ,0.01650
547      +,0.50617 ,0.19932  ,0.38135 ,0.02798 ,0.00366 ,0.00019 ,0.01593
548      +,0.48957 ,0.19098  ,0.34422 ,0.02654 ,0.00394 ,0.00038 ,0.01531
549      +,0.47397 ,0.18371  ,0.31262 ,0.02523 ,0.00414 ,0.00081 ,0.01476
550      +,0.45962 ,0.17699  ,0.28552 ,0.02408 ,0.00425 ,0.00117 ,0.01424
551      +,0.44645 ,0.17062  ,0.26195 ,0.02301 ,0.00430 ,0.00146 ,0.01376
552      +,0.43379 ,0.16509  ,0.24154 ,0.02199 ,0.00437 ,0.00166 ,0.01324
553      +,0.42214 ,0.15976  ,0.22369 ,0.02109 ,0.00437 ,0.00175 ,0.01278
554      +,0.41125 ,0.15479  ,0.20790 ,0.02027 ,0.00436 ,0.00184 ,0.01234
555      +,0.40096 ,0.15024  ,0.19381 ,0.01951 ,0.00435 ,0.00197 ,0.01192
556      +,0.39123 ,0.14597  ,0.18133 ,0.01877 ,0.00435 ,0.00207 ,0.01152
557      +,0.38211 ,0.14197  ,0.17020 ,0.01808 ,0.00433 ,0.00213 ,0.01116
558      +,0.37346 ,0.13819  ,0.16021 ,0.01745 ,0.00427 ,0.00216 ,0.01085
559      +,0.36529 ,0.13458  ,0.15119 ,0.01686 ,0.00420 ,0.00217 ,0.01054
560      +,0.35756 ,0.13114  ,0.14300 ,0.01630 ,0.00412 ,0.00218 ,0.01025
561      +,0.35018 ,0.12798  ,0.13552 ,0.01577 ,0.00405 ,0.00217 ,0.00995/
562       DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),K=1,19)/
563      + 0.57906 ,0.22822  ,0.52500 ,0.02649 ,0.00045 ,0.00008 ,0.01358
564      +,0.55024 ,0.21418  ,0.44956 ,0.02462 ,0.00152 ,0.00011 ,0.01309
565      +,0.52505 ,0.20198  ,0.39049 ,0.02301 ,0.00214 ,0.00006 ,0.01258
566      +,0.50254 ,0.19153  ,0.34299 ,0.02160 ,0.00258 ,0.00003 ,0.01210
567      +,0.48248 ,0.18217  ,0.30431 ,0.02032 ,0.00279 ,0.00011 ,0.01172
568      +,0.46424 ,0.17397  ,0.27230 ,0.01927 ,0.00291 ,0.00032 ,0.01116
569      +,0.44763 ,0.16650  ,0.24541 ,0.01831 ,0.00297 ,0.00066 ,0.01064
570      +,0.43226 ,0.15985  ,0.22241 ,0.01736 ,0.00309 ,0.00091 ,0.01025
571      +,0.41819 ,0.15368  ,0.20277 ,0.01648 ,0.00315 ,0.00101 ,0.00989
572      +,0.40497 ,0.14804  ,0.18603 ,0.01575 ,0.00314 ,0.00119 ,0.00950
573      +,0.39280 ,0.14277  ,0.17132 ,0.01506 ,0.00312 ,0.00122 ,0.00915
574      +,0.38152 ,0.13792  ,0.15844 ,0.01441 ,0.00310 ,0.00127 ,0.00882
575      +,0.37100 ,0.13346  ,0.14717 ,0.01379 ,0.00310 ,0.00139 ,0.00847
576      +,0.36099 ,0.12929  ,0.13713 ,0.01324 ,0.00308 ,0.00142 ,0.00818
577      +,0.35161 ,0.12540  ,0.12819 ,0.01272 ,0.00306 ,0.00144 ,0.00792
578      +,0.34274 ,0.12172  ,0.12017 ,0.01224 ,0.00303 ,0.00146 ,0.00767
579      +,0.33438 ,0.11830  ,0.11297 ,0.01181 ,0.00296 ,0.00148 ,0.00740
580      +,0.32649 ,0.11511  ,0.10648 ,0.01143 ,0.00288 ,0.00151 ,0.00713
581      +,0.31905 ,0.11203  ,0.10065 ,0.01104 ,0.00285 ,0.00153 ,0.00693/
582       DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),K=1,19)/
583      + 0.55791 ,0.21106  ,0.43664 ,0.01940 ,0.00038 ,0.00009 ,0.01003
584      +,0.52628 ,0.19682  ,0.36873 ,0.01801 ,0.00112 ,0.00010 ,0.00953
585      +,0.49904 ,0.18454  ,0.31621 ,0.01672 ,0.00157 ,0.00014 ,0.00917
586      +,0.47548 ,0.17360  ,0.27482 ,0.01566 ,0.00186 ,0.00011 ,0.00873
587      +,0.45388 ,0.16462  ,0.24149 ,0.01466 ,0.00202 ,0.00005 ,0.00842
588      +,0.43473 ,0.15646  ,0.21431 ,0.01380 ,0.00219 ,0.00022 ,0.00802
589      +,0.41745 ,0.14912  ,0.19183 ,0.01299 ,0.00230 ,0.00048 ,0.00770
590      +,0.40159 ,0.14253  ,0.17280 ,0.01231 ,0.00231 ,0.00060 ,0.00735
591      +,0.38700 ,0.13658  ,0.15660 ,0.01164 ,0.00239 ,0.00073 ,0.00707
592      +,0.37350 ,0.13115  ,0.14282 ,0.01107 ,0.00239 ,0.00083 ,0.00678
593      +,0.36126 ,0.12610  ,0.13080 ,0.01052 ,0.00234 ,0.00092 ,0.00651
594      +,0.34991 ,0.12144  ,0.12039 ,0.01001 ,0.00230 ,0.00099 ,0.00625
595      +,0.33921 ,0.11715  ,0.11137 ,0.00956 ,0.00230 ,0.00101 ,0.00600
596      +,0.32908 ,0.11321  ,0.10339 ,0.00917 ,0.00225 ,0.00101 ,0.00580
597      +,0.31967 ,0.10953  ,0.09630 ,0.00881 ,0.00221 ,0.00103 ,0.00561
598      +,0.31090 ,0.10603  ,0.08996 ,0.00848 ,0.00220 ,0.00111 ,0.00540
599      +,0.30254 ,0.10280  ,0.08430 ,0.00816 ,0.00217 ,0.00113 ,0.00521
600      +,0.29460 ,0.09980  ,0.07923 ,0.00786 ,0.00212 ,0.00111 ,0.00506
601      +,0.28720 ,0.09697  ,0.07468 ,0.00756 ,0.00208 ,0.00110 ,0.00489/
602       DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),K=1,19)/
603      + 0.53060 ,0.19336  ,0.36137 ,0.01417 ,0.00014 ,-0.00011 ,0.00712
604      +,0.49735 ,0.17892  ,0.30107 ,0.01298 ,0.00079 ,-0.00010 ,0.00682
605      +,0.46895 ,0.16651  ,0.25536 ,0.01208 ,0.00104 ,-0.00012 ,0.00649
606      +,0.44409 ,0.15618  ,0.21949 ,0.01123 ,0.00128 ,-0.00010 ,0.00620
607      +,0.42192 ,0.14732  ,0.19122 ,0.01047 ,0.00150 ,-0.00009 ,0.00590
608      +,0.40241 ,0.13938  ,0.16852 ,0.00980 ,0.00151 ,0.00003 ,0.00573
609      +,0.38484 ,0.13229  ,0.14965 ,0.00924 ,0.00156 ,0.00032 ,0.00540
610      +,0.36884 ,0.12602  ,0.13403 ,0.00868 ,0.00166 ,0.00041 ,0.00512
611      +,0.35449 ,0.12018  ,0.12071 ,0.00816 ,0.00160 ,0.00044 ,0.00496
612      +,0.34094 ,0.11499  ,0.10955 ,0.00779 ,0.00159 ,0.00053 ,0.00470
613      +,0.32844 ,0.11029  ,0.09995 ,0.00740 ,0.00162 ,0.00060 ,0.00451
614      +,0.31699 ,0.10598  ,0.09162 ,0.00703 ,0.00163 ,0.00064 ,0.00434
615      +,0.30649 ,0.10197  ,0.08434 ,0.00670 ,0.00160 ,0.00065 ,0.00419
616      +,0.29671 ,0.09822  ,0.07796 ,0.00638 ,0.00158 ,0.00068 ,0.00398
617      +,0.28756 ,0.09476  ,0.07235 ,0.00609 ,0.00155 ,0.00070 ,0.00381
618      +,0.27885 ,0.09152  ,0.06741 ,0.00586 ,0.00152 ,0.00069 ,0.00370
619      +,0.27070 ,0.08852  ,0.06300 ,0.00567 ,0.00148 ,0.00070 ,0.00358
620      +,0.26305 ,0.08572  ,0.05905 ,0.00550 ,0.00142 ,0.00073 ,0.00345
621      +,0.25587 ,0.08311  ,0.05547 ,0.00529 ,0.00140 ,0.00073 ,0.00333/
622       DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),K=1,19)/
623      + 0.49908 ,0.17408  ,0.29605 ,0.00990 ,0.00033 ,0.00008 ,0.00522
624      +,0.46459 ,0.16002  ,0.24350 ,0.00917 ,0.00063 ,0.00011 ,0.00492
625      +,0.43516 ,0.14840  ,0.20401 ,0.00842 ,0.00095 ,0.00014 ,0.00468
626      +,0.40998 ,0.13838  ,0.17383 ,0.00784 ,0.00099 ,0.00012 ,0.00447
627      +,0.38805 ,0.12984  ,0.15027 ,0.00719 ,0.00108 ,0.00010 ,0.00432
628      +,0.36837 ,0.12231  ,0.13143 ,0.00675 ,0.00119 ,0.00021 ,0.00401
629      +,0.35060 ,0.11573  ,0.11599 ,0.00638 ,0.00116 ,0.00025 ,0.00382
630      +,0.33482 ,0.10974  ,0.10316 ,0.00599 ,0.00123 ,0.00036 ,0.00362
631      +,0.32064 ,0.10434  ,0.09247 ,0.00564 ,0.00121 ,0.00044 ,0.00340
632      +,0.30723 ,0.09953  ,0.08347 ,0.00534 ,0.00123 ,0.00043 ,0.00334
633      +,0.29510 ,0.09520  ,0.07575 ,0.00506 ,0.00121 ,0.00045 ,0.00320
634      +,0.28400 ,0.09123  ,0.06913 ,0.00481 ,0.00119 ,0.00048 ,0.00304
635      +,0.27376 ,0.08751  ,0.06344 ,0.00457 ,0.00119 ,0.00049 ,0.00289
636      +,0.26437 ,0.08406  ,0.05842 ,0.00434 ,0.00116 ,0.00051 ,0.00276
637      +,0.25558 ,0.08090  ,0.05402 ,0.00414 ,0.00113 ,0.00052 ,0.00264
638      +,0.24712 ,0.07800  ,0.05016 ,0.00400 ,0.00109 ,0.00052 ,0.00256
639      +,0.23931 ,0.07529  ,0.04673 ,0.00385 ,0.00105 ,0.00052 ,0.00244
640      +,0.23205 ,0.07277  ,0.04368 ,0.00370 ,0.00100 ,0.00051 ,0.00231
641      +,0.22529 ,0.07038  ,0.04091 ,0.00355 ,0.00098 ,0.00052 ,0.00224/
642       DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),K=1,19)/
643      + 0.46373 ,0.15569  ,0.24168 ,0.00703 ,0.00011 ,-0.00004 ,0.00358
644      +,0.42883 ,0.14223  ,0.19619 ,0.00645 ,0.00040 ,-0.00005 ,0.00339
645      +,0.39945 ,0.13108  ,0.16243 ,0.00591 ,0.00055 ,-0.00002 ,0.00326
646      +,0.37439 ,0.12158  ,0.13734 ,0.00545 ,0.00074 ,0.00001 ,0.00306
647      +,0.35256 ,0.11362  ,0.11768 ,0.00504 ,0.00080 ,0.00006 ,0.00298
648      +,0.33333 ,0.10649  ,0.10211 ,0.00473 ,0.00084 ,0.00009 ,0.00278
649      +,0.31618 ,0.10034  ,0.08945 ,0.00442 ,0.00084 ,0.00017 ,0.00258
650      +,0.30062 ,0.09488  ,0.07910 ,0.00415 ,0.00082 ,0.00020 ,0.00250
651      +,0.28678 ,0.08995  ,0.07053 ,0.00391 ,0.00083 ,0.00025 ,0.00241
652      +,0.27431 ,0.08545  ,0.06334 ,0.00368 ,0.00084 ,0.00028 ,0.00220
653      +,0.26270 ,0.08145  ,0.05722 ,0.00347 ,0.00083 ,0.00031 ,0.00209
654      +,0.25202 ,0.07781  ,0.05198 ,0.00329 ,0.00081 ,0.00032 ,0.00201
655      +,0.24224 ,0.07445  ,0.04748 ,0.00315 ,0.00079 ,0.00033 ,0.00192
656      +,0.23325 ,0.07133  ,0.04357 ,0.00301 ,0.00075 ,0.00034 ,0.00183
657      +,0.22490 ,0.06849  ,0.04017 ,0.00287 ,0.00072 ,0.00034 ,0.00175
658      +,0.21699 ,0.06592  ,0.03718 ,0.00272 ,0.00071 ,0.00033 ,0.00165
659      +,0.20972 ,0.06347  ,0.03453 ,0.00259 ,0.00070 ,0.00033 ,0.00158
660      +,0.20301 ,0.06114  ,0.03216 ,0.00247 ,0.00068 ,0.00033 ,0.00154
661      +,0.19662 ,0.05903  ,0.03008 ,0.00237 ,0.00066 ,0.00033 ,0.00149/
662       DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),K=1,19)/
663      + 0.42620 ,0.13706  ,0.19493 ,0.00480 ,0.00013 ,0.00004 ,0.00250
664      +,0.39171 ,0.12435  ,0.15650 ,0.00431 ,0.00036 ,0.00008 ,0.00244
665      +,0.36261 ,0.11398  ,0.12830 ,0.00407 ,0.00046 ,0.00008 ,0.00226
666      +,0.33811 ,0.10527  ,0.10735 ,0.00364 ,0.00054 ,-0.00002 ,0.00216
667      +,0.31654 ,0.09805  ,0.09125 ,0.00347 ,0.00063 ,0.00000 ,0.00199
668      +,0.29823 ,0.09148  ,0.07860 ,0.00319 ,0.00058 ,0.00001 ,0.00182
669      +,0.28164 ,0.08586  ,0.06843 ,0.00301 ,0.00061 ,0.00008 ,0.00175
670      +,0.26713 ,0.08090  ,0.06016 ,0.00279 ,0.00059 ,0.00016 ,0.00169
671      +,0.25390 ,0.07646  ,0.05335 ,0.00258 ,0.00060 ,0.00017 ,0.00158
672      +,0.24180 ,0.07252  ,0.04768 ,0.00247 ,0.00056 ,0.00017 ,0.00146
673      +,0.23079 ,0.06889  ,0.04289 ,0.00236 ,0.00055 ,0.00019 ,0.00140
674      +,0.22087 ,0.06556  ,0.03880 ,0.00221 ,0.00055 ,0.00021 ,0.00136
675      +,0.21196 ,0.06251  ,0.03528 ,0.00200 ,0.00052 ,0.00020 ,0.00132
676      +,0.20350 ,0.05979  ,0.03228 ,0.00193 ,0.00051 ,0.00023 ,0.00122
677      +,0.19562 ,0.05730  ,0.02966 ,0.00189 ,0.00050 ,0.00024 ,0.00113
678      +,0.18816 ,0.05496  ,0.02736 ,0.00186 ,0.00048 ,0.00022 ,0.00111
679      +,0.18145 ,0.05279  ,0.02534 ,0.00177 ,0.00045 ,0.00021 ,0.00106
680      +,0.17537 ,0.05078  ,0.02357 ,0.00164 ,0.00042 ,0.00020 ,0.00101
681      +,0.16953 ,0.04891  ,0.02199 ,0.00157 ,0.00042 ,0.00021 ,0.00097/
682       DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),K=1,19)/
683      + 0.38732 ,0.11954  ,0.15628 ,0.00319 ,0.00014 ,0.00003 ,0.00169
684      +,0.35349 ,0.10781  ,0.12384 ,0.00299 ,0.00024 ,0.00007 ,0.00163
685      +,0.32553 ,0.09833  ,0.10064 ,0.00269 ,0.00037 ,0.00005 ,0.00156
686      +,0.30185 ,0.09039  ,0.08341 ,0.00251 ,0.00033 ,-0.00002 ,0.00139
687      +,0.28162 ,0.08356  ,0.07036 ,0.00236 ,0.00035 ,0.00002 ,0.00128
688      +,0.26397 ,0.07783  ,0.06008 ,0.00221 ,0.00037 ,0.00005 ,0.00120
689      +,0.24850 ,0.07272  ,0.05200 ,0.00209 ,0.00039 ,0.00009 ,0.00114
690      +,0.23474 ,0.06822  ,0.04547 ,0.00192 ,0.00038 ,0.00011 ,0.00108
691      +,0.22240 ,0.06428  ,0.04011 ,0.00179 ,0.00035 ,0.00009 ,0.00105
692      +,0.21128 ,0.06075  ,0.03567 ,0.00168 ,0.00038 ,0.00013 ,0.00096
693      +,0.20123 ,0.05754  ,0.03195 ,0.00153 ,0.00036 ,0.00010 ,0.00091
694      +,0.19206 ,0.05464  ,0.02881 ,0.00143 ,0.00035 ,0.00009 ,0.00086
695      +,0.18360 ,0.05201  ,0.02611 ,0.00139 ,0.00036 ,0.00014 ,0.00081
696      +,0.17576 ,0.04961  ,0.02381 ,0.00132 ,0.00030 ,0.00012 ,0.00075
697      +,0.16855 ,0.04741  ,0.02180 ,0.00127 ,0.00026 ,0.00010 ,0.00070
698      +,0.16186 ,0.04538  ,0.02005 ,0.00123 ,0.00027 ,0.00011 ,0.00067
699      +,0.15577 ,0.04351  ,0.01853 ,0.00117 ,0.00027 ,0.00010 ,0.00065
700      +,0.15019 ,0.04179  ,0.01719 ,0.00108 ,0.00028 ,0.00010 ,0.00065
701      +,0.14492 ,0.04018  ,0.01600 ,0.00104 ,0.00028 ,0.00012 ,0.00063/
702       DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),K=1,19)/
703      + 0.34795 ,0.10291  ,0.12412 ,0.00212 ,0.00008 ,-0.00003 ,0.00108
704      +,0.31533 ,0.09223  ,0.09698 ,0.00198 ,0.00011 ,0.00003 ,0.00109
705      +,0.28844 ,0.08352  ,0.07782 ,0.00187 ,0.00028 ,0.00002 ,0.00097
706      +,0.26642 ,0.07636  ,0.06385 ,0.00166 ,0.00022 ,0.00000 ,0.00095
707      +,0.24746 ,0.07031  ,0.05337 ,0.00149 ,0.00026 ,-0.00001 ,0.00089
708      +,0.23093 ,0.06512  ,0.04528 ,0.00139 ,0.00027 ,0.00002 ,0.00086
709      +,0.21638 ,0.06065  ,0.03897 ,0.00136 ,0.00029 ,0.00008 ,0.00079
710      +,0.20357 ,0.05676  ,0.03384 ,0.00126 ,0.00026 ,0.00007 ,0.00075
711      +,0.19247 ,0.05318  ,0.02968 ,0.00110 ,0.00028 ,0.00009 ,0.00073
712      +,0.18207 ,0.05010  ,0.02626 ,0.00103 ,0.00028 ,0.00010 ,0.00066
713      +,0.17272 ,0.04732  ,0.02340 ,0.00101 ,0.00027 ,0.00010 ,0.00063
714      +,0.16430 ,0.04480  ,0.02100 ,0.00097 ,0.00026 ,0.00010 ,0.00060
715      +,0.15671 ,0.04251  ,0.01897 ,0.00087 ,0.00025 ,0.00010 ,0.00057
716      +,0.14968 ,0.04044  ,0.01723 ,0.00083 ,0.00024 ,0.00010 ,0.00054
717      +,0.14326 ,0.03855  ,0.01573 ,0.00079 ,0.00023 ,0.00011 ,0.00051
718      +,0.13737 ,0.03681  ,0.01443 ,0.00072 ,0.00024 ,0.00010 ,0.00048
719      +,0.13186 ,0.03520  ,0.01329 ,0.00069 ,0.00024 ,0.00010 ,0.00046
720      +,0.12673 ,0.03371  ,0.01229 ,0.00069 ,0.00024 ,0.00012 ,0.00046
721      +,0.12204 ,0.03233  ,0.01141 ,0.00067 ,0.00024 ,0.00014 ,0.00045/
722       DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),K=1,19)/
723      + 0.30892 ,0.08752  ,0.09759 ,0.00137 ,0.00003 ,-0.00009 ,0.00067
724      +,0.27826 ,0.07794  ,0.07533 ,0.00131 ,0.00004 ,-0.00008 ,0.00065
725      +,0.25331 ,0.07024  ,0.05980 ,0.00118 ,0.00010 ,-0.00004 ,0.00063
726      +,0.23249 ,0.06389  ,0.04868 ,0.00111 ,0.00018 ,0.00000 ,0.00060
727      +,0.21490 ,0.05861  ,0.04031 ,0.00098 ,0.00019 ,-0.00007 ,0.00051
728      +,0.19984 ,0.05399  ,0.03401 ,0.00092 ,0.00021 ,-0.00003 ,0.00051
729      +,0.18658 ,0.05010  ,0.02904 ,0.00084 ,0.00020 ,0.00001 ,0.00052
730      +,0.17483 ,0.04668  ,0.02510 ,0.00081 ,0.00017 ,0.00000 ,0.00047
731      +,0.16452 ,0.04371  ,0.02189 ,0.00076 ,0.00015 ,0.00000 ,0.00040
732      +,0.15535 ,0.04100  ,0.01927 ,0.00069 ,0.00016 ,0.00003 ,0.00038
733      +,0.14706 ,0.03857  ,0.01710 ,0.00063 ,0.00014 ,0.00004 ,0.00037
734      +,0.13955 ,0.03640  ,0.01529 ,0.00060 ,0.00014 ,0.00004 ,0.00036
735      +,0.13269 ,0.03447  ,0.01377 ,0.00057 ,0.00016 ,0.00005 ,0.00035
736      +,0.12645 ,0.03271  ,0.01247 ,0.00053 ,0.00015 ,0.00006 ,0.00033
737      +,0.12075 ,0.03110  ,0.01135 ,0.00050 ,0.00015 ,0.00006 ,0.00031
738      +,0.11548 ,0.02961  ,0.01039 ,0.00047 ,0.00015 ,0.00005 ,0.00032
739      +,0.11064 ,0.02826  ,0.00955 ,0.00044 ,0.00015 ,0.00004 ,0.00030
740      +,0.10617 ,0.02703  ,0.00881 ,0.00041 ,0.00015 ,0.00004 ,0.00028
741      +,0.10199 ,0.02587  ,0.00815 ,0.00039 ,0.00014 ,0.00004 ,0.00026/
742       DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),K=1,19)/
743      + 0.27066 ,0.07337  ,0.07572 ,0.00094 ,0.00001 ,-0.00001 ,0.00045
744      +,0.24242 ,0.06492  ,0.05777 ,0.00083 ,0.00002 ,-0.00006 ,0.00044
745      +,0.21934 ,0.05817  ,0.04538 ,0.00076 ,0.00008 ,-0.00007 ,0.00036
746      +,0.20047 ,0.05262  ,0.03659 ,0.00071 ,0.00015 ,-0.00001 ,0.00040
747      +,0.18422 ,0.04805  ,0.03006 ,0.00071 ,0.00011 ,0.00001 ,0.00035
748      +,0.17066 ,0.04415  ,0.02517 ,0.00057 ,0.00009 ,-0.00003 ,0.00031
749      +,0.15879 ,0.04081  ,0.02135 ,0.00052 ,0.00010 ,-0.00003 ,0.00030
750      +,0.14842 ,0.03785  ,0.01833 ,0.00050 ,0.00010 ,-0.00001 ,0.00028
751      +,0.13925 ,0.03531  ,0.01592 ,0.00044 ,0.00012 ,0.00002 ,0.00027
752      +,0.13087 ,0.03300  ,0.01396 ,0.00046 ,0.00010 ,0.00004 ,0.00025
753      +,0.12347 ,0.03098  ,0.01233 ,0.00042 ,0.00010 ,0.00003 ,0.00024
754      +,0.11688 ,0.02917  ,0.01098 ,0.00038 ,0.00011 ,0.00003 ,0.00022
755      +,0.11098 ,0.02753  ,0.00984 ,0.00034 ,0.00012 ,0.00003 ,0.00022
756      +,0.10549 ,0.02604  ,0.00888 ,0.00032 ,0.00012 ,0.00004 ,0.00022
757      +,0.10047 ,0.02470  ,0.00806 ,0.00030 ,0.00012 ,0.00004 ,0.00021
758      +,0.09583 ,0.02347  ,0.00735 ,0.00029 ,0.00011 ,0.00004 ,0.00019
759      +,0.09160 ,0.02235  ,0.00674 ,0.00027 ,0.00010 ,0.00004 ,0.00018
760      +,0.08771 ,0.02131  ,0.00621 ,0.00025 ,0.00010 ,0.00004 ,0.00017
761      +,0.08407 ,0.02036  ,0.00574 ,0.00024 ,0.00009 ,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.23439 ,0.06066  ,0.05814 ,0.00061 ,-0.00005 ,-0.00004 ,0.00023
764      +,0.20844 ,0.05330  ,0.04371 ,0.00057 ,0.00001 ,-0.00005 ,0.00023
765      +,0.18736 ,0.04749  ,0.03394 ,0.00052 ,0.00003 ,-0.00006 ,0.00021
766      +,0.17043 ,0.04271  ,0.02705 ,0.00043 ,0.00006 ,-0.00007 ,0.00022
767      +,0.15603 ,0.03880  ,0.02208 ,0.00040 ,0.00008 ,-0.00006 ,0.00021
768      +,0.14388 ,0.03549  ,0.01832 ,0.00036 ,0.00007 ,-0.00003 ,0.00020
769      +,0.13339 ,0.03262  ,0.01545 ,0.00033 ,0.00008 ,-0.00003 ,0.00019
770      +,0.12407 ,0.03015  ,0.01317 ,0.00032 ,0.00010 ,0.00000 ,0.00019
771      +,0.11596 ,0.02800  ,0.01138 ,0.00028 ,0.00010 ,0.00000 ,0.00018
772      +,0.10871 ,0.02612  ,0.00993 ,0.00027 ,0.00008 ,0.00002 ,0.00018
773      +,0.10225 ,0.02443  ,0.00874 ,0.00026 ,0.00008 ,0.00002 ,0.00018
774      +,0.09646 ,0.02293  ,0.00775 ,0.00024 ,0.00008 ,0.00002 ,0.00017
775      +,0.09124 ,0.02160  ,0.00692 ,0.00020 ,0.00010 ,0.00003 ,0.00016
776      +,0.08647 ,0.02037  ,0.00622 ,0.00019 ,0.00008 ,0.00003 ,0.00014
777      +,0.08216 ,0.01926  ,0.00563 ,0.00017 ,0.00006 ,0.00002 ,0.00013
778      +,0.07827 ,0.01826  ,0.00512 ,0.00015 ,0.00007 ,0.00003 ,0.00013
779      +,0.07463 ,0.01734  ,0.00468 ,0.00013 ,0.00007 ,0.00003 ,0.00012
780      +,0.07126 ,0.01649  ,0.00430 ,0.00013 ,0.00006 ,0.00002 ,0.00011
781      +,0.06814 ,0.01573  ,0.00396 ,0.00013 ,0.00006 ,0.00002 ,0.00010/
782       DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),K=1,19)/
783      + 0.20032 ,0.04927  ,0.04383 ,0.00029 ,-0.00002 ,-0.00005 ,0.00015
784      +,0.17661 ,0.04304  ,0.03254 ,0.00030 ,0.00000 ,-0.00006 ,0.00012
785      +,0.15799 ,0.03806  ,0.02497 ,0.00029 ,0.00002 ,-0.00005 ,0.00014
786      +,0.14274 ,0.03405  ,0.01970 ,0.00027 ,0.00001 ,-0.00005 ,0.00013
787      +,0.13017 ,0.03075  ,0.01593 ,0.00022 ,0.00003 ,-0.00004 ,0.00012
788      +,0.11930 ,0.02800  ,0.01314 ,0.00025 ,0.00006 ,-0.00001 ,0.00015
789      +,0.11016 ,0.02567  ,0.01099 ,0.00020 ,0.00007 ,-0.00001 ,0.00013
790      +,0.10216 ,0.02364  ,0.00931 ,0.00016 ,0.00006 ,-0.00001 ,0.00012
791      +,0.09517 ,0.02186  ,0.00801 ,0.00014 ,0.00006 ,0.00000 ,0.00013
792      +,0.08893 ,0.02031  ,0.00694 ,0.00012 ,0.00006 ,0.00001 ,0.00012
793      +,0.08334 ,0.01894  ,0.00608 ,0.00013 ,0.00007 ,0.00003 ,0.00011
794      +,0.07834 ,0.01772  ,0.00537 ,0.00014 ,0.00007 ,0.00004 ,0.00011
795      +,0.07387 ,0.01663  ,0.00478 ,0.00012 ,0.00005 ,0.00002 ,0.00010
796      +,0.06985 ,0.01564  ,0.00429 ,0.00010 ,0.00006 ,0.00002 ,0.00010
797      +,0.06620 ,0.01475  ,0.00387 ,0.00009 ,0.00006 ,0.00002 ,0.00009
798      +,0.06282 ,0.01394  ,0.00351 ,0.00008 ,0.00006 ,0.00002 ,0.00008
799      +,0.05976 ,0.01321  ,0.00320 ,0.00008 ,0.00006 ,0.00003 ,0.00008
800      +,0.05697 ,0.01254  ,0.00293 ,0.00007 ,0.00006 ,0.00003 ,0.00008
801      +,0.05438 ,0.01193  ,0.00270 ,0.00007 ,0.00006 ,0.00003 ,0.00008/
802       DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),K=1,19)/
803      + 0.16842 ,0.03952  ,0.03271 ,0.00026 ,-0.00005 ,-0.00008 ,0.00006
804      +,0.14762 ,0.03422  ,0.02394 ,0.00026 ,-0.00003 ,-0.00010 ,0.00004
805      +,0.13148 ,0.03011  ,0.01817 ,0.00020 ,-0.00001 ,-0.00005 ,0.00006
806      +,0.11817 ,0.02683  ,0.01422 ,0.00017 ,0.00004 ,-0.00004 ,0.00007
807      +,0.10712 ,0.02412  ,0.01141 ,0.00017 ,0.00001 ,-0.00003 ,0.00008
808      +,0.09783 ,0.02185  ,0.00933 ,0.00015 ,0.00002 ,-0.00003 ,0.00007
809      +,0.08997 ,0.01995  ,0.00776 ,0.00012 ,0.00004 ,-0.00003 ,0.00007
810      +,0.08309 ,0.01829  ,0.00655 ,0.00011 ,0.00005 ,-0.00003 ,0.00007
811      +,0.07708 ,0.01687  ,0.00559 ,0.00010 ,0.00005 ,0.00000 ,0.00008
812      +,0.07178 ,0.01561  ,0.00484 ,0.00011 ,0.00004 ,0.00001 ,0.00007
813      +,0.06707 ,0.01451  ,0.00422 ,0.00010 ,0.00003 ,0.00000 ,0.00005
814      +,0.06287 ,0.01353  ,0.00371 ,0.00009 ,0.00003 ,0.00000 ,0.00005
815      +,0.05911 ,0.01268  ,0.00329 ,0.00009 ,0.00004 ,0.00001 ,0.00005
816      +,0.05577 ,0.01189  ,0.00294 ,0.00007 ,0.00004 ,0.00001 ,0.00005
817      +,0.05274 ,0.01118  ,0.00265 ,0.00006 ,0.00004 ,0.00002 ,0.00005
818      +,0.04992 ,0.01056  ,0.00240 ,0.00006 ,0.00003 ,0.00002 ,0.00005
819      +,0.04738 ,0.00998  ,0.00218 ,0.00005 ,0.00003 ,0.00002 ,0.00005
820      +,0.04507 ,0.00944  ,0.00199 ,0.00005 ,0.00004 ,0.00001 ,0.00004
821      +,0.04293 ,0.00896  ,0.00183 ,0.00004 ,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.13926 ,0.03092  ,0.02385 ,0.00013 ,-0.00003 ,-0.00002 ,0.00002
824      +,0.12138 ,0.02666  ,0.01727 ,0.00012 ,-0.00001 ,-0.00002 ,0.00003
825      +,0.10736 ,0.02331  ,0.01299 ,0.00010 ,-0.00003 ,-0.00002 ,0.00003
826      +,0.09611 ,0.02066  ,0.01009 ,0.00008 ,-0.00001 ,-0.00001 ,0.00003
827      +,0.08660 ,0.01850  ,0.00802 ,0.00011 ,0.00000 ,-0.00001 ,0.00003
828      +,0.07881 ,0.01670  ,0.00652 ,0.00009 ,0.00000 ,-0.00002 ,0.00002
829      +,0.07218 ,0.01518  ,0.00539 ,0.00008 ,0.00000 ,-0.00001 ,0.00003
830      +,0.06646 ,0.01388  ,0.00452 ,0.00007 ,0.00001 ,-0.00002 ,0.00003
831      +,0.06152 ,0.01276  ,0.00384 ,0.00004 ,0.00000 ,-0.00002 ,0.00001
832      +,0.05706 ,0.01179  ,0.00331 ,0.00005 ,0.00001 ,0.00000 ,0.00003
833      +,0.05316 ,0.01093  ,0.00287 ,0.00005 ,0.00001 ,0.00000 ,0.00003
834      +,0.04970 ,0.01016  ,0.00252 ,0.00004 ,0.00001 ,0.00000 ,0.00002
835      +,0.04660 ,0.00948  ,0.00223 ,0.00004 ,0.00000 ,-0.00001 ,0.00001
836      +,0.04381 ,0.00887  ,0.00199 ,0.00004 ,0.00000 ,-0.00001 ,0.00001
837      +,0.04129 ,0.00833  ,0.00178 ,0.00004 ,0.00001 ,-0.00001 ,0.00002
838      +,0.03898 ,0.00784  ,0.00161 ,0.00004 ,0.00000 ,-0.00001 ,0.00001
839      +,0.03689 ,0.00739  ,0.00146 ,0.00004 ,0.00001 ,0.00000 ,0.00001
840      +,0.03500 ,0.00699  ,0.00133 ,0.00004 ,0.00001 ,0.00000 ,0.00001
841      +,0.03327 ,0.00662  ,0.00122 ,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.09026 ,0.01780  ,0.01192 ,0.00001 ,-0.00002 ,-0.00001 ,-0.00001
844      +,0.07738 ,0.01511  ,0.00837 ,0.00005 ,-0.00001 ,-0.00001 ,0.00000
845      +,0.06751 ,0.01303  ,0.00614 ,0.00003 ,0.00000 ,-0.00003 ,-0.00001
846      +,0.05979 ,0.01142  ,0.00466 ,0.00001 ,0.00000 ,-0.00001 ,0.00001
847      +,0.05335 ,0.01011  ,0.00364 ,0.00001 ,0.00001 ,-0.00001 ,0.00001
848      +,0.04812 ,0.00904  ,0.00291 ,0.00001 ,0.00001 ,0.00001 ,0.00001
849      +,0.04360 ,0.00814  ,0.00237 ,0.00002 ,0.00001 ,0.00001 ,0.00001
850      +,0.03977 ,0.00738  ,0.00196 ,0.00002 ,0.00001 ,0.00000 ,0.00001
851      +,0.03645 ,0.00672  ,0.00165 ,0.00002 ,0.00000 ,0.00000 ,0.00001
852      +,0.03360 ,0.00616  ,0.00140 ,0.00001 ,0.00000 ,0.00000 ,0.00001
853      +,0.03108 ,0.00567  ,0.00121 ,0.00001 ,0.00001 ,0.00000 ,0.00001
854      +,0.02885 ,0.00523  ,0.00105 ,0.00001 ,0.00001 ,0.00000 ,0.00001
855      +,0.02686 ,0.00485  ,0.00092 ,0.00001 ,0.00001 ,0.00000 ,0.00001
856      +,0.02514 ,0.00452  ,0.00082 ,0.00000 ,0.00001 ,0.00000 ,0.00001
857      +,0.02359 ,0.00422  ,0.00073 ,0.00000 ,0.00001 ,0.00000 ,0.00001
858      +,0.02214 ,0.00395  ,0.00065 ,0.00000 ,0.00001 ,0.00000 ,0.00001
859      +,0.02084 ,0.00370  ,0.00059 ,0.00000 ,0.00001 ,0.00000 ,0.00001
860      +,0.01966 ,0.00348  ,0.00053 ,0.00000 ,0.00001 ,0.00000 ,0.00001
861      +,0.01859 ,0.00328  ,0.00049 ,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.05347 ,0.00926  ,0.00538 ,0.00002 ,-0.00001 ,-0.00001 ,-0.00001
864      +,0.04515 ,0.00773  ,0.00366 ,0.00002 ,-0.00001 ,-0.00001 ,-0.00001
865      +,0.03891 ,0.00658  ,0.00262 ,0.00000 ,0.00000 ,-0.00001 ,0.00000
866      +,0.03392 ,0.00569  ,0.00194 ,0.00002 ,0.00000 ,0.00000 ,0.00001
867      +,0.03000 ,0.00497  ,0.00148 ,0.00000 ,0.00000 ,-0.00001 ,0.00000
868      +,0.02673 ,0.00440  ,0.00117 ,0.00000 ,0.00000 ,-0.00001 ,0.00000
869      +,0.02398 ,0.00393  ,0.00094 ,0.00001 ,0.00000 ,0.00000 ,0.00000
870      +,0.02167 ,0.00353  ,0.00076 ,0.00001 ,0.00000 ,0.00000 ,0.00001
871      +,0.01971 ,0.00318  ,0.00064 ,0.00000 ,0.00000 ,0.00000 ,0.00000
872      +,0.01802 ,0.00289  ,0.00054 ,0.00000 ,0.00000 ,0.00000 ,0.00000
873      +,0.01654 ,0.00264  ,0.00046 ,0.00000 ,0.00000 ,0.00000 ,0.00000
874      +,0.01523 ,0.00242  ,0.00039 ,0.00000 ,0.00000 ,0.00000 ,0.00000
875      +,0.01407 ,0.00223  ,0.00034 ,0.00001 ,0.00000 ,0.00000 ,0.00000
876      +,0.01307 ,0.00206  ,0.00030 ,0.00001 ,0.00000 ,0.00000 ,0.00000
877      +,0.01218 ,0.00191  ,0.00027 ,0.00000 ,0.00000 ,0.00000 ,0.00000
878      +,0.01138 ,0.00178  ,0.00024 ,0.00000 ,0.00000 ,0.00000 ,0.00000
879      +,0.01066 ,0.00166  ,0.00021 ,0.00000 ,0.00000 ,0.00000 ,0.00000
880      +,0.01001 ,0.00155  ,0.00019 ,0.00000 ,0.00000 ,0.00000 ,0.00000
881      +,0.00941 ,0.00146  ,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.02803 ,0.00416  ,0.00209 ,0.00001 ,0.00000 ,0.00000 ,0.00000
884      +,0.02331 ,0.00341  ,0.00138 ,0.00000 ,0.00000 ,0.00000 ,0.00000
885      +,0.01975 ,0.00287  ,0.00096 ,0.00000 ,0.00000 ,0.00000 ,0.00000
886      +,0.01700 ,0.00244  ,0.00069 ,0.00000 ,0.00000 ,0.00000 ,0.00000
887      +,0.01480 ,0.00211  ,0.00052 ,0.00000 ,0.00000 ,0.00000 ,0.00000
888      +,0.01304 ,0.00185  ,0.00040 ,0.00000 ,0.00000 ,0.00000 ,0.00000
889      +,0.01159 ,0.00163  ,0.00032 ,0.00000 ,0.00000 ,0.00000 ,0.00000
890      +,0.01036 ,0.00145  ,0.00026 ,0.00000 ,0.00000 ,0.00000 ,0.00000
891      +,0.00935 ,0.00130  ,0.00021 ,0.00000 ,0.00000 ,0.00000 ,0.00000
892      +,0.00845 ,0.00117  ,0.00017 ,0.00000 ,0.00000 ,0.00000 ,0.00000
893      +,0.00769 ,0.00106  ,0.00015 ,0.00000 ,0.00000 ,0.00000 ,0.00000
894      +,0.00703 ,0.00096  ,0.00013 ,0.00000 ,0.00000 ,0.00000 ,0.00000
895      +,0.00646 ,0.00088  ,0.00011 ,0.00000 ,0.00000 ,0.00000 ,0.00000
896      +,0.00596 ,0.00081  ,0.00010 ,0.00000 ,0.00000 ,0.00000 ,0.00000
897      +,0.00552 ,0.00074  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
898      +,0.00512 ,0.00069  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
899      +,0.00476 ,0.00064  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
900      +,0.00444 ,0.00059  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000
901      +,0.00415 ,0.00055  ,0.00005 ,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.01242 ,0.00153  ,0.00066 ,0.00000 ,0.00000 ,0.00000 ,0.00000
904      +,0.01009 ,0.00123  ,0.00042 ,0.00000 ,0.00000 ,0.00000 ,0.00000
905      +,0.00839 ,0.00101  ,0.00028 ,0.00000 ,0.00000 ,0.00000 ,0.00000
906      +,0.00711 ,0.00085  ,0.00020 ,0.00000 ,0.00000 ,0.00000 ,0.00000
907      +,0.00609 ,0.00072  ,0.00014 ,0.00000 ,0.00000 ,0.00000 ,0.00000
908      +,0.00530 ,0.00062  ,0.00011 ,0.00000 ,0.00000 ,0.00000 ,0.00000
909      +,0.00464 ,0.00054  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
910      +,0.00411 ,0.00048  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
911      +,0.00366 ,0.00042  ,0.00005 ,0.00000 ,0.00000 ,0.00000 ,0.00000
912      +,0.00328 ,0.00038  ,0.00004 ,0.00000 ,0.00000 ,0.00000 ,0.00000
913      +,0.00295 ,0.00034  ,0.00004 ,0.00000 ,0.00000 ,0.00000 ,0.00000
914      +,0.00267 ,0.00030  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
915      +,0.00243 ,0.00027  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
916      +,0.00222 ,0.00025  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
917      +,0.00204 ,0.00023  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
918      +,0.00188 ,0.00021  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
919      +,0.00173 ,0.00019  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
920      +,0.00160 ,0.00018  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
921      +,0.00149 ,0.00016  ,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.00087 ,0.00006  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
924      +,0.00067 ,0.00005  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
925      +,0.00053 ,0.00004  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
926      +,0.00043 ,0.00003  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
927      +,0.00035 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
928      +,0.00029 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
929      +,0.00025 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
930      +,0.00021 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
931      +,0.00018 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
932      +,0.00016 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
933      +,0.00014 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
934      +,0.00012 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
935      +,0.00011 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
936      +,0.00010 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
937      +,0.00009 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
938      +,0.00008 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
939      +,0.00007 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
940      +,0.00006 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
941      +,0.00006 ,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 Don't let x be altered if it's out of range!!
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(71,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 C restore x
1012       X=XSAVE
1013 C
1014       RETURN
1015       END