PDF/spdf/strmrs2.F

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.2  1996/10/30 08:31:45  cernlib
   6 * Version 7.04
   7 *
   8 * Revision 1.1.1.1  1996/04/12 15:30:04  plothow
   9 * Version 7.01
  10 *
  11 *
  12 #include "pdf/pilot.h"
  13 C-----------------------------------------------------------------------
  14       SUBROUTINE STRMRS2(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GL)
  15 C
  16 C :::::::::::: MARTIN ROBERTS STIRLING :::::HARD GLUE::::250 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.01809 ,0.00296  ,2.57294 ,0.14213 ,0.02321 ,0.00000
  22      +,0.02016 ,0.00365 ,10.62324 ,0.28639 ,0.13161 ,0.00000
  23      +,0.02204 ,0.00431 ,19.59578 ,0.50034 ,0.29221 ,0.00000
  24      +,0.02375 ,0.00493 ,28.79970 ,0.76464 ,0.49052 ,0.00000
  25      +,0.02534 ,0.00552 ,38.36682 ,1.07156 ,0.72076 ,0.00000
  26      +,0.02683 ,0.00608 ,48.05655 ,1.37781 ,0.97441 ,0.09570
  27      +,0.02823 ,0.00663 ,57.78336 ,1.63783 ,1.24619 ,0.40266
  28      +,0.02957 ,0.00715 ,67.47452 ,1.91902 ,1.53149 ,0.70030
  29      +,0.03084 ,0.00766 ,77.09000 ,2.20945 ,1.82702 ,1.01117
  30      +,0.03206 ,0.00816 ,86.60992 ,2.50854 ,2.13063 ,1.32841
  31      +,0.03323 ,0.00864 ,96.03069 ,2.81468 ,2.44092 ,1.65123
  32      +,0.03435 ,0.00911,105.35777 ,3.12702 ,2.75710 ,1.97904
  33      +,0.03544 ,0.00956,114.56445 ,3.44382 ,3.07745 ,2.31019
  34      +,0.03648 ,0.01001,123.47234 ,3.75809 ,3.39504 ,2.63786
  35      +,0.03750 ,0.01044,132.31548 ,4.07711 ,3.71715 ,2.96942
  36      +,0.03848 ,0.01086,140.98859 ,4.39660 ,4.03956 ,3.30069
  37      +,0.03943 ,0.01128,149.41835 ,4.71339 ,4.35908 ,3.62857
  38      +,0.04036 ,0.01169,157.81482 ,5.03457 ,4.68284 ,3.96024
  39      +,0.04125 ,0.01208,165.85399 ,5.34773 ,4.99844 ,4.28331/
  40       DATA ((F(I,2,K),I=1,6),K=1,19)/
  41      + 0.02640 ,0.00503  ,2.33417 ,0.14354 ,0.02136 ,0.00000
  42      +,0.02917 ,0.00609  ,8.51882 ,0.26877 ,0.11542 ,0.00000
  43      +,0.03166 ,0.00708 ,15.08470 ,0.44306 ,0.24623 ,0.00000
  44      +,0.03392 ,0.00800 ,21.61850 ,0.64926 ,0.40095 ,0.00000
  45      +,0.03599 ,0.00887 ,28.24802 ,0.88115 ,0.57491 ,0.00000
  46      +,0.03792 ,0.00969 ,34.82475 ,1.10700 ,0.76187 ,0.07013
  47      +,0.03974 ,0.01048 ,41.30574 ,1.29453 ,0.95820 ,0.29278
  48      +,0.04145 ,0.01124 ,47.65630 ,1.49401 ,1.16085 ,0.50485
  49      +,0.04308 ,0.01196 ,53.86237 ,1.69698 ,1.36769 ,0.72331
  50      +,0.04463 ,0.01266 ,59.92186 ,1.90327 ,1.57744 ,0.94340
  51      +,0.04611 ,0.01334 ,65.84218 ,2.11197 ,1.78930 ,1.16478
  52      +,0.04753 ,0.01399 ,71.63525 ,2.32263 ,2.00291 ,1.38722
  53      +,0.04889 ,0.01463 ,77.29030 ,2.53422 ,2.21724 ,1.60977
  54      +,0.05020 ,0.01524 ,82.69762 ,2.74220 ,2.42776 ,1.82797
  55      +,0.05146 ,0.01584 ,88.01620 ,2.95157 ,2.63953 ,2.04694
  56      +,0.05268 ,0.01643 ,93.18262 ,3.15962 ,2.84982 ,2.26400
  57      +,0.05386 ,0.01699 ,98.15425 ,3.36434 ,3.05665 ,2.47722
  58      +,0.05501 ,0.01755,103.07021 ,3.57053 ,3.26484 ,2.69145
  59      +,0.05611 ,0.01808,107.72757 ,3.77012 ,3.46633 ,2.89865/
  60       DATA ((F(I,3,K),I=1,6),K=1,19)/
  61      + 0.03838 ,0.00852  ,2.11877 ,0.14428 ,0.01938 ,0.00000
  62      +,0.04205 ,0.01014  ,6.83401 ,0.25155 ,0.09994 ,0.00000
  63      +,0.04532 ,0.01161 ,11.61351 ,0.39180 ,0.20522 ,0.00000
  64      +,0.04825 ,0.01297 ,16.22672 ,0.55092 ,0.32463 ,0.00000
  65      +,0.05093 ,0.01424 ,20.79333 ,0.72435 ,0.45476 ,0.00000
  66      +,0.05341 ,0.01543 ,25.22746 ,0.88930 ,0.59127 ,0.05094
  67      +,0.05573 ,0.01656 ,29.51372 ,1.02324 ,0.73182 ,0.21110
  68      +,0.05790 ,0.01764 ,33.64099 ,1.16343 ,0.87448 ,0.36098
  69      +,0.05996 ,0.01866 ,37.61014 ,1.30396 ,1.01798 ,0.51328
  70      +,0.06191 ,0.01964 ,41.42908 ,1.44492 ,1.16162 ,0.66476
  71      +,0.06376 ,0.02058 ,45.11005 ,1.58586 ,1.30501 ,0.81538
  72      +,0.06553 ,0.02149 ,48.66714 ,1.72659 ,1.44804 ,0.96512
  73      +,0.06722 ,0.02236 ,52.09866 ,1.86657 ,1.59015 ,1.11348
  74      +,0.06884 ,0.02320 ,55.33760 ,2.00286 ,1.72843 ,1.25760
  75      +,0.07039 ,0.02401 ,58.49226 ,2.13891 ,1.86636 ,1.40102
  76      +,0.07189 ,0.02480 ,61.52467 ,2.27302 ,2.00224 ,1.54206
  77      +,0.07333 ,0.02557 ,64.41104 ,2.40396 ,2.13484 ,1.67953
  78      +,0.07473 ,0.02631 ,67.24313 ,2.53496 ,2.26742 ,1.81673
  79      +,0.07607 ,0.02703 ,69.89406 ,2.66080 ,2.39475 ,1.94844/
  80       DATA ((F(I,4,K),I=1,6),K=1,19)/
  81      + 0.04767 ,0.01161  ,2.00305 ,0.14428 ,0.01817 ,0.00000
  82      +,0.05197 ,0.01365  ,6.00945 ,0.24152 ,0.09122 ,0.00000
  83      +,0.05577 ,0.01551  ,9.96714 ,0.36419 ,0.18333 ,0.00000
  84      +,0.05917 ,0.01720 ,13.71899 ,0.50010 ,0.28535 ,0.00000
  85      +,0.06227 ,0.01878 ,17.37830 ,0.64560 ,0.39456 ,0.00000
  86      +,0.06513 ,0.02025 ,20.88557 ,0.78211 ,0.50754 ,0.04206
  87      +,0.06778 ,0.02163 ,24.23633 ,0.89152 ,0.62255 ,0.17355
  88      +,0.07027 ,0.02294 ,27.42827 ,1.00496 ,0.73816 ,0.29536
  89      +,0.07261 ,0.02418 ,30.46782 ,1.11769 ,0.85348 ,0.41815
  90      +,0.07482 ,0.02536 ,33.36572 ,1.22991 ,0.96802 ,0.53937
  91      +,0.07692 ,0.02650 ,36.13553 ,1.34132 ,1.08157 ,0.65908
  92      +,0.07891 ,0.02759 ,38.79132 ,1.45187 ,1.19413 ,0.77735
  93      +,0.08082 ,0.02863 ,41.33440 ,1.56118 ,1.30530 ,0.89386
  94      +,0.08264 ,0.02963 ,43.71498 ,1.66702 ,1.41289 ,1.00643
  95      +,0.08438 ,0.03060 ,46.01938 ,1.77215 ,1.51966 ,1.11788
  96      +,0.08606 ,0.03153 ,48.21994 ,1.87527 ,1.62434 ,1.22697
  97      +,0.08767 ,0.03243 ,50.29971 ,1.97547 ,1.72602 ,1.33281
  98      +,0.08923 ,0.03331 ,52.33046 ,2.07532 ,1.82726 ,1.43800
  99      +,0.09072 ,0.03415 ,54.21626 ,2.17079 ,1.92406 ,1.53854/
 100       DATA ((F(I,5,K),I=1,6),K=1,19)/
 101      + 0.05552 ,0.01444  ,1.92544 ,0.14403 ,0.01729 ,0.00000
 102      +,0.06032 ,0.01686  ,5.48676 ,0.23438 ,0.08519 ,0.00000
 103      +,0.06455 ,0.01904  ,8.94324 ,0.34553 ,0.16867 ,0.00000
 104      +,0.06832 ,0.02101 ,12.17795 ,0.46666 ,0.25964 ,0.00000
 105      +,0.07174 ,0.02284 ,15.29915 ,0.59474 ,0.35581 ,0.00000
 106      +,0.07488 ,0.02453 ,18.26247 ,0.71376 ,0.45434 ,0.03662
 107      +,0.07780 ,0.02612 ,21.06924 ,0.80827 ,0.55385 ,0.15069
 108      +,0.08052 ,0.02762 ,23.72192 ,0.90562 ,0.65319 ,0.25560
 109      +,0.08308 ,0.02904 ,26.22952 ,1.00175 ,0.75168 ,0.36075
 110      +,0.08549 ,0.03039 ,28.60416 ,1.09693 ,0.84898 ,0.46402
 111      +,0.08777 ,0.03168 ,30.85960 ,1.19095 ,0.94496 ,0.56550
 112      +,0.08994 ,0.03291 ,33.00970 ,1.28383 ,1.03967 ,0.66532
 113      +,0.09201 ,0.03410 ,35.05713 ,1.37527 ,1.13283 ,0.76324
 114      +,0.09398 ,0.03522 ,36.96175 ,1.46344 ,1.22261 ,0.85747
 115      +,0.09586 ,0.03631 ,38.79694 ,1.55071 ,1.31139 ,0.95045
 116      +,0.09767 ,0.03736 ,40.54060 ,1.63602 ,1.39814 ,1.04114
 117      +,0.09940 ,0.03837 ,42.17957 ,1.71863 ,1.48210 ,1.12882
 118      +,0.10108 ,0.03935 ,43.77426 ,1.80070 ,1.56547 ,1.21572
 119      +,0.10268 ,0.04029 ,45.24585 ,1.87890 ,1.64490 ,1.29850/
 120       DATA ((F(I,6,K),I=1,6),K=1,19)/
 121      + 0.06244 ,0.01711  ,1.86779 ,0.14367 ,0.01660 ,0.00000
 122      +,0.06766 ,0.01985  ,5.11375 ,0.22879 ,0.08060 ,0.00000
 123      +,0.07224 ,0.02231  ,8.22249 ,0.33153 ,0.15780 ,0.00000
 124      +,0.07631 ,0.02453 ,11.10250 ,0.44210 ,0.24086 ,0.00000
 125      +,0.08000 ,0.02657 ,13.85794 ,0.55790 ,0.32785 ,0.00000
 126      +,0.08338 ,0.02846 ,16.45438 ,0.66472 ,0.41631 ,0.03285
 127      +,0.08651 ,0.03023 ,18.89682 ,0.74892 ,0.50510 ,0.13487
 128      +,0.08943 ,0.03190 ,21.19051 ,0.83521 ,0.59328 ,0.22817
 129      +,0.09216 ,0.03347 ,23.34607 ,0.92002 ,0.68028 ,0.32128
 130      +,0.09473 ,0.03496 ,25.37616 ,1.00362 ,0.76587 ,0.41234
 131      +,0.09716 ,0.03637 ,27.29463 ,1.08589 ,0.84998 ,0.50149
 132      +,0.09947 ,0.03773 ,29.11496 ,1.16686 ,0.93268 ,0.58887
 133      +,0.10167 ,0.03903 ,30.84052 ,1.24633 ,1.01376 ,0.67432
 134      +,0.10375 ,0.04026 ,32.43736 ,1.32270 ,1.09164 ,0.75629
 135      +,0.10575 ,0.04145 ,33.97038 ,1.39808 ,1.16845 ,0.83694
 136      +,0.10767 ,0.04259 ,35.42079 ,1.47155 ,1.24328 ,0.91539
 137      +,0.10950 ,0.04369 ,36.77806 ,1.54251 ,1.31552 ,0.99105
 138      +,0.11126 ,0.04476 ,38.09479 ,1.61285 ,1.38709 ,1.06585
 139      +,0.11295 ,0.04578 ,39.30348 ,1.67968 ,1.45509 ,1.13693/
 140       DATA ((F(I,7,K),I=1,6),K=1,19)/
 141      + 0.08952 ,0.02889  ,1.70319 ,0.14146 ,0.01439 ,0.00000
 142      +,0.09620 ,0.03288  ,4.11544 ,0.21108 ,0.06689 ,0.00000
 143      +,0.10200 ,0.03640  ,6.33652 ,0.29037 ,0.12663 ,0.00000
 144      +,0.10711 ,0.03954  ,8.32864 ,0.37258 ,0.18855 ,0.00000
 145      +,0.11170 ,0.04239 ,10.18264 ,0.45624 ,0.25155 ,0.00000
 146      +,0.11587 ,0.04500 ,11.88694 ,0.53167 ,0.31418 ,0.02322
 147      +,0.11971 ,0.04742 ,13.45386 ,0.58975 ,0.37585 ,0.09472
 148      +,0.12326 ,0.04967 ,14.89442 ,0.64835 ,0.43610 ,0.15898
 149      +,0.12656 ,0.05178 ,16.22162 ,0.70507 ,0.49468 ,0.22222
 150      +,0.12966 ,0.05376 ,17.44855 ,0.76023 ,0.55154 ,0.28327
 151      +,0.13256 ,0.05564 ,18.58812 ,0.81384 ,0.60672 ,0.34233
 152      +,0.13531 ,0.05741 ,19.65208 ,0.86601 ,0.66037 ,0.39957
 153      +,0.13791 ,0.05910 ,20.64507 ,0.91666 ,0.71242 ,0.45498
 154      +,0.14037 ,0.06070 ,21.54726 ,0.96483 ,0.76190 ,0.50760
 155      +,0.14271 ,0.06223 ,22.40225 ,1.01193 ,0.81026 ,0.55891
 156      +,0.14494 ,0.06369 ,23.19934 ,1.05744 ,0.85695 ,0.60839
 157      +,0.14707 ,0.06509 ,23.93315 ,1.10098 ,0.90162 ,0.65569
 158      +,0.14912 ,0.06644 ,24.63791 ,1.14384 ,0.94556 ,0.70212
 159      +,0.15106 ,0.06772 ,25.27208 ,1.18417 ,0.98692 ,0.74585/
 160       DATA ((F(I,8,K),I=1,6),K=1,19)/
 161      + 0.12714 ,0.04851  ,1.56201 ,0.13726 ,0.01216 ,0.00000
 162      +,0.13547 ,0.05412  ,3.32525 ,0.19256 ,0.05416 ,0.00000
 163      +,0.14261 ,0.05899  ,4.88908 ,0.25217 ,0.09937 ,0.00000
 164      +,0.14883 ,0.06326  ,6.24326 ,0.31186 ,0.14461 ,0.00000
 165      +,0.15437 ,0.06708  ,7.46538 ,0.37094 ,0.18936 ,0.00000
 166      +,0.15936 ,0.07054  ,8.55767 ,0.42298 ,0.23285 ,0.01615
 167      +,0.16390 ,0.07370  ,9.53574 ,0.46202 ,0.27487 ,0.06548
 168      +,0.16807 ,0.07662 ,10.41279 ,0.50079 ,0.31522 ,0.10902
 169      +,0.17193 ,0.07931 ,11.20191 ,0.53772 ,0.35385 ,0.15126
 170      +,0.17551 ,0.08183 ,11.91524 ,0.57312 ,0.39081 ,0.19148
 171      +,0.17885 ,0.08418 ,12.56386 ,0.60706 ,0.42622 ,0.22989
 172      +,0.18199 ,0.08640 ,13.15751 ,0.63968 ,0.46022 ,0.26669
 173      +,0.18495 ,0.08849 ,13.70079 ,0.67099 ,0.49284 ,0.30191
 174      +,0.18771 ,0.09044 ,14.18252 ,0.70040 ,0.52348 ,0.33500
 175      +,0.19034 ,0.09231 ,14.63162 ,0.72888 ,0.55313 ,0.36695
 176      +,0.19283 ,0.09408 ,15.04217 ,0.75611 ,0.58149 ,0.39746
 177      +,0.19519 ,0.09575 ,15.41160 ,0.78189 ,0.60834 ,0.42636
 178      +,0.19745 ,0.09736 ,15.76188 ,0.80707 ,0.63453 ,0.45450
 179      +,0.19958 ,0.09888 ,16.06783 ,0.83049 ,0.65893 ,0.48074/
 180       DATA ((F(I,9,K),I=1,6),K=1,19)/
 181      + 0.15521 ,0.06538  ,1.49200 ,0.13378 ,0.01088 ,0.00000
 182      +,0.16451 ,0.07206  ,2.94512 ,0.18137 ,0.04731 ,0.00000
 183      +,0.17241 ,0.07778  ,4.20519 ,0.23110 ,0.08530 ,0.00000
 184      +,0.17924 ,0.08273  ,5.27148 ,0.27993 ,0.12255 ,0.00000
 185      +,0.18527 ,0.08713  ,6.21419 ,0.32746 ,0.15880 ,0.00000
 186      +,0.19067 ,0.09107  ,7.04078 ,0.36874 ,0.19355 ,0.01294
 187      +,0.19556 ,0.09465  ,7.76753 ,0.39915 ,0.22672 ,0.05227
 188      +,0.20002 ,0.09792  ,8.40782 ,0.42905 ,0.25824 ,0.08661
 189      +,0.20412 ,0.10093  ,8.97418 ,0.45724 ,0.28812 ,0.11961
 190      +,0.20791 ,0.10371  ,9.47782 ,0.48401 ,0.31644 ,0.15076
 191      +,0.21143 ,0.10630  ,9.92860 ,0.50945 ,0.34334 ,0.18027
 192      +,0.21471 ,0.10872 ,10.33505 ,0.53370 ,0.36897 ,0.20833
 193      +,0.21779 ,0.11099 ,10.70145 ,0.55680 ,0.39337 ,0.23499
 194      +,0.22066 ,0.11310 ,11.02000 ,0.57831 ,0.41612 ,0.25986
 195      +,0.22338 ,0.11510 ,11.31317 ,0.59901 ,0.43798 ,0.28372
 196      +,0.22594 ,0.11699 ,11.57686 ,0.61865 ,0.45875 ,0.30637
 197      +,0.22835 ,0.11876 ,11.80949 ,0.63712 ,0.47829 ,0.32768
 198      +,0.23066 ,0.12047 ,12.02778 ,0.65505 ,0.49725 ,0.34833
 199      +,0.23283 ,0.12206 ,12.21320 ,0.67160 ,0.51478 ,0.36745/
 200       DATA ((F(I,10,K),I=1,6),K=1,19)/
 201      + 0.17824 ,0.08054  ,1.45078 ,0.13125 ,0.01005 ,0.00000
 202      +,0.18811 ,0.08794  ,2.71048 ,0.17392 ,0.04298 ,0.00000
 203      +,0.19645 ,0.09421  ,3.78233 ,0.21752 ,0.07652 ,0.00000
 204      +,0.20361 ,0.09958  ,4.67271 ,0.25965 ,0.10889 ,0.00000
 205      +,0.20989 ,0.10432  ,5.44688 ,0.30014 ,0.13999 ,0.00000
 206      +,0.21548 ,0.10854  ,6.11506 ,0.33488 ,0.16947 ,0.01101
 207      +,0.22051 ,0.11233  ,6.69344 ,0.36009 ,0.19734 ,0.04433
 208      +,0.22508 ,0.11578  ,7.19560 ,0.38468 ,0.22359 ,0.07316
 209      +,0.22926 ,0.11893  ,7.63313 ,0.40766 ,0.24827 ,0.10067
 210      +,0.23310 ,0.12182  ,8.01665 ,0.42931 ,0.27150 ,0.12646
 211      +,0.23665 ,0.12450  ,8.35515 ,0.44973 ,0.29341 ,0.15073
 212      +,0.23995 ,0.12698  ,8.65620 ,0.46907 ,0.31414 ,0.17366
 213      +,0.24304 ,0.12931  ,8.92378 ,0.48737 ,0.33376 ,0.19533
 214      +,0.24589 ,0.13145  ,9.15204 ,0.50429 ,0.35194 ,0.21542
 215      +,0.24859 ,0.13348  ,9.35949 ,0.52047 ,0.36931 ,0.23461
 216      +,0.25112 ,0.13538  ,9.54301 ,0.53574 ,0.38573 ,0.25272
 217      +,0.25349 ,0.13716  ,9.70169 ,0.55000 ,0.40107 ,0.26968
 218      +,0.25576 ,0.13886  ,9.84907 ,0.56379 ,0.41591 ,0.28604
 219      +,0.25787 ,0.14044  ,9.97035 ,0.57642 ,0.42954 ,0.30111/
 220       DATA ((F(I,11,K),I=1,6),K=1,19)/
 221      + 0.19799 ,0.09444  ,1.42425 ,0.12936 ,0.00946 ,0.00000
 222      +,0.20821 ,0.10231  ,2.54718 ,0.16856 ,0.03995 ,0.00000
 223      +,0.21678 ,0.10893  ,3.48620 ,0.20787 ,0.07042 ,0.00000
 224      +,0.22408 ,0.11455  ,4.25381 ,0.24533 ,0.09941 ,0.00000
 225      +,0.23045 ,0.11947  ,4.91153 ,0.28093 ,0.12694 ,0.00000
 226      +,0.23610 ,0.12381  ,5.47128 ,0.31114 ,0.15279 ,0.00968
 227      +,0.24115 ,0.12769  ,5.94914 ,0.33276 ,0.17702 ,0.03886
 228      +,0.24572 ,0.13120  ,6.35833 ,0.35369 ,0.19966 ,0.06391
 229      +,0.24987 ,0.13438  ,6.70994 ,0.37310 ,0.22081 ,0.08766
 230      +,0.25367 ,0.13728  ,7.01394 ,0.39126 ,0.24058 ,0.10979
 231      +,0.25717 ,0.13995  ,7.27861 ,0.40828 ,0.25911 ,0.13051
 232      +,0.26041 ,0.14242  ,7.51086 ,0.42429 ,0.27654 ,0.14997
 233      +,0.26342 ,0.14472  ,7.71442 ,0.43935 ,0.29295 ,0.16828
 234      +,0.26620 ,0.14682  ,7.88459 ,0.45318 ,0.30807 ,0.18517
 235      +,0.26881 ,0.14880  ,8.03728 ,0.46635 ,0.32245 ,0.20122
 236      +,0.27126 ,0.15065  ,8.16997 ,0.47870 ,0.33597 ,0.21632
 237      +,0.27353 ,0.15237  ,8.28204 ,0.49017 ,0.34855 ,0.23038
 238      +,0.27570 ,0.15401  ,8.38494 ,0.50121 ,0.36066 ,0.24390
 239      +,0.27772 ,0.15551  ,8.46639 ,0.51125 ,0.37172 ,0.25630/
 240       DATA ((F(I,12,K),I=1,6),K=1,19)/
 241      + 0.27055 ,0.15164  ,1.36293 ,0.12070 ,0.00769 ,0.00000
 242      +,0.28105 ,0.16009  ,2.12061 ,0.14977 ,0.03118 ,0.00000
 243      +,0.28961 ,0.16691  ,2.71560 ,0.17715 ,0.05321 ,0.00000
 244      +,0.29668 ,0.17248  ,3.17263 ,0.20204 ,0.07321 ,0.00000
 245      +,0.30271 ,0.17718  ,3.54220 ,0.22477 ,0.09147 ,0.00000
 246      +,0.30791 ,0.18120  ,3.83904 ,0.24331 ,0.10806 ,0.00629
 247      +,0.31245 ,0.18467  ,4.07775 ,0.25580 ,0.12315 ,0.02505
 248      +,0.31647 ,0.18770  ,4.26970 ,0.26757 ,0.13686 ,0.04073
 249      +,0.32001 ,0.19036  ,4.42418 ,0.27816 ,0.14934 ,0.05526
 250      +,0.32318 ,0.19272  ,4.54868 ,0.28779 ,0.16073 ,0.06852
 251      +,0.32604 ,0.19481  ,4.64935 ,0.29658 ,0.17117 ,0.08068
 252      +,0.32863 ,0.19670  ,4.73112 ,0.30464 ,0.18078 ,0.09190
 253      +,0.33098 ,0.19840  ,4.79675 ,0.31205 ,0.18965 ,0.10226
 254      +,0.33309 ,0.19989  ,4.84400 ,0.31864 ,0.19763 ,0.11164
 255      +,0.33503 ,0.20127  ,4.88235 ,0.32478 ,0.20509 ,0.12042
 256      +,0.33680 ,0.20251  ,4.91057 ,0.33040 ,0.21197 ,0.12854
 257      +,0.33841 ,0.20362  ,4.92845 ,0.33547 ,0.21824 ,0.13599
 258      +,0.33993 ,0.20466  ,4.94246 ,0.34028 ,0.22419 ,0.14305
 259      +,0.34127 ,0.20556  ,4.94599 ,0.34448 ,0.22949 ,0.14941/
 260       DATA ((F(I,13,K),I=1,6),K=1,19)/
 261      + 0.35927 ,0.23013  ,1.33961 ,0.10727 ,0.00612 ,0.00000
 262      +,0.36765 ,0.23583  ,1.79937 ,0.12752 ,0.02372 ,0.00000
 263      +,0.37403 ,0.23993  ,2.12601 ,0.14513 ,0.03901 ,0.00000
 264      +,0.37892 ,0.24286  ,2.35146 ,0.16011 ,0.05207 ,0.00000
 265      +,0.38281 ,0.24503  ,2.51532 ,0.17305 ,0.06340 ,0.00000
 266      +,0.38591 ,0.24663  ,2.63190 ,0.18291 ,0.07324 ,0.00385
 267      +,0.38841 ,0.24779  ,2.71295 ,0.18879 ,0.08182 ,0.01514
 268      +,0.39042 ,0.24859  ,2.76704 ,0.19408 ,0.08931 ,0.02427
 269      +,0.39203 ,0.24911  ,2.80085 ,0.19857 ,0.09589 ,0.03247
 270      +,0.39332 ,0.24942  ,2.81949 ,0.20243 ,0.10167 ,0.03975
 271      +,0.39434 ,0.24956  ,2.82687 ,0.20575 ,0.10679 ,0.04624
 272      +,0.39516 ,0.24957  ,2.82595 ,0.20864 ,0.11136 ,0.05209
 273      +,0.39579 ,0.24946  ,2.81838 ,0.21115 ,0.11545 ,0.05736
 274      +,0.39622 ,0.24922  ,2.80318 ,0.21319 ,0.11898 ,0.06200
 275      +,0.39655 ,0.24893  ,2.78528 ,0.21499 ,0.12220 ,0.06626
 276      +,0.39675 ,0.24856  ,2.76404 ,0.21653 ,0.12506 ,0.07010
 277      +,0.39683 ,0.24812  ,2.73938 ,0.21777 ,0.12757 ,0.07354
 278      +,0.39686 ,0.24767  ,2.71449 ,0.21889 ,0.12991 ,0.07675
 279      +,0.39675 ,0.24713  ,2.68604 ,0.21971 ,0.13188 ,0.07955/
 280       DATA ((F(I,14,K),I=1,6),K=1,19)/
 281      + 0.41642 ,0.27995  ,1.33591 ,0.09577 ,0.00523 ,0.00001
 282      +,0.42157 ,0.28126  ,1.64049 ,0.11125 ,0.01965 ,0.00001
 283      +,0.42496 ,0.28147  ,1.83543 ,0.12390 ,0.03152 ,0.00001
 284      +,0.42705 ,0.28095  ,1.95304 ,0.13406 ,0.04121 ,0.00001
 285      +,0.42834 ,0.28001  ,2.02602 ,0.14241 ,0.04930 ,0.00001
 286      +,0.42902 ,0.27878  ,2.06673 ,0.14835 ,0.05607 ,0.00276
 287      +,0.42922 ,0.27734  ,2.08441 ,0.15134 ,0.06178 ,0.01073
 288      +,0.42906 ,0.27575  ,2.08579 ,0.15388 ,0.06660 ,0.01701
 289      +,0.42862 ,0.27406  ,2.07567 ,0.15584 ,0.07070 ,0.02252
 290      +,0.42796 ,0.27230  ,2.05763 ,0.15737 ,0.07419 ,0.02731
 291      +,0.42713 ,0.27051  ,2.03425 ,0.15855 ,0.07719 ,0.03150
 292      +,0.42617 ,0.26872  ,2.00747 ,0.15944 ,0.07979 ,0.03519
 293      +,0.42514 ,0.26692  ,1.97831 ,0.16010 ,0.08203 ,0.03846
 294      +,0.42397 ,0.26509  ,1.94598 ,0.16047 ,0.08389 ,0.04128
 295      +,0.42275 ,0.26330  ,1.91359 ,0.16072 ,0.08554 ,0.04381
 296      +,0.42148 ,0.26152  ,1.88062 ,0.16081 ,0.08695 ,0.04606
 297      +,0.42015 ,0.25975  ,1.84693 ,0.16073 ,0.08813 ,0.04803
 298      +,0.41883 ,0.25803  ,1.81437 ,0.16061 ,0.08920 ,0.04985
 299      +,0.41741 ,0.25628  ,1.78080 ,0.16031 ,0.09002 ,0.05138/
 300       DATA ((F(I,15,K),I=1,6),K=1,19)/
 301      + 0.45715 ,0.31069  ,1.32916 ,0.08552 ,0.00456 ,0.00000
 302      +,0.45867 ,0.30735  ,1.52936 ,0.09777 ,0.01676 ,0.00000
 303      +,0.45878 ,0.30364  ,1.64025 ,0.10722 ,0.02638 ,0.00000
 304      +,0.45793 ,0.29974  ,1.69224 ,0.11439 ,0.03392 ,0.00000
 305      +,0.45652 ,0.29587  ,1.71234 ,0.11999 ,0.04001 ,0.00000
 306      +,0.45475 ,0.29202  ,1.71084 ,0.12363 ,0.04496 ,0.00209
 307      +,0.45267 ,0.28826  ,1.69492 ,0.12500 ,0.04899 ,0.00808
 308      +,0.45040 ,0.28455  ,1.66956 ,0.12603 ,0.05230 ,0.01270
 309      +,0.44797 ,0.28094  ,1.63828 ,0.12665 ,0.05502 ,0.01669
 310      +,0.44547 ,0.27743  ,1.60353 ,0.12697 ,0.05725 ,0.02008
 311      +,0.44290 ,0.27404  ,1.56703 ,0.12706 ,0.05912 ,0.02300
 312      +,0.44031 ,0.27077  ,1.52996 ,0.12697 ,0.06067 ,0.02553
 313      +,0.43774 ,0.26761  ,1.49287 ,0.12673 ,0.06198 ,0.02773
 314      +,0.43509 ,0.26452  ,1.45511 ,0.12631 ,0.06299 ,0.02959
 315      +,0.43249 ,0.26156  ,1.41866 ,0.12583 ,0.06386 ,0.03123
 316      +,0.42993 ,0.25868  ,1.38304 ,0.12527 ,0.06455 ,0.03267
 317      +,0.42735 ,0.25587  ,1.34804 ,0.12461 ,0.06509 ,0.03390
 318      +,0.42484 ,0.25320  ,1.31479 ,0.12395 ,0.06556 ,0.03501
 319      +,0.42230 ,0.25055  ,1.28183 ,0.12318 ,0.06586 ,0.03593/
 320       DATA ((F(I,16,K),I=1,6),K=1,19)/
 321      + 0.48719 ,0.32748  ,1.31487 ,0.07628 ,0.00402 ,0.00000
 322      +,0.48486 ,0.31979  ,1.43734 ,0.08613 ,0.01450 ,0.00000
 323      +,0.48161 ,0.31251  ,1.48867 ,0.09330 ,0.02245 ,0.00000
 324      +,0.47778 ,0.30563  ,1.49619 ,0.09841 ,0.02847 ,0.00000
 325      +,0.47372 ,0.29921  ,1.48206 ,0.10218 ,0.03318 ,0.00000
 326      +,0.46955 ,0.29316  ,1.45447 ,0.10435 ,0.03690 ,0.00164
 327      +,0.46528 ,0.28746  ,1.41875 ,0.10473 ,0.03983 ,0.00630
 328      +,0.46100 ,0.28203  ,1.37852 ,0.10486 ,0.04216 ,0.00983
 329      +,0.45672 ,0.27689  ,1.33621 ,0.10470 ,0.04401 ,0.01282
 330      +,0.45250 ,0.27201  ,1.29342 ,0.10433 ,0.04548 ,0.01532
 331      +,0.44834 ,0.26737  ,1.25121 ,0.10381 ,0.04666 ,0.01744
 332      +,0.44427 ,0.26298  ,1.21023 ,0.10319 ,0.04760 ,0.01925
 333      +,0.44030 ,0.25879  ,1.17069 ,0.10248 ,0.04835 ,0.02080
 334      +,0.43635 ,0.25476  ,1.13197 ,0.10167 ,0.04888 ,0.02208
 335      +,0.43254 ,0.25094  ,1.09534 ,0.10083 ,0.04931 ,0.02319
 336      +,0.42882 ,0.24727  ,1.06033 ,0.09996 ,0.04961 ,0.02415
 337      +,0.42516 ,0.24374  ,1.02668 ,0.09904 ,0.04981 ,0.02495
 338      +,0.42163 ,0.24038  ,0.99508 ,0.09814 ,0.04995 ,0.02566
 339      +,0.41812 ,0.23712  ,0.96444 ,0.09718 ,0.04999 ,0.02623/
 340       DATA ((F(I,17,K),I=1,6),K=1,19)/
 341      + 0.51376 ,0.33398  ,1.28575 ,0.06596 ,0.00346 ,0.00000
 342      +,0.50650 ,0.32163  ,1.33438 ,0.07352 ,0.01221 ,0.00000
 343      +,0.49907 ,0.31063  ,1.33205 ,0.07863 ,0.01856 ,0.00001
 344      +,0.49159 ,0.30073  ,1.30149 ,0.08197 ,0.02319 ,0.00000
 345      +,0.48434 ,0.29177  ,1.25955 ,0.08419 ,0.02668 ,0.00001
 346      +,0.47733 ,0.28361  ,1.21195 ,0.08517 ,0.02933 ,0.00125
 347      +,0.47052 ,0.27604  ,1.16206 ,0.08480 ,0.03134 ,0.00475
 348      +,0.46391 ,0.26904  ,1.11205 ,0.08427 ,0.03287 ,0.00735
 349      +,0.45753 ,0.26251  ,1.06329 ,0.08356 ,0.03402 ,0.00950
 350      +,0.45136 ,0.25641  ,1.01656 ,0.08273 ,0.03490 ,0.01127
 351      +,0.44543 ,0.25069  ,0.97228 ,0.08182 ,0.03554 ,0.01274
 352      +,0.43974 ,0.24533  ,0.93063 ,0.08087 ,0.03602 ,0.01397
 353      +,0.43426 ,0.24028  ,0.89152 ,0.07989 ,0.03636 ,0.01500
 354      +,0.42891 ,0.23548  ,0.85433 ,0.07886 ,0.03655 ,0.01583
 355      +,0.42378 ,0.23097  ,0.81975 ,0.07784 ,0.03667 ,0.01655
 356      +,0.41884 ,0.22668  ,0.78730 ,0.07681 ,0.03671 ,0.01714
 357      +,0.41403 ,0.22258  ,0.75668 ,0.07578 ,0.03668 ,0.01763
 358      +,0.40944 ,0.21871  ,0.72824 ,0.07479 ,0.03662 ,0.01805
 359      +,0.40492 ,0.21499  ,0.70117 ,0.07377 ,0.03649 ,0.01837/
 360       DATA ((F(I,18,K),I=1,6),K=1,19)/
 361      + 0.53072 ,0.32884  ,1.24418 ,0.05683 ,0.00297 ,0.00000
 362      +,0.51859 ,0.31280  ,1.23684 ,0.06264 ,0.01029 ,0.00000
 363      +,0.50709 ,0.29897  ,1.19628 ,0.06626 ,0.01541 ,0.00000
 364      +,0.49617 ,0.28683  ,1.14031 ,0.06836 ,0.01900 ,0.00000
 365      +,0.48595 ,0.27609  ,1.08109 ,0.06956 ,0.02161 ,0.00000
 366      +,0.47633 ,0.26645  ,1.02211 ,0.06979 ,0.02353 ,0.00096
 367      +,0.46720 ,0.25768  ,0.96506 ,0.06900 ,0.02492 ,0.00364
 368      +,0.45854 ,0.24964  ,0.91097 ,0.06812 ,0.02592 ,0.00558
 369      +,0.45028 ,0.24226  ,0.86035 ,0.06714 ,0.02663 ,0.00716
 370      +,0.44245 ,0.23541  ,0.81337 ,0.06609 ,0.02713 ,0.00844
 371      +,0.43499 ,0.22906  ,0.76998 ,0.06502 ,0.02746 ,0.00948
 372      +,0.42790 ,0.22315  ,0.73004 ,0.06394 ,0.02767 ,0.01034
 373      +,0.42116 ,0.21764  ,0.69323 ,0.06287 ,0.02778 ,0.01104
 374      +,0.41466 ,0.21244  ,0.65891 ,0.06178 ,0.02778 ,0.01160
 375      +,0.40847 ,0.20757  ,0.62741 ,0.06072 ,0.02774 ,0.01206
 376      +,0.40253 ,0.20299  ,0.59824 ,0.05968 ,0.02764 ,0.01245
 377      +,0.39681 ,0.19864  ,0.57112 ,0.05866 ,0.02750 ,0.01274
 378      +,0.39137 ,0.19455  ,0.54615 ,0.05768 ,0.02734 ,0.01299
 379      +,0.38607 ,0.19063  ,0.52270 ,0.05670 ,0.02714 ,0.01317/
 380       DATA ((F(I,19,K),I=1,6),K=1,19)/
 381      + 0.53973 ,0.31551  ,1.19189 ,0.04876 ,0.00254 ,0.00000
 382      +,0.52292 ,0.29679  ,1.14181 ,0.05320 ,0.00866 ,-0.00001
 383      +,0.50759 ,0.28101  ,1.07404 ,0.05571 ,0.01280 ,-0.00001
 384      +,0.49347 ,0.26740  ,1.00136 ,0.05694 ,0.01559 ,-0.00001
 385      +,0.48053 ,0.25552  ,0.93188 ,0.05746 ,0.01756 ,-0.00001
 386      +,0.46858 ,0.24498  ,0.86706 ,0.05723 ,0.01894 ,0.00074
 387      +,0.45742 ,0.23552  ,0.80723 ,0.05622 ,0.01990 ,0.00280
 388      +,0.44698 ,0.22693  ,0.75248 ,0.05517 ,0.02055 ,0.00428
 389      +,0.43715 ,0.21910  ,0.70263 ,0.05407 ,0.02097 ,0.00546
 390      +,0.42791 ,0.21192  ,0.65743 ,0.05295 ,0.02123 ,0.00639
 391      +,0.41919 ,0.20530  ,0.61648 ,0.05184 ,0.02137 ,0.00714
 392      +,0.41097 ,0.19919  ,0.57938 ,0.05075 ,0.02142 ,0.00774
 393      +,0.40319 ,0.19352  ,0.54569 ,0.04969 ,0.02139 ,0.00823
 394      +,0.39574 ,0.18820  ,0.51476 ,0.04863 ,0.02129 ,0.00860
 395      +,0.38870 ,0.18325  ,0.48669 ,0.04762 ,0.02117 ,0.00891
 396      +,0.38202 ,0.17860  ,0.46100 ,0.04664 ,0.02101 ,0.00915
 397      +,0.37560 ,0.17422  ,0.43736 ,0.04568 ,0.02082 ,0.00933
 398      +,0.36951 ,0.17011  ,0.41575 ,0.04477 ,0.02062 ,0.00949
 399      +,0.36362 ,0.16622  ,0.39569 ,0.04387 ,0.02039 ,0.00958/
 400       DATA ((F(I,20,K),I=1,6),K=1,19)/
 401      + 0.54194 ,0.29657  ,1.13115 ,0.04165 ,0.00216 ,0.00000
 402      +,0.52071 ,0.27611  ,1.04879 ,0.04501 ,0.00727 ,-0.00001
 403      +,0.50186 ,0.25914  ,0.96209 ,0.04669 ,0.01061 ,-0.00001
 404      +,0.48485 ,0.24472  ,0.87901 ,0.04732 ,0.01279 ,-0.00001
 405      +,0.46952 ,0.23228  ,0.80413 ,0.04738 ,0.01427 ,-0.00001
 406      +,0.45555 ,0.22135  ,0.73720 ,0.04686 ,0.01526 ,0.00058
 407      +,0.44265 ,0.21163  ,0.67741 ,0.04576 ,0.01592 ,0.00218
 408      +,0.43071 ,0.20288  ,0.62411 ,0.04466 ,0.01633 ,0.00331
 409      +,0.41957 ,0.19496  ,0.57662 ,0.04355 ,0.01656 ,0.00419
 410      +,0.40919 ,0.18775  ,0.53433 ,0.04244 ,0.01666 ,0.00487
 411      +,0.39947 ,0.18114  ,0.49661 ,0.04137 ,0.01668 ,0.00541
 412      +,0.39036 ,0.17508  ,0.46289 ,0.04033 ,0.01664 ,0.00584
 413      +,0.38179 ,0.16948  ,0.43264 ,0.03932 ,0.01654 ,0.00618
 414      +,0.37363 ,0.16426  ,0.40524 ,0.03835 ,0.01639 ,0.00643
 415      +,0.36597 ,0.15941  ,0.38058 ,0.03741 ,0.01623 ,0.00663
 416      +,0.35872 ,0.15489  ,0.35824 ,0.03652 ,0.01605 ,0.00679
 417      +,0.35180 ,0.15065  ,0.33787 ,0.03565 ,0.01584 ,0.00690
 418      +,0.34526 ,0.14668  ,0.31940 ,0.03484 ,0.01564 ,0.00698
 419      +,0.33896 ,0.14294  ,0.30240 ,0.03404 ,0.01542 ,0.00703/
 420       DATA ((F(I,21,K),I=1,6),K=1,19)/
 421      + 0.53815 ,0.27406  ,1.06405 ,0.03541 ,0.00184 ,0.00000
 422      +,0.51288 ,0.25268  ,0.95796 ,0.03791 ,0.00608 ,0.00000
 423      +,0.49085 ,0.23519  ,0.85876 ,0.03898 ,0.00877 ,0.00000
 424      +,0.47135 ,0.22050  ,0.77004 ,0.03919 ,0.01046 ,0.00000
 425      +,0.45399 ,0.20796  ,0.69327 ,0.03894 ,0.01157 ,0.00000
 426      +,0.43833 ,0.19706  ,0.62677 ,0.03827 ,0.01228 ,0.00045
 427      +,0.42401 ,0.18742  ,0.56890 ,0.03716 ,0.01272 ,0.00170
 428      +,0.41082 ,0.17882  ,0.51833 ,0.03609 ,0.01296 ,0.00256
 429      +,0.39864 ,0.17108  ,0.47413 ,0.03502 ,0.01307 ,0.00322
 430      +,0.38736 ,0.16407  ,0.43534 ,0.03398 ,0.01308 ,0.00373
 431      +,0.37690 ,0.15768  ,0.40121 ,0.03298 ,0.01303 ,0.00412
 432      +,0.36713 ,0.15184  ,0.37106 ,0.03202 ,0.01293 ,0.00443
 433      +,0.35798 ,0.14649  ,0.34430 ,0.03111 ,0.01280 ,0.00466
 434      +,0.34937 ,0.14151  ,0.32031 ,0.03023 ,0.01264 ,0.00483
 435      +,0.34128 ,0.13692  ,0.29891 ,0.02939 ,0.01247 ,0.00496
 436      +,0.33363 ,0.13265  ,0.27969 ,0.02860 ,0.01228 ,0.00506
 437      +,0.32639 ,0.12866  ,0.26232 ,0.02784 ,0.01209 ,0.00512
 438      +,0.31958 ,0.12494  ,0.24666 ,0.02712 ,0.01189 ,0.00517
 439      +,0.31304 ,0.12144  ,0.23238 ,0.02643 ,0.01169 ,0.00519/
 440       DATA ((F(I,22,K),I=1,6),K=1,19)/
 441      + 0.52906 ,0.24948  ,0.99213 ,0.02994 ,0.00155 ,0.00000
 442      +,0.50017 ,0.22792  ,0.86940 ,0.03176 ,0.00506 ,0.00000
 443      +,0.47543 ,0.21049  ,0.76290 ,0.03238 ,0.00722 ,0.00000
 444      +,0.45381 ,0.19600  ,0.67211 ,0.03230 ,0.00853 ,0.00001
 445      +,0.43474 ,0.18374  ,0.59606 ,0.03188 ,0.00935 ,0.00000
 446      +,0.41771 ,0.17315  ,0.53187 ,0.03114 ,0.00985 ,0.00036
 447      +,0.40229 ,0.16388  ,0.47711 ,0.03008 ,0.01013 ,0.00132
 448      +,0.38820 ,0.15564  ,0.43017 ,0.02906 ,0.01026 ,0.00198
 449      +,0.37529 ,0.14827  ,0.38974 ,0.02807 ,0.01029 ,0.00248
 450      +,0.36341 ,0.14163  ,0.35475 ,0.02711 ,0.01025 ,0.00285
 451      +,0.35241 ,0.13561  ,0.32430 ,0.02621 ,0.01016 ,0.00314
 452      +,0.34220 ,0.13014  ,0.29769 ,0.02535 ,0.01004 ,0.00336
 453      +,0.33269 ,0.12514  ,0.27431 ,0.02455 ,0.00990 ,0.00352
 454      +,0.32378 ,0.12052  ,0.25355 ,0.02377 ,0.00973 ,0.00363
 455      +,0.31545 ,0.11626  ,0.23518 ,0.02304 ,0.00956 ,0.00371
 456      +,0.30762 ,0.11232  ,0.21879 ,0.02234 ,0.00939 ,0.00377
 457      +,0.30020 ,0.10865  ,0.20410 ,0.02169 ,0.00921 ,0.00380
 458      +,0.29323 ,0.10524  ,0.19095 ,0.02108 ,0.00903 ,0.00383
 459      +,0.28661 ,0.10204  ,0.17903 ,0.02049 ,0.00885 ,0.00383/
 460       DATA ((F(I,23,K),I=1,6),K=1,19)/
 461      + 0.51526 ,0.22409  ,0.91740 ,0.02517 ,0.00130 ,0.00000
 462      +,0.48330 ,0.20292  ,0.78398 ,0.02647 ,0.00418 ,0.00000
 463      +,0.45629 ,0.18599  ,0.67425 ,0.02676 ,0.00590 ,0.00000
 464      +,0.43297 ,0.17206  ,0.58419 ,0.02650 ,0.00691 ,0.00001
 465      +,0.41259 ,0.16035  ,0.51071 ,0.02598 ,0.00751 ,0.00000
 466      +,0.39455 ,0.15033  ,0.45002 ,0.02522 ,0.00786 ,0.00028
 467      +,0.37834 ,0.14159  ,0.39918 ,0.02423 ,0.00803 ,0.00103
 468      +,0.36363 ,0.13388  ,0.35628 ,0.02330 ,0.00809 ,0.00153
 469      +,0.35023 ,0.12702  ,0.31984 ,0.02241 ,0.00807 ,0.00190
 470      +,0.33796 ,0.12087  ,0.28868 ,0.02155 ,0.00800 ,0.00218
 471      +,0.32666 ,0.11533  ,0.26185 ,0.02075 ,0.00789 ,0.00238
 472      +,0.31623 ,0.11030  ,0.23863 ,0.02000 ,0.00777 ,0.00254
 473      +,0.30655 ,0.10573  ,0.21841 ,0.01930 ,0.00763 ,0.00265
 474      +,0.29752 ,0.10152  ,0.20063 ,0.01863 ,0.00747 ,0.00272
 475      +,0.28911 ,0.09766  ,0.18500 ,0.01800 ,0.00732 ,0.00277
 476      +,0.28123 ,0.09409  ,0.17116 ,0.01741 ,0.00716 ,0.00281
 477      +,0.27380 ,0.09078  ,0.15885 ,0.01686 ,0.00700 ,0.00283
 478      +,0.26683 ,0.08771  ,0.14788 ,0.01634 ,0.00685 ,0.00284
 479      +,0.26023 ,0.08484  ,0.13801 ,0.01584 ,0.00669 ,0.00283/
 480       DATA ((F(I,24,K),I=1,6),K=1,19)/
 481      + 0.49734 ,0.19876  ,0.84120 ,0.02104 ,0.00108 ,0.00001
 482      +,0.46287 ,0.17844  ,0.70205 ,0.02192 ,0.00344 ,0.00001
 483      +,0.43405 ,0.16236  ,0.59235 ,0.02199 ,0.00479 ,0.00000
 484      +,0.40946 ,0.14924  ,0.50511 ,0.02161 ,0.00557 ,0.00001
 485      +,0.38818 ,0.13830  ,0.43552 ,0.02104 ,0.00601 ,0.00000
 486      +,0.36945 ,0.12900  ,0.37916 ,0.02032 ,0.00625 ,0.00023
 487      +,0.35277 ,0.12093  ,0.33270 ,0.01942 ,0.00634 ,0.00080
 488      +,0.33771 ,0.11386  ,0.29405 ,0.01858 ,0.00635 ,0.00118
 489      +,0.32408 ,0.10759  ,0.26162 ,0.01779 ,0.00631 ,0.00146
 490      +,0.31163 ,0.10201  ,0.23421 ,0.01705 ,0.00622 ,0.00166
 491      +,0.30024 ,0.09699  ,0.21084 ,0.01635 ,0.00611 ,0.00181
 492      +,0.28978 ,0.09246  ,0.19080 ,0.01570 ,0.00599 ,0.00191
 493      +,0.28011 ,0.08835  ,0.17349 ,0.01510 ,0.00586 ,0.00199
 494      +,0.27112 ,0.08459  ,0.15840 ,0.01453 ,0.00572 ,0.00204
 495      +,0.26277 ,0.08115  ,0.14523 ,0.01400 ,0.00558 ,0.00207
 496      +,0.25497 ,0.07798  ,0.13365 ,0.01350 ,0.00544 ,0.00209
 497      +,0.24766 ,0.07505  ,0.12341 ,0.01304 ,0.00531 ,0.00210
 498      +,0.24084 ,0.07234  ,0.11434 ,0.01260 ,0.00517 ,0.00210
 499      +,0.23437 ,0.06982  ,0.10624 ,0.01219 ,0.00504 ,0.00209/
 500       DATA ((F(I,25,K),I=1,6),K=1,19)/
 501      + 0.47592 ,0.17419  ,0.76492 ,0.01747 ,0.00089 ,0.00001
 502      +,0.43949 ,0.15509  ,0.62419 ,0.01803 ,0.00280 ,0.00001
 503      +,0.40938 ,0.14011  ,0.51710 ,0.01794 ,0.00386 ,0.00000
 504      +,0.38396 ,0.12799  ,0.43421 ,0.01750 ,0.00445 ,0.00001
 505      +,0.36212 ,0.11795  ,0.36944 ,0.01694 ,0.00477 ,0.00000
 506      +,0.34304 ,0.10947  ,0.31787 ,0.01626 ,0.00493 ,0.00018
 507      +,0.32616 ,0.10216  ,0.27600 ,0.01547 ,0.00497 ,0.00061
 508      +,0.31100 ,0.09578  ,0.24162 ,0.01473 ,0.00495 ,0.00090
 509      +,0.29735 ,0.09016  ,0.21311 ,0.01404 ,0.00489 ,0.00111
 510      +,0.28496 ,0.08517  ,0.18926 ,0.01341 ,0.00480 ,0.00126
 511      +,0.27367 ,0.08071  ,0.16913 ,0.01281 ,0.00470 ,0.00136
 512      +,0.26333 ,0.07669  ,0.15201 ,0.01226 ,0.00459 ,0.00144
 513      +,0.25382 ,0.07306  ,0.13733 ,0.01175 ,0.00447 ,0.00149
 514      +,0.24502 ,0.06975  ,0.12465 ,0.01127 ,0.00435 ,0.00152
 515      +,0.23687 ,0.06674  ,0.11365 ,0.01083 ,0.00423 ,0.00154
 516      +,0.22928 ,0.06397  ,0.10404 ,0.01042 ,0.00411 ,0.00155
 517      +,0.22218 ,0.06141  ,0.09560 ,0.01003 ,0.00400 ,0.00155
 518      +,0.21558 ,0.05906  ,0.08816 ,0.00967 ,0.00389 ,0.00154
 519      +,0.20934 ,0.05686  ,0.08156 ,0.00933 ,0.00378 ,0.00153/
 520       DATA ((F(I,26,K),I=1,6),K=1,19)/
 521      + 0.45153 ,0.15091  ,0.68978 ,0.01442 ,0.00072 ,0.00000
 522      +,0.41375 ,0.13327  ,0.55089 ,0.01474 ,0.00225 ,-0.00001
 523      +,0.38288 ,0.11956  ,0.44838 ,0.01454 ,0.00309 ,0.00000
 524      +,0.35702 ,0.10855  ,0.37093 ,0.01409 ,0.00352 ,-0.00001
 525      +,0.33497 ,0.09950  ,0.31154 ,0.01355 ,0.00375 ,0.00000
 526      +,0.31586 ,0.09190  ,0.26500 ,0.01293 ,0.00385 ,0.00012
 527      +,0.29903 ,0.08538  ,0.22776 ,0.01224 ,0.00386 ,0.00046
 528      +,0.28404 ,0.07971  ,0.19754 ,0.01160 ,0.00383 ,0.00068
 529      +,0.27057 ,0.07476  ,0.17275 ,0.01102 ,0.00376 ,0.00083
 530      +,0.25842 ,0.07037  ,0.15222 ,0.01048 ,0.00368 ,0.00094
 531      +,0.24741 ,0.06646  ,0.13505 ,0.00997 ,0.00358 ,0.00102
 532      +,0.23735 ,0.06296  ,0.12057 ,0.00952 ,0.00349 ,0.00107
 533      +,0.22812 ,0.05980  ,0.10825 ,0.00909 ,0.00339 ,0.00111
 534      +,0.21961 ,0.05693  ,0.09768 ,0.00870 ,0.00328 ,0.00112
 535      +,0.21176 ,0.05432  ,0.08858 ,0.00833 ,0.00318 ,0.00113
 536      +,0.20448 ,0.05194  ,0.08067 ,0.00799 ,0.00308 ,0.00114
 537      +,0.19770 ,0.04974  ,0.07377 ,0.00768 ,0.00299 ,0.00113
 538      +,0.19141 ,0.04772  ,0.06772 ,0.00738 ,0.00290 ,0.00112
 539      +,0.18547 ,0.04585  ,0.06238 ,0.00711 ,0.00281 ,0.00111/
 540       DATA ((F(I,27,K),I=1,6),K=1,19)/
 541      + 0.42472 ,0.12921  ,0.61667 ,0.01180 ,0.00058 ,0.00000
 542      +,0.38618 ,0.11318  ,0.48233 ,0.01195 ,0.00180 ,0.00000
 543      +,0.35500 ,0.10084  ,0.38587 ,0.01169 ,0.00244 ,0.00000
 544      +,0.32911 ,0.09101  ,0.31461 ,0.01124 ,0.00277 ,0.00000
 545      +,0.30719 ,0.08298  ,0.26090 ,0.01074 ,0.00292 ,0.00000
 546      +,0.28832 ,0.07627  ,0.21944 ,0.01020 ,0.00298 ,0.00009
 547      +,0.27180 ,0.07055  ,0.18671 ,0.00961 ,0.00298 ,0.00035
 548      +,0.25717 ,0.06560  ,0.16046 ,0.00907 ,0.00294 ,0.00051
 549      +,0.24408 ,0.06129  ,0.13915 ,0.00858 ,0.00287 ,0.00062
 550      +,0.23233 ,0.05749  ,0.12167 ,0.00812 ,0.00279 ,0.00070
 551      +,0.22172 ,0.05411  ,0.10718 ,0.00770 ,0.00271 ,0.00076
 552      +,0.21207 ,0.05111  ,0.09506 ,0.00733 ,0.00263 ,0.00079
 553      +,0.20325 ,0.04840  ,0.08482 ,0.00698 ,0.00254 ,0.00082
 554      +,0.19515 ,0.04595  ,0.07610 ,0.00666 ,0.00246 ,0.00083
 555      +,0.18769 ,0.04373  ,0.06864 ,0.00636 ,0.00238 ,0.00083
 556      +,0.18080 ,0.04170  ,0.06220 ,0.00608 ,0.00229 ,0.00083
 557      +,0.17441 ,0.03985  ,0.05661 ,0.00583 ,0.00222 ,0.00082
 558      +,0.16848 ,0.03814  ,0.05173 ,0.00559 ,0.00214 ,0.00082
 559      +,0.16291 ,0.03657  ,0.04745 ,0.00537 ,0.00207 ,0.00081/
 560       DATA ((F(I,28,K),I=1,6),K=1,19)/
 561      + 0.39605 ,0.10932  ,0.54649 ,0.00957 ,0.00046 ,-0.00001
 562      +,0.35733 ,0.09500  ,0.41885 ,0.00960 ,0.00142 ,0.00000
 563      +,0.32631 ,0.08407  ,0.32951 ,0.00932 ,0.00191 ,0.00000
 564      +,0.30075 ,0.07542  ,0.26483 ,0.00890 ,0.00215 ,0.00000
 565      +,0.27929 ,0.06840  ,0.21689 ,0.00845 ,0.00226 ,0.00000
 566      +,0.26090 ,0.06257  ,0.18042 ,0.00798 ,0.00229 ,0.00007
 567      +,0.24491 ,0.05762  ,0.15198 ,0.00748 ,0.00227 ,0.00026
 568      +,0.23081 ,0.05337  ,0.12943 ,0.00703 ,0.00223 ,0.00038
 569      +,0.21828 ,0.04967  ,0.11132 ,0.00662 ,0.00217 ,0.00047
 570      +,0.20705 ,0.04643  ,0.09659 ,0.00624 ,0.00210 ,0.00052
 571      +,0.19695 ,0.04356  ,0.08449 ,0.00590 ,0.00203 ,0.00056
 572      +,0.18782 ,0.04101  ,0.07444 ,0.00559 ,0.00196 ,0.00058
 573      +,0.17951 ,0.03873  ,0.06602 ,0.00531 ,0.00189 ,0.00060
 574      +,0.17189 ,0.03667  ,0.05890 ,0.00505 ,0.00182 ,0.00060
 575      +,0.16491 ,0.03480  ,0.05284 ,0.00481 ,0.00176 ,0.00060
 576      +,0.15847 ,0.03311  ,0.04764 ,0.00459 ,0.00169 ,0.00060
 577      +,0.15250 ,0.03156  ,0.04315 ,0.00439 ,0.00163 ,0.00060
 578      +,0.14699 ,0.03015  ,0.03926 ,0.00420 ,0.00157 ,0.00059
 579      +,0.14183 ,0.02884  ,0.03587 ,0.00402 ,0.00152 ,0.00058/
 580       DATA ((F(I,29,K),I=1,6),K=1,19)/
 581      + 0.36603 ,0.09138  ,0.47983 ,0.00770 ,0.00036 ,-0.00001
 582      +,0.32767 ,0.07878  ,0.36050 ,0.00764 ,0.00111 ,0.00000
 583      +,0.29723 ,0.06924  ,0.27895 ,0.00735 ,0.00148 ,0.00000
 584      +,0.27235 ,0.06175  ,0.22104 ,0.00697 ,0.00165 ,0.00000
 585      +,0.25160 ,0.05571  ,0.17881 ,0.00658 ,0.00173 ,0.00000
 586      +,0.23394 ,0.05072  ,0.14711 ,0.00618 ,0.00174 ,0.00005
 587      +,0.21866 ,0.04650  ,0.12270 ,0.00576 ,0.00171 ,0.00019
 588      +,0.20526 ,0.04290  ,0.10356 ,0.00539 ,0.00168 ,0.00028
 589      +,0.19340 ,0.03978  ,0.08834 ,0.00506 ,0.00162 ,0.00034
 590      +,0.18283 ,0.03705  ,0.07607 ,0.00475 ,0.00157 ,0.00038
 591      +,0.17336 ,0.03465  ,0.06607 ,0.00448 ,0.00151 ,0.00041
 592      +,0.16482 ,0.03252  ,0.05784 ,0.00423 ,0.00145 ,0.00042
 593      +,0.15709 ,0.03062  ,0.05099 ,0.00400 ,0.00139 ,0.00043
 594      +,0.15001 ,0.02891  ,0.04523 ,0.00380 ,0.00134 ,0.00043
 595      +,0.14355 ,0.02737  ,0.04036 ,0.00361 ,0.00128 ,0.00043
 596      +,0.13761 ,0.02597  ,0.03620 ,0.00343 ,0.00124 ,0.00043
 597      +,0.13212 ,0.02470  ,0.03264 ,0.00327 ,0.00119 ,0.00043
 598      +,0.12706 ,0.02354  ,0.02957 ,0.00312 ,0.00114 ,0.00042
 599      +,0.12234 ,0.02247  ,0.02691 ,0.00299 ,0.00110 ,0.00041/
 600       DATA ((F(I,30,K),I=1,6),K=1,19)/
 601      + 0.33522 ,0.07542  ,0.41730 ,0.00613 ,0.00029 ,0.00000
 602      +,0.29771 ,0.06451  ,0.30741 ,0.00603 ,0.00086 ,0.00000
 603      +,0.26825 ,0.05632  ,0.23399 ,0.00575 ,0.00113 ,0.00000
 604      +,0.24434 ,0.04993  ,0.18283 ,0.00541 ,0.00126 ,0.00000
 605      +,0.22454 ,0.04480  ,0.14609 ,0.00507 ,0.00130 ,0.00000
 606      +,0.20780 ,0.04059  ,0.11889 ,0.00474 ,0.00130 ,0.00004
 607      +,0.19338 ,0.03706  ,0.09818 ,0.00440 ,0.00128 ,0.00014
 608      +,0.18080 ,0.03404  ,0.08212 ,0.00410 ,0.00124 ,0.00021
 609      +,0.16973 ,0.03146  ,0.06948 ,0.00382 ,0.00120 ,0.00025
 610      +,0.15991 ,0.02920  ,0.05938 ,0.00358 ,0.00115 ,0.00028
 611      +,0.15114 ,0.02722  ,0.05121 ,0.00336 ,0.00111 ,0.00030
 612      +,0.14326 ,0.02547  ,0.04454 ,0.00316 ,0.00106 ,0.00031
 613      +,0.13613 ,0.02391  ,0.03902 ,0.00299 ,0.00102 ,0.00031
 614      +,0.12965 ,0.02251  ,0.03442 ,0.00282 ,0.00097 ,0.00031
 615      +,0.12374 ,0.02126  ,0.03056 ,0.00267 ,0.00093 ,0.00031
 616      +,0.11833 ,0.02012  ,0.02727 ,0.00254 ,0.00089 ,0.00031
 617      +,0.11335 ,0.01909  ,0.02447 ,0.00242 ,0.00085 ,0.00030
 618      +,0.10876 ,0.01815  ,0.02207 ,0.00230 ,0.00082 ,0.00029
 619      +,0.10450 ,0.01729  ,0.02000 ,0.00219 ,0.00079 ,0.00029/
 620       DATA ((F(I,31,K),I=1,6),K=1,19)/
 621      + 0.30401 ,0.06143  ,0.35921 ,0.00483 ,0.00022 ,0.00000
 622      +,0.26785 ,0.05213  ,0.25950 ,0.00470 ,0.00065 ,0.00000
 623      +,0.23970 ,0.04520  ,0.19431 ,0.00444 ,0.00086 ,0.00000
 624      +,0.21703 ,0.03983  ,0.14972 ,0.00415 ,0.00094 ,0.00000
 625      +,0.19839 ,0.03555  ,0.11817 ,0.00386 ,0.00097 ,0.00000
 626      +,0.18272 ,0.03206  ,0.09512 ,0.00359 ,0.00096 ,0.00003
 627      +,0.16930 ,0.02914  ,0.07778 ,0.00331 ,0.00094 ,0.00011
 628      +,0.15765 ,0.02666  ,0.06447 ,0.00307 ,0.00091 ,0.00015
 629      +,0.14744 ,0.02454  ,0.05409 ,0.00286 ,0.00087 ,0.00018
 630      +,0.13842 ,0.02270  ,0.04588 ,0.00267 ,0.00084 ,0.00020
 631      +,0.13040 ,0.02109  ,0.03930 ,0.00249 ,0.00080 ,0.00021
 632      +,0.12322 ,0.01967  ,0.03395 ,0.00234 ,0.00076 ,0.00022
 633      +,0.11676 ,0.01842  ,0.02956 ,0.00220 ,0.00073 ,0.00022
 634      +,0.11089 ,0.01729  ,0.02593 ,0.00207 ,0.00070 ,0.00022
 635      +,0.10556 ,0.01629  ,0.02290 ,0.00196 ,0.00066 ,0.00022
 636      +,0.10070 ,0.01538  ,0.02034 ,0.00186 ,0.00063 ,0.00022
 637      +,0.09622 ,0.01455  ,0.01817 ,0.00176 ,0.00060 ,0.00021
 638      +,0.09212 ,0.01381  ,0.01631 ,0.00167 ,0.00058 ,0.00021
 639      +,0.08832 ,0.01312  ,0.01472 ,0.00159 ,0.00055 ,0.00020/
 640       DATA ((F(I,32,K),I=1,6),K=1,19)/
 641      + 0.27292 ,0.04934  ,0.30587 ,0.00377 ,0.00017 ,0.00000
 642      +,0.23853 ,0.04153  ,0.21670 ,0.00362 ,0.00049 ,0.00000
 643      +,0.21197 ,0.03576  ,0.15963 ,0.00339 ,0.00064 ,0.00000
 644      +,0.19078 ,0.03132  ,0.12128 ,0.00314 ,0.00069 ,0.00000
 645      +,0.17345 ,0.02781  ,0.09454 ,0.00291 ,0.00071 ,0.00000
 646      +,0.15898 ,0.02495  ,0.07526 ,0.00268 ,0.00070 ,0.00002
 647      +,0.14664 ,0.02259  ,0.06094 ,0.00247 ,0.00068 ,0.00008
 648      +,0.13599 ,0.02058  ,0.05005 ,0.00228 ,0.00066 ,0.00011
 649      +,0.12670 ,0.01887  ,0.04165 ,0.00211 ,0.00063 ,0.00013
 650      +,0.11852 ,0.01739  ,0.03505 ,0.00196 ,0.00059 ,0.00014
 651      +,0.11128 ,0.01610  ,0.02981 ,0.00183 ,0.00057 ,0.00015
 652      +,0.10483 ,0.01498  ,0.02559 ,0.00171 ,0.00054 ,0.00015
 653      +,0.09904 ,0.01398  ,0.02215 ,0.00160 ,0.00051 ,0.00016
 654      +,0.09380 ,0.01309  ,0.01931 ,0.00151 ,0.00049 ,0.00015
 655      +,0.08905 ,0.01229  ,0.01696 ,0.00142 ,0.00046 ,0.00015
 656      +,0.08473 ,0.01158  ,0.01499 ,0.00134 ,0.00044 ,0.00015
 657      +,0.08077 ,0.01093  ,0.01333 ,0.00127 ,0.00042 ,0.00015
 658      +,0.07716 ,0.01034  ,0.01192 ,0.00120 ,0.00040 ,0.00014
 659      +,0.07380 ,0.00981  ,0.01071 ,0.00114 ,0.00039 ,0.00014/
 660       DATA ((F(I,33,K),I=1,6),K=1,19)/
 661      + 0.24235 ,0.03904  ,0.25742 ,0.00290 ,0.00012 ,0.00000
 662      +,0.21007 ,0.03259  ,0.17884 ,0.00275 ,0.00036 ,0.00000
 663      +,0.18536 ,0.02787  ,0.12959 ,0.00255 ,0.00047 ,0.00000
 664      +,0.16580 ,0.02426  ,0.09707 ,0.00235 ,0.00050 ,0.00000
 665      +,0.14992 ,0.02142  ,0.07474 ,0.00216 ,0.00051 ,0.00000
 666      +,0.13673 ,0.01913  ,0.05884 ,0.00198 ,0.00050 ,0.00001
 667      +,0.12555 ,0.01723  ,0.04716 ,0.00181 ,0.00048 ,0.00005
 668      +,0.11595 ,0.01564  ,0.03840 ,0.00166 ,0.00046 ,0.00007
 669      +,0.10761 ,0.01428  ,0.03167 ,0.00153 ,0.00044 ,0.00009
 670      +,0.10030 ,0.01311  ,0.02646 ,0.00142 ,0.00042 ,0.00009
 671      +,0.09385 ,0.01210  ,0.02234 ,0.00132 ,0.00040 ,0.00010
 672      +,0.08813 ,0.01122  ,0.01904 ,0.00123 ,0.00038 ,0.00010
 673      +,0.08301 ,0.01044  ,0.01638 ,0.00115 ,0.00036 ,0.00011
 674      +,0.07839 ,0.00975  ,0.01420 ,0.00108 ,0.00034 ,0.00010
 675      +,0.07422 ,0.00914  ,0.01240 ,0.00101 ,0.00032 ,0.00010
 676      +,0.07044 ,0.00858  ,0.01091 ,0.00095 ,0.00031 ,0.00010
 677      +,0.06699 ,0.00808  ,0.00966 ,0.00090 ,0.00029 ,0.00010
 678      +,0.06383 ,0.00763  ,0.00860 ,0.00085 ,0.00028 ,0.00009
 679      +,0.06092 ,0.00722  ,0.00770 ,0.00080 ,0.00026 ,0.00009/
 680       DATA ((F(I,34,K),I=1,6),K=1,19)/
 681      + 0.21272 ,0.03039  ,0.21391 ,0.00220 ,0.00009 ,0.00000
 682      +,0.18284 ,0.02516  ,0.14571 ,0.00206 ,0.00026 ,0.00000
 683      +,0.16017 ,0.02136  ,0.10384 ,0.00189 ,0.00033 ,0.00000
 684      +,0.14236 ,0.01848  ,0.07668 ,0.00173 ,0.00036 ,0.00000
 685      +,0.12800 ,0.01623  ,0.05829 ,0.00157 ,0.00036 ,0.00000
 686      +,0.11615 ,0.01442  ,0.04538 ,0.00144 ,0.00035 ,0.00001
 687      +,0.10616 ,0.01293  ,0.03600 ,0.00131 ,0.00033 ,0.00004
 688      +,0.09762 ,0.01168  ,0.02904 ,0.00120 ,0.00032 ,0.00005
 689      +,0.09024 ,0.01063  ,0.02375 ,0.00110 ,0.00031 ,0.00006
 690      +,0.08380 ,0.00972  ,0.01968 ,0.00102 ,0.00029 ,0.00006
 691      +,0.07814 ,0.00894  ,0.01650 ,0.00094 ,0.00027 ,0.00007
 692      +,0.07313 ,0.00826  ,0.01397 ,0.00087 ,0.00026 ,0.00007
 693      +,0.06867 ,0.00766  ,0.01194 ,0.00081 ,0.00024 ,0.00007
 694      +,0.06466 ,0.00714  ,0.01029 ,0.00076 ,0.00023 ,0.00007
 695      +,0.06105 ,0.00667  ,0.00894 ,0.00071 ,0.00022 ,0.00007
 696      +,0.05779 ,0.00625  ,0.00783 ,0.00067 ,0.00021 ,0.00007
 697      +,0.05482 ,0.00587  ,0.00690 ,0.00063 ,0.00019 ,0.00006
 698      +,0.05211 ,0.00553  ,0.00611 ,0.00059 ,0.00018 ,0.00006
 699      +,0.04963 ,0.00522  ,0.00545 ,0.00056 ,0.00018 ,0.00006/
 700       DATA ((F(I,35,K),I=1,6),K=1,19)/
 701      + 0.18431 ,0.02323  ,0.17528 ,0.00164 ,0.00006 ,0.00000
 702      +,0.15705 ,0.01907  ,0.11703 ,0.00151 ,0.00018 ,0.00000
 703      +,0.13657 ,0.01607  ,0.08200 ,0.00138 ,0.00023 ,0.00000
 704      +,0.12059 ,0.01382  ,0.05967 ,0.00125 ,0.00025 ,0.00000
 705      +,0.10780 ,0.01206  ,0.04478 ,0.00113 ,0.00025 ,0.00000
 706      +,0.09730 ,0.01066  ,0.03446 ,0.00102 ,0.00024 ,0.00001
 707      +,0.08850 ,0.00952  ,0.02705 ,0.00093 ,0.00023 ,0.00002
 708      +,0.08102 ,0.00856  ,0.02161 ,0.00084 ,0.00022 ,0.00004
 709      +,0.07459 ,0.00776  ,0.01753 ,0.00077 ,0.00021 ,0.00004
 710      +,0.06901 ,0.00707  ,0.01440 ,0.00071 ,0.00020 ,0.00004
 711      +,0.06412 ,0.00648  ,0.01198 ,0.00065 ,0.00018 ,0.00005
 712      +,0.05981 ,0.00597  ,0.01008 ,0.00060 ,0.00017 ,0.00005
 713      +,0.05598 ,0.00552  ,0.00856 ,0.00056 ,0.00016 ,0.00005
 714      +,0.05255 ,0.00513  ,0.00734 ,0.00052 ,0.00015 ,0.00005
 715      +,0.04948 ,0.00477  ,0.00634 ,0.00049 ,0.00014 ,0.00005
 716      +,0.04671 ,0.00446  ,0.00552 ,0.00046 ,0.00014 ,0.00004
 717      +,0.04419 ,0.00418  ,0.00484 ,0.00043 ,0.00013 ,0.00004
 718      +,0.04191 ,0.00393  ,0.00427 ,0.00040 ,0.00012 ,0.00004
 719      +,0.03981 ,0.00370  ,0.00379 ,0.00038 ,0.00012 ,0.00004/
 720       DATA ((F(I,36,K),I=1,6),K=1,19)/
 721      + 0.15750 ,0.01741  ,0.14145 ,0.00120 ,0.00004 ,0.00000
 722      +,0.13300 ,0.01417  ,0.09253 ,0.00109 ,0.00013 ,0.00000
 723      +,0.11477 ,0.01185  ,0.06372 ,0.00099 ,0.00016 ,0.00000
 724      +,0.10066 ,0.01012  ,0.04568 ,0.00089 ,0.00017 ,0.00000
 725      +,0.08944 ,0.00879  ,0.03383 ,0.00080 ,0.00017 ,0.00000
 726      +,0.08030 ,0.00773  ,0.02573 ,0.00072 ,0.00016 ,0.00001
 727      +,0.07268 ,0.00686  ,0.01998 ,0.00065 ,0.00015 ,0.00002
 728      +,0.06623 ,0.00615  ,0.01580 ,0.00058 ,0.00015 ,0.00002
 729      +,0.06072 ,0.00555  ,0.01270 ,0.00053 ,0.00014 ,0.00003
 730      +,0.05595 ,0.00504  ,0.01035 ,0.00049 ,0.00013 ,0.00003
 731      +,0.05179 ,0.00460  ,0.00855 ,0.00045 ,0.00012 ,0.00003
 732      +,0.04814 ,0.00422  ,0.00714 ,0.00041 ,0.00011 ,0.00003
 733      +,0.04492 ,0.00389  ,0.00602 ,0.00038 ,0.00011 ,0.00003
 734      +,0.04204 ,0.00360  ,0.00513 ,0.00035 ,0.00010 ,0.00003
 735      +,0.03946 ,0.00334  ,0.00441 ,0.00033 ,0.00009 ,0.00003
 736      +,0.03715 ,0.00312  ,0.00382 ,0.00031 ,0.00009 ,0.00003
 737      +,0.03505 ,0.00291  ,0.00333 ,0.00029 ,0.00008 ,0.00003
 738      +,0.03316 ,0.00273  ,0.00293 ,0.00027 ,0.00008 ,0.00003
 739      +,0.03142 ,0.00256  ,0.00259 ,0.00025 ,0.00007 ,0.00003/
 740       DATA ((F(I,37,K),I=1,6),K=1,19)/
 741      + 0.10953 ,0.00914  ,0.08733 ,0.00061 ,0.00002 ,0.00000
 742      +,0.09074 ,0.00730  ,0.05475 ,0.00054 ,0.00005 ,0.00000
 743      +,0.07703 ,0.00601  ,0.03637 ,0.00047 ,0.00007 ,0.00000
 744      +,0.06660 ,0.00506  ,0.02526 ,0.00041 ,0.00007 ,0.00000
 745      +,0.05843 ,0.00434  ,0.01820 ,0.00037 ,0.00007 ,0.00000
 746      +,0.05185 ,0.00378  ,0.01350 ,0.00033 ,0.00007 ,0.00000
 747      +,0.04644 ,0.00332  ,0.01025 ,0.00029 ,0.00006 ,0.00001
 748      +,0.04191 ,0.00295  ,0.00794 ,0.00026 ,0.00006 ,0.00001
 749      +,0.03808 ,0.00263  ,0.00626 ,0.00023 ,0.00006 ,0.00001
 750      +,0.03480 ,0.00237  ,0.00502 ,0.00021 ,0.00005 ,0.00001
 751      +,0.03196 ,0.00215  ,0.00408 ,0.00019 ,0.00005 ,0.00001
 752      +,0.02949 ,0.00196  ,0.00336 ,0.00018 ,0.00004 ,0.00001
 753      +,0.02732 ,0.00179  ,0.00280 ,0.00016 ,0.00004 ,0.00001
 754      +,0.02541 ,0.00165  ,0.00235 ,0.00015 ,0.00004 ,0.00001
 755      +,0.02370 ,0.00152  ,0.00200 ,0.00014 ,0.00003 ,0.00001
 756      +,0.02218 ,0.00141  ,0.00171 ,0.00013 ,0.00003 ,0.00001
 757      +,0.02082 ,0.00131  ,0.00148 ,0.00012 ,0.00003 ,0.00001
 758      +,0.01959 ,0.00122  ,0.00129 ,0.00011 ,0.00003 ,0.00001
 759      +,0.01848 ,0.00114  ,0.00113 ,0.00010 ,0.00003 ,0.00001/
 760       DATA ((F(I,38,K),I=1,6),K=1,19)/
 761      + 0.07021 ,0.00428  ,0.04936 ,0.00028 ,0.00001 ,0.00000
 762      +,0.05695 ,0.00335  ,0.02954 ,0.00023 ,0.00002 ,0.00000
 763      +,0.04747 ,0.00271  ,0.01887 ,0.00020 ,0.00002 ,0.00000
 764      +,0.04039 ,0.00225  ,0.01267 ,0.00017 ,0.00002 ,0.00000
 765      +,0.03493 ,0.00190  ,0.00886 ,0.00015 ,0.00002 ,0.00000
 766      +,0.03061 ,0.00164  ,0.00639 ,0.00013 ,0.00002 ,0.00000
 767      +,0.02710 ,0.00142  ,0.00474 ,0.00012 ,0.00002 ,0.00000
 768      +,0.02419 ,0.00125  ,0.00359 ,0.00010 ,0.00002 ,0.00000
 769      +,0.02176 ,0.00111  ,0.00278 ,0.00009 ,0.00002 ,0.00000
 770      +,0.01970 ,0.00099  ,0.00218 ,0.00008 ,0.00002 ,0.00000
 771      +,0.01794 ,0.00089  ,0.00174 ,0.00007 ,0.00002 ,0.00000
 772      +,0.01642 ,0.00080  ,0.00141 ,0.00007 ,0.00001 ,0.00000
 773      +,0.01510 ,0.00073  ,0.00116 ,0.00006 ,0.00001 ,0.00000
 774      +,0.01395 ,0.00067  ,0.00096 ,0.00006 ,0.00001 ,0.00000
 775      +,0.01293 ,0.00061  ,0.00081 ,0.00005 ,0.00001 ,0.00000
 776      +,0.01203 ,0.00056  ,0.00069 ,0.00005 ,0.00001 ,0.00000
 777      +,0.01122 ,0.00052  ,0.00059 ,0.00004 ,0.00001 ,0.00000
 778      +,0.01050 ,0.00048  ,0.00051 ,0.00004 ,0.00001 ,0.00000
 779      +,0.00985 ,0.00045  ,0.00045 ,0.00004 ,0.00001 ,0.00000/
 780       DATA ((F(I,39,K),I=1,6),K=1,19)/
 781      + 0.04023 ,0.00172  ,0.02478 ,0.00011 ,0.00000 ,0.00000
 782      +,0.03184 ,0.00132  ,0.01410 ,0.00009 ,0.00000 ,0.00000
 783      +,0.02599 ,0.00105  ,0.00862 ,0.00007 ,0.00001 ,0.00000
 784      +,0.02172 ,0.00085  ,0.00557 ,0.00006 ,0.00001 ,0.00000
 785      +,0.01848 ,0.00071  ,0.00376 ,0.00005 ,0.00001 ,0.00000
 786      +,0.01596 ,0.00060  ,0.00264 ,0.00005 ,0.00001 ,0.00000
 787      +,0.01395 ,0.00052  ,0.00190 ,0.00004 ,0.00001 ,0.00000
 788      +,0.01230 ,0.00045  ,0.00141 ,0.00003 ,0.00000 ,0.00000
 789      +,0.01094 ,0.00039  ,0.00106 ,0.00003 ,0.00000 ,0.00000
 790      +,0.00981 ,0.00035  ,0.00082 ,0.00003 ,0.00000 ,0.00000
 791      +,0.00885 ,0.00031  ,0.00064 ,0.00002 ,0.00000 ,0.00000
 792      +,0.00803 ,0.00028  ,0.00051 ,0.00002 ,0.00000 ,0.00000
 793      +,0.00733 ,0.00025  ,0.00042 ,0.00002 ,0.00000 ,0.00000
 794      +,0.00672 ,0.00023  ,0.00034 ,0.00002 ,0.00000 ,0.00000
 795      +,0.00619 ,0.00021  ,0.00029 ,0.00002 ,0.00000 ,0.00000
 796      +,0.00572 ,0.00019  ,0.00024 ,0.00001 ,0.00000 ,0.00000
 797      +,0.00531 ,0.00017  ,0.00021 ,0.00001 ,0.00000 ,0.00000
 798      +,0.00494 ,0.00016  ,0.00018 ,0.00001 ,0.00000 ,0.00000
 799      +,0.00462 ,0.00015  ,0.00016 ,0.00001 ,0.00000 ,0.00000/
 800       DATA ((F(I,40,K),I=1,6),K=1,19)/
 801      + 0.01949 ,0.00056  ,0.01050 ,0.00003 ,0.00000 ,0.00000
 802      +,0.01498 ,0.00042  ,0.00563 ,0.00003 ,0.00000 ,0.00000
 803      +,0.01193 ,0.00032  ,0.00327 ,0.00002 ,0.00000 ,0.00000
 804      +,0.00976 ,0.00026  ,0.00202 ,0.00002 ,0.00000 ,0.00000
 805      +,0.00815 ,0.00021  ,0.00131 ,0.00001 ,0.00000 ,0.00000
 806      +,0.00692 ,0.00018  ,0.00089 ,0.00001 ,0.00000 ,0.00000
 807      +,0.00595 ,0.00015  ,0.00062 ,0.00001 ,0.00000 ,0.00000
 808      +,0.00517 ,0.00013  ,0.00045 ,0.00001 ,0.00000 ,0.00000
 809      +,0.00454 ,0.00011  ,0.00033 ,0.00001 ,0.00000 ,0.00000
 810      +,0.00402 ,0.00010  ,0.00025 ,0.00001 ,0.00000 ,0.00000
 811      +,0.00358 ,0.00009  ,0.00019 ,0.00001 ,0.00000 ,0.00000
 812      +,0.00322 ,0.00008  ,0.00015 ,0.00001 ,0.00000 ,0.00000
 813      +,0.00291 ,0.00007  ,0.00012 ,0.00000 ,0.00000 ,0.00000
 814      +,0.00265 ,0.00006  ,0.00010 ,0.00000 ,0.00000 ,0.00000
 815      +,0.00243 ,0.00005  ,0.00008 ,0.00000 ,0.00000 ,0.00000
 816      +,0.00224 ,0.00005  ,0.00007 ,0.00000 ,0.00000 ,0.00000
 817      +,0.00208 ,0.00004  ,0.00006 ,0.00000 ,0.00000 ,0.00000
 818      +,0.00193 ,0.00004  ,0.00006 ,0.00000 ,0.00000 ,0.00000
 819      +,0.00181 ,0.00004  ,0.00005 ,0.00000 ,0.00000 ,0.00000/
 820       DATA ((F(I,41,K),I=1,6),K=1,19)/
 821      + 0.00092 ,0.00002  ,0.00068 ,0.00000 ,0.00000 ,0.00000
 822      +,0.00065 ,0.00001  ,0.00031 ,0.00000 ,0.00000 ,0.00000
 823      +,0.00050 ,0.00001  ,0.00015 ,0.00000 ,0.00000 ,0.00000
 824      +,0.00041 ,0.00001  ,0.00008 ,0.00000 ,0.00000 ,0.00000
 825      +,0.00036 ,0.00000  ,0.00005 ,0.00000 ,0.00000 ,0.00000
 826      +,0.00032 ,0.00000  ,0.00003 ,0.00000 ,0.00000 ,0.00000
 827      +,0.00031 ,0.00000  ,0.00002 ,0.00000 ,0.00000 ,0.00000
 828      +,0.00030 ,0.00000  ,0.00002 ,0.00000 ,0.00000 ,0.00000
 829      +,0.00030 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 830      +,0.00031 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 831      +,0.00032 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 832      +,0.00033 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 833      +,0.00035 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 834      +,0.00037 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 835      +,0.00039 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 836      +,0.00041 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 837      +,0.00044 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 838      +,0.00046 ,0.00000  ,0.00001 ,0.00000 ,0.00000 ,0.00000
 839      +,0.00049 ,0.00000  ,0.00001 ,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(62,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