spdf/strmrs1.F

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.2  1996/10/30 08:31:43  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 STRMRS1(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GL)
  15 C
  16 C :::::::::::: MARTIN ROBERTS STIRLING :::::SOFT GLUE::::107 MEV::::
  17 C
  18 #include "pdf/impdp.inc"
  19       DIMENSION F(6,42,19),G(6),XX(42),N0(6)
  20       DATA ((F(I,1,K),I=1,6),K=1,19)/
  21      + 0.02658 ,0.00530  ,4.51006 ,0.17402 ,0.02442 ,0.00000
  22      +,0.02814 ,0.00592 ,11.18082 ,0.31122 ,0.12735 ,0.00000
  23      +,0.02958 ,0.00651 ,18.83687 ,0.49216 ,0.26306 ,0.00000
  24      +,0.03092 ,0.00707 ,26.82784 ,0.70650 ,0.42380 ,0.00000
  25      +,0.03217 ,0.00760 ,35.16595 ,0.94641 ,0.60696 ,0.01303
  26      +,0.03336 ,0.00811 ,43.71019 ,1.17914 ,0.80879 ,0.12228
  27      +,0.03449 ,0.00861 ,52.38245 ,1.38683 ,1.02653 ,0.37028
  28      +,0.03557 ,0.00909 ,60.99461 ,1.61313 ,1.25467 ,0.60412
  29      +,0.03661 ,0.00955 ,69.65259 ,1.85015 ,1.49412 ,0.85104
  30      +,0.03761 ,0.01000 ,78.34851 ,2.09751 ,1.74395 ,1.10846
  31      +,0.03857 ,0.01044 ,87.05826 ,2.35430 ,2.00294 ,1.37425
  32      +,0.03950 ,0.01087 ,95.48085 ,2.61128 ,2.26199 ,1.63973
  33      +,0.04039 ,0.01129,103.95073 ,2.87689 ,2.52955 ,1.91334
  34      +,0.04126 ,0.01170,112.30336 ,3.14597 ,2.80047 ,2.18996
  35      +,0.04210 ,0.01209,120.47197 ,3.41583 ,3.07205 ,2.46693
  36      +,0.04292 ,0.01248,128.65518 ,3.69208 ,3.34993 ,2.74994
  37      +,0.04371 ,0.01286,136.52747 ,3.96407 ,3.62347 ,3.02833
  38      +,0.04449 ,0.01324,144.46341 ,4.24324 ,3.90412 ,3.31362
  39      +,0.04524 ,0.01360,152.06937 ,4.51646 ,4.17873 ,3.59265/
  40       DATA ((F(I,2,K),I=1,6),K=1,19)/
  41      + 0.03648 ,0.00837  ,4.29922 ,0.17511 ,0.02249 ,0.00000
  42      +,0.03848 ,0.00927  ,9.62766 ,0.29571 ,0.11296 ,0.00000
  43      +,0.04032 ,0.01011 ,15.39951 ,0.44678 ,0.22627 ,0.00000
  44      +,0.04202 ,0.01091 ,21.21265 ,0.61910 ,0.35552 ,0.00000
  45      +,0.04360 ,0.01166 ,27.11397 ,0.80639 ,0.49851 ,0.01008
  46      +,0.04510 ,0.01238 ,33.02528 ,0.98383 ,0.65230 ,0.09294
  47      +,0.04652 ,0.01307 ,38.90810 ,1.13851 ,0.81485 ,0.27915
  48      +,0.04787 ,0.01374 ,44.64717 ,1.30431 ,0.98222 ,0.45130
  49      +,0.04916 ,0.01438 ,50.32643 ,1.47525 ,1.15518 ,0.63036
  50      +,0.05040 ,0.01500 ,55.94949 ,1.65118 ,1.33315 ,0.81449
  51      +,0.05159 ,0.01560 ,61.50812 ,1.83154 ,1.51534 ,1.00222
  52      +,0.05273 ,0.01619 ,66.81026 ,2.00994 ,1.69547 ,1.18760
  53      +,0.05383 ,0.01675 ,72.08434 ,2.19242 ,1.87957 ,1.37665
  54      +,0.05490 ,0.01730 ,77.22752 ,2.37548 ,2.06417 ,1.56591
  55      +,0.05593 ,0.01784 ,82.20232 ,2.55738 ,2.24752 ,1.75367
  56      +,0.05693 ,0.01836 ,87.14191 ,2.74207 ,2.43358 ,1.94392
  57      +,0.05790 ,0.01887 ,91.84142 ,2.92236 ,2.61517 ,2.12950
  58      +,0.05884 ,0.01937 ,96.54417 ,3.10610 ,2.80017 ,2.31830
  59      +,0.05975 ,0.01986,101.00369 ,3.28454 ,2.97979 ,2.50154/
  60       DATA ((F(I,3,K),I=1,6),K=1,19)/
  61      + 0.04988 ,0.01320  ,4.09676 ,0.17545 ,0.02044 ,0.00000
  62      +,0.05242 ,0.01449  ,8.28856 ,0.28015 ,0.09902 ,0.00000
  63      +,0.05475 ,0.01569 ,12.58587 ,0.40479 ,0.19255 ,0.00000
  64      +,0.05689 ,0.01682 ,16.76614 ,0.54180 ,0.29534 ,0.00000
  65      +,0.05888 ,0.01787 ,20.89520 ,0.68643 ,0.40579 ,0.00772
  66      +,0.06075 ,0.01888 ,24.93729 ,0.82027 ,0.52177 ,0.06996
  67      +,0.06252 ,0.01984 ,28.87984 ,0.93422 ,0.64190 ,0.20849
  68      +,0.06419 ,0.02075 ,32.65591 ,1.05437 ,0.76344 ,0.33405
  69      +,0.06579 ,0.02163 ,36.33200 ,1.17633 ,0.88711 ,0.46271
  70      +,0.06731 ,0.02248 ,39.91786 ,1.30010 ,1.01259 ,0.59322
  71      +,0.06877 ,0.02329 ,43.41414 ,1.42539 ,1.13944 ,0.72460
  72      +,0.07017 ,0.02408 ,46.70076 ,1.54787 ,1.26339 ,0.85283
  73      +,0.07151 ,0.02484 ,49.93265 ,1.67183 ,1.38875 ,0.98224
  74      +,0.07281 ,0.02558 ,53.04704 ,1.79496 ,1.51319 ,1.11050
  75      +,0.07406 ,0.02629 ,56.02382 ,1.91616 ,1.63564 ,1.23656
  76      +,0.07526 ,0.02699 ,58.95198 ,2.03819 ,1.75885 ,1.36321
  77      +,0.07643 ,0.02766 ,61.70383 ,2.15626 ,1.87806 ,1.48569
  78      +,0.07756 ,0.02831 ,64.43666 ,2.27576 ,1.99864 ,1.60939
  79      +,0.07866 ,0.02895 ,66.99721 ,2.39085 ,2.11476 ,1.72849/
  80       DATA ((F(I,4,K),I=1,6),K=1,19)/
  81      + 0.05977 ,0.01722  ,3.98157 ,0.17518 ,0.01920 ,0.00000
  82      +,0.06269 ,0.01881  ,7.59206 ,0.27089 ,0.09106 ,0.00000
  83      +,0.06535 ,0.02028 ,11.18215 ,0.38154 ,0.17413 ,0.00000
  84      +,0.06779 ,0.02165 ,14.60599 ,0.50059 ,0.26349 ,0.00000
  85      +,0.07006 ,0.02294 ,17.93402 ,0.62417 ,0.35790 ,0.00656
  86      +,0.07218 ,0.02415 ,21.14798 ,0.73697 ,0.45567 ,0.05893
  87      +,0.07417 ,0.02530 ,24.24521 ,0.83166 ,0.55574 ,0.17486
  88      +,0.07606 ,0.02640 ,27.17863 ,0.93057 ,0.65596 ,0.27873
  89      +,0.07786 ,0.02744 ,30.00604 ,1.03005 ,0.75701 ,0.38423
  90      +,0.07957 ,0.02845 ,32.73907 ,1.13017 ,0.85871 ,0.49038
  91      +,0.08121 ,0.02942 ,35.38145 ,1.23077 ,0.96076 ,0.59646
  92      +,0.08277 ,0.03035 ,37.84256 ,1.32842 ,1.05977 ,0.69929
  93      +,0.08428 ,0.03125 ,40.24571 ,1.42664 ,1.15928 ,0.80240
  94      +,0.08572 ,0.03212 ,42.54428 ,1.52363 ,1.25750 ,0.90402
  95      +,0.08711 ,0.03296 ,44.72464 ,1.61856 ,1.35358 ,1.00332
  96      +,0.08846 ,0.03377 ,46.85704 ,1.71366 ,1.44979 ,1.10260
  97      +,0.08975 ,0.03455 ,48.84508 ,1.80519 ,1.54238 ,1.19810
  98      +,0.09101 ,0.03532 ,50.81018 ,1.89743 ,1.63564 ,1.29414
  99      +,0.09222 ,0.03606 ,52.63689 ,1.98582 ,1.72500 ,1.38616/
 100       DATA ((F(I,5,K),I=1,6),K=1,19)/
 101      + 0.06788 ,0.02079  ,3.90099 ,0.17472 ,0.01829 ,0.00000
 102      +,0.07109 ,0.02263  ,7.13284 ,0.26420 ,0.08551 ,0.00000
 103      +,0.07401 ,0.02433 ,10.28053 ,0.36553 ,0.16162 ,0.00000
 104      +,0.07669 ,0.02589 ,13.24129 ,0.47292 ,0.24228 ,0.00000
 105      +,0.07917 ,0.02736 ,16.08655 ,0.58310 ,0.32647 ,0.00584
 106      +,0.08148 ,0.02874 ,18.80742 ,0.68268 ,0.41282 ,0.05204
 107      +,0.08365 ,0.03005 ,21.40671 ,0.76544 ,0.50047 ,0.15393
 108      +,0.08571 ,0.03129 ,23.84843 ,0.85131 ,0.58761 ,0.24448
 109      +,0.08766 ,0.03248 ,26.18478 ,0.93710 ,0.67491 ,0.33587
 110      +,0.08951 ,0.03362 ,28.42804 ,1.02294 ,0.76225 ,0.42732
 111      +,0.09129 ,0.03471 ,30.58345 ,1.10874 ,0.84942 ,0.51820
 112      +,0.09298 ,0.03575 ,32.57706 ,1.19159 ,0.93358 ,0.60588
 113      +,0.09460 ,0.03676 ,34.51352 ,1.27456 ,1.01778 ,0.69340
 114      +,0.09616 ,0.03773 ,36.35550 ,1.35614 ,1.10054 ,0.77929
 115      +,0.09765 ,0.03866 ,38.09268 ,1.43566 ,1.18117 ,0.86289
 116      +,0.09910 ,0.03957 ,39.78439 ,1.51503 ,1.26161 ,0.94616
 117      +,0.10049 ,0.04044 ,41.35175 ,1.59113 ,1.33873 ,1.02596
 118      +,0.10183 ,0.04129 ,42.89584 ,1.66760 ,1.41617 ,1.10597
 119      +,0.10313 ,0.04211 ,44.32220 ,1.74059 ,1.49011 ,1.18236/
 120       DATA ((F(I,6,K),I=1,6),K=1,19)/
 121      + 0.07487 ,0.02406  ,3.83898 ,0.17420 ,0.01758 ,0.00000
 122      +,0.07833 ,0.02611  ,6.79523 ,0.25892 ,0.08126 ,0.00000
 123      +,0.08146 ,0.02800  ,9.63033 ,0.35335 ,0.15223 ,0.00000
 124      +,0.08433 ,0.02974 ,12.26901 ,0.45229 ,0.22657 ,0.00000
 125      +,0.08698 ,0.03136 ,14.78229 ,0.55286 ,0.30347 ,0.00532
 126      +,0.08945 ,0.03289 ,17.16727 ,0.64308 ,0.38173 ,0.04717
 127      +,0.09177 ,0.03433 ,19.42996 ,0.71746 ,0.46066 ,0.13920
 128      +,0.09396 ,0.03570 ,21.54160 ,0.79424 ,0.53869 ,0.22047
 129      +,0.09604 ,0.03700 ,23.55028 ,0.87056 ,0.61646 ,0.30209
 130      +,0.09801 ,0.03824 ,25.46864 ,0.94657 ,0.69393 ,0.38340
 131      +,0.09989 ,0.03944 ,27.30269 ,1.02222 ,0.77092 ,0.46388
 132      +,0.10168 ,0.04057 ,28.98940 ,1.09499 ,0.84495 ,0.54121
 133      +,0.10340 ,0.04167 ,30.62100 ,1.16761 ,0.91877 ,0.61815
 134      +,0.10505 ,0.04273 ,32.16582 ,1.23877 ,0.99107 ,0.69340
 135      +,0.10663 ,0.04374 ,33.61597 ,1.30790 ,1.06129 ,0.76641
 136      +,0.10816 ,0.04473 ,35.02318 ,1.37672 ,1.13115 ,0.83892
 137      +,0.10962 ,0.04567 ,36.32019 ,1.44249 ,1.19792 ,0.90822
 138      +,0.11104 ,0.04659 ,37.59447 ,1.50842 ,1.26481 ,0.97751
 139      +,0.11241 ,0.04747 ,38.76543 ,1.57118 ,1.32848 ,1.04349/
 140       DATA ((F(I,7,K),I=1,6),K=1,19)/
 141      + 0.10111 ,0.03779  ,3.64754 ,0.17147 ,0.01530 ,0.00000
 142      +,0.10541 ,0.04065  ,5.84062 ,0.24185 ,0.06837 ,0.00000
 143      +,0.10929 ,0.04324  ,7.85311 ,0.31660 ,0.12471 ,0.00000
 144      +,0.11281 ,0.04561  ,9.66675 ,0.39220 ,0.18168 ,0.00000
 145      +,0.11605 ,0.04780 ,11.34619 ,0.46692 ,0.23897 ,0.00394
 146      +,0.11906 ,0.04984 ,12.90075 ,0.53237 ,0.29591 ,0.03437
 147      +,0.12187 ,0.05176 ,14.34254 ,0.58496 ,0.35219 ,0.10073
 148      +,0.12450 ,0.05356 ,15.65904 ,0.63838 ,0.40686 ,0.15816
 149      +,0.12699 ,0.05526 ,16.88707 ,0.69062 ,0.46048 ,0.21497
 150      +,0.12935 ,0.05688 ,18.03888 ,0.74190 ,0.51312 ,0.27077
 151      +,0.13159 ,0.05843 ,19.12154 ,0.79226 ,0.56475 ,0.32529
 152      +,0.13371 ,0.05989 ,20.09756 ,0.84008 ,0.61377 ,0.37703
 153      +,0.13574 ,0.06129 ,21.02838 ,0.88728 ,0.66211 ,0.42795
 154      +,0.13767 ,0.06263 ,21.89565 ,0.93302 ,0.70895 ,0.47721
 155      +,0.13953 ,0.06392 ,22.69609 ,0.97698 ,0.75396 ,0.52453
 156      +,0.14131 ,0.06516 ,23.46364 ,1.02036 ,0.79835 ,0.57111
 157      +,0.14301 ,0.06634 ,24.15753 ,1.06139 ,0.84034 ,0.61519
 158      +,0.14466 ,0.06749 ,24.83311 ,1.10221 ,0.88209 ,0.65893
 159      +,0.14624 ,0.06859 ,25.44145 ,1.14068 ,0.92145 ,0.70019/
 160       DATA ((F(I,8,K),I=1,6),K=1,19)/
 161      + 0.13556 ,0.05907  ,3.45303 ,0.16667 ,0.01296 ,0.00000
 162      +,0.14081 ,0.06291  ,5.00993 ,0.22344 ,0.05605 ,0.00000
 163      +,0.14552 ,0.06636  ,6.38583 ,0.28097 ,0.09968 ,0.00000
 164      +,0.14976 ,0.06948  ,7.58640 ,0.33717 ,0.14229 ,0.00000
 165      +,0.15364 ,0.07233  ,8.66505 ,0.39116 ,0.18395 ,0.00286
 166      +,0.15722 ,0.07496  ,9.63629 ,0.43728 ,0.22438 ,0.02451
 167      +,0.16054 ,0.07740 ,10.51407 ,0.47330 ,0.26351 ,0.07136
 168      +,0.16364 ,0.07968 ,11.29517 ,0.50930 ,0.30084 ,0.11108
 169      +,0.16655 ,0.08181 ,12.00702 ,0.54390 ,0.33684 ,0.14974
 170      +,0.16929 ,0.08383 ,12.66029 ,0.57733 ,0.37165 ,0.18716
 171      +,0.17188 ,0.08574 ,13.26185 ,0.60972 ,0.40531 ,0.22323
 172      +,0.17433 ,0.08753 ,13.79009 ,0.64002 ,0.43684 ,0.25701
 173      +,0.17665 ,0.08925 ,14.28506 ,0.66957 ,0.46755 ,0.28987
 174      +,0.17887 ,0.09087 ,14.73666 ,0.69786 ,0.49697 ,0.32130
 175      +,0.18097 ,0.09242 ,15.14392 ,0.72474 ,0.52492 ,0.35116
 176      +,0.18300 ,0.09390 ,15.52857 ,0.75100 ,0.55221 ,0.38027
 177      +,0.18492 ,0.09531 ,15.86650 ,0.77553 ,0.57773 ,0.40753
 178      +,0.18677 ,0.09667 ,16.19188 ,0.79974 ,0.60290 ,0.43435
 179      +,0.18853 ,0.09795 ,16.47581 ,0.82229 ,0.62637 ,0.45940/
 180       DATA ((F(I,9,K),I=1,6),K=1,19)/
 181      + 0.16029 ,0.07639  ,3.33393 ,0.16274 ,0.01159 ,0.00000
 182      +,0.16612 ,0.08085  ,4.57217 ,0.21193 ,0.04918 ,0.00000
 183      +,0.17132 ,0.08482  ,5.64489 ,0.26044 ,0.08621 ,0.00000
 184      +,0.17598 ,0.08837  ,6.56212 ,0.30687 ,0.12165 ,0.00000
 185      +,0.18022 ,0.09159  ,7.36991 ,0.35072 ,0.15571 ,0.00234
 186      +,0.18411 ,0.09455  ,8.08371 ,0.38758 ,0.18829 ,0.01985
 187      +,0.18771 ,0.09728  ,8.71726 ,0.41582 ,0.21943 ,0.05755
 188      +,0.19105 ,0.09981  ,9.27052 ,0.44375 ,0.24879 ,0.08912
 189      +,0.19418 ,0.10216  ,9.76623 ,0.47031 ,0.27681 ,0.11954
 190      +,0.19711 ,0.10438 ,10.21386 ,0.49571 ,0.30363 ,0.14872
 191      +,0.19989 ,0.10647 ,10.61967 ,0.52009 ,0.32935 ,0.17659
 192      +,0.20248 ,0.10841 ,10.96850 ,0.54268 ,0.35322 ,0.20249
 193      +,0.20495 ,0.11026 ,11.29094 ,0.56454 ,0.37629 ,0.22749
 194      +,0.20728 ,0.11200 ,11.58004 ,0.58530 ,0.39822 ,0.25123
 195      +,0.20950 ,0.11365 ,11.83560 ,0.60486 ,0.41890 ,0.27362
 196      +,0.21162 ,0.11524 ,12.07401 ,0.62385 ,0.43896 ,0.29532
 197      +,0.21363 ,0.11672 ,12.27789 ,0.64143 ,0.45758 ,0.31549
 198      +,0.21556 ,0.11816 ,12.47250 ,0.65870 ,0.47585 ,0.33524
 199      +,0.21739 ,0.11951 ,12.63697 ,0.67463 ,0.49274 ,0.35356/
 200       DATA ((F(I,10,K),I=1,6),K=1,19)/
 201      + 0.18019 ,0.09140  ,3.24638 ,0.15967 ,0.01064 ,0.00000
 202      +,0.18640 ,0.09626  ,4.28367 ,0.20378 ,0.04458 ,0.00000
 203      +,0.19190 ,0.10054  ,5.16665 ,0.24642 ,0.07736 ,0.00000
 204      +,0.19682 ,0.10434  ,5.90861 ,0.28659 ,0.10825 ,0.00000
 205      +,0.20127 ,0.10778  ,6.55111 ,0.32404 ,0.13754 ,0.00202
 206      +,0.20534 ,0.11091  ,7.10971 ,0.35511 ,0.16525 ,0.01696
 207      +,0.20909 ,0.11378  ,7.59787 ,0.37852 ,0.19147 ,0.04902
 208      +,0.21256 ,0.11643  ,8.01700 ,0.40149 ,0.21596 ,0.07560
 209      +,0.21580 ,0.11888  ,8.38684 ,0.42314 ,0.23914 ,0.10102
 210      +,0.21882 ,0.12118  ,8.71591 ,0.44368 ,0.26116 ,0.12522
 211      +,0.22168 ,0.12333  ,9.00990 ,0.46325 ,0.28213 ,0.14818
 212      +,0.22433 ,0.12532  ,9.25728 ,0.48122 ,0.30143 ,0.16937
 213      +,0.22685 ,0.12721  ,9.48303 ,0.49850 ,0.31999 ,0.18971
 214      +,0.22923 ,0.12898  ,9.68194 ,0.51481 ,0.33751 ,0.20891
 215      +,0.23147 ,0.13065  ,9.85404 ,0.53006 ,0.35393 ,0.22692
 216      +,0.23362 ,0.13225 ,10.01258 ,0.54479 ,0.36979 ,0.24429
 217      +,0.23564 ,0.13374 ,10.14397 ,0.55832 ,0.38440 ,0.26034
 218      +,0.23759 ,0.13518 ,10.26831 ,0.57156 ,0.39868 ,0.27599
 219      +,0.23942 ,0.13652 ,10.36925 ,0.58368 ,0.41180 ,0.29042/
 220       DATA ((F(I,11,K),I=1,6),K=1,19)/
 221      + 0.19709 ,0.10481  ,3.17556 ,0.15716 ,0.00994 ,0.00000
 222      +,0.20355 ,0.10990  ,4.07083 ,0.19750 ,0.04120 ,0.00000
 223      +,0.20925 ,0.11437  ,4.81936 ,0.23587 ,0.07090 ,0.00000
 224      +,0.21432 ,0.11830  ,5.43805 ,0.27155 ,0.09853 ,0.00000
 225      +,0.21890 ,0.12184  ,5.96557 ,0.30442 ,0.12445 ,0.00179
 226      +,0.22306 ,0.12504  ,6.41737 ,0.33138 ,0.14873 ,0.01493
 227      +,0.22689 ,0.12797  ,6.80638 ,0.35141 ,0.17151 ,0.04303
 228      +,0.23042 ,0.13064  ,7.13491 ,0.37090 ,0.19261 ,0.06613
 229      +,0.23369 ,0.13311  ,7.42050 ,0.38913 ,0.21244 ,0.08808
 230      +,0.23674 ,0.13541  ,7.67088 ,0.40631 ,0.23116 ,0.10884
 231      +,0.23961 ,0.13755  ,7.89130 ,0.42256 ,0.24887 ,0.12843
 232      +,0.24227 ,0.13953  ,8.07250 ,0.43737 ,0.26507 ,0.14641
 233      +,0.24479 ,0.14139  ,8.23562 ,0.45154 ,0.28056 ,0.16357
 234      +,0.24716 ,0.14314  ,8.37651 ,0.46482 ,0.29511 ,0.17970
 235      +,0.24939 ,0.14477  ,8.49538 ,0.47716 ,0.30866 ,0.19476
 236      +,0.25152 ,0.14633  ,8.60330 ,0.48902 ,0.32170 ,0.20921
 237      +,0.25351 ,0.14777  ,8.68918 ,0.49984 ,0.33364 ,0.22250
 238      +,0.25543 ,0.14916  ,8.76966 ,0.51038 ,0.34526 ,0.23542
 239      +,0.25723 ,0.15045  ,8.83133 ,0.51996 ,0.35589 ,0.24727/
 240       DATA ((F(I,12,K),I=1,6),K=1,19)/
 241      + 0.25869 ,0.15738  ,2.91357 ,0.14598 ,0.00770 ,0.00000
 242      +,0.26563 ,0.16259  ,3.42300 ,0.17489 ,0.03093 ,0.00000
 243      +,0.27164 ,0.16702  ,3.82136 ,0.20094 ,0.05188 ,0.00000
 244      +,0.27687 ,0.17081  ,4.12878 ,0.22410 ,0.07055 ,0.00000
 245      +,0.28151 ,0.17411  ,4.37361 ,0.24461 ,0.08744 ,0.00118
 246      +,0.28567 ,0.17702  ,4.56911 ,0.26070 ,0.10275 ,0.00962
 247      +,0.28942 ,0.17961  ,4.72537 ,0.27192 ,0.11668 ,0.02747
 248      +,0.29281 ,0.18191  ,4.84564 ,0.28256 ,0.12924 ,0.04174
 249      +,0.29591 ,0.18398  ,4.94122 ,0.29221 ,0.14074 ,0.05499
 250      +,0.29876 ,0.18586  ,5.01740 ,0.30105 ,0.15135 ,0.06726
 251      +,0.30140 ,0.18758  ,5.07778 ,0.30919 ,0.16116 ,0.07862
 252      +,0.30379 ,0.18910  ,5.11800 ,0.31636 ,0.16992 ,0.08882
 253      +,0.30603 ,0.19051  ,5.14964 ,0.32307 ,0.17814 ,0.09840
 254      +,0.30811 ,0.19180  ,5.17078 ,0.32919 ,0.18570 ,0.10725
 255      +,0.31003 ,0.19297  ,5.18184 ,0.33471 ,0.19260 ,0.11536
 256      +,0.31184 ,0.19406  ,5.18866 ,0.33992 ,0.19913 ,0.12304
 257      +,0.31350 ,0.19504  ,5.18563 ,0.34449 ,0.20496 ,0.12996
 258      +,0.31508 ,0.19596  ,5.18130 ,0.34888 ,0.21057 ,0.13661
 259      +,0.31652 ,0.19679  ,5.16897 ,0.35271 ,0.21557 ,0.14260/
 260       DATA ((F(I,13,K),I=1,6),K=1,19)/
 261      + 0.33630 ,0.22467  ,2.54556 ,0.12808 ,0.00546 ,0.00000
 262      +,0.34254 ,0.22793  ,2.75399 ,0.14618 ,0.02124 ,0.00000
 263      +,0.34772 ,0.23043  ,2.89400 ,0.16146 ,0.03468 ,0.00000
 264      +,0.35201 ,0.23235  ,2.98279 ,0.17424 ,0.04605 ,0.00000
 265      +,0.35566 ,0.23385  ,3.03878 ,0.18494 ,0.05589 ,0.00070
 266      +,0.35879 ,0.23502  ,3.07067 ,0.19271 ,0.06447 ,0.00560
 267      +,0.36149 ,0.23593  ,3.08466 ,0.19745 ,0.07198 ,0.01582
 268      +,0.36380 ,0.23660  ,3.08324 ,0.20174 ,0.07849 ,0.02372
 269      +,0.36581 ,0.23709  ,3.07236 ,0.20541 ,0.08426 ,0.03085
 270      +,0.36757 ,0.23744  ,3.05484 ,0.20858 ,0.08941 ,0.03729
 271      +,0.36913 ,0.23769  ,3.03252 ,0.21134 ,0.09404 ,0.04309
 272      +,0.37044 ,0.23778  ,3.00341 ,0.21356 ,0.09802 ,0.04817
 273      +,0.37162 ,0.23781  ,2.97288 ,0.21552 ,0.10165 ,0.05284
 274      +,0.37263 ,0.23776  ,2.93994 ,0.21718 ,0.10488 ,0.05706
 275      +,0.37349 ,0.23764  ,2.90472 ,0.21852 ,0.10774 ,0.06083
 276      +,0.37427 ,0.23748  ,2.86975 ,0.21973 ,0.11038 ,0.06433
 277      +,0.37489 ,0.23724  ,2.83250 ,0.22061 ,0.11264 ,0.06741
 278      +,0.37548 ,0.23699  ,2.79656 ,0.22144 ,0.11477 ,0.07032
 279      +,0.37592 ,0.23667  ,2.75898 ,0.22199 ,0.11658 ,0.07287/
 280       DATA ((F(I,14,K),I=1,6),K=1,19)/
 281      + 0.38986 ,0.26502  ,2.25105 ,0.11289 ,0.00417 ,0.00001
 282      +,0.39445 ,0.26549  ,2.32372 ,0.12510 ,0.01589 ,0.00000
 283      +,0.39795 ,0.26546  ,2.35443 ,0.13487 ,0.02548 ,0.00001
 284      +,0.40064 ,0.26503  ,2.35628 ,0.14263 ,0.03333 ,0.00001
 285      +,0.40270 ,0.26438  ,2.34140 ,0.14879 ,0.03991 ,0.00048
 286      +,0.40429 ,0.26355  ,2.31547 ,0.15286 ,0.04547 ,0.00379
 287      +,0.40548 ,0.26259  ,2.28213 ,0.15485 ,0.05021 ,0.01058
 288      +,0.40633 ,0.26150  ,2.24280 ,0.15653 ,0.05421 ,0.01574
 289      +,0.40691 ,0.26034  ,2.20087 ,0.15781 ,0.05765 ,0.02028
 290      +,0.40730 ,0.25915  ,2.15783 ,0.15878 ,0.06065 ,0.02431
 291      +,0.40752 ,0.25792  ,2.11453 ,0.15952 ,0.06327 ,0.02789
 292      +,0.40751 ,0.25663  ,2.06967 ,0.15991 ,0.06545 ,0.03096
 293      +,0.40742 ,0.25535  ,2.02616 ,0.16017 ,0.06739 ,0.03373
 294      +,0.40722 ,0.25405  ,1.98324 ,0.16026 ,0.06907 ,0.03619
 295      +,0.40689 ,0.25273  ,1.94081 ,0.16019 ,0.07050 ,0.03835
 296      +,0.40651 ,0.25144  ,1.90015 ,0.16005 ,0.07180 ,0.04032
 297      +,0.40600 ,0.25011  ,1.85973 ,0.15974 ,0.07285 ,0.04202
 298      +,0.40549 ,0.24884  ,1.82140 ,0.15942 ,0.07383 ,0.04362
 299      +,0.40488 ,0.24752  ,1.78343 ,0.15896 ,0.07461 ,0.04497/
 300       DATA ((F(I,15,K),I=1,6),K=1,19)/
 301      + 0.43076 ,0.28881  ,1.99663 ,0.09953 ,0.00327 ,0.00000
 302      +,0.43313 ,0.28641  ,1.99372 ,0.10793 ,0.01229 ,0.00000
 303      +,0.43455 ,0.28384  ,1.96706 ,0.11430 ,0.01946 ,-0.00001
 304      +,0.43523 ,0.28116  ,1.92584 ,0.11906 ,0.02516 ,0.00000
 305      +,0.43541 ,0.27848  ,1.87799 ,0.12261 ,0.02982 ,0.00034
 306      +,0.43521 ,0.27579  ,1.82689 ,0.12463 ,0.03366 ,0.00271
 307      +,0.43472 ,0.27313  ,1.77446 ,0.12516 ,0.03686 ,0.00753
 308      +,0.43392 ,0.27048  ,1.72124 ,0.12549 ,0.03948 ,0.01112
 309      +,0.43295 ,0.26787  ,1.66910 ,0.12557 ,0.04169 ,0.01424
 310      +,0.43186 ,0.26532  ,1.61872 ,0.12547 ,0.04356 ,0.01696
 311      +,0.43067 ,0.26284  ,1.57038 ,0.12522 ,0.04516 ,0.01934
 312      +,0.42930 ,0.26038  ,1.52297 ,0.12477 ,0.04644 ,0.02134
 313      +,0.42791 ,0.25800  ,1.47815 ,0.12427 ,0.04756 ,0.02313
 314      +,0.42645 ,0.25567  ,1.43526 ,0.12367 ,0.04849 ,0.02469
 315      +,0.42492 ,0.25338  ,1.39408 ,0.12299 ,0.04925 ,0.02604
 316      +,0.42340 ,0.25118  ,1.35525 ,0.12230 ,0.04992 ,0.02727
 317      +,0.42179 ,0.24899  ,1.31769 ,0.12151 ,0.05043 ,0.02829
 318      +,0.42023 ,0.24689  ,1.28241 ,0.12074 ,0.05090 ,0.02924
 319      +,0.41857 ,0.24481  ,1.24831 ,0.11989 ,0.05123 ,0.03004/
 320       DATA ((F(I,16,K),I=1,6),K=1,19)/
 321      + 0.46282 ,0.30101  ,1.77170 ,0.08767 ,0.00261 ,0.00000
 322      +,0.46261 ,0.29597  ,1.72363 ,0.09341 ,0.00969 ,0.00000
 323      +,0.46166 ,0.29110  ,1.66481 ,0.09750 ,0.01518 ,-0.00001
 324      +,0.46014 ,0.28641  ,1.60118 ,0.10033 ,0.01944 ,0.00000
 325      +,0.45827 ,0.28194  ,1.53756 ,0.10224 ,0.02284 ,0.00025
 326      +,0.45617 ,0.27766  ,1.47561 ,0.10302 ,0.02559 ,0.00200
 327      +,0.45389 ,0.27355  ,1.41604 ,0.10272 ,0.02782 ,0.00555
 328      +,0.45142 ,0.26959  ,1.35874 ,0.10230 ,0.02961 ,0.00814
 329      +,0.44886 ,0.26579  ,1.30461 ,0.10174 ,0.03107 ,0.01036
 330      +,0.44627 ,0.26215  ,1.25378 ,0.10107 ,0.03229 ,0.01228
 331      +,0.44367 ,0.25866  ,1.20616 ,0.10033 ,0.03330 ,0.01393
 332      +,0.44096 ,0.25527  ,1.16078 ,0.09947 ,0.03407 ,0.01530
 333      +,0.43830 ,0.25203  ,1.11852 ,0.09860 ,0.03473 ,0.01651
 334      +,0.43563 ,0.24891  ,1.07878 ,0.09770 ,0.03526 ,0.01755
 335      +,0.43295 ,0.24587  ,1.04129 ,0.09675 ,0.03567 ,0.01844
 336      +,0.43034 ,0.24298  ,1.00629 ,0.09582 ,0.03601 ,0.01923
 337      +,0.42768 ,0.24014  ,0.97302 ,0.09485 ,0.03624 ,0.01988
 338      +,0.42512 ,0.23744  ,0.94198 ,0.09391 ,0.03645 ,0.02048
 339      +,0.42251 ,0.23479  ,0.91242 ,0.09293 ,0.03656 ,0.02097/
 340       DATA ((F(I,17,K),I=1,6),K=1,19)/
 341      + 0.49309 ,0.30462  ,1.52396 ,0.07462 ,0.00200 ,0.00001
 342      +,0.48934 ,0.29672  ,1.44376 ,0.07808 ,0.00732 ,0.00000
 343      +,0.48520 ,0.28943  ,1.36413 ,0.08028 ,0.01133 ,0.00000
 344      +,0.48078 ,0.28267  ,1.28777 ,0.08156 ,0.01436 ,0.00000
 345      +,0.47629 ,0.27638  ,1.21672 ,0.08220 ,0.01672 ,0.00019
 346      +,0.47177 ,0.27051  ,1.15106 ,0.08207 ,0.01857 ,0.00142
 347      +,0.46725 ,0.26499  ,1.09046 ,0.08120 ,0.02004 ,0.00391
 348      +,0.46270 ,0.25976  ,1.03426 ,0.08030 ,0.02118 ,0.00569
 349      +,0.45822 ,0.25482  ,0.98261 ,0.07934 ,0.02208 ,0.00719
 350      +,0.45382 ,0.25016  ,0.93518 ,0.07834 ,0.02281 ,0.00847
 351      +,0.44952 ,0.24575  ,0.89159 ,0.07732 ,0.02339 ,0.00956
 352      +,0.44523 ,0.24151  ,0.85098 ,0.07626 ,0.02381 ,0.01045
 353      +,0.44108 ,0.23749  ,0.81368 ,0.07521 ,0.02415 ,0.01122
 354      +,0.43701 ,0.23367  ,0.77914 ,0.07417 ,0.02440 ,0.01187
 355      +,0.43300 ,0.23000  ,0.74701 ,0.07312 ,0.02457 ,0.01241
 356      +,0.42913 ,0.22651  ,0.71731 ,0.07211 ,0.02470 ,0.01289
 357      +,0.42529 ,0.22313  ,0.68949 ,0.07109 ,0.02476 ,0.01328
 358      +,0.42160 ,0.21992  ,0.66371 ,0.07012 ,0.02481 ,0.01362
 359      +,0.41793 ,0.21681  ,0.63951 ,0.06914 ,0.02479 ,0.01390/
 360       DATA ((F(I,18,K),I=1,6),K=1,19)/
 361      + 0.51395 ,0.29899  ,1.30757 ,0.06331 ,0.00153 ,0.00000
 362      +,0.50650 ,0.28882  ,1.21138 ,0.06521 ,0.00558 ,0.00000
 363      +,0.49910 ,0.27964  ,1.12333 ,0.06619 ,0.00855 ,0.00000
 364      +,0.49179 ,0.27130  ,1.04361 ,0.06652 ,0.01073 ,0.00000
 365      +,0.48468 ,0.26368  ,0.97231 ,0.06640 ,0.01240 ,0.00013
 366      +,0.47781 ,0.25666  ,0.90848 ,0.06577 ,0.01367 ,0.00102
 367      +,0.47116 ,0.25013  ,0.85110 ,0.06465 ,0.01466 ,0.00279
 368      +,0.46464 ,0.24404  ,0.79911 ,0.06353 ,0.01539 ,0.00405
 369      +,0.45835 ,0.23834  ,0.75222 ,0.06241 ,0.01596 ,0.00510
 370      +,0.45229 ,0.23299  ,0.70985 ,0.06129 ,0.01640 ,0.00597
 371      +,0.44645 ,0.22797  ,0.67146 ,0.06020 ,0.01673 ,0.00670
 372      +,0.44072 ,0.22321  ,0.63627 ,0.05909 ,0.01695 ,0.00730
 373      +,0.43524 ,0.21871  ,0.60427 ,0.05803 ,0.01712 ,0.00780
 374      +,0.42996 ,0.21445  ,0.57497 ,0.05699 ,0.01723 ,0.00822
 375      +,0.42479 ,0.21039  ,0.54803 ,0.05597 ,0.01728 ,0.00856
 376      +,0.41984 ,0.20656  ,0.52332 ,0.05499 ,0.01731 ,0.00886
 377      +,0.41497 ,0.20288  ,0.50042 ,0.05403 ,0.01729 ,0.00909
 378      +,0.41031 ,0.19940  ,0.47933 ,0.05311 ,0.01727 ,0.00930
 379      +,0.40574 ,0.19604  ,0.45972 ,0.05220 ,0.01720 ,0.00946/
 380       DATA ((F(I,19,K),I=1,6),K=1,19)/
 381      + 0.52635 ,0.28698  ,1.11822 ,0.05348 ,0.00118 ,-0.00001
 382      +,0.51525 ,0.27510  ,1.01591 ,0.05434 ,0.00426 ,-0.00001
 383      +,0.50468 ,0.26455  ,0.92665 ,0.05453 ,0.00647 ,0.00000
 384      +,0.49458 ,0.25511  ,0.84875 ,0.05427 ,0.00807 ,-0.00001
 385      +,0.48504 ,0.24657  ,0.78098 ,0.05372 ,0.00925 ,0.00009
 386      +,0.47598 ,0.23879  ,0.72165 ,0.05283 ,0.01014 ,0.00074
 387      +,0.46736 ,0.23163  ,0.66934 ,0.05162 ,0.01081 ,0.00202
 388      +,0.45907 ,0.22499  ,0.62280 ,0.05045 ,0.01129 ,0.00291
 389      +,0.45118 ,0.21883  ,0.58141 ,0.04930 ,0.01164 ,0.00365
 390      +,0.44364 ,0.21310  ,0.54449 ,0.04819 ,0.01190 ,0.00426
 391      +,0.43645 ,0.20776  ,0.51142 ,0.04712 ,0.01209 ,0.00477
 392      +,0.42949 ,0.20271  ,0.48147 ,0.04606 ,0.01220 ,0.00516
 393      +,0.42288 ,0.19798  ,0.45449 ,0.04505 ,0.01227 ,0.00549
 394      +,0.41654 ,0.19352  ,0.43002 ,0.04408 ,0.01230 ,0.00577
 395      +,0.41040 ,0.18930  ,0.40772 ,0.04314 ,0.01230 ,0.00599
 396      +,0.40452 ,0.18532  ,0.38740 ,0.04224 ,0.01228 ,0.00618
 397      +,0.39883 ,0.18152  ,0.36874 ,0.04137 ,0.01223 ,0.00632
 398      +,0.39341 ,0.17793  ,0.35164 ,0.04055 ,0.01217 ,0.00645
 399      +,0.38812 ,0.17449  ,0.33588 ,0.03974 ,0.01209 ,0.00654/
 400       DATA ((F(I,20,K),I=1,6),K=1,19)/
 401      + 0.53124 ,0.27056  ,0.95259 ,0.04498 ,0.00091 ,-0.00001
 402      +,0.51662 ,0.25752  ,0.85036 ,0.04514 ,0.00326 ,0.00000
 403      +,0.50306 ,0.24609  ,0.76416 ,0.04483 ,0.00492 ,0.00000
 404      +,0.49039 ,0.23596  ,0.69096 ,0.04422 ,0.00609 ,-0.00001
 405      +,0.47862 ,0.22689  ,0.62861 ,0.04344 ,0.00693 ,0.00007
 406      +,0.46760 ,0.21869  ,0.57499 ,0.04244 ,0.00755 ,0.00054
 407      +,0.45724 ,0.21120  ,0.52847 ,0.04124 ,0.00801 ,0.00147
 408      +,0.44741 ,0.20431  ,0.48767 ,0.04010 ,0.00832 ,0.00211
 409      +,0.43813 ,0.19795  ,0.45182 ,0.03900 ,0.00854 ,0.00263
 410      +,0.42935 ,0.19207  ,0.42019 ,0.03795 ,0.00869 ,0.00306
 411      +,0.42102 ,0.18662  ,0.39212 ,0.03696 ,0.00879 ,0.00341
 412      +,0.41305 ,0.18150  ,0.36697 ,0.03599 ,0.00883 ,0.00368
 413      +,0.40551 ,0.17672  ,0.34449 ,0.03507 ,0.00885 ,0.00391
 414      +,0.39833 ,0.17223  ,0.32426 ,0.03420 ,0.00885 ,0.00409
 415      +,0.39141 ,0.16800  ,0.30597 ,0.03336 ,0.00882 ,0.00423
 416      +,0.38484 ,0.16404  ,0.28941 ,0.03257 ,0.00878 ,0.00435
 417      +,0.37850 ,0.16026  ,0.27431 ,0.03181 ,0.00871 ,0.00444
 418      +,0.37248 ,0.15670  ,0.26054 ,0.03109 ,0.00865 ,0.00452
 419      +,0.36665 ,0.15331  ,0.24793 ,0.03039 ,0.00856 ,0.00457/
 420       DATA ((F(I,21,K),I=1,6),K=1,19)/
 421      + 0.52937 ,0.25129  ,0.80797 ,0.03764 ,0.00071 ,0.00000
 422      +,0.51150 ,0.23758  ,0.70975 ,0.03734 ,0.00250 ,0.00000
 423      +,0.49522 ,0.22569  ,0.62903 ,0.03674 ,0.00375 ,0.00000
 424      +,0.48025 ,0.21524  ,0.56206 ,0.03595 ,0.00460 ,0.00000
 425      +,0.46652 ,0.20595  ,0.50598 ,0.03506 ,0.00521 ,0.00005
 426      +,0.45382 ,0.19762  ,0.45846 ,0.03405 ,0.00564 ,0.00040
 427      +,0.44199 ,0.19007  ,0.41782 ,0.03292 ,0.00595 ,0.00108
 428      +,0.43087 ,0.18314  ,0.38260 ,0.03186 ,0.00615 ,0.00155
 429      +,0.42044 ,0.17680  ,0.35200 ,0.03085 ,0.00628 ,0.00192
 430      +,0.41064 ,0.17096  ,0.32523 ,0.02990 ,0.00637 ,0.00222
 431      +,0.40143 ,0.16557  ,0.30168 ,0.02900 ,0.00642 ,0.00246
 432      +,0.39264 ,0.16053  ,0.28080 ,0.02814 ,0.00643 ,0.00265
 433      +,0.38437 ,0.15585  ,0.26225 ,0.02734 ,0.00642 ,0.00280
 434      +,0.37653 ,0.15148  ,0.24567 ,0.02657 ,0.00640 ,0.00292
 435      +,0.36905 ,0.14737  ,0.23078 ,0.02585 ,0.00635 ,0.00301
 436      +,0.36198 ,0.14351  ,0.21737 ,0.02516 ,0.00631 ,0.00309
 437      +,0.35519 ,0.13987  ,0.20523 ,0.02450 ,0.00624 ,0.00314
 438      +,0.34876 ,0.13645  ,0.19421 ,0.02388 ,0.00618 ,0.00318
 439      +,0.34254 ,0.13320  ,0.18418 ,0.02329 ,0.00611 ,0.00321/
 440       DATA ((F(I,22,K),I=1,6),K=1,19)/
 441      + 0.52127 ,0.23038  ,0.68202 ,0.03132 ,0.00055 ,0.00000
 442      +,0.50051 ,0.21641  ,0.59014 ,0.03075 ,0.00192 ,0.00000
 443      +,0.48190 ,0.20441  ,0.51637 ,0.02998 ,0.00285 ,0.00000
 444      +,0.46494 ,0.19395  ,0.45627 ,0.02912 ,0.00347 ,0.00000
 445      +,0.44960 ,0.18472  ,0.40669 ,0.02821 ,0.00390 ,0.00004
 446      +,0.43551 ,0.17649  ,0.36529 ,0.02724 ,0.00420 ,0.00030
 447      +,0.42247 ,0.16906  ,0.33026 ,0.02621 ,0.00441 ,0.00079
 448      +,0.41033 ,0.16230  ,0.30023 ,0.02525 ,0.00454 ,0.00113
 449      +,0.39901 ,0.15614  ,0.27439 ,0.02435 ,0.00462 ,0.00139
 450      +,0.38846 ,0.15049  ,0.25199 ,0.02351 ,0.00467 ,0.00161
 451      +,0.37860 ,0.14529  ,0.23242 ,0.02272 ,0.00468 ,0.00178
 452      +,0.36926 ,0.14045  ,0.21522 ,0.02197 ,0.00467 ,0.00190
 453      +,0.36050 ,0.13598  ,0.20004 ,0.02127 ,0.00465 ,0.00200
 454      +,0.35222 ,0.13180  ,0.18655 ,0.02061 ,0.00462 ,0.00208
 455      +,0.34437 ,0.12790  ,0.17452 ,0.01999 ,0.00458 ,0.00214
 456      +,0.33695 ,0.12426  ,0.16373 ,0.01940 ,0.00453 ,0.00219
 457      +,0.32985 ,0.12082  ,0.15404 ,0.01885 ,0.00447 ,0.00222
 458      +,0.32314 ,0.11760  ,0.14526 ,0.01833 ,0.00442 ,0.00225
 459      +,0.31672 ,0.11456  ,0.13732 ,0.01783 ,0.00435 ,0.00226/
 460       DATA ((F(I,23,K),I=1,6),K=1,19)/
 461      + 0.50779 ,0.20874  ,0.57268 ,0.02592 ,0.00042 ,0.00000
 462      +,0.48455 ,0.19488  ,0.48856 ,0.02519 ,0.00146 ,0.00000
 463      +,0.46397 ,0.18306  ,0.42231 ,0.02435 ,0.00215 ,0.00000
 464      +,0.44544 ,0.17283  ,0.36922 ,0.02349 ,0.00261 ,0.00000
 465      +,0.42879 ,0.16386  ,0.32603 ,0.02261 ,0.00292 ,0.00003
 466      +,0.41364 ,0.15591  ,0.29039 ,0.02172 ,0.00313 ,0.00022
 467      +,0.39971 ,0.14878  ,0.26056 ,0.02080 ,0.00327 ,0.00058
 468      +,0.38683 ,0.14232  ,0.23525 ,0.01995 ,0.00335 ,0.00082
 469      +,0.37490 ,0.13645  ,0.21366 ,0.01917 ,0.00339 ,0.00101
 470      +,0.36382 ,0.13110  ,0.19508 ,0.01844 ,0.00341 ,0.00116
 471      +,0.35353 ,0.12619  ,0.17898 ,0.01776 ,0.00341 ,0.00128
 472      +,0.34383 ,0.12164  ,0.16493 ,0.01712 ,0.00340 ,0.00137
 473      +,0.33476 ,0.11745  ,0.15259 ,0.01652 ,0.00337 ,0.00144
 474      +,0.32624 ,0.11355  ,0.14170 ,0.01596 ,0.00334 ,0.00149
 475      +,0.31818 ,0.10992  ,0.13205 ,0.01544 ,0.00330 ,0.00153
 476      +,0.31060 ,0.10654  ,0.12343 ,0.01495 ,0.00326 ,0.00156
 477      +,0.30336 ,0.10336  ,0.11572 ,0.01449 ,0.00321 ,0.00158
 478      +,0.29655 ,0.10039  ,0.10878 ,0.01405 ,0.00316 ,0.00159
 479      +,0.29005 ,0.09758  ,0.10252 ,0.01364 ,0.00311 ,0.00160/
 480       DATA ((F(I,24,K),I=1,6),K=1,19)/
 481      + 0.48953 ,0.18704  ,0.47809 ,0.02131 ,0.00033 ,0.00001
 482      +,0.46428 ,0.17357  ,0.40239 ,0.02052 ,0.00111 ,0.00001
 483      +,0.44215 ,0.16218  ,0.34379 ,0.01968 ,0.00163 ,0.00001
 484      +,0.42245 ,0.15237  ,0.29754 ,0.01884 ,0.00196 ,0.00001
 485      +,0.40482 ,0.14383  ,0.26039 ,0.01804 ,0.00218 ,0.00003
 486      +,0.38894 ,0.13631  ,0.23006 ,0.01723 ,0.00233 ,0.00016
 487      +,0.37444 ,0.12959  ,0.20493 ,0.01643 ,0.00242 ,0.00043
 488      +,0.36109 ,0.12352  ,0.18380 ,0.01570 ,0.00247 ,0.00061
 489      +,0.34881 ,0.11804  ,0.16593 ,0.01502 ,0.00249 ,0.00074
 490      +,0.33745 ,0.11306  ,0.15067 ,0.01439 ,0.00250 ,0.00084
 491      +,0.32692 ,0.10850  ,0.13754 ,0.01382 ,0.00249 ,0.00092
 492      +,0.31704 ,0.10430  ,0.12615 ,0.01328 ,0.00247 ,0.00098
 493      +,0.30786 ,0.10044  ,0.11621 ,0.01278 ,0.00244 ,0.00103
 494      +,0.29929 ,0.09687  ,0.10748 ,0.01231 ,0.00241 ,0.00107
 495      +,0.29119 ,0.09354  ,0.09978 ,0.01187 ,0.00237 ,0.00109
 496      +,0.28359 ,0.09046  ,0.09294 ,0.01147 ,0.00234 ,0.00111
 497      +,0.27638 ,0.08757  ,0.08686 ,0.01109 ,0.00230 ,0.00112
 498      +,0.26962 ,0.08487  ,0.08139 ,0.01073 ,0.00226 ,0.00113
 499      +,0.26315 ,0.08233  ,0.07650 ,0.01039 ,0.00222 ,0.00113/
 500       DATA ((F(I,25,K),I=1,6),K=1,19)/
 501      + 0.46726 ,0.16584  ,0.39669 ,0.01739 ,0.00025 ,0.00001
 502      +,0.44050 ,0.15300  ,0.32954 ,0.01660 ,0.00084 ,0.00001
 503      +,0.41726 ,0.14221  ,0.27840 ,0.01580 ,0.00122 ,0.00001
 504      +,0.39675 ,0.13298  ,0.23860 ,0.01503 ,0.00146 ,0.00001
 505      +,0.37852 ,0.12499  ,0.20701 ,0.01431 ,0.00162 ,0.00002
 506      +,0.36220 ,0.11798  ,0.18148 ,0.01360 ,0.00172 ,0.00012
 507      +,0.34740 ,0.11175  ,0.16053 ,0.01290 ,0.00178 ,0.00031
 508      +,0.33385 ,0.10616  ,0.14307 ,0.01228 ,0.00180 ,0.00044
 509      +,0.32143 ,0.10112  ,0.12842 ,0.01171 ,0.00182 ,0.00054
 510      +,0.31001 ,0.09656  ,0.11599 ,0.01118 ,0.00181 ,0.00061
 511      +,0.29946 ,0.09240  ,0.10537 ,0.01070 ,0.00180 ,0.00066
 512      +,0.28961 ,0.08859  ,0.09621 ,0.01025 ,0.00178 ,0.00070
 513      +,0.28049 ,0.08509  ,0.08826 ,0.00984 ,0.00176 ,0.00074
 514      +,0.27199 ,0.08186  ,0.08132 ,0.00945 ,0.00173 ,0.00076
 515      +,0.26400 ,0.07886  ,0.07523 ,0.00909 ,0.00170 ,0.00077
 516      +,0.25652 ,0.07609  ,0.06983 ,0.00876 ,0.00167 ,0.00079
 517      +,0.24946 ,0.07350  ,0.06506 ,0.00845 ,0.00164 ,0.00079
 518      +,0.24285 ,0.07109  ,0.06079 ,0.00816 ,0.00161 ,0.00080
 519      +,0.23654 ,0.06882  ,0.05698 ,0.00789 ,0.00157 ,0.00080/
 520       DATA ((F(I,26,K),I=1,6),K=1,19)/
 521      + 0.44173 ,0.14556  ,0.32699 ,0.01410 ,0.00018 ,0.00000
 522      +,0.41392 ,0.13352  ,0.26822 ,0.01335 ,0.00062 ,-0.00001
 523      +,0.38998 ,0.12347  ,0.22415 ,0.01261 ,0.00090 ,0.00000
 524      +,0.36909 ,0.11492  ,0.19028 ,0.01191 ,0.00107 ,-0.00001
 525      +,0.35061 ,0.10756  ,0.16370 ,0.01128 ,0.00118 ,0.00001
 526      +,0.33412 ,0.10113  ,0.14245 ,0.01067 ,0.00125 ,0.00008
 527      +,0.31932 ,0.09545  ,0.12515 ,0.01008 ,0.00129 ,0.00022
 528      +,0.30578 ,0.09037  ,0.11086 ,0.00956 ,0.00130 ,0.00031
 529      +,0.29345 ,0.08581  ,0.09895 ,0.00908 ,0.00131 ,0.00038
 530      +,0.28217 ,0.08169  ,0.08892 ,0.00864 ,0.00130 ,0.00043
 531      +,0.27180 ,0.07796  ,0.08039 ,0.00824 ,0.00129 ,0.00047
 532      +,0.26213 ,0.07454  ,0.07310 ,0.00788 ,0.00127 ,0.00050
 533      +,0.25321 ,0.07141  ,0.06679 ,0.00754 ,0.00126 ,0.00052
 534      +,0.24492 ,0.06853  ,0.06131 ,0.00723 ,0.00123 ,0.00054
 535      +,0.23716 ,0.06588  ,0.05652 ,0.00693 ,0.00121 ,0.00055
 536      +,0.22993 ,0.06342  ,0.05230 ,0.00666 ,0.00118 ,0.00055
 537      +,0.22311 ,0.06113  ,0.04859 ,0.00641 ,0.00116 ,0.00056
 538      +,0.21674 ,0.05900  ,0.04527 ,0.00618 ,0.00113 ,0.00056
 539      +,0.21069 ,0.05701  ,0.04232 ,0.00596 ,0.00111 ,0.00055/
 540       DATA ((F(I,27,K),I=1,6),K=1,19)/
 541      + 0.41351 ,0.12642  ,0.26754 ,0.01134 ,0.00013 ,0.00000
 542      +,0.38518 ,0.11530  ,0.21676 ,0.01064 ,0.00046 ,-0.00001
 543      +,0.36099 ,0.10609  ,0.17922 ,0.00998 ,0.00067 ,0.00000
 544      +,0.34004 ,0.09829  ,0.15074 ,0.00937 ,0.00078 ,-0.00001
 545      +,0.32162 ,0.09161  ,0.12862 ,0.00882 ,0.00086 ,0.00001
 546      +,0.30528 ,0.08580  ,0.11110 ,0.00831 ,0.00091 ,0.00006
 547      +,0.29068 ,0.08070  ,0.09697 ,0.00782 ,0.00093 ,0.00016
 548      +,0.27740 ,0.07615  ,0.08539 ,0.00738 ,0.00094 ,0.00022
 549      +,0.26536 ,0.07208  ,0.07580 ,0.00699 ,0.00094 ,0.00027
 550      +,0.25438 ,0.06841  ,0.06778 ,0.00663 ,0.00093 ,0.00031
 551      +,0.24432 ,0.06511  ,0.06100 ,0.00630 ,0.00092 ,0.00033
 552      +,0.23499 ,0.06209  ,0.05523 ,0.00601 ,0.00091 ,0.00035
 553      +,0.22641 ,0.05933  ,0.05027 ,0.00573 ,0.00089 ,0.00037
 554      +,0.21846 ,0.05681  ,0.04598 ,0.00548 ,0.00087 ,0.00038
 555      +,0.21104 ,0.05448  ,0.04225 ,0.00524 ,0.00085 ,0.00038
 556      +,0.20415 ,0.05233  ,0.03898 ,0.00503 ,0.00083 ,0.00039
 557      +,0.19767 ,0.05033  ,0.03611 ,0.00483 ,0.00081 ,0.00039
 558      +,0.19162 ,0.04848  ,0.03355 ,0.00464 ,0.00079 ,0.00039
 559      +,0.18591 ,0.04676  ,0.03129 ,0.00447 ,0.00077 ,0.00038/
 560       DATA ((F(I,28,K),I=1,6),K=1,19)/
 561      + 0.38336 ,0.10866  ,0.21716 ,0.00904 ,0.00010 ,0.00000
 562      +,0.35505 ,0.09854  ,0.17382 ,0.00840 ,0.00034 ,0.00000
 563      +,0.33100 ,0.09021  ,0.14223 ,0.00783 ,0.00048 ,0.00000
 564      +,0.31029 ,0.08320  ,0.11853 ,0.00731 ,0.00057 ,0.00000
 565      +,0.29222 ,0.07722  ,0.10033 ,0.00685 ,0.00063 ,0.00000
 566      +,0.27627 ,0.07205  ,0.08604 ,0.00642 ,0.00065 ,0.00004
 567      +,0.26208 ,0.06752  ,0.07461 ,0.00602 ,0.00067 ,0.00011
 568      +,0.24927 ,0.06351  ,0.06532 ,0.00566 ,0.00067 ,0.00016
 569      +,0.23768 ,0.05992  ,0.05768 ,0.00534 ,0.00067 ,0.00019
 570      +,0.22715 ,0.05671  ,0.05132 ,0.00505 ,0.00066 ,0.00021
 571      +,0.21752 ,0.05382  ,0.04598 ,0.00479 ,0.00065 ,0.00023
 572      +,0.20867 ,0.05119  ,0.04146 ,0.00455 ,0.00064 ,0.00025
 573      +,0.20054 ,0.04880  ,0.03760 ,0.00433 ,0.00063 ,0.00026
 574      +,0.19302 ,0.04661  ,0.03428 ,0.00412 ,0.00061 ,0.00026
 575      +,0.18602 ,0.04459  ,0.03140 ,0.00394 ,0.00060 ,0.00026
 576      +,0.17954 ,0.04274  ,0.02889 ,0.00377 ,0.00058 ,0.00027
 577      +,0.17346 ,0.04102  ,0.02668 ,0.00361 ,0.00057 ,0.00027
 578      +,0.16781 ,0.03944  ,0.02472 ,0.00346 ,0.00055 ,0.00027
 579      +,0.16249 ,0.03796  ,0.02301 ,0.00333 ,0.00054 ,0.00027/
 580       DATA ((F(I,29,K),I=1,6),K=1,19)/
 581      + 0.35190 ,0.09239  ,0.17476 ,0.00714 ,0.00007 ,0.00000
 582      +,0.32398 ,0.08331  ,0.13821 ,0.00658 ,0.00024 ,0.00000
 583      +,0.30046 ,0.07588  ,0.11193 ,0.00609 ,0.00035 ,0.00000
 584      +,0.28032 ,0.06967  ,0.09245 ,0.00565 ,0.00041 ,0.00000
 585      +,0.26286 ,0.06440  ,0.07763 ,0.00526 ,0.00045 ,0.00000
 586      +,0.24754 ,0.05986  ,0.06611 ,0.00491 ,0.00046 ,0.00003
 587      +,0.23395 ,0.05590  ,0.05695 ,0.00459 ,0.00048 ,0.00008
 588      +,0.22175 ,0.05240  ,0.04958 ,0.00430 ,0.00048 ,0.00011
 589      +,0.21077 ,0.04929  ,0.04355 ,0.00404 ,0.00047 ,0.00013
 590      +,0.20081 ,0.04651  ,0.03857 ,0.00381 ,0.00047 ,0.00015
 591      +,0.19175 ,0.04402  ,0.03440 ,0.00360 ,0.00046 ,0.00016
 592      +,0.18345 ,0.04175  ,0.03090 ,0.00341 ,0.00045 ,0.00017
 593      +,0.17585 ,0.03970  ,0.02792 ,0.00323 ,0.00043 ,0.00018
 594      +,0.16883 ,0.03783  ,0.02537 ,0.00308 ,0.00042 ,0.00018
 595      +,0.16233 ,0.03611  ,0.02317 ,0.00293 ,0.00041 ,0.00018
 596      +,0.15632 ,0.03454  ,0.02125 ,0.00280 ,0.00040 ,0.00018
 597      +,0.15071 ,0.03308  ,0.01958 ,0.00267 ,0.00039 ,0.00018
 598      +,0.14550 ,0.03174  ,0.01810 ,0.00256 ,0.00038 ,0.00018
 599      +,0.14060 ,0.03049  ,0.01681 ,0.00245 ,0.00037 ,0.00018/
 600       DATA ((F(I,30,K),I=1,6),K=1,19)/
 601      + 0.31982 ,0.07767  ,0.13931 ,0.00557 ,0.00005 ,0.00000
 602      +,0.29268 ,0.06965  ,0.10887 ,0.00510 ,0.00018 ,0.00000
 603      +,0.26998 ,0.06312  ,0.08727 ,0.00469 ,0.00025 ,0.00000
 604      +,0.25070 ,0.05769  ,0.07144 ,0.00433 ,0.00029 ,0.00000
 605      +,0.23407 ,0.05310  ,0.05952 ,0.00401 ,0.00032 ,0.00000
 606      +,0.21956 ,0.04917  ,0.05033 ,0.00372 ,0.00033 ,0.00002
 607      +,0.20672 ,0.04575  ,0.04308 ,0.00346 ,0.00033 ,0.00005
 608      +,0.19527 ,0.04274  ,0.03729 ,0.00323 ,0.00033 ,0.00008
 609      +,0.18499 ,0.04008  ,0.03259 ,0.00303 ,0.00033 ,0.00009
 610      +,0.17572 ,0.03771  ,0.02873 ,0.00284 ,0.00032 ,0.00010
 611      +,0.16732 ,0.03559  ,0.02552 ,0.00268 ,0.00032 ,0.00011
 612      +,0.15963 ,0.03367  ,0.02284 ,0.00253 ,0.00031 ,0.00012
 613      +,0.15261 ,0.03194  ,0.02056 ,0.00240 ,0.00030 ,0.00012
 614      +,0.14615 ,0.03037  ,0.01862 ,0.00227 ,0.00029 ,0.00012
 615      +,0.14020 ,0.02892  ,0.01695 ,0.00216 ,0.00028 ,0.00013
 616      +,0.13471 ,0.02759  ,0.01550 ,0.00206 ,0.00028 ,0.00013
 617      +,0.12959 ,0.02637  ,0.01425 ,0.00196 ,0.00027 ,0.00013
 618      +,0.12484 ,0.02526  ,0.01314 ,0.00187 ,0.00026 ,0.00013
 619      +,0.12040 ,0.02421  ,0.01218 ,0.00179 ,0.00025 ,0.00012/
 620       DATA ((F(I,31,K),I=1,6),K=1,19)/
 621      + 0.28755 ,0.06454  ,0.10991 ,0.00430 ,0.00004 ,0.00000
 622      +,0.26158 ,0.05755  ,0.08488 ,0.00391 ,0.00013 ,0.00000
 623      +,0.24001 ,0.05188  ,0.06735 ,0.00357 ,0.00018 ,0.00000
 624      +,0.22180 ,0.04721  ,0.05464 ,0.00327 ,0.00021 ,0.00000
 625      +,0.20619 ,0.04327  ,0.04517 ,0.00301 ,0.00022 ,0.00000
 626      +,0.19263 ,0.03991  ,0.03792 ,0.00279 ,0.00023 ,0.00002
 627      +,0.18070 ,0.03700  ,0.03226 ,0.00258 ,0.00023 ,0.00004
 628      +,0.17009 ,0.03445  ,0.02777 ,0.00240 ,0.00023 ,0.00005
 629      +,0.16062 ,0.03221  ,0.02415 ,0.00224 ,0.00023 ,0.00006
 630      +,0.15210 ,0.03021  ,0.02119 ,0.00210 ,0.00022 ,0.00007
 631      +,0.14441 ,0.02843  ,0.01875 ,0.00197 ,0.00022 ,0.00008
 632      +,0.13739 ,0.02683  ,0.01671 ,0.00186 ,0.00021 ,0.00008
 633      +,0.13101 ,0.02538  ,0.01499 ,0.00175 ,0.00020 ,0.00008
 634      +,0.12515 ,0.02408  ,0.01353 ,0.00166 ,0.00020 ,0.00008
 635      +,0.11976 ,0.02288  ,0.01229 ,0.00157 ,0.00019 ,0.00008
 636      +,0.11482 ,0.02178  ,0.01120 ,0.00149 ,0.00019 ,0.00009
 637      +,0.11021 ,0.02077  ,0.01027 ,0.00142 ,0.00018 ,0.00009
 638      +,0.10595 ,0.01985  ,0.00946 ,0.00136 ,0.00018 ,0.00008
 639      +,0.10197 ,0.01899  ,0.00874 ,0.00130 ,0.00017 ,0.00008/
 640       DATA ((F(I,32,K),I=1,6),K=1,19)/
 641      + 0.25570 ,0.05296  ,0.08573 ,0.00329 ,0.00003 ,0.00000
 642      +,0.23121 ,0.04695  ,0.06542 ,0.00296 ,0.00009 ,0.00000
 643      +,0.21103 ,0.04211  ,0.05138 ,0.00268 ,0.00012 ,0.00000
 644      +,0.19406 ,0.03813  ,0.04131 ,0.00245 ,0.00014 ,0.00000
 645      +,0.17960 ,0.03481  ,0.03388 ,0.00224 ,0.00015 ,0.00000
 646      +,0.16712 ,0.03198  ,0.02826 ,0.00206 ,0.00016 ,0.00001
 647      +,0.15617 ,0.02954  ,0.02390 ,0.00191 ,0.00016 ,0.00003
 648      +,0.14649 ,0.02742  ,0.02045 ,0.00177 ,0.00016 ,0.00004
 649      +,0.13786 ,0.02555  ,0.01769 ,0.00164 ,0.00015 ,0.00004
 650      +,0.13014 ,0.02390  ,0.01545 ,0.00153 ,0.00015 ,0.00005
 651      +,0.12319 ,0.02242  ,0.01361 ,0.00144 ,0.00015 ,0.00005
 652      +,0.11689 ,0.02110  ,0.01209 ,0.00135 ,0.00014 ,0.00005
 653      +,0.11117 ,0.01991  ,0.01081 ,0.00127 ,0.00014 ,0.00005
 654      +,0.10593 ,0.01884  ,0.00973 ,0.00120 ,0.00013 ,0.00005
 655      +,0.10113 ,0.01786  ,0.00880 ,0.00113 ,0.00013 ,0.00005
 656      +,0.09672 ,0.01696  ,0.00801 ,0.00108 ,0.00012 ,0.00005
 657      +,0.09264 ,0.01615  ,0.00733 ,0.00102 ,0.00012 ,0.00006
 658      +,0.08887 ,0.01540  ,0.00673 ,0.00097 ,0.00011 ,0.00006
 659      +,0.08536 ,0.01470  ,0.00621 ,0.00092 ,0.00011 ,0.00006/
 660       DATA ((F(I,33,K),I=1,6),K=1,19)/
 661      + 0.22473 ,0.04288  ,0.06605 ,0.00247 ,0.00002 ,0.00000
 662      +,0.20196 ,0.03780  ,0.04980 ,0.00221 ,0.00006 ,0.00000
 663      +,0.18332 ,0.03372  ,0.03871 ,0.00199 ,0.00008 ,0.00000
 664      +,0.16776 ,0.03040  ,0.03086 ,0.00180 ,0.00010 ,0.00000
 665      +,0.15456 ,0.02763  ,0.02510 ,0.00164 ,0.00010 ,0.00000
 666      +,0.14323 ,0.02528  ,0.02079 ,0.00151 ,0.00011 ,0.00001
 667      +,0.13334 ,0.02327  ,0.01747 ,0.00139 ,0.00010 ,0.00001
 668      +,0.12462 ,0.02152  ,0.01487 ,0.00128 ,0.00010 ,0.00002
 669      +,0.11690 ,0.01998  ,0.01280 ,0.00119 ,0.00010 ,0.00003
 670      +,0.11001 ,0.01864  ,0.01113 ,0.00110 ,0.00010 ,0.00003
 671      +,0.10382 ,0.01744  ,0.00976 ,0.00103 ,0.00010 ,0.00003
 672      +,0.09823 ,0.01636  ,0.00864 ,0.00096 ,0.00009 ,0.00003
 673      +,0.09317 ,0.01540  ,0.00770 ,0.00091 ,0.00009 ,0.00004
 674      +,0.08854 ,0.01454  ,0.00691 ,0.00085 ,0.00008 ,0.00003
 675      +,0.08432 ,0.01375  ,0.00624 ,0.00081 ,0.00008 ,0.00003
 676      +,0.08046 ,0.01303  ,0.00566 ,0.00076 ,0.00008 ,0.00003
 677      +,0.07689 ,0.01237  ,0.00516 ,0.00072 ,0.00008 ,0.00003
 678      +,0.07361 ,0.01177  ,0.00473 ,0.00068 ,0.00007 ,0.00004
 679      +,0.07055 ,0.01122  ,0.00435 ,0.00065 ,0.00007 ,0.00003/
 680       DATA ((F(I,34,K),I=1,6),K=1,19)/
 681      + 0.19505 ,0.03421  ,0.05017 ,0.00183 ,0.00001 ,0.00000
 682      +,0.17420 ,0.02998  ,0.03737 ,0.00162 ,0.00004 ,0.00000
 683      +,0.15725 ,0.02661  ,0.02876 ,0.00145 ,0.00006 ,0.00000
 684      +,0.14318 ,0.02387  ,0.02272 ,0.00131 ,0.00006 ,0.00000
 685      +,0.13132 ,0.02160  ,0.01833 ,0.00119 ,0.00007 ,0.00000
 686      +,0.12118 ,0.01968  ,0.01508 ,0.00108 ,0.00007 ,0.00000
 687      +,0.11237 ,0.01805  ,0.01259 ,0.00099 ,0.00007 ,0.00001
 688      +,0.10464 ,0.01663  ,0.01065 ,0.00092 ,0.00007 ,0.00001
 689      +,0.09782 ,0.01540  ,0.00913 ,0.00084 ,0.00007 ,0.00002
 690      +,0.09176 ,0.01431  ,0.00790 ,0.00078 ,0.00006 ,0.00002
 691      +,0.08634 ,0.01335  ,0.00690 ,0.00073 ,0.00006 ,0.00002
 692      +,0.08145 ,0.01250  ,0.00609 ,0.00068 ,0.00006 ,0.00002
 693      +,0.07704 ,0.01173  ,0.00541 ,0.00064 ,0.00006 ,0.00002
 694      +,0.07303 ,0.01104  ,0.00484 ,0.00060 ,0.00005 ,0.00002
 695      +,0.06937 ,0.01042  ,0.00436 ,0.00056 ,0.00005 ,0.00002
 696      +,0.06604 ,0.00985  ,0.00394 ,0.00053 ,0.00005 ,0.00002
 697      +,0.06296 ,0.00933  ,0.00359 ,0.00050 ,0.00005 ,0.00002
 698      +,0.06014 ,0.00886  ,0.00328 ,0.00047 ,0.00005 ,0.00002
 699      +,0.05752 ,0.00843  ,0.00301 ,0.00045 ,0.00005 ,0.00002/
 700       DATA ((F(I,35,K),I=1,6),K=1,19)/
 701      + 0.16699 ,0.02686  ,0.03752 ,0.00133 ,0.00001 ,0.00000
 702      +,0.14820 ,0.02339  ,0.02761 ,0.00117 ,0.00003 ,0.00000
 703      +,0.13302 ,0.02065  ,0.02102 ,0.00105 ,0.00004 ,-0.00001
 704      +,0.12050 ,0.01843  ,0.01645 ,0.00094 ,0.00004 ,-0.00001
 705      +,0.11000 ,0.01661  ,0.01317 ,0.00085 ,0.00005 ,0.00000
 706      +,0.10107 ,0.01507  ,0.01075 ,0.00076 ,0.00005 ,0.00000
 707      +,0.09335 ,0.01377  ,0.00893 ,0.00070 ,0.00004 ,0.00001
 708      +,0.08661 ,0.01264  ,0.00751 ,0.00064 ,0.00004 ,0.00001
 709      +,0.08068 ,0.01166  ,0.00641 ,0.00059 ,0.00004 ,0.00001
 710      +,0.07543 ,0.01080  ,0.00552 ,0.00054 ,0.00004 ,0.00001
 711      +,0.07075 ,0.01005  ,0.00480 ,0.00050 ,0.00004 ,0.00001
 712      +,0.06655 ,0.00938  ,0.00422 ,0.00047 ,0.00004 ,0.00001
 713      +,0.06277 ,0.00878  ,0.00374 ,0.00044 ,0.00004 ,0.00001
 714      +,0.05935 ,0.00824  ,0.00333 ,0.00041 ,0.00004 ,0.00001
 715      +,0.05623 ,0.00776  ,0.00299 ,0.00039 ,0.00003 ,0.00001
 716      +,0.05339 ,0.00732  ,0.00270 ,0.00036 ,0.00003 ,0.00001
 717      +,0.05078 ,0.00692  ,0.00245 ,0.00034 ,0.00003 ,0.00001
 718      +,0.04840 ,0.00656  ,0.00224 ,0.00032 ,0.00003 ,0.00001
 719      +,0.04619 ,0.00622  ,0.00205 ,0.00031 ,0.00003 ,0.00001/
 720       DATA ((F(I,36,K),I=1,6),K=1,19)/
 721      + 0.14088 ,0.02072  ,0.02758 ,0.00095 ,0.00001 ,0.00000
 722      +,0.12420 ,0.01793  ,0.02003 ,0.00083 ,0.00002 ,0.00000
 723      +,0.11083 ,0.01574  ,0.01509 ,0.00074 ,0.00002 ,0.00000
 724      +,0.09987 ,0.01398  ,0.01170 ,0.00066 ,0.00002 ,-0.00001
 725      +,0.09073 ,0.01254  ,0.00929 ,0.00059 ,0.00003 ,0.00000
 726      +,0.08300 ,0.01133  ,0.00753 ,0.00053 ,0.00003 ,0.00000
 727      +,0.07635 ,0.01031  ,0.00621 ,0.00048 ,0.00003 ,0.00000
 728      +,0.07056 ,0.00943  ,0.00520 ,0.00044 ,0.00003 ,0.00001
 729      +,0.06550 ,0.00867  ,0.00441 ,0.00040 ,0.00003 ,0.00001
 730      +,0.06103 ,0.00801  ,0.00379 ,0.00037 ,0.00003 ,0.00001
 731      +,0.05706 ,0.00742  ,0.00328 ,0.00034 ,0.00002 ,0.00001
 732      +,0.05351 ,0.00691  ,0.00287 ,0.00032 ,0.00002 ,0.00001
 733      +,0.05032 ,0.00645  ,0.00253 ,0.00030 ,0.00002 ,0.00001
 734      +,0.04745 ,0.00604  ,0.00225 ,0.00028 ,0.00002 ,0.00001
 735      +,0.04484 ,0.00567  ,0.00202 ,0.00026 ,0.00002 ,0.00001
 736      +,0.04246 ,0.00533  ,0.00182 ,0.00024 ,0.00002 ,0.00001
 737      +,0.04029 ,0.00503  ,0.00165 ,0.00023 ,0.00002 ,0.00001
 738      +,0.03831 ,0.00476  ,0.00150 ,0.00022 ,0.00002 ,0.00001
 739      +,0.03648 ,0.00450  ,0.00137 ,0.00020 ,0.00002 ,0.00001/
 740       DATA ((F(I,37,K),I=1,6),K=1,19)/
 741      + 0.09528 ,0.01160  ,0.01401 ,0.00046 ,0.00000 ,0.00000
 742      +,0.08286 ,0.00991  ,0.00991 ,0.00039 ,0.00001 ,0.00000
 743      +,0.07304 ,0.00860  ,0.00730 ,0.00034 ,0.00001 ,0.00000
 744      +,0.06510 ,0.00755  ,0.00555 ,0.00030 ,0.00001 ,0.00000
 745      +,0.05855 ,0.00671  ,0.00434 ,0.00027 ,0.00001 ,0.00000
 746      +,0.05306 ,0.00601  ,0.00347 ,0.00024 ,0.00001 ,0.00000
 747      +,0.04839 ,0.00542  ,0.00282 ,0.00021 ,0.00001 ,0.00000
 748      +,0.04436 ,0.00492  ,0.00234 ,0.00019 ,0.00001 ,0.00000
 749      +,0.04087 ,0.00449  ,0.00196 ,0.00018 ,0.00001 ,0.00000
 750      +,0.03781 ,0.00412  ,0.00167 ,0.00016 ,0.00001 ,0.00000
 751      +,0.03511 ,0.00379  ,0.00143 ,0.00015 ,0.00001 ,0.00000
 752      +,0.03272 ,0.00351  ,0.00125 ,0.00014 ,0.00001 ,0.00000
 753      +,0.03058 ,0.00325  ,0.00109 ,0.00013 ,0.00001 ,0.00000
 754      +,0.02867 ,0.00303  ,0.00097 ,0.00012 ,0.00001 ,0.00000
 755      +,0.02694 ,0.00283  ,0.00086 ,0.00011 ,0.00001 ,0.00000
 756      +,0.02538 ,0.00265  ,0.00077 ,0.00010 ,0.00001 ,0.00000
 757      +,0.02396 ,0.00249  ,0.00070 ,0.00009 ,0.00001 ,0.00000
 758      +,0.02267 ,0.00234  ,0.00063 ,0.00009 ,0.00001 ,0.00000
 759      +,0.02149 ,0.00221  ,0.00058 ,0.00008 ,0.00001 ,0.00000/
 760       DATA ((F(I,38,K),I=1,6),K=1,19)/
 761      + 0.05931 ,0.00587  ,0.00641 ,0.00019 ,0.00000 ,0.00000
 762      +,0.05082 ,0.00494  ,0.00441 ,0.00016 ,0.00000 ,0.00000
 763      +,0.04420 ,0.00423  ,0.00317 ,0.00014 ,0.00000 ,0.00000
 764      +,0.03892 ,0.00367  ,0.00236 ,0.00012 ,0.00000 ,0.00000
 765      +,0.03462 ,0.00323  ,0.00181 ,0.00011 ,0.00000 ,0.00000
 766      +,0.03106 ,0.00286  ,0.00143 ,0.00009 ,0.00000 ,0.00000
 767      +,0.02806 ,0.00256  ,0.00115 ,0.00008 ,0.00000 ,0.00000
 768      +,0.02550 ,0.00230  ,0.00094 ,0.00008 ,0.00000 ,0.00000
 769      +,0.02329 ,0.00208  ,0.00078 ,0.00007 ,0.00000 ,0.00000
 770      +,0.02138 ,0.00190  ,0.00066 ,0.00006 ,0.00000 ,0.00000
 771      +,0.01971 ,0.00174  ,0.00056 ,0.00006 ,0.00000 ,0.00000
 772      +,0.01824 ,0.00159  ,0.00048 ,0.00005 ,0.00000 ,0.00000
 773      +,0.01694 ,0.00147  ,0.00042 ,0.00005 ,0.00000 ,0.00000
 774      +,0.01578 ,0.00136  ,0.00037 ,0.00004 ,0.00000 ,0.00000
 775      +,0.01474 ,0.00126  ,0.00033 ,0.00004 ,0.00000 ,0.00000
 776      +,0.01380 ,0.00117  ,0.00029 ,0.00004 ,0.00000 ,0.00000
 777      +,0.01296 ,0.00110  ,0.00026 ,0.00003 ,0.00000 ,0.00000
 778      +,0.01219 ,0.00103  ,0.00024 ,0.00003 ,0.00000 ,0.00000
 779      +,0.01150 ,0.00096  ,0.00022 ,0.00003 ,0.00000 ,0.00000/
 780       DATA ((F(I,39,K),I=1,6),K=1,19)/
 781      + 0.03307 ,0.00259  ,0.00255 ,0.00007 ,0.00000 ,0.00000
 782      +,0.02787 ,0.00214  ,0.00170 ,0.00006 ,0.00000 ,0.00000
 783      +,0.02387 ,0.00181  ,0.00119 ,0.00005 ,0.00000 ,0.00000
 784      +,0.02074 ,0.00155  ,0.00087 ,0.00004 ,0.00000 ,0.00000
 785      +,0.01823 ,0.00135  ,0.00065 ,0.00004 ,0.00000 ,0.00000
 786      +,0.01617 ,0.00118  ,0.00051 ,0.00003 ,0.00000 ,0.00000
 787      +,0.01445 ,0.00105  ,0.00040 ,0.00003 ,0.00000 ,0.00000
 788      +,0.01301 ,0.00093  ,0.00032 ,0.00003 ,0.00000 ,0.00000
 789      +,0.01177 ,0.00084  ,0.00027 ,0.00002 ,0.00000 ,0.00000
 790      +,0.01071 ,0.00075  ,0.00022 ,0.00002 ,0.00000 ,0.00000
 791      +,0.00979 ,0.00068  ,0.00019 ,0.00002 ,0.00000 ,0.00000
 792      +,0.00899 ,0.00062  ,0.00016 ,0.00002 ,0.00000 ,0.00000
 793      +,0.00829 ,0.00057  ,0.00014 ,0.00001 ,0.00000 ,0.00000
 794      +,0.00767 ,0.00052  ,0.00012 ,0.00001 ,0.00000 ,0.00000
 795      +,0.00711 ,0.00048  ,0.00011 ,0.00001 ,0.00000 ,0.00000
 796      +,0.00662 ,0.00045  ,0.00010 ,0.00001 ,0.00000 ,0.00000
 797      +,0.00617 ,0.00042  ,0.00009 ,0.00001 ,0.00000 ,0.00000
 798      +,0.00577 ,0.00039  ,0.00008 ,0.00001 ,0.00000 ,0.00000
 799      +,0.00541 ,0.00036  ,0.00007 ,0.00001 ,0.00000 ,0.00000/
 800       DATA ((F(I,40,K),I=1,6),K=1,19)/
 801      + 0.01577 ,0.00094  ,0.00082 ,0.00002 ,0.00000 ,0.00000
 802      +,0.01303 ,0.00076  ,0.00053 ,0.00002 ,0.00000 ,0.00000
 803      +,0.01097 ,0.00063  ,0.00036 ,0.00001 ,0.00000 ,0.00000
 804      +,0.00939 ,0.00053  ,0.00026 ,0.00001 ,0.00000 ,0.00000
 805      +,0.00813 ,0.00046  ,0.00019 ,0.00001 ,0.00000 ,0.00000
 806      +,0.00712 ,0.00040  ,0.00014 ,0.00001 ,0.00000 ,0.00000
 807      +,0.00628 ,0.00035  ,0.00011 ,0.00001 ,0.00000 ,0.00000
 808      +,0.00559 ,0.00031  ,0.00009 ,0.00001 ,0.00000 ,0.00000
 809      +,0.00501 ,0.00027  ,0.00007 ,0.00001 ,0.00000 ,0.00000
 810      +,0.00451 ,0.00024  ,0.00006 ,0.00001 ,0.00000 ,0.00000
 811      +,0.00408 ,0.00022  ,0.00005 ,0.00000 ,0.00000 ,0.00000
 812      +,0.00371 ,0.00020  ,0.00004 ,0.00000 ,0.00000 ,0.00000
 813      +,0.00339 ,0.00018  ,0.00004 ,0.00000 ,0.00000 ,0.00000
 814      +,0.00311 ,0.00016  ,0.00003 ,0.00000 ,0.00000 ,0.00000
 815      +,0.00286 ,0.00015  ,0.00003 ,0.00000 ,0.00000 ,0.00000
 816      +,0.00265 ,0.00014  ,0.00003 ,0.00000 ,0.00000 ,0.00000
 817      +,0.00245 ,0.00013  ,0.00002 ,0.00000 ,0.00000 ,0.00000
 818      +,0.00228 ,0.00012  ,0.00002 ,0.00000 ,0.00000 ,0.00000
 819      +,0.00212 ,0.00011  ,0.00002 ,0.00000 ,0.00000 ,0.00000/
 820       DATA ((F(I,41,K),I=1,6),K=1,19)/
 821      + 0.00142 ,0.00004  ,0.00002 ,0.00000 ,0.00000 ,0.00000
 822      +,0.00111 ,0.00003  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 823      +,0.00089 ,0.00002  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 824      +,0.00072 ,0.00002  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 825      +,0.00060 ,0.00002  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 826      +,0.00051 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 827      +,0.00043 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 828      +,0.00037 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 829      +,0.00032 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 830      +,0.00028 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 831      +,0.00025 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 832      +,0.00022 ,0.00001  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 833      +,0.00020 ,0.00000  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 834      +,0.00018 ,0.00000  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 835      +,0.00016 ,0.00000  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 836      +,0.00014 ,0.00000  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 837      +,0.00013 ,0.00000  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 838      +,0.00012 ,0.00000  ,0.00000 ,0.00000 ,0.00000 ,0.00000
 839      +,0.00011 ,0.00000  ,0.00000 ,0.00000 ,0.00000 ,0.00000/
 840       DATA XX/1.D-4,2.D-4,4.D-4,6.D-4,8.D-4, 1.D-3,2.D-3,4.D-3,6.D-3,
 841      +8.D-3, 1.D-2,2.D-2,4.D-2,6.D-2,8.D-2, .1D0,.125D0,.15D0,.175D0,.
 842      +2D0,.225D0,.25D0,.275D0, .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.
 843      +45D0,.475D0, .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0, .8D0,
 844      +.9D0,1.D0/
 845 C
 846 C
 847       DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-4,1.D0,5.D0,1310720.D0/
 848       DATA N0/2,5,4,5,0,0/
 849       DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
 850       DATA INIT/0/
 851 C
 852       IF(INIT.NE.0) GOTO 50
 853       INIT=1
 854       DO 20 N=1,41
 855          DO 20 M=1,19
 856 C           READ(61,1001)F(1,N,M),F(2,N,M),F(3,N,M),F(4,N,M),F(5,N,M),F
 857 C    +      (6,N,M)
 858             DO 10 I=1,6
 859    10       F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
 860    20 CONTINUE
 861       DO 30 J=1,15
 862          XX(J)= LOG10(XX(J))+ONEDO
 863          DO 30 I=1,5
 864             DO 30 K=1,19
 865    30 F(I,J,K)= LOG( F(I,J,K))*F(I,16,K)/ LOG( F(I,16,K))
 866       DO 40 I=1,6
 867          DO 40 M=1,19
 868    40 F(I,42,M)=ZEROD
 869    50 CONTINUE
 870       IF(X.LT.XMIN) X=XMIN
 871       IF(X.GT.XMAX) X=XMAX
 872       QSQ=SCALE**2
 873       IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
 874       IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
 875       XXX=X
 876       IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
 877       N=0
 878    60 N=N+1
 879       IF(XXX.GT.XX(N+1)) GOTO 60
 880       A=(XXX-XX(N))/(XX(N+1)-XX(N))
 881       RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
 882       B=RM-AINT(RM)
 883       M=1+  INT(RM)
 884       DO 80 I=1,6
 885          G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1) + A
 886      +   *(ONED-B)*F(I,N+1,M) + A*B*F(I,N+1,M+1)
 887          IF(N.GE.16) GOTO 70
 888          IF(I.EQ.6) GOTO 70
 889          FAC=(ONED-B)*F(I,16,M)+B*F(I,16,M+1)
 890
 891          G(I)=FAC**(G(I)/FAC)
 892    70    CONTINUE
 893          G(I)=G(I)*(ONED-X)**N0(I)
 894    80 CONTINUE
 895       UPV=G(1)
 896       DNV=G(2)
 897       SEA=G(4)
 898       STR=G(4)
 899       CHM=G(5)
 900       GL =G(3)
 901       BOT=G(6)
 902       RETURN
 903  1001 FORMAT(6F10.5)
 904       END