]> git.uio.no Git - u/mrichter/AliRoot.git/blob - PDF/spdf/strkbm.F
Mostly minor style modifications to be ready for cloning with EMCAL
[u/mrichter/AliRoot.git] / PDF / spdf / strkbm.F
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.2  1996/10/30 08:31:42  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       SUBROUTINE STRKBM(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GL)
15
16 C :::::::::::: KMRS (B-) sea=ubar=dbar=2sbar at Q0**2
17
18 #include "pdf/impdp.inc"
19       PARAMETER(NX=47)
20       PARAMETER(NTENTH=21)
21       DIMENSION F(7,NX,19),G(7),XX(NX),N0(7)
22       DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),K=1,19)/
23      + 0.01543 ,0.00139 ,87.59851 ,1.08955 ,0.21425 ,0.00000 ,0.66602
24      +,0.01576 ,0.00155 ,98.87466 ,1.81097 ,0.96710 ,0.00000 ,1.40331
25      +,0.01606 ,0.00170,111.86394 ,2.51665 ,1.69963 ,0.00001 ,2.12252
26      +,0.01634 ,0.00185,126.20959 ,3.23125 ,2.43758 ,0.00001 ,2.84889
27      +,0.01661 ,0.00199,141.86433 ,3.93764 ,3.16454 ,0.04299 ,3.56563
28      +,0.01687 ,0.00213,158.55537 ,4.65288 ,3.89816 ,0.50355 ,4.29012
29      +,0.01712 ,0.00226,176.18196 ,5.38056 ,4.64245 ,1.36971 ,5.02614
30      +,0.01735 ,0.00238,194.63626 ,6.12173 ,5.39877 ,2.17380 ,5.77490
31      +,0.01758 ,0.00251,213.81973 ,6.87607 ,6.16700 ,2.99716 ,6.53621
32      +,0.01780 ,0.00263,233.63725 ,7.63687 ,6.94060 ,3.82007 ,7.30341
33      +,0.01802 ,0.00275,253.97437 ,8.41047 ,7.72604 ,4.65166 ,8.08292
34      +,0.01823 ,0.00286,274.76807 ,9.19701 ,8.52360 ,5.49243 ,8.87496
35      +,0.01843 ,0.00297,295.96973 ,9.99431 ,9.33116 ,6.34054 ,9.67738
36      +,0.01863 ,0.00308,317.46948,10.79469,10.14115 ,7.18879,10.48254
37      +,0.01882 ,0.00319,339.29077,11.60845,10.96396 ,8.04767,11.30082
38      +,0.01901 ,0.00330,361.33130,12.42723,11.79123 ,8.90914,12.12382
39      +,0.01920 ,0.00340,383.55469,13.25301,12.62503 ,9.77540,12.95358
40      +,0.01938 ,0.00350,405.97192,14.08668,13.46626,10.64751,13.79099
41      +,0.01956 ,0.00360,428.45654,14.92266,14.30943,11.52012,14.63053/
42       DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),K=1,19)/
43      + 0.01901 ,0.00212 ,62.16447 ,0.86132 ,0.15844 ,0.00000 ,0.51769
44      +,0.01947 ,0.00237 ,70.73839 ,1.38684 ,0.70622 ,0.00000 ,1.05445
45      +,0.01990 ,0.00259 ,80.41113 ,1.89860 ,1.23700 ,0.00001 ,1.57581
46      +,0.02030 ,0.00281 ,90.93207 ,2.41499 ,1.76995 ,0.00001 ,2.10055
47      +,0.02067 ,0.00301,102.23933 ,2.92388 ,2.29346 ,0.03088 ,2.61680
48      +,0.02103 ,0.00321,114.15709 ,3.43711 ,2.81975 ,0.36065 ,3.13661
49      +,0.02137 ,0.00339,126.61516 ,3.95704 ,3.35150 ,0.97954 ,3.66249
50      +,0.02169 ,0.00358,139.53725 ,4.48425 ,3.88950 ,1.55148 ,4.19512
51      +,0.02200 ,0.00376,152.85641 ,5.01844 ,4.43360 ,2.13479 ,4.73429
52      +,0.02231 ,0.00393,166.49042 ,5.55455 ,4.97885 ,2.71509 ,5.27499
53      +,0.02260 ,0.00410,180.37961 ,6.09720 ,5.52997 ,3.29900 ,5.82189
54      +,0.02288 ,0.00426,194.48578 ,6.64658 ,6.08723 ,3.88696 ,6.37522
55      +,0.02316 ,0.00442,208.77400 ,7.20110 ,6.64911 ,4.47762 ,6.93342
56      +,0.02343 ,0.00458,223.15285 ,7.75504 ,7.20994 ,5.06561 ,7.49081
57      +,0.02369 ,0.00473,237.67119 ,8.31621 ,7.77759 ,5.65885 ,8.05521
58      +,0.02394 ,0.00488,252.24101 ,8.87836 ,8.34584 ,6.25136 ,8.62041
59      +,0.02419 ,0.00503,266.84863 ,9.44307 ,8.91631 ,6.84485 ,9.18800
60      +,0.02443 ,0.00517,281.50879,10.01110 ,9.48980 ,7.44022 ,9.75875
61      +,0.02466 ,0.00531,296.12646,10.57833,10.06220 ,8.03348,10.32855/
62       DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),K=1,19)/
63      + 0.02333 ,0.00325 ,44.12167 ,0.68120 ,0.11667 ,0.00000 ,0.40262
64      +,0.02397 ,0.00361 ,50.61658 ,1.06317 ,0.51414 ,0.00000 ,0.79238
65      +,0.02456 ,0.00394 ,57.80898 ,1.43402 ,0.89824 ,0.00001 ,1.16990
66      +,0.02510 ,0.00425 ,65.52016 ,1.80700 ,1.28276 ,0.00000 ,1.54869
67      +,0.02562 ,0.00455 ,73.68420 ,2.17348 ,1.65943 ,0.02217 ,1.92029
68      +,0.02610 ,0.00483 ,82.18962 ,2.54160 ,2.03666 ,0.25814 ,2.29299
69      +,0.02656 ,0.00511 ,90.98741 ,2.91290 ,2.41621 ,0.70005 ,2.66843
70      +,0.02700 ,0.00537,100.02547 ,3.28768 ,2.79852 ,1.10655 ,3.04700
71      +,0.02743 ,0.00563,109.25896 ,3.66568 ,3.18345 ,1.51944 ,3.42847
72      +,0.02783 ,0.00587,118.62006 ,4.04312 ,3.56727 ,1.92824 ,3.80911
73      +,0.02823 ,0.00611,128.08334 ,4.42339 ,3.95347 ,2.33779 ,4.19236
74      +,0.02861 ,0.00635,137.62727 ,4.80667 ,4.34227 ,2.74844 ,4.57840
75      +,0.02898 ,0.00657,147.22745 ,5.19183 ,4.73259 ,3.15925 ,4.96615
76      +,0.02934 ,0.00680,156.81100 ,5.57466 ,5.12025 ,3.56623 ,5.35139
77      +,0.02968 ,0.00701,166.43471 ,5.96105 ,5.51118 ,3.97536 ,5.74005
78      +,0.03002 ,0.00722,176.02678 ,6.34632 ,5.90074 ,4.38216 ,6.12747
79      +,0.03035 ,0.00743,185.58670 ,6.73178 ,6.29025 ,4.78803 ,6.51495
80      +,0.03067 ,0.00763,195.12933 ,7.11804 ,6.68035 ,5.19367 ,6.90313
81      +,0.03099 ,0.00783,204.58507 ,7.50210 ,7.06805 ,5.59619 ,7.28901/
82       DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),K=1,19)/
83      + 0.02623 ,0.00417 ,36.10866 ,0.59413 ,0.09736 ,0.00000 ,0.34780
84      +,0.02700 ,0.00462 ,41.62146 ,0.91075 ,0.42642 ,0.00000 ,0.67066
85      +,0.02771 ,0.00503 ,47.66519 ,1.21784 ,0.74413 ,0.00001 ,0.98308
86      +,0.02836 ,0.00542 ,54.09253 ,1.52613 ,1.06168 ,0.00000 ,1.29601
87      +,0.02897 ,0.00579 ,60.83827 ,1.82853 ,1.37224 ,0.01825 ,1.60250
88      +,0.02955 ,0.00614 ,67.81766 ,2.13154 ,1.68256 ,0.21221 ,1.90917
89      +,0.03010 ,0.00648 ,74.99167 ,2.43638 ,1.99401 ,0.57497 ,2.21732
90      +,0.03063 ,0.00681 ,82.31866 ,2.74323 ,2.30690 ,0.90773 ,2.52720
91      +,0.03113 ,0.00712 ,89.76390 ,3.05187 ,2.62109 ,1.24489 ,2.83862
92      +,0.03162 ,0.00743 ,97.26779 ,3.35910 ,2.93344 ,1.57775 ,3.14841
93      +,0.03208 ,0.00772,104.81790 ,3.66777 ,3.24686 ,1.91036 ,3.45946
94      +,0.03253 ,0.00801,112.40001 ,3.97807 ,3.56158 ,2.24302 ,3.77197
95      +,0.03297 ,0.00829,119.99440 ,4.28904 ,3.87671 ,2.57496 ,4.08502
96      +,0.03340 ,0.00856,127.53777 ,4.59722 ,4.18875 ,2.90285 ,4.39512
97      +,0.03381 ,0.00883,135.08817 ,4.90753 ,4.50272 ,3.23176 ,4.70726
98      +,0.03421 ,0.00908,142.58183 ,5.21611 ,4.81474 ,3.55793 ,5.01756
99      +,0.03459 ,0.00934,150.02347 ,5.52406 ,5.12595 ,3.88255 ,5.32713
100      +,0.03497 ,0.00958,157.42685 ,5.83198 ,5.43694 ,4.20630 ,5.63658
101      +,0.03534 ,0.00982,164.73477 ,6.13733 ,5.74522 ,4.52672 ,5.94339/
102       DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),K=1,19)/
103      + 0.02848 ,0.00498 ,31.32516 ,0.53941 ,0.08556 ,0.00000 ,0.31368
104      +,0.02935 ,0.00550 ,36.22980 ,0.81647 ,0.37321 ,0.00000 ,0.59604
105      +,0.03015 ,0.00599 ,41.56996 ,1.08505 ,0.65084 ,0.00000 ,0.86914
106      +,0.03090 ,0.00644 ,47.21698 ,1.35435 ,0.92801 ,0.00000 ,1.14238
107      +,0.03159 ,0.00688 ,53.10727 ,1.61818 ,1.19878 ,0.01590 ,1.40968
108      +,0.03224 ,0.00729 ,59.17142 ,1.88208 ,1.46889 ,0.18463 ,1.67668
109      +,0.03286 ,0.00768 ,65.37616 ,2.14706 ,1.73950 ,0.49993 ,1.94448
110      +,0.03346 ,0.00806 ,71.68658 ,2.41327 ,2.01085 ,0.78858 ,2.21325
111      +,0.03402 ,0.00842 ,78.07365 ,2.68049 ,2.28279 ,1.08052 ,2.48283
112      +,0.03457 ,0.00878 ,84.48338 ,2.94591 ,2.55256 ,1.36814 ,2.75042
113      +,0.03510 ,0.00912 ,90.91040 ,3.21203 ,2.82272 ,1.65499 ,3.01855
114      +,0.03561 ,0.00945 ,97.34454 ,3.47903 ,3.09348 ,1.94137 ,3.28743
115      +,0.03610 ,0.00977,103.76907 ,3.74611 ,3.36408 ,2.22659 ,3.55626
116      +,0.03658 ,0.01008,110.12723 ,4.01018 ,3.63145 ,2.50775 ,3.82198
117      +,0.03704 ,0.01039,116.47583 ,4.27566 ,3.90003 ,2.78933 ,4.08900
118      +,0.03749 ,0.01069,122.75731 ,4.53912 ,4.16642 ,3.06802 ,4.35392
119      +,0.03793 ,0.01098,128.97815 ,4.80159 ,4.43165 ,3.34492 ,4.61776
120      +,0.03835 ,0.01126,135.15260 ,5.06359 ,4.69628 ,3.62063 ,4.88107
121      +,0.03877 ,0.01154,141.23001 ,5.32289 ,4.95807 ,3.89299 ,5.14161/
122       DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),K=1,19)/
123      + 0.03034 ,0.00571 ,28.05753 ,0.50062 ,0.07736 ,0.00000 ,0.28967
124      +,0.03130 ,0.00630 ,32.53577 ,0.75038 ,0.33645 ,0.00000 ,0.54409
125      +,0.03218 ,0.00685 ,37.38623 ,0.99245 ,0.58648 ,0.00000 ,0.79013
126      +,0.03300 ,0.00737 ,42.49319 ,1.23493 ,0.83589 ,0.00000 ,1.03606
127      +,0.03376 ,0.00785 ,47.79448 ,1.47225 ,1.07932 ,0.01429 ,1.27643
128      +,0.03448 ,0.00831 ,53.23105 ,1.70931 ,1.32183 ,0.16572 ,1.51620
129      +,0.03516 ,0.00876 ,58.77368 ,1.94698 ,1.56444 ,0.44850 ,1.75634
130      +,0.03581 ,0.00918 ,64.39175 ,2.18538 ,1.80735 ,0.70695 ,1.99698
131      +,0.03643 ,0.00959 ,70.06050 ,2.42430 ,2.05042 ,0.96799 ,2.23797
132      +,0.03703 ,0.00999 ,75.73006 ,2.66119 ,2.29114 ,1.22475 ,2.47677
133      +,0.03761 ,0.01037 ,81.39935 ,2.89833 ,2.53183 ,1.48043 ,2.71567
134      +,0.03817 ,0.01074 ,87.06058 ,3.13589 ,2.77270 ,1.73532 ,2.95488
135      +,0.03871 ,0.01110 ,92.69965 ,3.37316 ,3.01306 ,1.98883 ,3.19368
136      +,0.03923 ,0.01145 ,98.26393 ,3.60736 ,3.25014 ,2.23829 ,3.42932
137      +,0.03974 ,0.01179,103.80917 ,3.84248 ,3.48800 ,2.48782 ,3.66580
138      +,0.04023 ,0.01212,109.28241 ,4.07547 ,3.72356 ,2.73442 ,3.90006
139      +,0.04071 ,0.01244,114.69147 ,4.30723 ,3.95775 ,2.97909 ,4.13303
140      +,0.04117 ,0.01276,120.04945 ,4.53828 ,4.19111 ,3.22240 ,4.36523
141      +,0.04163 ,0.01307,125.31154 ,4.76662 ,4.42163 ,3.46241 ,4.59465/
142       DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),K=1,19)/
143      + 0.03681 ,0.00875 ,19.93805 ,0.39836 ,0.05648 ,0.00000 ,0.22719
144      +,0.03809 ,0.00961 ,23.30977 ,0.57920 ,0.24352 ,0.00000 ,0.41110
145      +,0.03927 ,0.01041 ,26.90373 ,0.75449 ,0.42408 ,0.00000 ,0.58899
146      +,0.04035 ,0.01116 ,30.63655 ,0.92951 ,0.60367 ,0.00000 ,0.76628
147      +,0.04137 ,0.01186 ,34.45299 ,1.10025 ,0.77844 ,0.01024 ,0.93901
148      +,0.04233 ,0.01252 ,38.31819 ,1.27003 ,0.95181 ,0.11840 ,1.11056
149      +,0.04324 ,0.01316 ,42.21336 ,1.43941 ,1.12443 ,0.31987 ,1.28154
150      +,0.04410 ,0.01376 ,46.11893 ,1.60843 ,1.29642 ,0.50305 ,1.45203
151      +,0.04493 ,0.01435 ,50.01987 ,1.77696 ,1.46768 ,0.68723 ,1.62191
152      +,0.04573 ,0.01491 ,53.87808 ,1.94312 ,1.63634 ,0.86742 ,1.78930
153      +,0.04650 ,0.01545 ,57.70186 ,2.10859 ,1.80413 ,1.04600 ,1.95591
154      +,0.04724 ,0.01597 ,61.48924 ,2.27353 ,1.97124 ,1.22318 ,2.12192
155      +,0.04795 ,0.01648 ,65.23129 ,2.43746 ,2.13719 ,1.39858 ,2.28685
156      +,0.04865 ,0.01697 ,68.88826 ,2.59835 ,2.29997 ,1.57026 ,2.44867
157      +,0.04931 ,0.01744 ,72.51030 ,2.75921 ,2.46262 ,1.74129 ,2.61041
158      +,0.04996 ,0.01791 ,76.05589 ,2.91778 ,2.62287 ,1.90948 ,2.76981
159      +,0.05060 ,0.01836 ,79.53551 ,3.07481 ,2.78148 ,2.07562 ,2.92761
160      +,0.05121 ,0.01879 ,82.96065 ,3.23069 ,2.93887 ,2.24016 ,3.08424
161      +,0.05181 ,0.01922 ,86.29916 ,3.38399 ,3.09360 ,2.40170 ,3.23825/
162       DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),K=1,19)/
163      + 0.04452 ,0.01340 ,14.18962 ,0.32013 ,0.04120 ,0.00000 ,0.18032
164      +,0.04622 ,0.01466 ,16.72588 ,0.45113 ,0.17619 ,0.00000 ,0.31329
165      +,0.04778 ,0.01582 ,19.38387 ,0.57814 ,0.30660 ,0.00000 ,0.44198
166      +,0.04922 ,0.01690 ,22.10492 ,0.70445 ,0.43585 ,0.00000 ,0.56974
167      +,0.05057 ,0.01790 ,24.84224 ,0.82719 ,0.56118 ,0.00733 ,0.69375
168      +,0.05184 ,0.01885 ,27.57748 ,0.94860 ,0.68488 ,0.08446 ,0.81630
169      +,0.05305 ,0.01975 ,30.29929 ,1.06906 ,0.80741 ,0.22774 ,0.93777
170      +,0.05420 ,0.02061 ,32.99614 ,1.18857 ,0.92882 ,0.35726 ,1.05822
171      +,0.05530 ,0.02143 ,35.66000 ,1.30706 ,1.04904 ,0.48683 ,1.17756
172      +,0.05636 ,0.02222 ,38.26271 ,1.42316 ,1.16673 ,0.61286 ,1.29444
173      +,0.05737 ,0.02298 ,40.81677 ,1.53812 ,1.28316 ,0.73708 ,1.41012
174      +,0.05835 ,0.02371 ,43.32385 ,1.65210 ,1.39852 ,0.85973 ,1.52477
175      +,0.05930 ,0.02442 ,45.77888 ,1.76477 ,1.51248 ,0.98052 ,1.63808
176      +,0.06021 ,0.02509 ,48.15251 ,1.87468 ,1.62358 ,1.09805 ,1.74857
177      +,0.06110 ,0.02575 ,50.48727 ,1.98407 ,1.73410 ,1.21464 ,1.85851
178      +,0.06195 ,0.02639 ,52.75211 ,2.09130 ,1.84240 ,1.32868 ,1.96627
179      +,0.06279 ,0.02701 ,54.95746 ,2.19695 ,1.94906 ,1.44078 ,2.07242
180      +,0.06360 ,0.02761 ,57.11314 ,2.30137 ,2.05443 ,1.55132 ,2.17730
181      +,0.06439 ,0.02820 ,59.19653 ,2.40351 ,2.15747 ,1.65929 ,2.27988/
182       DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),K=1,19)/
183      + 0.04979 ,0.01721 ,11.64411 ,0.28433 ,0.03429 ,0.00000 ,0.15913
184      +,0.05180 ,0.01877 ,13.79194 ,0.39292 ,0.14593 ,0.00000 ,0.26924
185      +,0.05364 ,0.02020 ,16.01756 ,0.49817 ,0.25377 ,0.00000 ,0.37578
186      +,0.05535 ,0.02153 ,18.27444 ,0.60253 ,0.36038 ,0.00000 ,0.48125
187      +,0.05694 ,0.02277 ,20.52110 ,0.70366 ,0.46346 ,0.00603 ,0.58335
188      +,0.05844 ,0.02393 ,22.74660 ,0.80331 ,0.56486 ,0.06924 ,0.68387
189      +,0.05987 ,0.02503 ,24.94313 ,0.90181 ,0.66493 ,0.18644 ,0.78314
190      +,0.06123 ,0.02607 ,27.10277 ,0.99917 ,0.76373 ,0.29198 ,0.88121
191      +,0.06253 ,0.02707 ,29.22079 ,1.09533 ,0.86120 ,0.39719 ,0.97802
192      +,0.06377 ,0.02803 ,31.27371 ,1.18917 ,0.95625 ,0.49916 ,1.07246
193      +,0.06497 ,0.02895 ,33.27548 ,1.28175 ,1.04994 ,0.59932 ,1.16559
194      +,0.06613 ,0.02983 ,35.22890 ,1.37321 ,1.14245 ,0.69787 ,1.25757
195      +,0.06724 ,0.03068 ,37.13069 ,1.46332 ,1.23353 ,0.79462 ,1.34816
196      +,0.06832 ,0.03150 ,38.95656 ,1.55086 ,1.32198 ,0.88841 ,1.43615
197      +,0.06936 ,0.03229 ,40.74455 ,1.63774 ,1.40972 ,0.98119 ,1.52345
198      +,0.07037 ,0.03305 ,42.46857 ,1.72261 ,1.49540 ,1.07163 ,1.60872
199      +,0.07135 ,0.03379 ,44.13872 ,1.80595 ,1.57951 ,1.16026 ,1.69244
200      +,0.07230 ,0.03451 ,45.76387 ,1.88809 ,1.66237 ,1.24742 ,1.77493
201      +,0.07322 ,0.03521 ,47.32567 ,1.96815 ,1.74313 ,1.33226 ,1.85534/
202       DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),K=1,19)/
203      + 0.05400 ,0.02055 ,10.12899 ,0.26324 ,0.03013 ,0.00000 ,0.14667
204      +,0.05627 ,0.02237 ,12.03891 ,0.35837 ,0.12776 ,0.00000 ,0.24306
205      +,0.05835 ,0.02403 ,13.99986 ,0.45052 ,0.22203 ,0.00000 ,0.33627
206      +,0.06028 ,0.02556 ,15.97336 ,0.54164 ,0.31499 ,0.00000 ,0.42831
207      +,0.06208 ,0.02699 ,17.92197 ,0.62972 ,0.40466 ,0.00524 ,0.51719
208      +,0.06377 ,0.02832 ,19.83904 ,0.71626 ,0.49263 ,0.06007 ,0.60444
209      +,0.06538 ,0.02958 ,21.71918 ,0.80153 ,0.57919 ,0.16159 ,0.69036
210      +,0.06691 ,0.03078 ,23.55682 ,0.88557 ,0.66439 ,0.25272 ,0.77498
211      +,0.06837 ,0.03193 ,25.34894 ,0.96832 ,0.74822 ,0.34333 ,0.85827
212      +,0.06978 ,0.03302 ,27.07541 ,1.04883 ,0.82971 ,0.43089 ,0.93927
213      +,0.07113 ,0.03406 ,28.75044 ,1.12802 ,0.90982 ,0.51666 ,1.01892
214      +,0.07243 ,0.03507 ,30.37770 ,1.20605 ,0.98871 ,0.60085 ,1.09737
215      +,0.07368 ,0.03603 ,31.95485 ,1.28271 ,1.06617 ,0.68329 ,1.17443
216      +,0.07489 ,0.03696 ,33.46072 ,1.35697 ,1.14118 ,0.76298 ,1.24907
217      +,0.07606 ,0.03786 ,34.93025 ,1.43050 ,1.21541 ,0.84163 ,1.32295
218      +,0.07719 ,0.03873 ,36.34067 ,1.50213 ,1.28771 ,0.91811 ,1.39491
219      +,0.07829 ,0.03956 ,37.70163 ,1.57231 ,1.35851 ,0.99289 ,1.46540
220      +,0.07936 ,0.04037 ,39.02113 ,1.64131 ,1.42811 ,1.06626 ,1.53470
221      +,0.08040 ,0.04116 ,40.28365 ,1.70840 ,1.49577 ,1.13751 ,1.60207/
222       DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),K=1,19)/
223      + 0.05783 ,0.02359  ,9.09923 ,0.25129 ,0.02732 ,0.00000 ,0.13924
224      +,0.06035 ,0.02563 ,10.84759 ,0.33725 ,0.11536 ,0.00000 ,0.22624
225      +,0.06266 ,0.02748 ,12.62568 ,0.42039 ,0.20025 ,0.00001 ,0.31026
226      +,0.06480 ,0.02919 ,14.40164 ,0.50236 ,0.28374 ,0.00000 ,0.39300
227      +,0.06679 ,0.03078 ,16.14235 ,0.58140 ,0.36412 ,0.00470 ,0.47271
228      +,0.06867 ,0.03226 ,17.84392 ,0.65885 ,0.44275 ,0.05371 ,0.55075
229      +,0.07045 ,0.03366 ,19.50307 ,0.73495 ,0.51992 ,0.14433 ,0.62738
230      +,0.07214 ,0.03498 ,21.11630 ,0.80974 ,0.59569 ,0.22544 ,0.70266
231      +,0.07376 ,0.03625 ,22.68059 ,0.88319 ,0.67004 ,0.30591 ,0.77656
232      +,0.07530 ,0.03745 ,24.18106 ,0.95444 ,0.74211 ,0.38346 ,0.84822
233      +,0.07679 ,0.03860 ,25.62889 ,1.02433 ,0.81278 ,0.45924 ,0.91850
234      +,0.07822 ,0.03970 ,27.03003 ,1.09303 ,0.88219 ,0.53344 ,0.98756
235      +,0.07960 ,0.04076 ,28.38426 ,1.16038 ,0.95022 ,0.60596 ,1.05524
236      +,0.08093 ,0.04178 ,29.67018 ,1.22545 ,1.01592 ,0.67588 ,1.12063
237      +,0.08222 ,0.04276 ,30.92079 ,1.28974 ,1.08081 ,0.74476 ,1.18522
238      +,0.08346 ,0.04371 ,32.11519 ,1.35221 ,1.14384 ,0.81157 ,1.24797
239      +,0.08467 ,0.04462 ,33.26540 ,1.41330 ,1.20547 ,0.87677 ,1.30933
240      +,0.08584 ,0.04551 ,34.37848 ,1.47327 ,1.26594 ,0.94065 ,1.36955
241      +,0.08698 ,0.04636 ,35.43707 ,1.53144 ,1.32460 ,1.00255 ,1.42796/
242       DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),K=1,19)/
243      + 0.07221 ,0.03622  ,6.55284 ,0.22231 ,0.02009 ,0.00000 ,0.12120
244      +,0.07572 ,0.03908  ,7.87690 ,0.28496 ,0.08382 ,0.00000 ,0.18440
245      +,0.07894 ,0.04166  ,9.18055 ,0.34522 ,0.14500 ,0.00000 ,0.24513
246      +,0.08190 ,0.04402 ,10.44943 ,0.40402 ,0.20461 ,0.00000 ,0.30435
247      +,0.08465 ,0.04619 ,11.66034 ,0.46023 ,0.26152 ,0.00333 ,0.36091
248      +,0.08722 ,0.04820 ,12.81842 ,0.51473 ,0.31667 ,0.03774 ,0.41574
249      +,0.08966 ,0.05009 ,13.92507 ,0.56774 ,0.37027 ,0.10103 ,0.46906
250      +,0.09197 ,0.05187 ,14.98108 ,0.61933 ,0.42241 ,0.15713 ,0.52092
251      +,0.09417 ,0.05356 ,15.98737 ,0.66951 ,0.47311 ,0.21231 ,0.57137
252      +,0.09627 ,0.05515 ,16.93445 ,0.71773 ,0.52180 ,0.26502 ,0.61982
253      +,0.09828 ,0.05666 ,17.83418 ,0.76461 ,0.56912 ,0.31611 ,0.66693
254      +,0.10020 ,0.05811 ,18.69273 ,0.81029 ,0.61524 ,0.36574 ,0.71282
255      +,0.10206 ,0.05950 ,19.51099 ,0.85471 ,0.66006 ,0.41387 ,0.75745
256      +,0.10384 ,0.06082 ,20.27478 ,0.89725 ,0.70299 ,0.45989 ,0.80018
257      +,0.10556 ,0.06209 ,21.00960 ,0.93897 ,0.74508 ,0.50492 ,0.84209
258      +,0.10722 ,0.06331 ,21.70103 ,0.97919 ,0.78566 ,0.54827 ,0.88249
259      +,0.10882 ,0.06448 ,22.35863 ,1.01823 ,0.82505 ,0.59029 ,0.92171
260      +,0.11037 ,0.06561 ,22.98795 ,1.05630 ,0.86345 ,0.63120 ,0.95994
261      +,0.11187 ,0.06670 ,23.57780 ,1.09294 ,0.90041 ,0.67055 ,0.99675/
262       DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),K=1,19)/
263      + 0.09312 ,0.05563  ,4.77718 ,0.20797 ,0.01482 ,0.00001 ,0.11138
264      +,0.09811 ,0.05951  ,5.77211 ,0.25353 ,0.06091 ,0.00001 ,0.15723
265      +,0.10262 ,0.06296  ,6.71132 ,0.29685 ,0.10471 ,0.00002 ,0.20080
266      +,0.10677 ,0.06609  ,7.59596 ,0.33847 ,0.14680 ,0.00002 ,0.24267
267      +,0.11057 ,0.06893  ,8.41127 ,0.37777 ,0.18654 ,0.00235 ,0.28219
268      +,0.11411 ,0.07155  ,9.16963 ,0.41534 ,0.22452 ,0.02611 ,0.31997
269      +,0.11744 ,0.07398  ,9.87563 ,0.45139 ,0.26098 ,0.06954 ,0.35624
270      +,0.12059 ,0.07625 ,10.53436 ,0.48604 ,0.29604 ,0.10756 ,0.39109
271      +,0.12358 ,0.07839 ,11.14739 ,0.51933 ,0.32971 ,0.14454 ,0.42457
272      +,0.12639 ,0.08040 ,11.71172 ,0.55094 ,0.36171 ,0.17950 ,0.45638
273      +,0.12907 ,0.08230 ,12.23657 ,0.58133 ,0.39247 ,0.21304 ,0.48696
274      +,0.13164 ,0.08409 ,12.72790 ,0.61062 ,0.42213 ,0.24530 ,0.51643
275      +,0.13411 ,0.08580 ,13.18744 ,0.63879 ,0.45066 ,0.27627 ,0.54479
276      +,0.13645 ,0.08742 ,13.60670 ,0.66549 ,0.47771 ,0.30563 ,0.57167
277      +,0.13871 ,0.08897 ,14.00438 ,0.69146 ,0.50402 ,0.33411 ,0.59781
278      +,0.14087 ,0.09044 ,14.37092 ,0.71622 ,0.52913 ,0.36127 ,0.62274
279      +,0.14296 ,0.09185 ,14.71360 ,0.74005 ,0.55330 ,0.38739 ,0.64674
280      +,0.14497 ,0.09321 ,15.03656 ,0.76309 ,0.57667 ,0.41262 ,0.66995
281      +,0.14690 ,0.09451 ,15.33336 ,0.78507 ,0.59898 ,0.43669 ,0.69209/
282       DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),K=1,19)/
283      + 0.11004 ,0.07143  ,4.00450 ,0.20430 ,0.01237 ,0.00000 ,0.10833
284      +,0.11615 ,0.07595  ,4.83705 ,0.24184 ,0.05038 ,0.00000 ,0.14613
285      +,0.12164 ,0.07994  ,5.60029 ,0.27717 ,0.08620 ,0.00000 ,0.18171
286      +,0.12666 ,0.08352  ,6.30214 ,0.31074 ,0.12026 ,0.00002 ,0.21553
287      +,0.13123 ,0.08676  ,6.93477 ,0.34211 ,0.15212 ,0.00188 ,0.24716
288      +,0.13548 ,0.08971  ,7.51121 ,0.37182 ,0.18229 ,0.02082 ,0.27710
289      +,0.13944 ,0.09244  ,8.03884 ,0.40005 ,0.21101 ,0.05527 ,0.30559
290      +,0.14315 ,0.09499  ,8.52122 ,0.42693 ,0.23835 ,0.08515 ,0.33270
291      +,0.14667 ,0.09736  ,8.96395 ,0.45252 ,0.26441 ,0.11399 ,0.35853
292      +,0.14997 ,0.09958  ,9.36372 ,0.47663 ,0.28899 ,0.14107 ,0.38288
293      +,0.15311 ,0.10165  ,9.72952 ,0.49961 ,0.31243 ,0.16686 ,0.40609
294      +,0.15611 ,0.10361 ,10.06725 ,0.52160 ,0.33489 ,0.19149 ,0.42831
295      +,0.15898 ,0.10546 ,10.37907 ,0.54261 ,0.35635 ,0.21502 ,0.44955
296      +,0.16168 ,0.10721 ,10.65883 ,0.56234 ,0.37653 ,0.23713 ,0.46951
297      +,0.16427 ,0.10889 ,10.92113 ,0.58141 ,0.39605 ,0.25848 ,0.48880
298      +,0.16674 ,0.11047 ,11.15842 ,0.59949 ,0.41456 ,0.27873 ,0.50710
299      +,0.16912 ,0.11198 ,11.37642 ,0.61676 ,0.43226 ,0.29807 ,0.52459
300      +,0.17141 ,0.11342 ,11.57870 ,0.63335 ,0.44928 ,0.31664 ,0.54138
301      +,0.17361 ,0.11478 ,11.76191 ,0.64906 ,0.46541 ,0.33426 ,0.55730/
302       DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),K=1,19)/
303      + 0.12517 ,0.08518  ,3.55192 ,0.20346 ,0.01088 ,0.00000 ,0.10716
304      +,0.13220 ,0.09014  ,4.27919 ,0.23596 ,0.04398 ,0.00000 ,0.13998
305      +,0.13847 ,0.09449  ,4.93058 ,0.26626 ,0.07492 ,0.00000 ,0.17061
306      +,0.14418 ,0.09837  ,5.51836 ,0.29479 ,0.10407 ,0.00002 ,0.19945
307      +,0.14935 ,0.10184  ,6.03814 ,0.32121 ,0.13113 ,0.00160 ,0.22621
308      +,0.15413 ,0.10500  ,6.50409 ,0.34603 ,0.15657 ,0.01761 ,0.25134
309      +,0.15857 ,0.10790  ,6.92413 ,0.36943 ,0.18060 ,0.04663 ,0.27506
310      +,0.16272 ,0.11059  ,7.30260 ,0.39153 ,0.20331 ,0.07161 ,0.29747
311      +,0.16663 ,0.11308  ,7.64515 ,0.41243 ,0.22482 ,0.09558 ,0.31868
312      +,0.17028 ,0.11540  ,7.94962 ,0.43198 ,0.24498 ,0.11796 ,0.33854
313      +,0.17375 ,0.11756  ,8.22431 ,0.45048 ,0.26409 ,0.13915 ,0.35735
314      +,0.17704 ,0.11959  ,8.47479 ,0.46808 ,0.28229 ,0.15928 ,0.37524
315      +,0.18019 ,0.12150  ,8.70318 ,0.48480 ,0.29959 ,0.17841 ,0.39225
316      +,0.18313 ,0.12330  ,8.90458 ,0.50039 ,0.31576 ,0.19630 ,0.40813
317      +,0.18595 ,0.12501  ,9.09145 ,0.51538 ,0.33132 ,0.21348 ,0.42341
318      +,0.18864 ,0.12663  ,9.25763 ,0.52950 ,0.34600 ,0.22970 ,0.43782
319      +,0.19122 ,0.12816  ,9.40808 ,0.54291 ,0.35997 ,0.24513 ,0.45151
320      +,0.19369 ,0.12961  ,9.54587 ,0.55574 ,0.37334 ,0.25988 ,0.46460
321      +,0.19605 ,0.13099  ,9.66829 ,0.56781 ,0.38596 ,0.27381 ,0.47694/
322       DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),K=1,19)/
323      + 0.13915 ,0.09753  ,3.24791 ,0.20339 ,0.00983 ,0.00001 ,0.10661
324      +,0.14693 ,0.10279  ,3.89818 ,0.23226 ,0.03953 ,0.00001 ,0.13590
325      +,0.15386 ,0.10738  ,4.46916 ,0.25897 ,0.06705 ,0.00003 ,0.16303
326      +,0.16012 ,0.11144  ,4.97620 ,0.28388 ,0.09279 ,0.00003 ,0.18836
327      +,0.16579 ,0.11505  ,5.41717 ,0.30680 ,0.11653 ,0.00144 ,0.21169
328      +,0.17098 ,0.11833  ,5.80677 ,0.32815 ,0.13869 ,0.01543 ,0.23346
329      +,0.17579 ,0.12132  ,6.15344 ,0.34814 ,0.15948 ,0.04071 ,0.25386
330      +,0.18028 ,0.12407  ,6.46130 ,0.36692 ,0.17905 ,0.06234 ,0.27302
331      +,0.18449 ,0.12663  ,6.73712 ,0.38455 ,0.19746 ,0.08299 ,0.29105
332      +,0.18842 ,0.12896  ,6.97844 ,0.40092 ,0.21460 ,0.10215 ,0.30781
333      +,0.19212 ,0.13115  ,7.19382 ,0.41634 ,0.23077 ,0.12022 ,0.32360
334      +,0.19561 ,0.13321  ,7.38758 ,0.43092 ,0.24609 ,0.13732 ,0.33856
335      +,0.19892 ,0.13514  ,7.56128 ,0.44470 ,0.26061 ,0.15349 ,0.35272
336      +,0.20207 ,0.13692  ,7.71183 ,0.45748 ,0.27411 ,0.16856 ,0.36586
337      +,0.20507 ,0.13862  ,7.85021 ,0.46971 ,0.28704 ,0.18297 ,0.37844
338      +,0.20790 ,0.14022  ,7.97137 ,0.48114 ,0.29917 ,0.19649 ,0.39022
339      +,0.21060 ,0.14173  ,8.07938 ,0.49196 ,0.31067 ,0.20932 ,0.40138
340      +,0.21319 ,0.14317  ,8.17690 ,0.50226 ,0.32163 ,0.22155 ,0.41201
341      +,0.21566 ,0.14452  ,8.26164 ,0.51189 ,0.33192 ,0.23304 ,0.42197/
342       DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),K=1,19)/
343      + 0.19991 ,0.14688  ,2.51370 ,0.20353 ,0.00708 ,0.00001 ,0.10529
344      +,0.21019 ,0.15254  ,2.94325 ,0.22211 ,0.02785 ,0.00001 ,0.12499
345      +,0.21910 ,0.15734  ,3.29408 ,0.23869 ,0.04651 ,0.00001 ,0.14261
346      +,0.22699 ,0.16149  ,3.58628 ,0.25366 ,0.06346 ,0.00001 ,0.15857
347      +,0.23400 ,0.16506  ,3.82377 ,0.26697 ,0.07864 ,0.00092 ,0.17283
348      +,0.24029 ,0.16823  ,4.02164 ,0.27903 ,0.09249 ,0.00981 ,0.18578
349      +,0.24606 ,0.17103  ,4.18708 ,0.28999 ,0.10516 ,0.02565 ,0.19761
350      +,0.25132 ,0.17358  ,4.32574 ,0.30000 ,0.11681 ,0.03890 ,0.20843
351      +,0.25620 ,0.17587  ,4.44281 ,0.30914 ,0.12753 ,0.05131 ,0.21837
352      +,0.26066 ,0.17794  ,4.53601 ,0.31739 ,0.13733 ,0.06263 ,0.22740
353      +,0.26482 ,0.17982  ,4.61448 ,0.32496 ,0.14639 ,0.07311 ,0.23572
354      +,0.26871 ,0.18153  ,4.68041 ,0.33196 ,0.15482 ,0.08286 ,0.24343
355      +,0.27237 ,0.18310  ,4.73461 ,0.33841 ,0.16266 ,0.09195 ,0.25057
356      +,0.27573 ,0.18453  ,4.77571 ,0.34420 ,0.16978 ,0.10024 ,0.25702
357      +,0.27891 ,0.18586  ,4.81074 ,0.34963 ,0.17649 ,0.10807 ,0.26309
358      +,0.28189 ,0.18707  ,4.83699 ,0.35457 ,0.18270 ,0.11533 ,0.26867
359      +,0.28469 ,0.18819  ,4.85647 ,0.35914 ,0.18848 ,0.12210 ,0.27384
360      +,0.28733 ,0.18924  ,4.87087 ,0.36339 ,0.19390 ,0.12847 ,0.27868
361      +,0.28983 ,0.19020  ,4.87910 ,0.36724 ,0.19891 ,0.13437 ,0.28311/
362       DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),K=1,19)/
363      + 0.29948 ,0.21337  ,2.00341 ,0.19400 ,0.00479 ,-0.00009 ,0.09933
364      +,0.31092 ,0.21753  ,2.23323 ,0.20312 ,0.01858 ,-0.00009 ,0.11080
365      +,0.32048 ,0.22075  ,2.39984 ,0.21075 ,0.03039 ,-0.00011 ,0.12054
366      +,0.32863 ,0.22337  ,2.52366 ,0.21721 ,0.04067 ,-0.00009 ,0.12891
367      +,0.33561 ,0.22543  ,2.61084 ,0.22255 ,0.04951 ,0.00041 ,0.13598
368      +,0.34167 ,0.22710  ,2.67357 ,0.22710 ,0.05729 ,0.00558 ,0.14215
369      +,0.34701 ,0.22845  ,2.71748 ,0.23097 ,0.06419 ,0.01467 ,0.14755
370      +,0.35181 ,0.22956  ,2.74668 ,0.23426 ,0.07035 ,0.02204 ,0.15227
371      +,0.35602 ,0.23048  ,2.76465 ,0.23706 ,0.07582 ,0.02874 ,0.15641
372      +,0.35979 ,0.23116  ,2.77146 ,0.23938 ,0.08068 ,0.03474 ,0.15999
373      +,0.36315 ,0.23172  ,2.77153 ,0.24134 ,0.08504 ,0.04016 ,0.16315
374      +,0.36619 ,0.23218  ,2.76658 ,0.24300 ,0.08898 ,0.04508 ,0.16596
375      +,0.36895 ,0.23254  ,2.75728 ,0.24439 ,0.09253 ,0.04954 ,0.16843
376      +,0.37142 ,0.23274  ,2.74272 ,0.24546 ,0.09568 ,0.05352 ,0.17055
377      +,0.37369 ,0.23289  ,2.72661 ,0.24639 ,0.09858 ,0.05721 ,0.17246
378      +,0.37572 ,0.23297  ,2.70747 ,0.24710 ,0.10114 ,0.06058 ,0.17409
379      +,0.37757 ,0.23298  ,2.68666 ,0.24764 ,0.10348 ,0.06367 ,0.17552
380      +,0.37928 ,0.23295  ,2.66490 ,0.24805 ,0.10564 ,0.06652 ,0.17681
381      +,0.38080 ,0.23286  ,2.64141 ,0.24829 ,0.10756 ,0.06908 ,0.17791/
382       DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),K=1,19)/
383      + 0.38126 ,0.25604  ,1.75383 ,0.17626 ,0.00377 ,-0.00001 ,0.09002
384      +,0.39110 ,0.25769  ,1.87729 ,0.18041 ,0.01402 ,-0.00003 ,0.09722
385      +,0.39904 ,0.25855  ,1.95327 ,0.18347 ,0.02257 ,0.00000 ,0.10300
386      +,0.40550 ,0.25893  ,1.99937 ,0.18576 ,0.02969 ,0.00004 ,0.10776
387      +,0.41073 ,0.25893  ,2.02176 ,0.18739 ,0.03572 ,0.00036 ,0.11154
388      +,0.41500 ,0.25874  ,2.02929 ,0.18850 ,0.04080 ,0.00390 ,0.11466
389      +,0.41863 ,0.25826  ,2.02614 ,0.18921 ,0.04524 ,0.00996 ,0.11726
390      +,0.42159 ,0.25773  ,2.01513 ,0.18963 ,0.04909 ,0.01481 ,0.11937
391      +,0.42417 ,0.25700  ,1.99859 ,0.18978 ,0.05241 ,0.01921 ,0.12111
392      +,0.42618 ,0.25624  ,1.97703 ,0.18966 ,0.05528 ,0.02297 ,0.12250
393      +,0.42791 ,0.25534  ,1.95286 ,0.18939 ,0.05782 ,0.02635 ,0.12363
394      +,0.42935 ,0.25442  ,1.92707 ,0.18900 ,0.06005 ,0.02937 ,0.12454
395      +,0.43046 ,0.25351  ,1.90000 ,0.18848 ,0.06198 ,0.03204 ,0.12527
396      +,0.43137 ,0.25247  ,1.87117 ,0.18781 ,0.06365 ,0.03439 ,0.12576
397      +,0.43215 ,0.25143  ,1.84276 ,0.18712 ,0.06516 ,0.03654 ,0.12616
398      +,0.43271 ,0.25035  ,1.81378 ,0.18636 ,0.06648 ,0.03845 ,0.12643
399      +,0.43311 ,0.24929  ,1.78487 ,0.18551 ,0.06763 ,0.04018 ,0.12659
400      +,0.43340 ,0.24824  ,1.75640 ,0.18461 ,0.06865 ,0.04175 ,0.12667
401      +,0.43355 ,0.24714  ,1.72789 ,0.18367 ,0.06953 ,0.04313 ,0.12664/
402       DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),K=1,19)/
403      + 0.44870 ,0.28373  ,1.57495 ,0.15563 ,0.00302 ,0.00010 ,0.07934
404      +,0.45580 ,0.28235  ,1.62984 ,0.15670 ,0.01108 ,0.00006 ,0.08393
405      +,0.46076 ,0.28076  ,1.65105 ,0.15711 ,0.01752 ,0.00008 ,0.08736
406      +,0.46441 ,0.27894  ,1.65296 ,0.15709 ,0.02278 ,0.00005 ,0.08997
407      +,0.46708 ,0.27688  ,1.64023 ,0.15664 ,0.02714 ,0.00031 ,0.09195
408      +,0.46889 ,0.27477  ,1.61953 ,0.15599 ,0.03066 ,0.00292 ,0.09338
409      +,0.47013 ,0.27260  ,1.59334 ,0.15512 ,0.03369 ,0.00730 ,0.09447
410      +,0.47092 ,0.27042  ,1.56391 ,0.15407 ,0.03628 ,0.01069 ,0.09522
411      +,0.47132 ,0.26823  ,1.53267 ,0.15292 ,0.03845 ,0.01372 ,0.09573
412      +,0.47123 ,0.26605  ,1.49946 ,0.15171 ,0.04026 ,0.01628 ,0.09602
413      +,0.47092 ,0.26389  ,1.46610 ,0.15042 ,0.04181 ,0.01851 ,0.09615
414      +,0.47042 ,0.26178  ,1.43324 ,0.14910 ,0.04315 ,0.02049 ,0.09617
415      +,0.46972 ,0.25973  ,1.40101 ,0.14779 ,0.04430 ,0.02226 ,0.09610
416      +,0.46888 ,0.25763  ,1.36857 ,0.14640 ,0.04527 ,0.02380 ,0.09588
417      +,0.46797 ,0.25560  ,1.33748 ,0.14504 ,0.04611 ,0.02518 ,0.09561
418      +,0.46689 ,0.25358  ,1.30704 ,0.14366 ,0.04677 ,0.02635 ,0.09527
419      +,0.46572 ,0.25162  ,1.27754 ,0.14228 ,0.04735 ,0.02740 ,0.09488
420      +,0.46450 ,0.24972  ,1.24914 ,0.14093 ,0.04787 ,0.02835 ,0.09445
421      +,0.46318 ,0.24784  ,1.22148 ,0.13957 ,0.04830 ,0.02919 ,0.09397/
422       DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),K=1,19)/
423      + 0.50376 ,0.30039  ,1.42486 ,0.13458 ,0.00247 ,0.00006 ,0.06852
424      +,0.50691 ,0.29630  ,1.43301 ,0.13382 ,0.00886 ,0.00003 ,0.07139
425      +,0.50837 ,0.29228  ,1.41888 ,0.13272 ,0.01387 ,0.00008 ,0.07331
426      +,0.50881 ,0.28830  ,1.39365 ,0.13140 ,0.01783 ,0.00010 ,0.07465
427      +,0.50845 ,0.28434  ,1.36069 ,0.12983 ,0.02108 ,0.00027 ,0.07549
428      +,0.50743 ,0.28059  ,1.32444 ,0.12823 ,0.02366 ,0.00223 ,0.07594
429      +,0.50600 ,0.27694  ,1.28671 ,0.12655 ,0.02578 ,0.00545 ,0.07617
430      +,0.50427 ,0.27337  ,1.24866 ,0.12484 ,0.02752 ,0.00788 ,0.07618
431      +,0.50246 ,0.26983  ,1.21106 ,0.12313 ,0.02895 ,0.01010 ,0.07605
432      +,0.50014 ,0.26653  ,1.17374 ,0.12141 ,0.03013 ,0.01193 ,0.07577
433      +,0.49778 ,0.26327  ,1.13774 ,0.11969 ,0.03113 ,0.01350 ,0.07543
434      +,0.49537 ,0.26012  ,1.10329 ,0.11800 ,0.03198 ,0.01485 ,0.07501
435      +,0.49290 ,0.25712  ,1.07030 ,0.11633 ,0.03269 ,0.01601 ,0.07452
436      +,0.49026 ,0.25415  ,1.03831 ,0.11469 ,0.03322 ,0.01705 ,0.07399
437      +,0.48765 ,0.25132  ,1.00813 ,0.11311 ,0.03367 ,0.01797 ,0.07344
438      +,0.48498 ,0.24860  ,0.97914 ,0.11154 ,0.03405 ,0.01875 ,0.07284
439      +,0.48235 ,0.24590  ,0.95153 ,0.11002 ,0.03434 ,0.01944 ,0.07222
440      +,0.47976 ,0.24326  ,0.92533 ,0.10856 ,0.03457 ,0.02004 ,0.07160
441      +,0.47706 ,0.24076  ,0.90017 ,0.10710 ,0.03474 ,0.02053 ,0.07095/
442       DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),K=1,19)/
443      + 0.55658 ,0.30965  ,1.25910 ,0.10983 ,0.00194 ,0.00013 ,0.05590
444      +,0.55439 ,0.30227  ,1.22818 ,0.10784 ,0.00683 ,0.00005 ,0.05742
445      +,0.55088 ,0.29557  ,1.18658 ,0.10575 ,0.01054 ,0.00008 ,0.05819
446      +,0.54699 ,0.28926  ,1.14162 ,0.10361 ,0.01344 ,0.00004 ,0.05860
447      +,0.54263 ,0.28332  ,1.09510 ,0.10148 ,0.01567 ,0.00025 ,0.05863
448      +,0.53803 ,0.27776  ,1.04952 ,0.09937 ,0.01743 ,0.00156 ,0.05844
449      +,0.53327 ,0.27255  ,1.00563 ,0.09729 ,0.01887 ,0.00390 ,0.05811
450      +,0.52853 ,0.26749  ,0.96379 ,0.09530 ,0.01998 ,0.00566 ,0.05770
451      +,0.52369 ,0.26282  ,0.92423 ,0.09336 ,0.02092 ,0.00711 ,0.05721
452      +,0.51887 ,0.25827  ,0.88649 ,0.09146 ,0.02162 ,0.00833 ,0.05660
453      +,0.51404 ,0.25397  ,0.85111 ,0.08963 ,0.02217 ,0.00935 ,0.05597
454      +,0.50931 ,0.24988  ,0.81806 ,0.08787 ,0.02263 ,0.01026 ,0.05533
455      +,0.50471 ,0.24594  ,0.78712 ,0.08617 ,0.02305 ,0.01110 ,0.05468
456      +,0.50009 ,0.24218  ,0.75778 ,0.08454 ,0.02329 ,0.01171 ,0.05397
457      +,0.49560 ,0.23861  ,0.73049 ,0.08298 ,0.02349 ,0.01226 ,0.05328
458      +,0.49111 ,0.23518  ,0.70475 ,0.08147 ,0.02362 ,0.01275 ,0.05260
459      +,0.48677 ,0.23185  ,0.68057 ,0.08000 ,0.02372 ,0.01315 ,0.05194
460      +,0.48259 ,0.22862  ,0.65788 ,0.07858 ,0.02379 ,0.01348 ,0.05130
461      +,0.47838 ,0.22555  ,0.63640 ,0.07721 ,0.02383 ,0.01376 ,0.05066/
462       DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),K=1,19)/
463      + 0.59361 ,0.30895  ,1.10907 ,0.08786 ,0.00155 ,0.00013 ,0.04479
464      +,0.58554 ,0.29901  ,1.05385 ,0.08541 ,0.00533 ,0.00012 ,0.04548
465      +,0.57720 ,0.29004  ,0.99655 ,0.08296 ,0.00813 ,0.00012 ,0.04560
466      +,0.56892 ,0.28188  ,0.94160 ,0.08058 ,0.01025 ,0.00013 ,0.04547
467      +,0.56062 ,0.27441  ,0.88927 ,0.07835 ,0.01179 ,0.00022 ,0.04512
468      +,0.55254 ,0.26754  ,0.84059 ,0.07618 ,0.01300 ,0.00126 ,0.04467
469      +,0.54467 ,0.26109  ,0.79564 ,0.07408 ,0.01400 ,0.00285 ,0.04412
470      +,0.53711 ,0.25501  ,0.75413 ,0.07211 ,0.01472 ,0.00410 ,0.04347
471      +,0.52969 ,0.24940  ,0.71589 ,0.07025 ,0.01527 ,0.00511 ,0.04281
472      +,0.52254 ,0.24397  ,0.68046 ,0.06844 ,0.01572 ,0.00596 ,0.04212
473      +,0.51552 ,0.23893  ,0.64780 ,0.06675 ,0.01604 ,0.00665 ,0.04141
474      +,0.50873 ,0.23419  ,0.61777 ,0.06514 ,0.01629 ,0.00724 ,0.04072
475      +,0.50218 ,0.22970  ,0.59011 ,0.06360 ,0.01647 ,0.00774 ,0.04005
476      +,0.49581 ,0.22538  ,0.56426 ,0.06211 ,0.01658 ,0.00813 ,0.03942
477      +,0.48971 ,0.22129  ,0.54047 ,0.06068 ,0.01666 ,0.00848 ,0.03880
478      +,0.48378 ,0.21739  ,0.51833 ,0.05931 ,0.01672 ,0.00881 ,0.03817
479      +,0.47803 ,0.21366  ,0.49775 ,0.05803 ,0.01673 ,0.00909 ,0.03754
480      +,0.47247 ,0.21010  ,0.47860 ,0.05683 ,0.01668 ,0.00933 ,0.03690
481      +,0.46695 ,0.20673  ,0.46072 ,0.05568 ,0.01664 ,0.00951 ,0.03628/
482       DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),K=1,19)/
483      + 0.61603 ,0.30141  ,0.97177 ,0.06914 ,0.00118 ,0.00004 ,0.03515
484      +,0.60244 ,0.28929  ,0.90222 ,0.06661 ,0.00412 ,0.00001 ,0.03540
485      +,0.58935 ,0.27863  ,0.83699 ,0.06415 ,0.00625 ,0.00003 ,0.03526
486      +,0.57704 ,0.26901  ,0.77800 ,0.06186 ,0.00781 ,0.00000 ,0.03495
487      +,0.56529 ,0.26026  ,0.72443 ,0.05975 ,0.00892 ,0.00009 ,0.03441
488      +,0.55423 ,0.25225  ,0.67639 ,0.05772 ,0.00979 ,0.00086 ,0.03383
489      +,0.54359 ,0.24493  ,0.63313 ,0.05583 ,0.01046 ,0.00208 ,0.03320
490      +,0.53344 ,0.23817  ,0.59408 ,0.05402 ,0.01094 ,0.00295 ,0.03264
491      +,0.52377 ,0.23196  ,0.55885 ,0.05234 ,0.01134 ,0.00371 ,0.03196
492      +,0.51454 ,0.22602  ,0.52667 ,0.05078 ,0.01156 ,0.00442 ,0.03128
493      +,0.50564 ,0.22053  ,0.49757 ,0.04929 ,0.01174 ,0.00486 ,0.03063
494      +,0.49718 ,0.21538  ,0.47114 ,0.04788 ,0.01189 ,0.00523 ,0.03000
495      +,0.48916 ,0.21049  ,0.44702 ,0.04655 ,0.01198 ,0.00562 ,0.02939
496      +,0.48137 ,0.20580  ,0.42489 ,0.04529 ,0.01203 ,0.00589 ,0.02879
497      +,0.47396 ,0.20141  ,0.40466 ,0.04410 ,0.01205 ,0.00611 ,0.02821
498      +,0.46684 ,0.19727  ,0.38589 ,0.04296 ,0.01203 ,0.00628 ,0.02766
499      +,0.45997 ,0.19333  ,0.36867 ,0.04190 ,0.01199 ,0.00642 ,0.02710
500      +,0.45336 ,0.18958  ,0.35281 ,0.04090 ,0.01195 ,0.00652 ,0.02655
501      +,0.44697 ,0.18603  ,0.33809 ,0.03993 ,0.01187 ,0.00661 ,0.02603/
502       DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),K=1,19)/
503      + 0.62597 ,0.28845  ,0.84624 ,0.05355 ,0.00093 ,0.00004 ,0.02727
504      +,0.60716 ,0.27483  ,0.76939 ,0.05119 ,0.00321 ,-0.00002 ,0.02722
505      +,0.58995 ,0.26272  ,0.70153 ,0.04900 ,0.00475 ,0.00001 ,0.02690
506      +,0.57392 ,0.25223  ,0.64249 ,0.04696 ,0.00588 ,0.00009 ,0.02648
507      +,0.55910 ,0.24275  ,0.59070 ,0.04505 ,0.00669 ,0.00022 ,0.02597
508      +,0.54518 ,0.23422  ,0.54532 ,0.04331 ,0.00728 ,0.00077 ,0.02538
509      +,0.53225 ,0.22641  ,0.50531 ,0.04164 ,0.00773 ,0.00159 ,0.02482
510      +,0.51998 ,0.21929  ,0.46986 ,0.04011 ,0.00806 ,0.00224 ,0.02422
511      +,0.50857 ,0.21256  ,0.43819 ,0.03867 ,0.00836 ,0.00271 ,0.02361
512      +,0.49765 ,0.20632  ,0.41005 ,0.03739 ,0.00848 ,0.00314 ,0.02299
513      +,0.48741 ,0.20050  ,0.38466 ,0.03616 ,0.00856 ,0.00343 ,0.02241
514      +,0.47765 ,0.19512  ,0.36176 ,0.03498 ,0.00863 ,0.00368 ,0.02186
515      +,0.46823 ,0.19018  ,0.34105 ,0.03386 ,0.00872 ,0.00391 ,0.02135
516      +,0.45927 ,0.18551  ,0.32234 ,0.03285 ,0.00870 ,0.00409 ,0.02081
517      +,0.45080 ,0.18112  ,0.30539 ,0.03191 ,0.00867 ,0.00426 ,0.02029
518      +,0.44268 ,0.17694  ,0.28989 ,0.03103 ,0.00862 ,0.00444 ,0.01979
519      +,0.43498 ,0.17295  ,0.27564 ,0.03018 ,0.00856 ,0.00453 ,0.01935
520      +,0.42768 ,0.16914  ,0.26254 ,0.02936 ,0.00849 ,0.00454 ,0.01894
521      +,0.42057 ,0.16558  ,0.25051 ,0.02859 ,0.00842 ,0.00462 ,0.01852/
522       DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),K=1,19)/
523      + 0.62507 ,0.27162  ,0.73192 ,0.04088 ,0.00072 ,0.00009 ,0.02077
524      +,0.60163 ,0.25694  ,0.65287 ,0.03885 ,0.00239 ,0.00011 ,0.02067
525      +,0.58059 ,0.24423  ,0.58583 ,0.03692 ,0.00360 ,0.00011 ,0.02033
526      +,0.56153 ,0.23313  ,0.52924 ,0.03520 ,0.00448 ,0.00008 ,0.01980
527      +,0.54412 ,0.22318  ,0.48086 ,0.03354 ,0.00508 ,0.00008 ,0.01940
528      +,0.52807 ,0.21424  ,0.43937 ,0.03211 ,0.00546 ,0.00048 ,0.01886
529      +,0.51323 ,0.20613  ,0.40328 ,0.03076 ,0.00577 ,0.00111 ,0.01831
530      +,0.49937 ,0.19875  ,0.37160 ,0.02954 ,0.00600 ,0.00171 ,0.01772
531      +,0.48615 ,0.19234  ,0.34404 ,0.02832 ,0.00614 ,0.00199 ,0.01730
532      +,0.47407 ,0.18591  ,0.31950 ,0.02727 ,0.00623 ,0.00230 ,0.01676
533      +,0.46275 ,0.17998  ,0.29770 ,0.02627 ,0.00626 ,0.00249 ,0.01630
534      +,0.45198 ,0.17462  ,0.27833 ,0.02534 ,0.00627 ,0.00267 ,0.01588
535      +,0.44161 ,0.16982  ,0.26107 ,0.02448 ,0.00629 ,0.00287 ,0.01546
536      +,0.43197 ,0.16505  ,0.24537 ,0.02366 ,0.00630 ,0.00294 ,0.01503
537      +,0.42290 ,0.16060  ,0.23125 ,0.02289 ,0.00628 ,0.00300 ,0.01462
538      +,0.41424 ,0.15648  ,0.21846 ,0.02218 ,0.00621 ,0.00306 ,0.01423
539      +,0.40598 ,0.15262  ,0.20684 ,0.02153 ,0.00612 ,0.00313 ,0.01384
540      +,0.39811 ,0.14898  ,0.19625 ,0.02093 ,0.00600 ,0.00321 ,0.01347
541      +,0.39058 ,0.14552  ,0.18657 ,0.02033 ,0.00595 ,0.00322 ,0.01314/
542       DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),K=1,19)/
543      + 0.61450 ,0.25244  ,0.62841 ,0.03079 ,0.00051 ,0.00010 ,0.01564
544      +,0.58728 ,0.23712  ,0.55059 ,0.02902 ,0.00190 ,0.00012 ,0.01550
545      +,0.56319 ,0.22392  ,0.48688 ,0.02740 ,0.00282 ,0.00016 ,0.01519
546      +,0.54158 ,0.21255  ,0.43421 ,0.02602 ,0.00341 ,0.00010 ,0.01478
547      +,0.52205 ,0.20250  ,0.39004 ,0.02470 ,0.00382 ,0.00009 ,0.01435
548      +,0.50423 ,0.19359  ,0.35254 ,0.02355 ,0.00415 ,0.00046 ,0.01382
549      +,0.48803 ,0.18543  ,0.32079 ,0.02243 ,0.00433 ,0.00095 ,0.01342
550      +,0.47287 ,0.17818  ,0.29345 ,0.02144 ,0.00442 ,0.00129 ,0.01303
551      +,0.45880 ,0.17156  ,0.26947 ,0.02053 ,0.00456 ,0.00145 ,0.01259
552      +,0.44565 ,0.16542  ,0.24861 ,0.01968 ,0.00462 ,0.00165 ,0.01219
553      +,0.43343 ,0.15976  ,0.23022 ,0.01890 ,0.00465 ,0.00178 ,0.01177
554      +,0.42200 ,0.15455  ,0.21392 ,0.01818 ,0.00466 ,0.00191 ,0.01137
555      +,0.41124 ,0.14973  ,0.19936 ,0.01750 ,0.00466 ,0.00206 ,0.01101
556      +,0.40102 ,0.14525  ,0.18659 ,0.01689 ,0.00459 ,0.00215 ,0.01068
557      +,0.39148 ,0.14104  ,0.17514 ,0.01632 ,0.00451 ,0.00221 ,0.01038
558      +,0.38256 ,0.13699  ,0.16470 ,0.01577 ,0.00442 ,0.00220 ,0.01011
559      +,0.37413 ,0.13321  ,0.15533 ,0.01523 ,0.00436 ,0.00221 ,0.00984
560      +,0.36617 ,0.12968  ,0.14689 ,0.01470 ,0.00432 ,0.00224 ,0.00957
561      +,0.35837 ,0.12640  ,0.13916 ,0.01424 ,0.00429 ,0.00226 ,0.00932/
562       DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),K=1,19)/
563      + 0.59623 ,0.23145  ,0.53546 ,0.02279 ,0.00037 ,0.00009 ,0.01174
564      +,0.56581 ,0.21603  ,0.46150 ,0.02128 ,0.00158 ,-0.00001 ,0.01155
565      +,0.53921 ,0.20287  ,0.40218 ,0.02004 ,0.00221 ,0.00008 ,0.01123
566      +,0.51569 ,0.19152  ,0.35407 ,0.01899 ,0.00260 ,0.00008 ,0.01084
567      +,0.49454 ,0.18168  ,0.31494 ,0.01802 ,0.00285 ,0.00012 ,0.01045
568      +,0.47561 ,0.17287  ,0.28211 ,0.01709 ,0.00303 ,0.00035 ,0.01006
569      +,0.45816 ,0.16510  ,0.25425 ,0.01624 ,0.00316 ,0.00066 ,0.00973
570      +,0.44227 ,0.15800  ,0.23081 ,0.01544 ,0.00330 ,0.00085 ,0.00935
571      +,0.42747 ,0.15168  ,0.21033 ,0.01475 ,0.00333 ,0.00110 ,0.00900
572      +,0.41388 ,0.14565  ,0.19280 ,0.01407 ,0.00335 ,0.00114 ,0.00877
573      +,0.40122 ,0.14023  ,0.17757 ,0.01348 ,0.00335 ,0.00128 ,0.00846
574      +,0.38955 ,0.13525  ,0.16420 ,0.01291 ,0.00332 ,0.00140 ,0.00816
575      +,0.37884 ,0.13058  ,0.15234 ,0.01234 ,0.00326 ,0.00142 ,0.00791
576      +,0.36842 ,0.12632  ,0.14188 ,0.01188 ,0.00325 ,0.00150 ,0.00762
577      +,0.35864 ,0.12237  ,0.13260 ,0.01145 ,0.00323 ,0.00157 ,0.00736
578      +,0.34943 ,0.11866  ,0.12432 ,0.01105 ,0.00318 ,0.00161 ,0.00714
579      +,0.34083 ,0.11515  ,0.11679 ,0.01066 ,0.00313 ,0.00162 ,0.00694
580      +,0.33278 ,0.11185  ,0.10994 ,0.01028 ,0.00310 ,0.00162 ,0.00676
581      +,0.32505 ,0.10879  ,0.10382 ,0.00993 ,0.00304 ,0.00164 ,0.00655/
582       DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),K=1,19)/
583      + 0.57130 ,0.20986  ,0.45268 ,0.01658 ,0.00040 ,0.00006 ,0.00860
584      +,0.53839 ,0.19460  ,0.38372 ,0.01558 ,0.00111 ,0.00005 ,0.00836
585      +,0.51006 ,0.18167  ,0.32981 ,0.01457 ,0.00160 ,0.00003 ,0.00818
586      +,0.48504 ,0.17081  ,0.28723 ,0.01372 ,0.00195 ,0.00005 ,0.00782
587      +,0.46317 ,0.16108  ,0.25261 ,0.01290 ,0.00220 ,0.00008 ,0.00753
588      +,0.44311 ,0.15286  ,0.22425 ,0.01218 ,0.00233 ,0.00023 ,0.00729
589      +,0.42527 ,0.14530  ,0.20045 ,0.01152 ,0.00243 ,0.00051 ,0.00703
590      +,0.40900 ,0.13851  ,0.18057 ,0.01095 ,0.00247 ,0.00063 ,0.00673
591      +,0.39407 ,0.13233  ,0.16383 ,0.01038 ,0.00252 ,0.00076 ,0.00650
592      +,0.38013 ,0.12685  ,0.14925 ,0.00992 ,0.00250 ,0.00089 ,0.00623
593      +,0.36755 ,0.12174  ,0.13658 ,0.00941 ,0.00247 ,0.00098 ,0.00603
594      +,0.35580 ,0.11706  ,0.12557 ,0.00896 ,0.00244 ,0.00103 ,0.00584
595      +,0.34458 ,0.11280  ,0.11598 ,0.00863 ,0.00240 ,0.00106 ,0.00560
596      +,0.33440 ,0.10874  ,0.10749 ,0.00830 ,0.00240 ,0.00116 ,0.00538
597      +,0.32484 ,0.10502  ,0.10002 ,0.00799 ,0.00240 ,0.00122 ,0.00519
598      +,0.31562 ,0.10166  ,0.09344 ,0.00767 ,0.00237 ,0.00122 ,0.00506
599      +,0.30708 ,0.09846  ,0.08749 ,0.00738 ,0.00231 ,0.00119 ,0.00489
600      +,0.29915 ,0.09543  ,0.08210 ,0.00711 ,0.00221 ,0.00114 ,0.00469
601      +,0.29158 ,0.09261  ,0.07723 ,0.00685 ,0.00216 ,0.00115 ,0.00455/
602       DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),K=1,19)/
603      + 0.54087 ,0.18863  ,0.37968 ,0.01207 ,0.00017 ,-0.00011 ,0.00607
604      +,0.50635 ,0.17383  ,0.31697 ,0.01123 ,0.00076 ,-0.00009 ,0.00596
605      +,0.47690 ,0.16143  ,0.26900 ,0.01047 ,0.00111 ,-0.00005 ,0.00582
606      +,0.45143 ,0.15077  ,0.23153 ,0.00981 ,0.00140 ,-0.00002 ,0.00556
607      +,0.42885 ,0.14169  ,0.20158 ,0.00923 ,0.00154 ,-0.00010 ,0.00533
608      +,0.40888 ,0.13362  ,0.17767 ,0.00860 ,0.00173 ,0.00002 ,0.00518
609      +,0.39078 ,0.12668  ,0.15761 ,0.00814 ,0.00175 ,0.00025 ,0.00491
610      +,0.37456 ,0.12039  ,0.14113 ,0.00768 ,0.00174 ,0.00039 ,0.00469
611      +,0.35932 ,0.11465  ,0.12699 ,0.00733 ,0.00179 ,0.00049 ,0.00452
612      +,0.34590 ,0.10943  ,0.11494 ,0.00691 ,0.00175 ,0.00058 ,0.00437
613      +,0.33328 ,0.10475  ,0.10465 ,0.00656 ,0.00174 ,0.00063 ,0.00423
614      +,0.32159 ,0.10049  ,0.09582 ,0.00627 ,0.00173 ,0.00069 ,0.00406
615      +,0.31082 ,0.09657  ,0.08817 ,0.00600 ,0.00172 ,0.00078 ,0.00386
616      +,0.30066 ,0.09293  ,0.08139 ,0.00574 ,0.00169 ,0.00079 ,0.00374
617      +,0.29120 ,0.08957  ,0.07541 ,0.00550 ,0.00166 ,0.00079 ,0.00363
618      +,0.28231 ,0.08644  ,0.07011 ,0.00530 ,0.00163 ,0.00077 ,0.00348
619      +,0.27407 ,0.08350  ,0.06542 ,0.00510 ,0.00161 ,0.00077 ,0.00334
620      +,0.26640 ,0.08075  ,0.06123 ,0.00490 ,0.00158 ,0.00078 ,0.00321
621      +,0.25912 ,0.07819  ,0.05747 ,0.00472 ,0.00152 ,0.00078 ,0.00309/
622       DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),K=1,19)/
623      + 0.50654 ,0.16707  ,0.31490 ,0.00836 ,0.00036 ,0.00012 ,0.00448
624      +,0.47131 ,0.15282  ,0.25910 ,0.00781 ,0.00071 ,0.00017 ,0.00437
625      +,0.44126 ,0.14122  ,0.21711 ,0.00728 ,0.00099 ,0.00010 ,0.00415
626      +,0.41532 ,0.13150  ,0.18505 ,0.00678 ,0.00115 ,0.00010 ,0.00403
627      +,0.39285 ,0.12299  ,0.15959 ,0.00633 ,0.00125 ,0.00005 ,0.00383
628      +,0.37297 ,0.11550  ,0.13944 ,0.00598 ,0.00131 ,0.00022 ,0.00368
629      +,0.35503 ,0.10899  ,0.12290 ,0.00565 ,0.00130 ,0.00031 ,0.00356
630      +,0.33913 ,0.10320  ,0.10917 ,0.00524 ,0.00130 ,0.00038 ,0.00333
631      +,0.32436 ,0.09807  ,0.09762 ,0.00503 ,0.00130 ,0.00041 ,0.00323
632      +,0.31099 ,0.09337  ,0.08795 ,0.00472 ,0.00128 ,0.00046 ,0.00303
633      +,0.29848 ,0.08915  ,0.07968 ,0.00453 ,0.00128 ,0.00049 ,0.00290
634      +,0.28707 ,0.08527  ,0.07259 ,0.00434 ,0.00128 ,0.00051 ,0.00279
635      +,0.27682 ,0.08165  ,0.06648 ,0.00413 ,0.00125 ,0.00051 ,0.00269
636      +,0.26723 ,0.07835  ,0.06108 ,0.00388 ,0.00123 ,0.00053 ,0.00261
637      +,0.25829 ,0.07534  ,0.05635 ,0.00368 ,0.00121 ,0.00054 ,0.00251
638      +,0.24981 ,0.07260  ,0.05221 ,0.00356 ,0.00119 ,0.00052 ,0.00238
639      +,0.24191 ,0.06999  ,0.04857 ,0.00344 ,0.00115 ,0.00052 ,0.00227
640      +,0.23455 ,0.06751  ,0.04535 ,0.00333 ,0.00108 ,0.00053 ,0.00217
641      +,0.22769 ,0.06522  ,0.04244 ,0.00320 ,0.00102 ,0.00054 ,0.00210/
642       DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),K=1,19)/
643      + 0.46927 ,0.14695  ,0.25950 ,0.00598 ,0.00013 ,-0.00008 ,0.00295
644      +,0.43382 ,0.13366  ,0.21050 ,0.00551 ,0.00043 ,-0.00005 ,0.00298
645      +,0.40386 ,0.12282  ,0.17449 ,0.00511 ,0.00063 ,-0.00004 ,0.00288
646      +,0.37847 ,0.11367  ,0.14698 ,0.00478 ,0.00071 ,-0.00001 ,0.00269
647      +,0.35640 ,0.10583  ,0.12562 ,0.00439 ,0.00086 ,0.00001 ,0.00260
648      +,0.33666 ,0.09913  ,0.10873 ,0.00417 ,0.00088 ,0.00012 ,0.00251
649      +,0.31938 ,0.09314  ,0.09514 ,0.00391 ,0.00089 ,0.00017 ,0.00237
650      +,0.30376 ,0.08793  ,0.08394 ,0.00367 ,0.00089 ,0.00019 ,0.00225
651      +,0.28964 ,0.08316  ,0.07465 ,0.00348 ,0.00088 ,0.00025 ,0.00213
652      +,0.27663 ,0.07905  ,0.06696 ,0.00332 ,0.00085 ,0.00030 ,0.00205
653      +,0.26490 ,0.07524  ,0.06038 ,0.00314 ,0.00086 ,0.00031 ,0.00195
654      +,0.25424 ,0.07172  ,0.05474 ,0.00298 ,0.00087 ,0.00033 ,0.00186
655      +,0.24445 ,0.06848  ,0.04986 ,0.00283 ,0.00085 ,0.00036 ,0.00182
656      +,0.23524 ,0.06555  ,0.04568 ,0.00273 ,0.00082 ,0.00038 ,0.00172
657      +,0.22676 ,0.06288  ,0.04202 ,0.00261 ,0.00078 ,0.00038 ,0.00163
658      +,0.21898 ,0.06046  ,0.03880 ,0.00245 ,0.00074 ,0.00036 ,0.00157
659      +,0.21169 ,0.05818  ,0.03596 ,0.00232 ,0.00074 ,0.00037 ,0.00151
660      +,0.20487 ,0.05604  ,0.03345 ,0.00222 ,0.00075 ,0.00040 ,0.00146
661      +,0.19838 ,0.05405  ,0.03124 ,0.00214 ,0.00071 ,0.00037 ,0.00138/
662       DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),K=1,19)/
663      + 0.43009 ,0.12748  ,0.21112 ,0.00400 ,0.00019 ,0.00002 ,0.00215
664      +,0.39534 ,0.11524  ,0.16894 ,0.00369 ,0.00033 ,0.00007 ,0.00208
665      +,0.36578 ,0.10533  ,0.13843 ,0.00350 ,0.00046 ,0.00001 ,0.00200
666      +,0.34110 ,0.09703  ,0.11542 ,0.00319 ,0.00054 ,-0.00002 ,0.00190
667      +,0.31934 ,0.09006  ,0.09785 ,0.00304 ,0.00061 ,0.00000 ,0.00184
668      +,0.30080 ,0.08395  ,0.08407 ,0.00279 ,0.00061 ,0.00005 ,0.00172
669      +,0.28407 ,0.07862  ,0.07303 ,0.00264 ,0.00066 ,0.00012 ,0.00163
670      +,0.26930 ,0.07392  ,0.06397 ,0.00244 ,0.00068 ,0.00014 ,0.00157
671      +,0.25601 ,0.06967  ,0.05662 ,0.00235 ,0.00064 ,0.00022 ,0.00148
672      +,0.24384 ,0.06594  ,0.05046 ,0.00218 ,0.00061 ,0.00020 ,0.00143
673      +,0.23282 ,0.06263  ,0.04527 ,0.00205 ,0.00062 ,0.00023 ,0.00136
674      +,0.22278 ,0.05960  ,0.04086 ,0.00194 ,0.00062 ,0.00025 ,0.00128
675      +,0.21358 ,0.05679  ,0.03710 ,0.00184 ,0.00058 ,0.00022 ,0.00117
676      +,0.20497 ,0.05427  ,0.03384 ,0.00175 ,0.00058 ,0.00021 ,0.00117
677      +,0.19705 ,0.05195  ,0.03101 ,0.00169 ,0.00057 ,0.00021 ,0.00115
678      +,0.18975 ,0.04974  ,0.02855 ,0.00165 ,0.00054 ,0.00024 ,0.00110
679      +,0.18302 ,0.04774  ,0.02640 ,0.00158 ,0.00053 ,0.00025 ,0.00104
680      +,0.17679 ,0.04590  ,0.02450 ,0.00149 ,0.00053 ,0.00025 ,0.00099
681      +,0.17091 ,0.04418  ,0.02281 ,0.00142 ,0.00051 ,0.00025 ,0.00094/
682       DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),K=1,19)/
683      + 0.39010 ,0.10947  ,0.17025 ,0.00268 ,0.00019 ,0.00006 ,0.00143
684      +,0.35623 ,0.09848  ,0.13460 ,0.00249 ,0.00028 ,0.00002 ,0.00144
685      +,0.32772 ,0.08962  ,0.10892 ,0.00237 ,0.00032 ,-0.00001 ,0.00133
686      +,0.30394 ,0.08214  ,0.09000 ,0.00228 ,0.00034 ,0.00006 ,0.00124
687      +,0.28366 ,0.07586  ,0.07568 ,0.00205 ,0.00039 ,0.00008 ,0.00118
688      +,0.26605 ,0.07053  ,0.06443 ,0.00184 ,0.00040 ,0.00004 ,0.00115
689      +,0.25030 ,0.06575  ,0.05557 ,0.00178 ,0.00037 ,0.00005 ,0.00105
690      +,0.23643 ,0.06159  ,0.04843 ,0.00167 ,0.00039 ,0.00007 ,0.00098
691      +,0.22394 ,0.05798  ,0.04259 ,0.00158 ,0.00043 ,0.00014 ,0.00096
692      +,0.21274 ,0.05471  ,0.03780 ,0.00149 ,0.00036 ,0.00010 ,0.00089
693      +,0.20253 ,0.05173  ,0.03375 ,0.00142 ,0.00037 ,0.00012 ,0.00084
694      +,0.19326 ,0.04906  ,0.03032 ,0.00135 ,0.00038 ,0.00014 ,0.00079
695      +,0.18482 ,0.04669  ,0.02742 ,0.00126 ,0.00034 ,0.00014 ,0.00075
696      +,0.17699 ,0.04447  ,0.02494 ,0.00119 ,0.00034 ,0.00013 ,0.00071
697      +,0.16982 ,0.04245  ,0.02278 ,0.00112 ,0.00034 ,0.00012 ,0.00067
698      +,0.16322 ,0.04061  ,0.02089 ,0.00105 ,0.00034 ,0.00011 ,0.00066
699      +,0.15707 ,0.03891  ,0.01925 ,0.00100 ,0.00032 ,0.00011 ,0.00063
700      +,0.15133 ,0.03733  ,0.01783 ,0.00097 ,0.00030 ,0.00011 ,0.00058
701      +,0.14601 ,0.03587  ,0.01656 ,0.00092 ,0.00027 ,0.00011 ,0.00055/
702       DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),K=1,19)/
703      + 0.35004 ,0.09294  ,0.13575 ,0.00180 ,0.00009 ,-0.00001 ,0.00095
704      +,0.31737 ,0.08312  ,0.10571 ,0.00162 ,0.00020 ,-0.00002 ,0.00094
705      +,0.29045 ,0.07514  ,0.08459 ,0.00157 ,0.00021 ,-0.00001 ,0.00086
706      +,0.26790 ,0.06854  ,0.06905 ,0.00147 ,0.00030 ,-0.00001 ,0.00085
707      +,0.24881 ,0.06300  ,0.05755 ,0.00133 ,0.00029 ,-0.00006 ,0.00079
708      +,0.23243 ,0.05822  ,0.04867 ,0.00122 ,0.00035 ,-0.00001 ,0.00078
709      +,0.21802 ,0.05416  ,0.04163 ,0.00106 ,0.00032 ,0.00002 ,0.00075
710      +,0.20518 ,0.05055  ,0.03607 ,0.00105 ,0.00030 ,0.00006 ,0.00072
711      +,0.19356 ,0.04737  ,0.03156 ,0.00100 ,0.00033 ,0.00009 ,0.00069
712      +,0.18306 ,0.04457  ,0.02780 ,0.00098 ,0.00028 ,0.00008 ,0.00061
713      +,0.17381 ,0.04206  ,0.02470 ,0.00090 ,0.00026 ,0.00009 ,0.00057
714      +,0.16547 ,0.03979  ,0.02210 ,0.00083 ,0.00027 ,0.00010 ,0.00055
715      +,0.15782 ,0.03771  ,0.01991 ,0.00077 ,0.00029 ,0.00011 ,0.00054
716      +,0.15077 ,0.03583  ,0.01804 ,0.00075 ,0.00027 ,0.00011 ,0.00052
717      +,0.14435 ,0.03412  ,0.01642 ,0.00071 ,0.00026 ,0.00012 ,0.00049
718      +,0.13851 ,0.03255  ,0.01502 ,0.00064 ,0.00025 ,0.00012 ,0.00045
719      +,0.13301 ,0.03110  ,0.01381 ,0.00060 ,0.00026 ,0.00012 ,0.00043
720      +,0.12784 ,0.02978  ,0.01274 ,0.00057 ,0.00027 ,0.00011 ,0.00044
721      +,0.12314 ,0.02855  ,0.01180 ,0.00054 ,0.00027 ,0.00012 ,0.00043/
722       DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),K=1,19)/
723      + 0.31041 ,0.07819  ,0.10707 ,0.00123 ,0.00000 ,-0.00004 ,0.00058
724      +,0.28003 ,0.06934  ,0.08223 ,0.00107 ,0.00005 ,-0.00008 ,0.00058
725      +,0.25490 ,0.06240  ,0.06511 ,0.00102 ,0.00012 ,-0.00003 ,0.00054
726      +,0.23402 ,0.05671  ,0.05262 ,0.00088 ,0.00020 ,-0.00007 ,0.00055
727      +,0.21610 ,0.05186  ,0.04350 ,0.00090 ,0.00016 ,-0.00004 ,0.00049
728      +,0.20101 ,0.04778  ,0.03649 ,0.00083 ,0.00019 ,-0.00003 ,0.00048
729      +,0.18765 ,0.04429  ,0.03103 ,0.00076 ,0.00019 ,-0.00004 ,0.00044
730      +,0.17596 ,0.04117  ,0.02670 ,0.00074 ,0.00018 ,0.00001 ,0.00042
731      +,0.16558 ,0.03845  ,0.02322 ,0.00069 ,0.00015 ,0.00000 ,0.00036
732      +,0.15630 ,0.03605  ,0.02038 ,0.00064 ,0.00017 ,0.00003 ,0.00036
733      +,0.14789 ,0.03391  ,0.01802 ,0.00062 ,0.00017 ,0.00004 ,0.00035
734      +,0.14032 ,0.03199  ,0.01606 ,0.00058 ,0.00017 ,0.00005 ,0.00035
735      +,0.13352 ,0.03026  ,0.01443 ,0.00053 ,0.00017 ,0.00005 ,0.00035
736      +,0.12727 ,0.02869  ,0.01303 ,0.00049 ,0.00016 ,0.00006 ,0.00033
737      +,0.12155 ,0.02727  ,0.01183 ,0.00046 ,0.00015 ,0.00006 ,0.00031
738      +,0.11621 ,0.02597  ,0.01079 ,0.00045 ,0.00016 ,0.00005 ,0.00028
739      +,0.11133 ,0.02476  ,0.00989 ,0.00043 ,0.00016 ,0.00005 ,0.00026
740      +,0.10685 ,0.02364  ,0.00910 ,0.00040 ,0.00016 ,0.00006 ,0.00025
741      +,0.10270 ,0.02262  ,0.00841 ,0.00039 ,0.00016 ,0.00007 ,0.00025/
742       DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),K=1,19)/
743      + 0.27216 ,0.06472  ,0.08318 ,0.00076 ,0.00004 ,-0.00004 ,0.00030
744      +,0.24361 ,0.05712  ,0.06317 ,0.00073 ,0.00005 ,-0.00004 ,0.00031
745      +,0.22060 ,0.05111  ,0.04933 ,0.00070 ,0.00008 ,0.00002 ,0.00036
746      +,0.20136 ,0.04619  ,0.03956 ,0.00073 ,0.00010 ,-0.00003 ,0.00032
747      +,0.18541 ,0.04214  ,0.03240 ,0.00059 ,0.00008 ,-0.00005 ,0.00027
748      +,0.17174 ,0.03862  ,0.02699 ,0.00052 ,0.00010 ,-0.00004 ,0.00026
749      +,0.15981 ,0.03566  ,0.02279 ,0.00048 ,0.00009 ,-0.00001 ,0.00024
750      +,0.14926 ,0.03305  ,0.01948 ,0.00049 ,0.00011 ,-0.00001 ,0.00026
751      +,0.14021 ,0.03079  ,0.01685 ,0.00038 ,0.00011 ,-0.00001 ,0.00023
752      +,0.13194 ,0.02876  ,0.01472 ,0.00034 ,0.00009 ,-0.00003 ,0.00021
753      +,0.12455 ,0.02697  ,0.01297 ,0.00031 ,0.00010 ,-0.00002 ,0.00021
754      +,0.11781 ,0.02538  ,0.01151 ,0.00032 ,0.00012 ,0.00002 ,0.00021
755      +,0.11158 ,0.02393  ,0.01028 ,0.00037 ,0.00013 ,0.00006 ,0.00022
756      +,0.10609 ,0.02263  ,0.00927 ,0.00033 ,0.00011 ,0.00006 ,0.00020
757      +,0.10110 ,0.02146  ,0.00839 ,0.00030 ,0.00011 ,0.00005 ,0.00019
758      +,0.09652 ,0.02039  ,0.00762 ,0.00028 ,0.00012 ,0.00006 ,0.00020
759      +,0.09227 ,0.01940  ,0.00697 ,0.00026 ,0.00011 ,0.00005 ,0.00018
760      +,0.08834 ,0.01850  ,0.00640 ,0.00024 ,0.00010 ,0.00003 ,0.00016
761      +,0.08473 ,0.01766  ,0.00591 ,0.00022 ,0.00009 ,0.00003 ,0.00015/
762       DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),K=1,19)/
763      + 0.23580 ,0.05296  ,0.06379 ,0.00047 ,0.00000 ,-0.00004 ,0.00019
764      +,0.20963 ,0.04647  ,0.04767 ,0.00047 ,0.00002 ,-0.00007 ,0.00018
765      +,0.18873 ,0.04129  ,0.03682 ,0.00041 ,0.00002 ,-0.00009 ,0.00024
766      +,0.17139 ,0.03714  ,0.02922 ,0.00042 ,0.00007 ,-0.00007 ,0.00018
767      +,0.15703 ,0.03369  ,0.02372 ,0.00037 ,0.00008 ,-0.00005 ,0.00016
768      +,0.14488 ,0.03077  ,0.01959 ,0.00031 ,0.00006 ,-0.00006 ,0.00016
769      +,0.13432 ,0.02826  ,0.01643 ,0.00030 ,0.00005 ,-0.00001 ,0.00019
770      +,0.12494 ,0.02611  ,0.01396 ,0.00030 ,0.00007 ,-0.00001 ,0.00017
771      +,0.11681 ,0.02421  ,0.01200 ,0.00029 ,0.00012 ,0.00003 ,0.00018
772      +,0.10961 ,0.02256  ,0.01044 ,0.00026 ,0.00010 ,0.00002 ,0.00016
773      +,0.10319 ,0.02109  ,0.00915 ,0.00022 ,0.00009 ,0.00002 ,0.00014
774      +,0.09742 ,0.01978  ,0.00809 ,0.00017 ,0.00009 ,0.00003 ,0.00014
775      +,0.09222 ,0.01861  ,0.00720 ,0.00014 ,0.00011 ,0.00004 ,0.00014
776      +,0.08733 ,0.01755  ,0.00646 ,0.00015 ,0.00009 ,0.00003 ,0.00014
777      +,0.08293 ,0.01660  ,0.00583 ,0.00016 ,0.00008 ,0.00002 ,0.00013
778      +,0.07901 ,0.01571  ,0.00529 ,0.00014 ,0.00009 ,0.00004 ,0.00013
779      +,0.07535 ,0.01492  ,0.00482 ,0.00013 ,0.00008 ,0.00003 ,0.00012
780      +,0.07193 ,0.01420  ,0.00442 ,0.00013 ,0.00007 ,0.00002 ,0.00012
781      +,0.06878 ,0.01353  ,0.00406 ,0.00013 ,0.00007 ,0.00002 ,0.00011/
782       DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),K=1,19)/
783      + 0.20148 ,0.04259  ,0.04800 ,0.00032 ,-0.00002 ,-0.00002 ,0.00012
784      +,0.17780 ,0.03712  ,0.03538 ,0.00030 ,-0.00001 ,-0.00003 ,0.00009
785      +,0.15932 ,0.03277  ,0.02700 ,0.00022 ,0.00002 ,-0.00006 ,0.00009
786      +,0.14400 ,0.02932  ,0.02119 ,0.00021 ,0.00006 ,-0.00006 ,0.00014
787      +,0.13120 ,0.02649  ,0.01703 ,0.00021 ,0.00008 ,-0.00002 ,0.00014
788      +,0.12053 ,0.02408  ,0.01394 ,0.00017 ,0.00006 ,-0.00002 ,0.00014
789      +,0.11121 ,0.02203  ,0.01162 ,0.00015 ,0.00007 ,-0.00002 ,0.00011
790      +,0.10300 ,0.02027  ,0.00983 ,0.00019 ,0.00008 ,0.00001 ,0.00012
791      +,0.09596 ,0.01872  ,0.00841 ,0.00015 ,0.00006 ,0.00001 ,0.00012
792      +,0.08974 ,0.01739  ,0.00726 ,0.00013 ,0.00007 ,0.00003 ,0.00011
793      +,0.08411 ,0.01621  ,0.00634 ,0.00013 ,0.00007 ,0.00004 ,0.00012
794      +,0.07913 ,0.01517  ,0.00559 ,0.00011 ,0.00007 ,0.00004 ,0.00012
795      +,0.07477 ,0.01423  ,0.00496 ,0.00009 ,0.00007 ,0.00004 ,0.00012
796      +,0.07067 ,0.01338  ,0.00444 ,0.00007 ,0.00007 ,0.00003 ,0.00010
797      +,0.06694 ,0.01262  ,0.00399 ,0.00006 ,0.00007 ,0.00002 ,0.00008
798      +,0.06354 ,0.01193  ,0.00361 ,0.00006 ,0.00008 ,0.00003 ,0.00008
799      +,0.06046 ,0.01129  ,0.00329 ,0.00006 ,0.00007 ,0.00003 ,0.00008
800      +,0.05765 ,0.01071  ,0.00301 ,0.00004 ,0.00006 ,0.00002 ,0.00007
801      +,0.05503 ,0.01018  ,0.00276 ,0.00005 ,0.00006 ,0.00002 ,0.00007/
802       DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),K=1,19)/
803      + 0.16982 ,0.03391  ,0.03567 ,0.00022 ,-0.00005 ,-0.00006 ,0.00000
804      +,0.14910 ,0.02933  ,0.02591 ,0.00016 ,-0.00002 ,-0.00009 ,0.00004
805      +,0.13261 ,0.02576  ,0.01955 ,0.00018 ,0.00002 ,-0.00004 ,0.00007
806      +,0.11933 ,0.02290  ,0.01519 ,0.00015 ,0.00002 ,-0.00006 ,0.00005
807      +,0.10818 ,0.02059  ,0.01212 ,0.00013 ,0.00002 ,-0.00004 ,0.00006
808      +,0.09891 ,0.01863  ,0.00988 ,0.00011 ,0.00002 ,-0.00004 ,0.00004
809      +,0.09081 ,0.01699  ,0.00817 ,0.00014 ,0.00002 ,-0.00004 ,0.00006
810      +,0.08399 ,0.01558  ,0.00686 ,0.00011 ,0.00002 ,-0.00002 ,0.00005
811      +,0.07803 ,0.01436  ,0.00584 ,0.00007 ,0.00005 ,0.00000 ,0.00005
812      +,0.07263 ,0.01328  ,0.00504 ,0.00009 ,0.00004 ,0.00001 ,0.00007
813      +,0.06789 ,0.01235  ,0.00438 ,0.00008 ,0.00004 ,0.00000 ,0.00006
814      +,0.06370 ,0.01152  ,0.00384 ,0.00006 ,0.00003 ,0.00000 ,0.00005
815      +,0.05995 ,0.01076  ,0.00340 ,0.00005 ,0.00003 ,0.00001 ,0.00005
816      +,0.05651 ,0.01009  ,0.00304 ,0.00005 ,0.00003 ,0.00000 ,0.00005
817      +,0.05340 ,0.00949  ,0.00273 ,0.00006 ,0.00003 ,0.00000 ,0.00004
818      +,0.05058 ,0.00896  ,0.00246 ,0.00005 ,0.00003 ,0.00000 ,0.00004
819      +,0.04801 ,0.00847  ,0.00223 ,0.00005 ,0.00002 ,0.00000 ,0.00004
820      +,0.04565 ,0.00801  ,0.00204 ,0.00004 ,0.00002 ,0.00000 ,0.00004
821      +,0.04349 ,0.00760  ,0.00187 ,0.00004 ,0.00002 ,0.00000 ,0.00003/
822       DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),K=1,19)/
823      + 0.14066 ,0.02631  ,0.02583 ,0.00011 ,-0.00001 ,-0.00003 ,0.00003
824      +,0.12272 ,0.02264  ,0.01858 ,0.00009 ,0.00001 ,-0.00001 ,0.00004
825      +,0.10852 ,0.01979  ,0.01388 ,0.00010 ,-0.00001 ,-0.00003 ,0.00002
826      +,0.09708 ,0.01752  ,0.01071 ,0.00011 ,0.00000 ,-0.00002 ,0.00003
827      +,0.08776 ,0.01570  ,0.00847 ,0.00008 ,0.00001 ,-0.00002 ,0.00002
828      +,0.07982 ,0.01414  ,0.00686 ,0.00009 ,0.00001 ,-0.00001 ,0.00001
829      +,0.07317 ,0.01286  ,0.00565 ,0.00008 ,0.00001 ,0.00001 ,0.00002
830      +,0.06737 ,0.01175  ,0.00472 ,0.00007 ,0.00002 ,0.00000 ,0.00004
831      +,0.06228 ,0.01080  ,0.00400 ,0.00007 ,0.00000 ,0.00000 ,0.00003
832      +,0.05786 ,0.00997  ,0.00342 ,0.00005 ,0.00002 ,0.00000 ,0.00003
833      +,0.05389 ,0.00923  ,0.00297 ,0.00006 ,0.00002 ,0.00000 ,0.00002
834      +,0.05037 ,0.00859  ,0.00260 ,0.00007 ,0.00002 ,0.00000 ,0.00002
835      +,0.04725 ,0.00802  ,0.00229 ,0.00006 ,0.00000 ,0.00000 ,0.00002
836      +,0.04446 ,0.00750  ,0.00204 ,0.00005 ,0.00000 ,0.00000 ,0.00002
837      +,0.04193 ,0.00704  ,0.00182 ,0.00004 ,0.00001 ,-0.00001 ,0.00001
838      +,0.03960 ,0.00662  ,0.00164 ,0.00004 ,0.00000 ,0.00000 ,0.00001
839      +,0.03749 ,0.00625  ,0.00149 ,0.00004 ,0.00000 ,0.00000 ,0.00001
840      +,0.03558 ,0.00590  ,0.00136 ,0.00004 ,0.00001 ,0.00000 ,0.00001
841      +,0.03383 ,0.00559  ,0.00124 ,0.00004 ,0.00001 ,0.00000 ,0.00001/
842       DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),K=1,19)/
843      + 0.09154 ,0.01495  ,0.01266 ,0.00003 ,-0.00002 ,-0.00002 ,0.00000
844      +,0.07871 ,0.01266  ,0.00883 ,0.00003 ,-0.00001 ,-0.00001 ,0.00002
845      +,0.06870 ,0.01093  ,0.00643 ,0.00003 ,0.00000 ,-0.00001 ,0.00001
846      +,0.06074 ,0.00957  ,0.00486 ,0.00003 ,0.00001 ,-0.00002 ,0.00000
847      +,0.05433 ,0.00847  ,0.00377 ,0.00002 ,0.00000 ,-0.00002 ,0.00001
848      +,0.04900 ,0.00757  ,0.00300 ,0.00001 ,0.00002 ,0.00000 ,0.00002
849      +,0.04447 ,0.00682  ,0.00244 ,0.00001 ,0.00001 ,0.00000 ,0.00001
850      +,0.04060 ,0.00618  ,0.00201 ,0.00001 ,0.00001 ,0.00000 ,0.00002
851      +,0.03725 ,0.00563  ,0.00169 ,0.00000 ,0.00001 ,0.00000 ,0.00001
852      +,0.03430 ,0.00515  ,0.00144 ,0.00001 ,0.00001 ,0.00000 ,0.00001
853      +,0.03174 ,0.00474  ,0.00123 ,0.00001 ,0.00001 ,0.00000 ,0.00001
854      +,0.02948 ,0.00438  ,0.00107 ,0.00001 ,0.00001 ,0.00000 ,0.00001
855      +,0.02745 ,0.00406  ,0.00094 ,0.00002 ,0.00001 ,0.00000 ,0.00001
856      +,0.02567 ,0.00378  ,0.00083 ,0.00001 ,0.00001 ,0.00000 ,0.00000
857      +,0.02408 ,0.00353  ,0.00074 ,0.00001 ,0.00001 ,0.00000 ,0.00000
858      +,0.02263 ,0.00330  ,0.00066 ,0.00001 ,0.00001 ,0.00000 ,0.00001
859      +,0.02132 ,0.00310  ,0.00060 ,0.00001 ,0.00001 ,0.00000 ,0.00001
860      +,0.02014 ,0.00291  ,0.00054 ,0.00000 ,0.00001 ,0.00000 ,0.00001
861      +,0.01905 ,0.00274  ,0.00049 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
862       DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),K=1,19)/
863      + 0.05476 ,0.00773  ,0.00555 ,0.00001 ,-0.00002 ,-0.00002 ,-0.00002
864      +,0.04631 ,0.00644  ,0.00376 ,0.00002 ,0.00000 ,-0.00001 ,0.00000
865      +,0.03992 ,0.00548  ,0.00267 ,0.00001 ,-0.00001 ,-0.00001 ,0.00000
866      +,0.03487 ,0.00474  ,0.00197 ,0.00001 ,0.00000 ,0.00000 ,0.00001
867      +,0.03084 ,0.00415  ,0.00150 ,0.00000 ,0.00000 ,-0.00001 ,0.00000
868      +,0.02748 ,0.00367  ,0.00118 ,0.00000 ,0.00000 ,-0.00001 ,0.00000
869      +,0.02471 ,0.00327  ,0.00094 ,0.00000 ,0.00000 ,-0.00001 ,0.00001
870      +,0.02233 ,0.00294  ,0.00077 ,0.00000 ,0.00000 ,0.00000 ,0.00000
871      +,0.02034 ,0.00266  ,0.00064 ,0.00000 ,0.00001 ,0.00001 ,0.00001
872      +,0.01857 ,0.00241  ,0.00054 ,0.00000 ,0.00000 ,0.00000 ,0.00000
873      +,0.01705 ,0.00220  ,0.00046 ,0.00000 ,0.00000 ,0.00000 ,0.00000
874      +,0.01573 ,0.00202  ,0.00040 ,0.00000 ,0.00000 ,0.00000 ,0.00000
875      +,0.01457 ,0.00186  ,0.00035 ,0.00000 ,0.00000 ,0.00000 ,0.00000
876      +,0.01352 ,0.00172  ,0.00030 ,0.00000 ,0.00000 ,0.00000 ,0.00000
877      +,0.01259 ,0.00159  ,0.00027 ,0.00000 ,0.00000 ,0.00000 ,0.00000
878      +,0.01177 ,0.00148  ,0.00024 ,0.00000 ,0.00000 ,0.00000 ,0.00000
879      +,0.01103 ,0.00138  ,0.00022 ,0.00000 ,0.00000 ,0.00000 ,0.00000
880      +,0.01036 ,0.00129  ,0.00020 ,0.00000 ,0.00000 ,0.00000 ,0.00000
881      +,0.00974 ,0.00121  ,0.00018 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
882       DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),K=1,19)/
883      + 0.02907 ,0.00346  ,0.00207 ,0.00001 ,0.00000 ,0.00000 ,0.00000
884      +,0.02418 ,0.00284  ,0.00136 ,0.00001 ,0.00000 ,0.00000 ,0.00000
885      +,0.02051 ,0.00238  ,0.00094 ,0.00001 ,0.00000 ,0.00000 ,0.00000
886      +,0.01765 ,0.00203  ,0.00068 ,0.00001 ,0.00000 ,0.00000 ,0.00000
887      +,0.01541 ,0.00176  ,0.00051 ,0.00001 ,0.00000 ,0.00000 ,0.00000
888      +,0.01361 ,0.00154  ,0.00039 ,0.00000 ,0.00000 ,0.00000 ,0.00000
889      +,0.01209 ,0.00135  ,0.00031 ,0.00000 ,0.00000 ,0.00000 ,0.00000
890      +,0.01082 ,0.00120  ,0.00025 ,0.00000 ,0.00000 ,0.00000 ,0.00000
891      +,0.00976 ,0.00108  ,0.00021 ,0.00000 ,0.00000 ,0.00000 ,0.00000
892      +,0.00885 ,0.00097  ,0.00017 ,0.00000 ,0.00000 ,0.00000 ,0.00000
893      +,0.00806 ,0.00088  ,0.00015 ,0.00000 ,0.00000 ,0.00000 ,0.00000
894      +,0.00737 ,0.00080  ,0.00013 ,0.00000 ,0.00000 ,0.00000 ,0.00000
895      +,0.00677 ,0.00073  ,0.00011 ,0.00000 ,0.00000 ,0.00000 ,0.00000
896      +,0.00625 ,0.00067  ,0.00010 ,0.00000 ,0.00000 ,0.00000 ,0.00000
897      +,0.00578 ,0.00062  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
898      +,0.00536 ,0.00057  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
899      +,0.00499 ,0.00053  ,0.00007 ,0.00000 ,0.00000 ,0.00000 ,0.00000
900      +,0.00466 ,0.00049  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000
901      +,0.00436 ,0.00046  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
902       DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),K=1,19)/
903      + 0.01312 ,0.00128  ,0.00062 ,0.00000 ,0.00000 ,0.00000 ,0.00000
904      +,0.01068 ,0.00103  ,0.00039 ,0.00000 ,0.00000 ,0.00000 ,0.00000
905      +,0.00889 ,0.00085  ,0.00026 ,0.00000 ,0.00000 ,0.00000 ,0.00000
906      +,0.00754 ,0.00071  ,0.00018 ,0.00000 ,0.00000 ,0.00000 ,0.00000
907      +,0.00648 ,0.00060  ,0.00014 ,0.00000 ,0.00000 ,0.00000 ,0.00000
908      +,0.00563 ,0.00052  ,0.00010 ,0.00000 ,0.00000 ,0.00000 ,0.00000
909      +,0.00494 ,0.00045  ,0.00008 ,0.00000 ,0.00000 ,0.00000 ,0.00000
910      +,0.00437 ,0.00040  ,0.00006 ,0.00000 ,0.00000 ,0.00000 ,0.00000
911      +,0.00390 ,0.00035  ,0.00005 ,0.00000 ,0.00000 ,0.00000 ,0.00000
912      +,0.00349 ,0.00031  ,0.00004 ,0.00000 ,0.00000 ,0.00000 ,0.00000
913      +,0.00315 ,0.00028  ,0.00004 ,0.00000 ,0.00000 ,0.00000 ,0.00000
914      +,0.00285 ,0.00025  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
915      +,0.00260 ,0.00023  ,0.00003 ,0.00000 ,0.00000 ,0.00000 ,0.00000
916      +,0.00238 ,0.00021  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
917      +,0.00218 ,0.00019  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
918      +,0.00201 ,0.00018  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
919      +,0.00185 ,0.00016  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
920      +,0.00172 ,0.00015  ,0.00002 ,0.00000 ,0.00000 ,0.00000 ,0.00000
921      +,0.00160 ,0.00014  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
922       DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),K=1,19)/
923      + 0.00099 ,0.00005  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
924      +,0.00076 ,0.00004  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
925      +,0.00060 ,0.00003  ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000
926      +,0.00049 ,0.00003  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
927      +,0.00040 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
928      +,0.00034 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
929      +,0.00028 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
930      +,0.00024 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
931      +,0.00021 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
932      +,0.00018 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
933      +,0.00016 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
934      +,0.00014 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
935      +,0.00013 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
936      +,0.00011 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
937      +,0.00010 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
938      +,0.00009 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
939      +,0.00008 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
940      +,0.00007 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000
941      +,0.00007 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000 ,0.00000/
942       DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5,
943      .        1.D-4,2.D-4,4.D-4,6.D-4,8.D-4,
944      .        1.D-3,2.D-3,4.D-3,6.D-3,8.D-3,
945      .        1.D-2,2.D-2,4.D-2,6.D-2,8.D-2,
946      .     .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0,
947      .     .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0,
948      .     .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0,
949      .     .8D0,.9D0,1.D0/
950       DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/
951       DATA N0/2,5,4,5,0,0,5/
952       DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
953       DATA INIT/0/
954 C
955 C
956       XSAVE=X
957 C
958       IF(INIT.NE.0) GOTO 10
959       INIT=1
960       DO 20 N=1,NX-1
961       DO 20 M=1,19
962 C     READ(75,50)F(1,N,M),F(2,N,M),F(3,N,M),F(4,N,M),F(5,N,M),F(7,N,M),
963 C    .          F(6,N,M)
964 C 1=UV 2=DV 3=GLUE 4=(UBAR+DBAR)/2 5=CBAR 7=BBAR 6=SBAR
965          DO 25 I=1,7
966   25     F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
967   20  CONTINUE
968       DO 30 J=1,NTENTH-1
969       XX(J)= LOG10(XX(J))+ONEDO
970       DO 30 I=1,6
971       DO 30 K=1,19
972   30  F(I,J,K) = LOG( F(I,J,K))*F(I,NTENTH,K)/ LOG( F(I,NTENTH,K))
973   50  FORMAT(7F10.5)
974       DO 40 I=1,7
975       DO 40 M=1,19
976   40  F(I,NX,M)=ZEROD
977   10  CONTINUE
978       IF(X.LT.XMIN) X=XMIN
979       IF(X.GT.XMAX) X=XMAX
980       QSQ=SCALE**2
981       IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
982       IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
983       XXX=X
984       IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
985       N=0
986   70  N=N+1
987       IF(XXX.GT.XX(N+1)) GOTO 70
988       A=(XXX-XX(N))/(XX(N+1)-XX(N))
989       RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
990       B=RM-AINT(RM)
991       M=1+  INT(RM)
992       DO 60 I=1,7
993       G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
994      .    + A*(ONED-B)*F(I,N+1,M)  + A*B*F(I,N+1,M+1)
995       IF(N.GE.NTENTH) GOTO 65
996       IF(I.EQ.7) GOTO 65
997           FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
998           G(I)=FAC**(G(I)/FAC)
999   65  CONTINUE
1000       G(I)=G(I)*(ONED-X)**N0(I)
1001   60  CONTINUE
1002       UPV=G(1)
1003       DNV=G(2)
1004 C...    THIS SEA IS (UBAR+DBAR)/2
1005       SEA=G(4)
1006       STR=G(6)
1007       CHM=G(5)
1008       GL =G(3)
1009       BOT=G(7)
1010 C
1011       X=XSAVE
1012 C
1013       RETURN
1014       END