| 21886bb6 |
1 | * |
| 2 | * $Id$ |
| 3 | * |
| 4 | * $Log$ |
| 5 | * Revision 1.1.1.2 1996/10/30 08:31:49 cernlib |
| 6 | * Version 7.04 |
| 7 | * |
| 8 | * Revision 1.1.1.1 1996/04/12 15:30:05 plothow |
| 9 | * Version 7.01 |
| 10 | * |
| 11 | * |
| 12 | #include "pdf/pilot.h" |
| 13 | C----------------------------------------------------------------------- |
| 14 | SUBROUTINE STRUCB(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GL) |
| 15 | C :::::::::::: MARTIN ROBERTS STIRLING :::::SOFT GLUE::::228 MEV::: |
| 16 | #include "pdf/impdp.inc" |
| 17 | PARAMETER(NX=42) |
| 18 | PARAMETER(NTENTH=21) |
| 19 | DIMENSION F(6,NX,19),G(6),XX(NX),N0(6) |
| 20 | DATA ((F(I,1,K),I=1,6),K=1,19)/ |
| 21 | + 0.00961 ,0.00603 ,4.74673 ,0.20606 ,0.03441 ,0.00000 |
| 22 | +,0.01096 ,0.00683 ,13.79210 ,0.40476 ,0.18365 ,0.00000 |
| 23 | +,0.01221 ,0.00756 ,23.93182 ,0.67022 ,0.38290 ,0.00000 |
| 24 | +,0.01339 ,0.00825 ,34.69507 ,0.98901 ,0.62211 ,-0.00001 |
| 25 | +,0.01450 ,0.00890 ,45.48036 ,1.33340 ,0.88709 ,0.02645 |
| 26 | +,0.01556 ,0.00951 ,56.38562 ,1.65006 ,1.17500 ,0.22791 |
| 27 | +,0.01657 ,0.01010 ,67.30421 ,1.94477 ,1.48094 ,0.56738 |
| 28 | +,0.01754 ,0.01067 ,78.17290 ,2.26090 ,1.80110 ,0.89956 |
| 29 | +,0.01848 ,0.01121 ,88.94685 ,2.58742 ,2.13237 ,1.24500 |
| 30 | +,0.01939 ,0.01174 ,99.56996 ,2.92240 ,2.47151 ,1.59662 |
| 31 | +,0.02027 ,0.01224,109.88562 ,3.25939 ,2.81239 ,1.94915 |
| 32 | +,0.02112 ,0.01273,120.07144 ,3.60233 ,3.15892 ,2.30653 |
| 33 | +,0.02195 ,0.01321,130.14627 ,3.95093 ,3.51088 ,2.66862 |
| 34 | +,0.02275 ,0.01367,139.88661 ,4.29705 ,3.86013 ,3.02737 |
| 35 | +,0.02354 ,0.01412,149.43730 ,4.64451 ,4.21053 ,3.38670 |
| 36 | +,0.02430 ,0.01456,158.88370 ,4.99554 ,4.56434 ,3.74894 |
| 37 | +,0.02505 ,0.01499,167.92317 ,5.33897 ,4.91038 ,4.10295 |
| 38 | +,0.02578 ,0.01541,176.96330 ,5.68844 ,5.26233 ,4.46246 |
| 39 | +,0.02649 ,0.01581,185.57343 ,6.02818 ,5.60442 ,4.81174/ |
| 40 | DATA ((F(I,2,K),I=1,6),K=1,19)/ |
| 41 | + 0.01488 ,0.00923 ,4.44429 ,0.20538 ,0.03121 ,0.00000 |
| 42 | +,0.01682 ,0.01035 ,11.49449 ,0.37597 ,0.15932 ,0.00000 |
| 43 | +,0.01861 ,0.01139 ,18.93008 ,0.59102 ,0.32074 ,0.00000 |
| 44 | +,0.02027 ,0.01235 ,26.53142 ,0.83889 ,0.50674 ,0.00000 |
| 45 | +,0.02183 ,0.01324 ,33.93573 ,1.09861 ,0.70655 ,0.01977 |
| 46 | +,0.02330 ,0.01409 ,41.24933 ,1.33160 ,0.91836 ,0.16777 |
| 47 | +,0.02470 ,0.01489 ,48.42468 ,1.54346 ,1.13884 ,0.41390 |
| 48 | +,0.02604 ,0.01565 ,55.43896 ,1.76689 ,1.36552 ,0.65015 |
| 49 | +,0.02733 ,0.01639 ,62.27953 ,1.99406 ,1.59645 ,0.89221 |
| 50 | +,0.02857 ,0.01709 ,68.92375 ,2.22392 ,1.82962 ,1.13521 |
| 51 | +,0.02976 ,0.01777 ,75.28267 ,2.45226 ,2.06106 ,1.37583 |
| 52 | +,0.03091 ,0.01842 ,81.48285 ,2.68202 ,2.29370 ,1.61702 |
| 53 | +,0.03202 ,0.01906 ,87.54489 ,2.91318 ,2.52755 ,1.85886 |
| 54 | +,0.03310 ,0.01967 ,93.33434 ,3.14044 ,2.75733 ,2.09613 |
| 55 | +,0.03415 ,0.02026 ,98.95088 ,3.36655 ,2.98580 ,2.33165 |
| 56 | +,0.03517 ,0.02084,104.45407 ,3.59311 ,3.21461 ,2.56712 |
| 57 | +,0.03616 ,0.02139,109.66013 ,3.81290 ,3.43650 ,2.79532 |
| 58 | +,0.03712 ,0.02194,114.82828 ,4.03502 ,3.66064 ,3.02544 |
| 59 | +,0.03806 ,0.02246,119.69576 ,4.24929 ,3.87681 ,3.24729/ |
| 60 | DATA ((F(I,3,K),I=1,6),K=1,19)/ |
| 61 | + 0.02304 ,0.01411 ,4.15990 ,0.20405 ,0.02795 ,0.00000 |
| 62 | +,0.02581 ,0.01570 ,9.57815 ,0.34867 ,0.13657 ,0.00000 |
| 63 | +,0.02834 ,0.01714 ,14.96934 ,0.52085 ,0.26585 ,0.00000 |
| 64 | +,0.03067 ,0.01847 ,20.27985 ,0.71142 ,0.40890 ,0.00000 |
| 65 | +,0.03284 ,0.01969 ,25.30734 ,0.90518 ,0.55798 ,0.01463 |
| 66 | +,0.03487 ,0.02084 ,30.15602 ,1.07476 ,0.71220 ,0.12235 |
| 67 | +,0.03679 ,0.02193 ,34.81412 ,1.22538 ,0.86947 ,0.29918 |
| 68 | +,0.03863 ,0.02296 ,39.28276 ,1.38157 ,1.02833 ,0.46569 |
| 69 | +,0.04038 ,0.02394 ,43.56674 ,1.53787 ,1.18766 ,0.63377 |
| 70 | +,0.04205 ,0.02488 ,47.66211 ,1.69383 ,1.34631 ,0.80017 |
| 71 | +,0.04365 ,0.02578 ,51.52116 ,1.84680 ,1.50179 ,0.96290 |
| 72 | +,0.04519 ,0.02664 ,55.23373 ,1.99896 ,1.65630 ,1.12415 |
| 73 | +,0.04668 ,0.02747 ,58.81915 ,2.15046 ,1.81000 ,1.28416 |
| 74 | +,0.04812 ,0.02827 ,62.19774 ,2.29789 ,1.95950 ,1.43958 |
| 75 | +,0.04950 ,0.02904 ,65.43773 ,2.44322 ,2.10678 ,1.59243 |
| 76 | +,0.05085 ,0.02978 ,68.58063 ,2.58765 ,2.25305 ,1.74398 |
| 77 | +,0.05214 ,0.03050 ,71.51546 ,2.72652 ,2.39367 ,1.88959 |
| 78 | +,0.05341 ,0.03120 ,74.40666 ,2.86590 ,2.53472 ,2.03538 |
| 79 | +,0.05463 ,0.03188 ,77.09471 ,2.99924 ,2.66964 ,2.17480/ |
| 80 | DATA ((F(I,4,K),I=1,6),K=1,19)/ |
| 81 | + 0.02974 ,0.01809 ,4.00109 ,0.20284 ,0.02601 ,0.00000 |
| 82 | +,0.03314 ,0.02002 ,8.60778 ,0.33320 ,0.12396 ,0.00000 |
| 83 | +,0.03623 ,0.02176 ,13.04550 ,0.48338 ,0.23676 ,0.00000 |
| 84 | +,0.03906 ,0.02336 ,17.32387 ,0.64576 ,0.35870 ,0.00000 |
| 85 | +,0.04168 ,0.02483 ,21.30655 ,0.80800 ,0.48358 ,0.01221 |
| 86 | +,0.04413 ,0.02620 ,25.09286 ,0.94795 ,0.61093 ,0.10120 |
| 87 | +,0.04643 ,0.02749 ,28.68440 ,1.07053 ,0.73925 ,0.24620 |
| 88 | +,0.04862 ,0.02871 ,32.09038 ,1.19640 ,0.86754 ,0.38121 |
| 89 | +,0.05070 ,0.02987 ,35.32127 ,1.32119 ,0.99503 ,0.51630 |
| 90 | +,0.05269 ,0.03097 ,38.37978 ,1.44468 ,1.12094 ,0.64897 |
| 91 | +,0.05459 ,0.03202 ,41.23372 ,1.56488 ,1.24340 ,0.77774 |
| 92 | +,0.05641 ,0.03302 ,43.95631 ,1.68364 ,1.36427 ,0.90449 |
| 93 | +,0.05816 ,0.03399 ,46.56557 ,1.80114 ,1.48376 ,1.02948 |
| 94 | +,0.05984 ,0.03492 ,49.00311 ,1.91478 ,1.59927 ,1.15016 |
| 95 | +,0.06146 ,0.03581 ,51.32353 ,2.02619 ,1.71245 ,1.26821 |
| 96 | +,0.06304 ,0.03668 ,53.56015 ,2.13636 ,1.82430 ,1.38466 |
| 97 | +,0.06455 ,0.03750 ,55.63080 ,2.24172 ,1.93125 ,1.49596 |
| 98 | +,0.06602 ,0.03831 ,57.66109 ,2.34703 ,2.03807 ,1.60693 |
| 99 | +,0.06744 ,0.03909 ,59.53226 ,2.44726 ,2.13975 ,1.71254/ |
| 100 | DATA ((F(I,5,K),I=1,6),K=1,19)/ |
| 101 | + 0.03564 ,0.02157 ,3.89144 ,0.20174 ,0.02462 ,0.00000 |
| 102 | +,0.03957 ,0.02378 ,7.97880 ,0.32239 ,0.11532 ,0.00000 |
| 103 | +,0.04311 ,0.02577 ,11.83041 ,0.45820 ,0.21738 ,0.00000 |
| 104 | +,0.04636 ,0.02759 ,15.48785 ,0.60265 ,0.32591 ,0.00000 |
| 105 | +,0.04934 ,0.02925 ,18.85153 ,0.74522 ,0.43570 ,0.01071 |
| 106 | +,0.05213 ,0.03080 ,22.01633 ,0.86694 ,0.54654 ,0.08821 |
| 107 | +,0.05475 ,0.03225 ,24.99049 ,0.97249 ,0.65729 ,0.21384 |
| 108 | +,0.05722 ,0.03362 ,27.78709 ,1.08010 ,0.76717 ,0.32988 |
| 109 | +,0.05957 ,0.03492 ,30.41948 ,1.18609 ,0.87568 ,0.44527 |
| 110 | +,0.06181 ,0.03616 ,32.89311 ,1.29036 ,0.98220 ,0.55793 |
| 111 | +,0.06394 ,0.03733 ,35.18434 ,1.39129 ,1.08525 ,0.66671 |
| 112 | +,0.06598 ,0.03845 ,37.35651 ,1.49051 ,1.18646 ,0.77326 |
| 113 | +,0.06794 ,0.03952 ,39.42613 ,1.58825 ,1.28606 ,0.87786 |
| 114 | +,0.06982 ,0.04055 ,41.34689 ,1.68236 ,1.38193 ,0.97842 |
| 115 | +,0.07163 ,0.04153 ,43.16516 ,1.77425 ,1.47549 ,1.07639 |
| 116 | +,0.07338 ,0.04249 ,44.90941 ,1.86479 ,1.56761 ,1.17269 |
| 117 | +,0.07506 ,0.04340 ,46.51332 ,1.95102 ,1.65534 ,1.26439 |
| 118 | +,0.07670 ,0.04429 ,48.08047 ,2.03697 ,1.74272 ,1.35553 |
| 119 | +,0.07826 ,0.04514 ,49.51465 ,2.11845 ,1.82558 ,1.44196/ |
| 120 | DATA ((F(I,6,K),I=1,6),K=1,19)/ |
| 121 | + 0.04100 ,0.02472 ,3.80797 ,0.20072 ,0.02353 ,0.00000 |
| 122 | +,0.04539 ,0.02718 ,7.52221 ,0.31405 ,0.10878 ,0.00000 |
| 123 | +,0.04933 ,0.02938 ,10.96498 ,0.43938 ,0.20302 ,0.00000 |
| 124 | +,0.05294 ,0.03138 ,14.19605 ,0.57102 ,0.30198 ,0.00000 |
| 125 | +,0.05624 ,0.03322 ,17.13951 ,0.69972 ,0.40114 ,0.00965 |
| 126 | +,0.05931 ,0.03491 ,19.88622 ,0.80871 ,0.50047 ,0.07916 |
| 127 | +,0.06219 ,0.03650 ,22.44836 ,0.90248 ,0.59906 ,0.19138 |
| 128 | +,0.06491 ,0.03800 ,24.84126 ,0.99756 ,0.69633 ,0.29439 |
| 129 | +,0.06749 ,0.03941 ,27.07948 ,1.09072 ,0.79188 ,0.39632 |
| 130 | +,0.06994 ,0.04076 ,29.17035 ,1.18194 ,0.88526 ,0.49540 |
| 131 | +,0.07226 ,0.04203 ,31.09544 ,1.26986 ,0.97520 ,0.59066 |
| 132 | +,0.07449 ,0.04324 ,32.91112 ,1.35596 ,1.06320 ,0.68361 |
| 133 | +,0.07663 ,0.04440 ,34.63298 ,1.44046 ,1.14949 ,0.77455 |
| 134 | +,0.07867 ,0.04551 ,36.22231 ,1.52155 ,1.23227 ,0.86168 |
| 135 | +,0.08063 ,0.04658 ,37.71980 ,1.60047 ,1.31279 ,0.94630 |
| 136 | +,0.08253 ,0.04761 ,39.15071 ,1.67801 ,1.39185 ,1.02925 |
| 137 | +,0.08435 ,0.04859 ,40.45906 ,1.75163 ,1.46691 ,1.10798 |
| 138 | +,0.08612 ,0.04954 ,41.73373 ,1.82482 ,1.54149 ,1.18606 |
| 139 | +,0.08781 ,0.05046 ,42.89342 ,1.89400 ,1.61199 ,1.25989/ |
| 140 | DATA ((F(I,7,K),I=1,6),K=1,19)/ |
| 141 | + 0.06331 ,0.03770 ,3.55598 ,0.19639 ,0.02014 ,0.00000 |
| 142 | +,0.06943 ,0.04107 ,6.26031 ,0.28823 ,0.08946 ,0.00000 |
| 143 | +,0.07486 ,0.04405 ,8.65059 ,0.38443 ,0.16203 ,0.00000 |
| 144 | +,0.07977 ,0.04674 ,10.81334 ,0.48166 ,0.23535 ,0.00000 |
| 145 | +,0.08424 ,0.04917 ,12.72425 ,0.57397 ,0.30669 ,0.00692 |
| 146 | +,0.08835 ,0.05140 ,14.45992 ,0.65015 ,0.37645 ,0.05595 |
| 147 | +,0.09219 ,0.05347 ,16.03955 ,0.71403 ,0.44427 ,0.13412 |
| 148 | +,0.09578 ,0.05541 ,17.48148 ,0.77772 ,0.50997 ,0.20449 |
| 149 | +,0.09916 ,0.05723 ,18.80179 ,0.83909 ,0.57348 ,0.27306 |
| 150 | +,0.10236 ,0.05894 ,20.01035 ,0.89830 ,0.63463 ,0.33875 |
| 151 | +,0.10537 ,0.06056 ,21.09975 ,0.95456 ,0.69274 ,0.40109 |
| 152 | +,0.10824 ,0.06209 ,22.10910 ,1.00898 ,0.74889 ,0.46118 |
| 153 | +,0.11099 ,0.06355 ,23.05072 ,1.06178 ,0.80332 ,0.51932 |
| 154 | +,0.11359 ,0.06493 ,23.90268 ,1.11186 ,0.85495 ,0.57442 |
| 155 | +,0.11608 ,0.06625 ,24.69220 ,1.16009 ,0.90466 ,0.62740 |
| 156 | +,0.11848 ,0.06752 ,25.43613 ,1.20704 ,0.95302 ,0.67885 |
| 157 | +,0.12077 ,0.06873 ,26.10156 ,1.25114 ,0.99845 ,0.72722 |
| 158 | +,0.12299 ,0.06990 ,26.74364 ,1.29465 ,1.04326 ,0.77481 |
| 159 | +,0.12510 ,0.07101 ,27.31422 ,1.33535 ,1.08519 ,0.81939/ |
| 160 | DATA ((F(I,8,K),I=1,6),K=1,19)/ |
| 161 | + 0.09748 ,0.05732 ,3.31097 ,0.18985 ,0.01676 ,0.00000 |
| 162 | +,0.10580 ,0.06181 ,5.20195 ,0.26198 ,0.07164 ,0.00000 |
| 163 | +,0.11311 ,0.06574 ,6.80476 ,0.33369 ,0.12614 ,0.00000 |
| 164 | +,0.11964 ,0.06922 ,8.20082 ,0.40345 ,0.17914 ,0.00000 |
| 165 | +,0.12550 ,0.07234 ,9.39323 ,0.46776 ,0.22923 ,0.00486 |
| 166 | +,0.13086 ,0.07518 ,10.44347 ,0.51936 ,0.27700 ,0.03871 |
| 167 | +,0.13581 ,0.07779 ,11.37206 ,0.56142 ,0.32245 ,0.09204 |
| 168 | +,0.14041 ,0.08021 ,12.19679 ,0.60261 ,0.36566 ,0.13906 |
| 169 | +,0.14471 ,0.08247 ,12.93254 ,0.64159 ,0.40671 ,0.18416 |
| 170 | +,0.14874 ,0.08457 ,13.58909 ,0.67860 ,0.44562 ,0.22672 |
| 171 | +,0.15251 ,0.08653 ,14.16474 ,0.71323 ,0.48204 ,0.26653 |
| 172 | +,0.15608 ,0.08838 ,14.68590 ,0.74625 ,0.51677 ,0.30442 |
| 173 | +,0.15947 ,0.09014 ,15.16173 ,0.77790 ,0.55002 ,0.34064 |
| 174 | +,0.16267 ,0.09179 ,15.58031 ,0.80750 ,0.58116 ,0.37456 |
| 175 | +,0.16571 ,0.09335 ,15.95924 ,0.83568 ,0.61080 ,0.40682 |
| 176 | +,0.16863 ,0.09485 ,16.30945 ,0.86284 ,0.63934 ,0.43784 |
| 177 | +,0.17138 ,0.09626 ,16.61215 ,0.88800 ,0.66584 ,0.46668 |
| 178 | +,0.17405 ,0.09762 ,16.90060 ,0.91263 ,0.69175 ,0.49483 |
| 179 | +,0.17657 ,0.09891 ,17.14687 ,0.93537 ,0.71572 ,0.52092/ |
| 180 | DATA ((F(I,9,K),I=1,6),K=1,19)/ |
| 181 | + 0.12517 ,0.07304 ,3.16782 ,0.18474 ,0.01482 ,0.00000 |
| 182 | +,0.13496 ,0.07825 ,4.66178 ,0.24621 ,0.06197 ,0.00000 |
| 183 | +,0.14348 ,0.08275 ,5.89905 ,0.30548 ,0.10740 ,0.00000 |
| 184 | +,0.15103 ,0.08672 ,6.95063 ,0.36186 ,0.15059 ,0.00000 |
| 185 | +,0.15776 ,0.09023 ,7.82827 ,0.41290 ,0.19069 ,0.00390 |
| 186 | +,0.16387 ,0.09341 ,8.58482 ,0.45310 ,0.22836 ,0.03080 |
| 187 | +,0.16948 ,0.09632 ,9.24002 ,0.48523 ,0.26372 ,0.07285 |
| 188 | +,0.17467 ,0.09899 ,9.81034 ,0.51634 ,0.29693 ,0.10948 |
| 189 | +,0.17948 ,0.10146 ,10.30921 ,0.54545 ,0.32813 ,0.14424 |
| 190 | +,0.18398 ,0.10376 ,10.74565 ,0.57278 ,0.35741 ,0.17673 |
| 191 | +,0.18816 ,0.10589 ,11.11981 ,0.59808 ,0.38455 ,0.20686 |
| 192 | +,0.19210 ,0.10789 ,11.45221 ,0.62199 ,0.41020 ,0.23529 |
| 193 | +,0.19582 ,0.10977 ,11.75034 ,0.64471 ,0.43457 ,0.26227 |
| 194 | +,0.19932 ,0.11153 ,12.00604 ,0.66576 ,0.45718 ,0.28733 |
| 195 | +,0.20263 ,0.11320 ,12.23267 ,0.68563 ,0.47855 ,0.31100 |
| 196 | +,0.20580 ,0.11478 ,12.43855 ,0.70464 ,0.49899 ,0.33363 |
| 197 | +,0.20877 ,0.11627 ,12.61033 ,0.72208 ,0.51781 ,0.35450 |
| 198 | +,0.21164 ,0.11770 ,12.77227 ,0.73908 ,0.53611 ,0.37476 |
| 199 | +,0.21434 ,0.11904 ,12.90444 ,0.75459 ,0.55289 ,0.39341/ |
| 200 | DATA ((F(I,10,K),I=1,6),K=1,19)/ |
| 201 | + 0.14920 ,0.08657 ,3.06677 ,0.18082 ,0.01351 ,0.00000 |
| 202 | +,0.16002 ,0.09225 ,4.31332 ,0.23524 ,0.05562 ,0.00000 |
| 203 | +,0.16936 ,0.09712 ,5.32473 ,0.28656 ,0.09529 ,0.00000 |
| 204 | +,0.17759 ,0.10138 ,6.16670 ,0.33454 ,0.13237 ,0.00000 |
| 205 | +,0.18488 ,0.10513 ,6.85556 ,0.37734 ,0.16632 ,0.00331 |
| 206 | +,0.19146 ,0.10849 ,7.43841 ,0.41053 ,0.19782 ,0.02597 |
| 207 | +,0.19747 ,0.11155 ,7.93402 ,0.43662 ,0.22709 ,0.06119 |
| 208 | +,0.20300 ,0.11435 ,8.35765 ,0.46165 ,0.25430 ,0.09156 |
| 209 | +,0.20810 ,0.11692 ,8.72154 ,0.48484 ,0.27966 ,0.12015 |
| 210 | +,0.21285 ,0.11930 ,9.03396 ,0.50643 ,0.30325 ,0.14668 |
| 211 | +,0.21724 ,0.12149 ,9.29576 ,0.52622 ,0.32494 ,0.17110 |
| 212 | +,0.22136 ,0.12353 ,9.52407 ,0.54479 ,0.34530 ,0.19399 |
| 213 | +,0.22524 ,0.12545 ,9.72514 ,0.56230 ,0.36451 ,0.21558 |
| 214 | +,0.22886 ,0.12724 ,9.89275 ,0.57839 ,0.38222 ,0.23552 |
| 215 | +,0.23229 ,0.12892 ,10.03788 ,0.59347 ,0.39884 ,0.25424 |
| 216 | +,0.23555 ,0.13052 ,10.16718 ,0.60781 ,0.41466 ,0.27204 |
| 217 | +,0.23860 ,0.13200 ,10.27027 ,0.62085 ,0.42911 ,0.28837 |
| 218 | +,0.24154 ,0.13343 ,10.36623 ,0.63350 ,0.44311 ,0.30416 |
| 219 | +,0.24429 ,0.13476 ,10.43972 ,0.64494 ,0.45586 ,0.31860/ |
| 220 | DATA ((F(I,11,K),I=1,6),K=1,19)/ |
| 221 | + 0.17075 ,0.09863 ,2.98778 ,0.17764 ,0.01253 ,0.00000 |
| 222 | +,0.18230 ,0.10462 ,4.06061 ,0.22691 ,0.05099 ,0.00000 |
| 223 | +,0.19221 ,0.10971 ,4.91322 ,0.27250 ,0.08656 ,0.00000 |
| 224 | +,0.20088 ,0.11413 ,5.60962 ,0.31451 ,0.11932 ,0.00000 |
| 225 | +,0.20852 ,0.11800 ,6.16891 ,0.35152 ,0.14896 ,0.00290 |
| 226 | +,0.21538 ,0.12145 ,6.63392 ,0.37980 ,0.17618 ,0.02261 |
| 227 | +,0.22161 ,0.12457 ,7.02242 ,0.40169 ,0.20124 ,0.05309 |
| 228 | +,0.22732 ,0.12740 ,7.34859 ,0.42253 ,0.22435 ,0.07915 |
| 229 | +,0.23257 ,0.13000 ,7.62366 ,0.44167 ,0.24571 ,0.10352 |
| 230 | +,0.23742 ,0.13238 ,7.85527 ,0.45934 ,0.26545 ,0.12599 |
| 231 | +,0.24190 ,0.13457 ,8.04465 ,0.47540 ,0.28347 ,0.14654 |
| 232 | +,0.24607 ,0.13660 ,8.20636 ,0.49036 ,0.30028 ,0.16571 |
| 233 | +,0.25000 ,0.13850 ,8.34583 ,0.50438 ,0.31605 ,0.18368 |
| 234 | +,0.25365 ,0.14026 ,8.45816 ,0.51715 ,0.33048 ,0.20019 |
| 235 | +,0.25709 ,0.14191 ,8.55251 ,0.52905 ,0.34396 ,0.21562 |
| 236 | +,0.26036 ,0.14346 ,8.63445 ,0.54029 ,0.35673 ,0.23023 |
| 237 | +,0.26339 ,0.14490 ,8.69555 ,0.55043 ,0.36832 ,0.24355 |
| 238 | +,0.26631 ,0.14628 ,8.75144 ,0.56022 ,0.37951 ,0.25640 |
| 239 | +,0.26903 ,0.14756 ,8.78970 ,0.56899 ,0.38962 ,0.26807/ |
| 240 | DATA ((F(I,12,K),I=1,6),K=1,19)/ |
| 241 | + 0.25682 ,0.14604 ,2.70961 ,0.16371 ,0.00951 ,0.00000 |
| 242 | +,0.26992 ,0.15242 ,3.31845 ,0.19769 ,0.03730 ,0.00000 |
| 243 | +,0.28083 ,0.15765 ,3.76570 ,0.22726 ,0.06152 ,0.00000 |
| 244 | +,0.29015 ,0.16206 ,4.10327 ,0.25315 ,0.08279 ,0.00000 |
| 245 | +,0.29815 ,0.16580 ,4.35222 ,0.27493 ,0.10126 ,0.00184 |
| 246 | +,0.30518 ,0.16904 ,4.54225 ,0.29062 ,0.11763 ,0.01406 |
| 247 | +,0.31142 ,0.17188 ,4.68676 ,0.30196 ,0.13222 ,0.03264 |
| 248 | +,0.31702 ,0.17440 ,4.79590 ,0.31244 ,0.14528 ,0.04809 |
| 249 | +,0.32207 ,0.17664 ,4.87748 ,0.32171 ,0.15703 ,0.06219 |
| 250 | +,0.32664 ,0.17865 ,4.93666 ,0.32998 ,0.16760 ,0.07490 |
| 251 | +,0.33077 ,0.18043 ,4.97491 ,0.33721 ,0.17700 ,0.08628 |
| 252 | +,0.33455 ,0.18205 ,5.00032 ,0.34374 ,0.18556 ,0.09669 |
| 253 | +,0.33805 ,0.18353 ,5.01604 ,0.34967 ,0.19343 ,0.10627 |
| 254 | +,0.34123 ,0.18486 ,5.01981 ,0.35486 ,0.20044 ,0.11490 |
| 255 | +,0.34417 ,0.18607 ,5.01640 ,0.35953 ,0.20686 ,0.12282 |
| 256 | +,0.34693 ,0.18719 ,5.00867 ,0.36384 ,0.21283 ,0.13021 |
| 257 | +,0.34942 ,0.18819 ,4.99251 ,0.36752 ,0.21809 ,0.13682 |
| 258 | +,0.35180 ,0.18913 ,4.97562 ,0.37102 ,0.22310 ,0.14310 |
| 259 | +,0.35395 ,0.18996 ,4.95183 ,0.37396 ,0.22750 ,0.14871/ |
| 260 | DATA ((F(I,13,K),I=1,6),K=1,19)/ |
| 261 | + 0.37532 ,0.20892 ,2.34398 ,0.14200 ,0.00661 ,0.00000 |
| 262 | +,0.38685 ,0.21359 ,2.59826 ,0.16215 ,0.02494 ,0.00000 |
| 263 | +,0.39591 ,0.21710 ,2.75444 ,0.17832 ,0.03986 ,0.00000 |
| 264 | +,0.40323 ,0.21980 ,2.84958 ,0.19151 ,0.05223 ,0.00000 |
| 265 | +,0.40914 ,0.22186 ,2.90002 ,0.20182 ,0.06244 ,0.00105 |
| 266 | +,0.41405 ,0.22347 ,2.92327 ,0.20839 ,0.07109 ,0.00787 |
| 267 | +,0.41817 ,0.22472 ,2.92715 ,0.21239 ,0.07847 ,0.01802 |
| 268 | +,0.42165 ,0.22570 ,2.91733 ,0.21586 ,0.08481 ,0.02617 |
| 269 | +,0.42460 ,0.22645 ,2.89795 ,0.21867 ,0.09030 ,0.03339 |
| 270 | +,0.42710 ,0.22702 ,2.87154 ,0.22093 ,0.09505 ,0.03972 |
| 271 | +,0.42918 ,0.22739 ,2.83885 ,0.22266 ,0.09911 ,0.04523 |
| 272 | +,0.43096 ,0.22766 ,2.80351 ,0.22405 ,0.10268 ,0.05014 |
| 273 | +,0.43250 ,0.22783 ,2.76679 ,0.22517 ,0.10585 ,0.05455 |
| 274 | +,0.43375 ,0.22789 ,2.72761 ,0.22594 ,0.10856 ,0.05843 |
| 275 | +,0.43481 ,0.22787 ,2.68786 ,0.22650 ,0.11095 ,0.06190 |
| 276 | +,0.43572 ,0.22781 ,2.64861 ,0.22692 ,0.11310 ,0.06507 |
| 277 | +,0.43641 ,0.22765 ,2.60799 ,0.22707 ,0.11489 ,0.06782 |
| 278 | +,0.43704 ,0.22748 ,2.56909 ,0.22718 ,0.11657 ,0.07041 |
| 279 | +,0.43746 ,0.22723 ,2.52925 ,0.22705 ,0.11794 ,0.07263/ |
| 280 | DATA ((F(I,14,K),I=1,6),K=1,19)/ |
| 281 | + 0.45722 ,0.24978 ,2.06168 ,0.12388 ,0.00497 ,0.00000 |
| 282 | +,0.46489 ,0.25162 ,2.15793 ,0.13678 ,0.01832 ,0.00000 |
| 283 | +,0.47029 ,0.25255 ,2.19391 ,0.14643 ,0.02870 ,0.00000 |
| 284 | +,0.47416 ,0.25289 ,2.19600 ,0.15379 ,0.03697 ,0.00000 |
| 285 | +,0.47683 ,0.25279 ,2.17555 ,0.15908 ,0.04354 ,0.00070 |
| 286 | +,0.47868 ,0.25240 ,2.14331 ,0.16185 ,0.04892 ,0.00516 |
| 287 | +,0.47989 ,0.25179 ,2.10379 ,0.16294 ,0.05335 ,0.01172 |
| 288 | +,0.48060 ,0.25103 ,2.06008 ,0.16373 ,0.05705 ,0.01686 |
| 289 | +,0.48093 ,0.25014 ,2.01427 ,0.16413 ,0.06014 ,0.02131 |
| 290 | +,0.48094 ,0.24917 ,1.96762 ,0.16424 ,0.06273 ,0.02514 |
| 291 | +,0.48063 ,0.24809 ,1.92021 ,0.16407 ,0.06486 ,0.02840 |
| 292 | +,0.48013 ,0.24698 ,1.87387 ,0.16373 ,0.06667 ,0.03125 |
| 293 | +,0.47949 ,0.24585 ,1.82907 ,0.16328 ,0.06823 ,0.03377 |
| 294 | +,0.47866 ,0.24468 ,1.78496 ,0.16266 ,0.06950 ,0.03593 |
| 295 | +,0.47772 ,0.24348 ,1.74238 ,0.16196 ,0.07057 ,0.03784 |
| 296 | +,0.47674 ,0.24230 ,1.70174 ,0.16121 ,0.07150 ,0.03955 |
| 297 | +,0.47558 ,0.24108 ,1.66189 ,0.16034 ,0.07221 ,0.04100 |
| 298 | +,0.47444 ,0.23990 ,1.62431 ,0.15949 ,0.07286 ,0.04233 |
| 299 | +,0.47316 ,0.23868 ,1.58749 ,0.15854 ,0.07333 ,0.04346/ |
| 300 | DATA ((F(I,15,K),I=1,6),K=1,19)/ |
| 301 | + 0.51661 ,0.27685 ,1.82201 ,0.10815 ,0.00387 ,0.00000 |
| 302 | +,0.51951 ,0.27556 ,1.83065 ,0.11650 ,0.01399 ,-0.00001 |
| 303 | +,0.52064 ,0.27375 ,1.80458 ,0.12227 ,0.02158 ,0.00000 |
| 304 | +,0.52063 ,0.27166 ,1.76194 ,0.12631 ,0.02744 ,0.00000 |
| 305 | +,0.51977 ,0.26938 ,1.71001 ,0.12885 ,0.03195 ,0.00049 |
| 306 | +,0.51837 ,0.26702 ,1.65522 ,0.12963 ,0.03553 ,0.00362 |
| 307 | +,0.51657 ,0.26462 ,1.59980 ,0.12928 ,0.03839 ,0.00816 |
| 308 | +,0.51448 ,0.26221 ,1.54520 ,0.12879 ,0.04071 ,0.01165 |
| 309 | +,0.51218 ,0.25982 ,1.49234 ,0.12809 ,0.04259 ,0.01462 |
| 310 | +,0.50973 ,0.25744 ,1.44158 ,0.12724 ,0.04411 ,0.01713 |
| 311 | +,0.50713 ,0.25506 ,1.39269 ,0.12624 ,0.04530 ,0.01923 |
| 312 | +,0.50446 ,0.25273 ,1.34649 ,0.12519 ,0.04629 ,0.02104 |
| 313 | +,0.50178 ,0.25048 ,1.30300 ,0.12411 ,0.04710 ,0.02262 |
| 314 | +,0.49901 ,0.24824 ,1.26150 ,0.12296 ,0.04771 ,0.02395 |
| 315 | +,0.49624 ,0.24606 ,1.22233 ,0.12179 ,0.04820 ,0.02509 |
| 316 | +,0.49351 ,0.24394 ,1.18553 ,0.12063 ,0.04860 ,0.02611 |
| 317 | +,0.49071 ,0.24184 ,1.15034 ,0.11942 ,0.04887 ,0.02695 |
| 318 | +,0.48800 ,0.23983 ,1.11745 ,0.11826 ,0.04910 ,0.02771 |
| 319 | +,0.48522 ,0.23781 ,1.08592 ,0.11707 ,0.04921 ,0.02834/ |
| 320 | DATA ((F(I,16,K),I=1,6),K=1,19)/ |
| 321 | + 0.55971 ,0.29391 ,1.61216 ,0.09432 ,0.00306 ,0.00000 |
| 322 | +,0.55754 ,0.28950 ,1.56854 ,0.09962 ,0.01091 ,-0.00001 |
| 323 | +,0.55423 ,0.28502 ,1.50820 ,0.10289 ,0.01661 ,0.00000 |
| 324 | +,0.55030 ,0.28063 ,1.44298 ,0.10487 ,0.02089 ,0.00000 |
| 325 | +,0.54592 ,0.27634 ,1.37692 ,0.10578 ,0.02409 ,0.00036 |
| 326 | +,0.54136 ,0.27219 ,1.31346 ,0.10545 ,0.02656 ,0.00263 |
| 327 | +,0.53667 ,0.26819 ,1.25327 ,0.10435 ,0.02849 ,0.00590 |
| 328 | +,0.53192 ,0.26434 ,1.19672 ,0.10321 ,0.03000 ,0.00837 |
| 329 | +,0.52718 ,0.26063 ,1.14394 ,0.10198 ,0.03117 ,0.01043 |
| 330 | +,0.52248 ,0.25705 ,1.09476 ,0.10069 ,0.03210 ,0.01216 |
| 331 | +,0.51777 ,0.25358 ,1.04871 ,0.09934 ,0.03279 ,0.01358 |
| 332 | +,0.51315 ,0.25025 ,1.00605 ,0.09800 ,0.03333 ,0.01479 |
| 333 | +,0.50864 ,0.24706 ,0.96654 ,0.09668 ,0.03375 ,0.01582 |
| 334 | +,0.50416 ,0.24396 ,0.92955 ,0.09535 ,0.03404 ,0.01667 |
| 335 | +,0.49979 ,0.24098 ,0.89512 ,0.09403 ,0.03424 ,0.01740 |
| 336 | +,0.49555 ,0.23811 ,0.86314 ,0.09276 ,0.03438 ,0.01804 |
| 337 | +,0.49133 ,0.23532 ,0.83302 ,0.09147 ,0.03444 ,0.01855 |
| 338 | +,0.48728 ,0.23265 ,0.80507 ,0.09025 ,0.03448 ,0.01901 |
| 339 | +,0.48323 ,0.23003 ,0.77864 ,0.08903 ,0.03444 ,0.01938/ |
| 340 | DATA ((F(I,17,K),I=1,6),K=1,19)/ |
| 341 | + 0.59603 ,0.30454 ,1.38278 ,0.07932 ,0.00233 ,0.00001 |
| 342 | +,0.58753 ,0.29648 ,1.30184 ,0.08207 ,0.00815 ,0.00001 |
| 343 | +,0.57880 ,0.28899 ,1.21971 ,0.08336 ,0.01224 ,0.00001 |
| 344 | +,0.57017 ,0.28205 ,1.14229 ,0.08379 ,0.01520 ,0.00001 |
| 345 | +,0.56166 ,0.27559 ,1.07057 ,0.08351 ,0.01734 ,0.00026 |
| 346 | +,0.55343 ,0.26954 ,1.00542 ,0.08245 ,0.01895 ,0.00183 |
| 347 | +,0.54545 ,0.26387 ,0.94625 ,0.08092 ,0.02016 ,0.00407 |
| 348 | +,0.53773 ,0.25853 ,0.89253 ,0.07943 ,0.02106 ,0.00573 |
| 349 | +,0.53027 ,0.25348 ,0.84378 ,0.07793 ,0.02174 ,0.00710 |
| 350 | +,0.52309 ,0.24871 ,0.79944 ,0.07646 ,0.02224 ,0.00822 |
| 351 | +,0.51610 ,0.24417 ,0.75886 ,0.07499 ,0.02258 ,0.00913 |
| 352 | +,0.50939 ,0.23986 ,0.72192 ,0.07356 ,0.02283 ,0.00988 |
| 353 | +,0.50294 ,0.23578 ,0.68822 ,0.07219 ,0.02299 ,0.01052 |
| 354 | +,0.49668 ,0.23187 ,0.65717 ,0.07085 ,0.02308 ,0.01104 |
| 355 | +,0.49063 ,0.22814 ,0.62864 ,0.06955 ,0.02311 ,0.01146 |
| 356 | +,0.48484 ,0.22460 ,0.60241 ,0.06831 ,0.02311 ,0.01183 |
| 357 | +,0.47916 ,0.22118 ,0.57803 ,0.06708 ,0.02305 ,0.01212 |
| 358 | +,0.47374 ,0.21794 ,0.55557 ,0.06593 ,0.02298 ,0.01238 |
| 359 | +,0.46841 ,0.21479 ,0.53462 ,0.06479 ,0.02288 ,0.01257/ |
| 360 | DATA ((F(I,18,K),I=1,6),K=1,19)/ |
| 361 | + 0.61690 ,0.30599 ,1.18362 ,0.06646 ,0.00178 ,0.00001 |
| 362 | +,0.60235 ,0.29478 ,1.08386 ,0.06757 ,0.00614 ,0.00001 |
| 363 | +,0.58859 ,0.28473 ,0.99322 ,0.06767 ,0.00910 ,0.00001 |
| 364 | +,0.57567 ,0.27568 ,0.91319 ,0.06720 ,0.01120 ,0.00000 |
| 365 | +,0.56346 ,0.26746 ,0.84262 ,0.06630 ,0.01267 ,0.00019 |
| 366 | +,0.55200 ,0.25991 ,0.78069 ,0.06490 ,0.01373 ,0.00130 |
| 367 | +,0.54116 ,0.25296 ,0.72600 ,0.06324 ,0.01450 ,0.00286 |
| 368 | +,0.53090 ,0.24650 ,0.67749 ,0.06166 ,0.01505 ,0.00401 |
| 369 | +,0.52116 ,0.24048 ,0.63431 ,0.06013 ,0.01544 ,0.00494 |
| 370 | +,0.51190 ,0.23485 ,0.59571 ,0.05866 ,0.01570 ,0.00569 |
| 371 | +,0.50304 ,0.22954 ,0.56100 ,0.05723 ,0.01587 ,0.00628 |
| 372 | +,0.49462 ,0.22455 ,0.52979 ,0.05587 ,0.01596 ,0.00676 |
| 373 | +,0.48663 ,0.21987 ,0.50164 ,0.05458 ,0.01600 ,0.00717 |
| 374 | +,0.47894 ,0.21542 ,0.47603 ,0.05334 ,0.01599 ,0.00749 |
| 375 | +,0.47159 ,0.21120 ,0.45272 ,0.05215 ,0.01595 ,0.00776 |
| 376 | +,0.46460 ,0.20722 ,0.43147 ,0.05102 ,0.01589 ,0.00797 |
| 377 | +,0.45781 ,0.20341 ,0.41194 ,0.04993 ,0.01579 ,0.00814 |
| 378 | +,0.45137 ,0.19981 ,0.39404 ,0.04889 ,0.01569 ,0.00828 |
| 379 | +,0.44510 ,0.19633 ,0.37750 ,0.04789 ,0.01557 ,0.00839/ |
| 380 | DATA ((F(I,19,K),I=1,6),K=1,19)/ |
| 381 | + 0.62534 ,0.30038 ,1.01012 ,0.05544 ,0.00136 ,0.00001 |
| 382 | +,0.60525 ,0.28657 ,0.90277 ,0.05550 ,0.00465 ,0.00000 |
| 383 | +,0.58695 ,0.27449 ,0.81125 ,0.05487 ,0.00683 ,0.00000 |
| 384 | +,0.57026 ,0.26381 ,0.73375 ,0.05392 ,0.00831 ,0.00000 |
| 385 | +,0.55486 ,0.25426 ,0.66767 ,0.05271 ,0.00933 ,0.00013 |
| 386 | +,0.54063 ,0.24563 ,0.61111 ,0.05121 ,0.01004 ,0.00093 |
| 387 | +,0.52742 ,0.23774 ,0.56221 ,0.04958 ,0.01053 ,0.00204 |
| 388 | +,0.51505 ,0.23050 ,0.51960 ,0.04805 ,0.01086 ,0.00284 |
| 389 | +,0.50346 ,0.22382 ,0.48229 ,0.04661 ,0.01108 ,0.00348 |
| 390 | +,0.49256 ,0.21763 ,0.44941 ,0.04523 ,0.01122 ,0.00399 |
| 391 | +,0.48223 ,0.21184 ,0.42019 ,0.04392 ,0.01128 ,0.00438 |
| 392 | +,0.47250 ,0.20643 ,0.39421 ,0.04269 ,0.01130 ,0.00470 |
| 393 | +,0.46332 ,0.20138 ,0.37100 ,0.04153 ,0.01128 ,0.00496 |
| 394 | +,0.45457 ,0.19663 ,0.35011 ,0.04043 ,0.01123 ,0.00517 |
| 395 | +,0.44625 ,0.19215 ,0.33124 ,0.03938 ,0.01116 ,0.00533 |
| 396 | +,0.43837 ,0.18794 ,0.31415 ,0.03840 ,0.01107 ,0.00546 |
| 397 | +,0.43078 ,0.18392 ,0.29859 ,0.03745 ,0.01097 ,0.00556 |
| 398 | +,0.42360 ,0.18015 ,0.28441 ,0.03657 ,0.01087 ,0.00564 |
| 399 | +,0.41665 ,0.17653 ,0.27141 ,0.03571 ,0.01075 ,0.00569/ |
| 400 | DATA ((F(I,20,K),I=1,6),K=1,19)/ |
| 401 | + 0.62363 ,0.28940 ,0.85892 ,0.04602 ,0.00105 ,0.00001 |
| 402 | +,0.59860 ,0.27357 ,0.75105 ,0.04543 ,0.00353 ,0.00000 |
| 403 | +,0.57637 ,0.25997 ,0.66302 ,0.04440 ,0.00513 ,0.00000 |
| 404 | +,0.55645 ,0.24813 ,0.59081 ,0.04321 ,0.00620 ,0.00000 |
| 405 | +,0.53838 ,0.23766 ,0.53080 ,0.04190 ,0.00690 ,0.00010 |
| 406 | +,0.52191 ,0.22831 ,0.48047 ,0.04042 ,0.00737 ,0.00067 |
| 407 | +,0.50677 ,0.21985 ,0.43769 ,0.03890 ,0.00769 ,0.00147 |
| 408 | +,0.49275 ,0.21214 ,0.40097 ,0.03750 ,0.00789 ,0.00203 |
| 409 | +,0.47972 ,0.20508 ,0.36923 ,0.03618 ,0.00801 ,0.00248 |
| 410 | +,0.46757 ,0.19859 ,0.34158 ,0.03495 ,0.00807 ,0.00283 |
| 411 | +,0.45615 ,0.19255 ,0.31729 ,0.03379 ,0.00808 ,0.00309 |
| 412 | +,0.44545 ,0.18696 ,0.29589 ,0.03271 ,0.00806 ,0.00330 |
| 413 | +,0.43542 ,0.18176 ,0.27692 ,0.03170 ,0.00802 ,0.00347 |
| 414 | +,0.42592 ,0.17688 ,0.26000 ,0.03075 ,0.00795 ,0.00360 |
| 415 | +,0.41693 ,0.17232 ,0.24483 ,0.02985 ,0.00787 ,0.00371 |
| 416 | +,0.40846 ,0.16804 ,0.23117 ,0.02902 ,0.00779 ,0.00379 |
| 417 | +,0.40035 ,0.16399 ,0.21883 ,0.02822 ,0.00769 ,0.00384 |
| 418 | +,0.39270 ,0.16019 ,0.20763 ,0.02747 ,0.00760 ,0.00389 |
| 419 | +,0.38534 ,0.15657 ,0.19743 ,0.02675 ,0.00750 ,0.00391/ |
| 420 | DATA ((F(I,21,K),I=1,6),K=1,19)/ |
| 421 | + 0.61354 ,0.27443 ,0.72732 ,0.03801 ,0.00080 ,-0.00001 |
| 422 | +,0.58427 ,0.25716 ,0.62335 ,0.03704 ,0.00268 ,0.00000 |
| 423 | +,0.55870 ,0.24256 ,0.54130 ,0.03583 ,0.00386 ,0.00000 |
| 424 | +,0.53615 ,0.22999 ,0.47573 ,0.03455 ,0.00462 ,0.00000 |
| 425 | +,0.51595 ,0.21898 ,0.42240 ,0.03325 ,0.00511 ,0.00007 |
| 426 | +,0.49772 ,0.20923 ,0.37842 ,0.03188 ,0.00543 ,0.00048 |
| 427 | +,0.48111 ,0.20049 ,0.34160 ,0.03051 ,0.00563 ,0.00106 |
| 428 | +,0.46587 ,0.19258 ,0.31038 ,0.02925 ,0.00575 ,0.00146 |
| 429 | +,0.45180 ,0.18539 ,0.28371 ,0.02809 ,0.00581 ,0.00177 |
| 430 | +,0.43877 ,0.17881 ,0.26071 ,0.02702 ,0.00583 ,0.00201 |
| 431 | +,0.42658 ,0.17274 ,0.24072 ,0.02602 ,0.00581 ,0.00219 |
| 432 | +,0.41523 ,0.16714 ,0.22324 ,0.02510 ,0.00577 ,0.00233 |
| 433 | +,0.40464 ,0.16196 ,0.20785 ,0.02424 ,0.00572 ,0.00245 |
| 434 | +,0.39467 ,0.15712 ,0.19423 ,0.02343 ,0.00565 ,0.00253 |
| 435 | +,0.38529 ,0.15261 ,0.18211 ,0.02268 ,0.00558 ,0.00259 |
| 436 | +,0.37648 ,0.14841 ,0.17125 ,0.02197 ,0.00551 ,0.00264 |
| 437 | +,0.36809 ,0.14444 ,0.16150 ,0.02130 ,0.00542 ,0.00267 |
| 438 | +,0.36020 ,0.14073 ,0.15269 ,0.02068 ,0.00534 ,0.00269 |
| 439 | +,0.35266 ,0.13720 ,0.14472 ,0.02009 ,0.00526 ,0.00271/ |
| 440 | DATA ((F(I,22,K),I=1,6),K=1,19)/ |
| 441 | + 0.59651 ,0.25654 ,0.61299 ,0.03120 ,0.00062 ,0.00000 |
| 442 | +,0.56373 ,0.23839 ,0.51562 ,0.03004 ,0.00203 ,0.00000 |
| 443 | +,0.53548 ,0.22324 ,0.44095 ,0.02877 ,0.00290 ,0.00000 |
| 444 | +,0.51087 ,0.21032 ,0.38253 ,0.02751 ,0.00345 ,0.00001 |
| 445 | +,0.48905 ,0.19912 ,0.33590 ,0.02628 ,0.00378 ,0.00005 |
| 446 | +,0.46955 ,0.18928 ,0.29802 ,0.02505 ,0.00399 ,0.00036 |
| 447 | +,0.45190 ,0.18052 ,0.26671 ,0.02384 ,0.00412 ,0.00077 |
| 448 | +,0.43582 ,0.17264 ,0.24048 ,0.02276 ,0.00419 ,0.00105 |
| 449 | +,0.42107 ,0.16552 ,0.21829 ,0.02176 ,0.00421 ,0.00127 |
| 450 | +,0.40748 ,0.15905 ,0.19934 ,0.02084 ,0.00421 ,0.00143 |
| 451 | +,0.39487 ,0.15310 ,0.18301 ,0.01999 ,0.00418 ,0.00156 |
| 452 | +,0.38319 ,0.14764 ,0.16883 ,0.01921 ,0.00414 ,0.00165 |
| 453 | +,0.37232 ,0.14261 ,0.15644 ,0.01849 ,0.00409 ,0.00173 |
| 454 | +,0.36212 ,0.13794 ,0.14555 ,0.01782 ,0.00403 ,0.00178 |
| 455 | +,0.35258 ,0.13360 ,0.13591 ,0.01719 ,0.00396 ,0.00182 |
| 456 | +,0.34366 ,0.12956 ,0.12732 ,0.01661 ,0.00389 ,0.00185 |
| 457 | +,0.33520 ,0.12576 ,0.11966 ,0.01606 ,0.00382 ,0.00186 |
| 458 | +,0.32726 ,0.12222 ,0.11276 ,0.01555 ,0.00376 ,0.00188 |
| 459 | +,0.31969 ,0.11888 ,0.10655 ,0.01507 ,0.00369 ,0.00188/ |
| 460 | DATA ((F(I,23,K),I=1,6),K=1,19)/ |
| 461 | + 0.57383 ,0.23675 ,0.51397 ,0.02546 ,0.00047 ,0.00000 |
| 462 | +,0.53826 ,0.21823 ,0.42477 ,0.02423 ,0.00153 ,0.00000 |
| 463 | +,0.50799 ,0.20293 ,0.35801 ,0.02300 ,0.00217 ,0.00000 |
| 464 | +,0.48189 ,0.19001 ,0.30678 ,0.02181 ,0.00256 ,0.00001 |
| 465 | +,0.45896 ,0.17890 ,0.26655 ,0.02070 ,0.00279 ,0.00004 |
| 466 | +,0.43862 ,0.16921 ,0.23432 ,0.01961 ,0.00293 ,0.00026 |
| 467 | +,0.42034 ,0.16065 ,0.20799 ,0.01858 ,0.00301 ,0.00055 |
| 468 | +,0.40379 ,0.15298 ,0.18618 ,0.01765 ,0.00305 ,0.00076 |
| 469 | +,0.38870 ,0.14610 ,0.16788 ,0.01680 ,0.00305 ,0.00091 |
| 470 | +,0.37487 ,0.13987 ,0.15240 ,0.01603 ,0.00303 ,0.00102 |
| 471 | +,0.36211 ,0.13417 ,0.13916 ,0.01532 ,0.00300 ,0.00111 |
| 472 | +,0.35032 ,0.12897 ,0.12775 ,0.01467 ,0.00297 ,0.00117 |
| 473 | +,0.33941 ,0.12419 ,0.11784 ,0.01408 ,0.00292 ,0.00122 |
| 474 | +,0.32922 ,0.11977 ,0.10918 ,0.01352 ,0.00287 ,0.00126 |
| 475 | +,0.31971 ,0.11568 ,0.10156 ,0.01301 ,0.00281 ,0.00128 |
| 476 | +,0.31085 ,0.11189 ,0.09480 ,0.01253 ,0.00276 ,0.00130 |
| 477 | +,0.30248 ,0.10834 ,0.08881 ,0.01209 ,0.00270 ,0.00130 |
| 478 | +,0.29466 ,0.10503 ,0.08343 ,0.01167 ,0.00265 ,0.00131 |
| 479 | +,0.28721 ,0.10192 ,0.07861 ,0.01129 ,0.00259 ,0.00131/ |
| 480 | DATA ((F(I,24,K),I=1,6),K=1,19)/ |
| 481 | + 0.54656 ,0.21581 ,0.42847 ,0.02063 ,0.00037 ,0.00001 |
| 482 | +,0.50891 ,0.19737 ,0.34822 ,0.01943 ,0.00116 ,0.00001 |
| 483 | +,0.47730 ,0.18227 ,0.28942 ,0.01827 ,0.00162 ,0.00001 |
| 484 | +,0.45023 ,0.16964 ,0.24511 ,0.01720 ,0.00190 ,0.00001 |
| 485 | +,0.42665 ,0.15887 ,0.21082 ,0.01621 ,0.00206 ,0.00003 |
| 486 | +,0.40589 ,0.14954 ,0.18369 ,0.01527 ,0.00215 ,0.00019 |
| 487 | +,0.38736 ,0.14133 ,0.16178 ,0.01440 ,0.00220 ,0.00041 |
| 488 | +,0.37068 ,0.13404 ,0.14380 ,0.01361 ,0.00221 ,0.00055 |
| 489 | +,0.35553 ,0.12751 ,0.12886 ,0.01291 ,0.00220 ,0.00065 |
| 490 | +,0.34175 ,0.12163 ,0.11630 ,0.01227 ,0.00219 ,0.00073 |
| 491 | +,0.32906 ,0.11629 ,0.10566 ,0.01169 ,0.00215 ,0.00079 |
| 492 | +,0.31739 ,0.11142 ,0.09655 ,0.01116 ,0.00212 ,0.00083 |
| 493 | +,0.30664 ,0.10697 ,0.08867 ,0.01067 ,0.00208 ,0.00086 |
| 494 | +,0.29667 ,0.10287 ,0.08183 ,0.01021 ,0.00204 ,0.00088 |
| 495 | +,0.28737 ,0.09909 ,0.07584 ,0.00980 ,0.00200 ,0.00090 |
| 496 | +,0.27872 ,0.09559 ,0.07055 ,0.00942 ,0.00195 ,0.00091 |
| 497 | +,0.27057 ,0.09233 ,0.06589 ,0.00906 ,0.00191 ,0.00092 |
| 498 | +,0.26298 ,0.08931 ,0.06171 ,0.00873 ,0.00187 ,0.00092 |
| 499 | +,0.25579 ,0.08646 ,0.05799 ,0.00842 ,0.00183 ,0.00091/ |
| 500 | DATA ((F(I,25,K),I=1,6),K=1,19)/ |
| 501 | + 0.51569 ,0.19443 ,0.35504 ,0.01659 ,0.00028 ,0.00001 |
| 502 | +,0.47670 ,0.17644 ,0.28389 ,0.01546 ,0.00087 ,0.00001 |
| 503 | +,0.44430 ,0.16186 ,0.23281 ,0.01441 ,0.00120 ,0.00001 |
| 504 | +,0.41679 ,0.14976 ,0.19493 ,0.01347 ,0.00140 ,0.00001 |
| 505 | +,0.39302 ,0.13951 ,0.16603 ,0.01262 ,0.00151 ,0.00002 |
| 506 | +,0.37222 ,0.13069 ,0.14344 ,0.01183 ,0.00157 ,0.00014 |
| 507 | +,0.35377 ,0.12298 ,0.12538 ,0.01109 ,0.00159 ,0.00029 |
| 508 | +,0.33724 ,0.11615 ,0.11070 ,0.01044 ,0.00160 ,0.00039 |
| 509 | +,0.32231 ,0.11008 ,0.09860 ,0.00986 ,0.00159 ,0.00047 |
| 510 | +,0.30879 ,0.10463 ,0.08851 ,0.00934 ,0.00157 ,0.00052 |
| 511 | +,0.29639 ,0.09971 ,0.08001 ,0.00887 ,0.00154 ,0.00056 |
| 512 | +,0.28504 ,0.09524 ,0.07278 ,0.00844 ,0.00151 ,0.00059 |
| 513 | +,0.27462 ,0.09116 ,0.06657 ,0.00804 ,0.00148 ,0.00061 |
| 514 | +,0.26499 ,0.08742 ,0.06120 ,0.00768 ,0.00144 ,0.00062 |
| 515 | +,0.25604 ,0.08399 ,0.05653 ,0.00735 ,0.00141 ,0.00063 |
| 516 | +,0.24773 ,0.08082 ,0.05242 ,0.00704 ,0.00138 ,0.00064 |
| 517 | +,0.23994 ,0.07787 ,0.04880 ,0.00676 ,0.00134 ,0.00064 |
| 518 | +,0.23270 ,0.07515 ,0.04558 ,0.00650 ,0.00131 ,0.00064 |
| 519 | +,0.22586 ,0.07259 ,0.04273 ,0.00625 ,0.00128 ,0.00063/ |
| 520 | DATA ((F(I,26,K),I=1,6),K=1,19)/ |
| 521 | + 0.48211 ,0.17317 ,0.29228 ,0.01325 ,0.00020 ,0.00000 |
| 522 | +,0.44249 ,0.15597 ,0.23005 ,0.01222 ,0.00063 ,0.00000 |
| 523 | +,0.40984 ,0.14214 ,0.18623 ,0.01130 ,0.00088 ,-0.00001 |
| 524 | +,0.38237 ,0.13075 ,0.15420 ,0.01049 ,0.00102 ,0.00000 |
| 525 | +,0.35881 ,0.12117 ,0.13011 ,0.00976 ,0.00109 ,0.00001 |
| 526 | +,0.33831 ,0.11297 ,0.11147 ,0.00910 ,0.00113 ,0.00009 |
| 527 | +,0.32023 ,0.10585 ,0.09673 ,0.00850 ,0.00114 ,0.00020 |
| 528 | +,0.30410 ,0.09958 ,0.08484 ,0.00797 ,0.00114 ,0.00027 |
| 529 | +,0.28963 ,0.09403 ,0.07513 ,0.00749 ,0.00113 ,0.00033 |
| 530 | +,0.27656 ,0.08906 ,0.06709 ,0.00707 ,0.00111 ,0.00036 |
| 531 | +,0.26465 ,0.08459 ,0.06036 ,0.00669 ,0.00109 ,0.00039 |
| 532 | +,0.25378 ,0.08055 ,0.05467 ,0.00634 ,0.00107 ,0.00041 |
| 533 | +,0.24383 ,0.07688 ,0.04980 ,0.00603 ,0.00104 ,0.00042 |
| 534 | +,0.23463 ,0.07352 ,0.04562 ,0.00574 ,0.00101 ,0.00043 |
| 535 | +,0.22614 ,0.07045 ,0.04200 ,0.00548 ,0.00099 ,0.00044 |
| 536 | +,0.21828 ,0.06762 ,0.03883 ,0.00524 ,0.00096 ,0.00044 |
| 537 | +,0.21094 ,0.06500 ,0.03606 ,0.00502 ,0.00094 ,0.00044 |
| 538 | +,0.20412 ,0.06258 ,0.03360 ,0.00481 ,0.00091 ,0.00044 |
| 539 | +,0.19772 ,0.06032 ,0.03141 ,0.00462 ,0.00088 ,0.00044/ |
| 540 | DATA ((F(I,27,K),I=1,6),K=1,19)/ |
| 541 | + 0.44659 ,0.15244 ,0.23884 ,0.01048 ,0.00015 ,0.00000 |
| 542 | +,0.40698 ,0.13627 ,0.18512 ,0.00957 ,0.00046 ,0.00000 |
| 543 | +,0.37463 ,0.12338 ,0.14796 ,0.00878 ,0.00064 ,-0.00001 |
| 544 | +,0.34761 ,0.11284 ,0.12120 ,0.00809 ,0.00074 ,0.00000 |
| 545 | +,0.32460 ,0.10404 ,0.10132 ,0.00748 ,0.00079 ,0.00001 |
| 546 | +,0.30470 ,0.09655 ,0.08611 ,0.00694 ,0.00081 ,0.00007 |
| 547 | +,0.28724 ,0.09007 ,0.07419 ,0.00645 ,0.00082 ,0.00014 |
| 548 | +,0.27175 ,0.08440 ,0.06466 ,0.00602 ,0.00081 ,0.00019 |
| 549 | +,0.25791 ,0.07940 ,0.05693 ,0.00564 ,0.00080 ,0.00023 |
| 550 | +,0.24546 ,0.07495 ,0.05058 ,0.00530 ,0.00079 ,0.00026 |
| 551 | +,0.23416 ,0.07096 ,0.04530 ,0.00500 ,0.00077 ,0.00028 |
| 552 | +,0.22390 ,0.06736 ,0.04086 ,0.00473 ,0.00075 ,0.00029 |
| 553 | +,0.21452 ,0.06411 ,0.03708 ,0.00448 ,0.00073 ,0.00029 |
| 554 | +,0.20589 ,0.06114 ,0.03385 ,0.00426 ,0.00071 ,0.00030 |
| 555 | +,0.19795 ,0.05843 ,0.03106 ,0.00405 ,0.00069 ,0.00030 |
| 556 | +,0.19062 ,0.05595 ,0.02863 ,0.00387 ,0.00067 ,0.00030 |
| 557 | +,0.18379 ,0.05365 ,0.02652 ,0.00369 ,0.00065 ,0.00030 |
| 558 | +,0.17746 ,0.05154 ,0.02464 ,0.00353 ,0.00063 ,0.00030 |
| 559 | +,0.17154 ,0.04957 ,0.02299 ,0.00339 ,0.00061 ,0.00030/ |
| 560 | DATA ((F(I,28,K),I=1,6),K=1,19)/ |
| 561 | + 0.40990 ,0.13265 ,0.19364 ,0.00822 ,0.00010 ,0.00000 |
| 562 | +,0.37089 ,0.11769 ,0.14784 ,0.00743 ,0.00033 ,-0.00001 |
| 563 | +,0.33932 ,0.10587 ,0.11669 ,0.00676 ,0.00046 ,-0.00001 |
| 564 | +,0.31310 ,0.09628 ,0.09458 ,0.00619 ,0.00053 ,-0.00001 |
| 565 | +,0.29097 ,0.08831 ,0.07835 ,0.00570 ,0.00056 ,0.00000 |
| 566 | +,0.27194 ,0.08158 ,0.06606 ,0.00525 ,0.00058 ,0.00005 |
| 567 | +,0.25529 ,0.07578 ,0.05652 ,0.00487 ,0.00058 ,0.00010 |
| 568 | +,0.24061 ,0.07074 ,0.04896 ,0.00452 ,0.00057 ,0.00013 |
| 569 | +,0.22757 ,0.06630 ,0.04286 ,0.00422 ,0.00056 ,0.00016 |
| 570 | +,0.21587 ,0.06237 ,0.03789 ,0.00395 ,0.00055 ,0.00018 |
| 571 | +,0.20530 ,0.05886 ,0.03380 ,0.00371 ,0.00054 ,0.00019 |
| 572 | +,0.19573 ,0.05571 ,0.03036 ,0.00350 ,0.00052 ,0.00020 |
| 573 | +,0.18701 ,0.05286 ,0.02744 ,0.00331 ,0.00051 ,0.00020 |
| 574 | +,0.17902 ,0.05028 ,0.02497 ,0.00314 ,0.00049 ,0.00021 |
| 575 | +,0.17169 ,0.04793 ,0.02284 ,0.00298 ,0.00047 ,0.00021 |
| 576 | +,0.16494 ,0.04578 ,0.02099 ,0.00283 ,0.00046 ,0.00021 |
| 577 | +,0.15867 ,0.04379 ,0.01939 ,0.00270 ,0.00044 ,0.00021 |
| 578 | +,0.15288 ,0.04197 ,0.01797 ,0.00258 ,0.00043 ,0.00020 |
| 579 | +,0.14746 ,0.04028 ,0.01673 ,0.00246 ,0.00042 ,0.00020/ |
| 580 | DATA ((F(I,29,K),I=1,6),K=1,19)/ |
| 581 | + 0.37267 ,0.11403 ,0.15564 ,0.00637 ,0.00007 ,0.00000 |
| 582 | +,0.33480 ,0.10042 ,0.11707 ,0.00571 ,0.00024 ,-0.00001 |
| 583 | +,0.30440 ,0.08975 ,0.09127 ,0.00515 ,0.00033 ,-0.00001 |
| 584 | +,0.27935 ,0.08116 ,0.07320 ,0.00469 ,0.00037 ,0.00000 |
| 585 | +,0.25834 ,0.07407 ,0.06010 ,0.00429 ,0.00039 ,0.00000 |
| 586 | +,0.24036 ,0.06810 ,0.05028 ,0.00393 ,0.00040 ,0.00003 |
| 587 | +,0.22473 ,0.06300 ,0.04272 ,0.00363 ,0.00040 ,0.00007 |
| 588 | +,0.21101 ,0.05857 ,0.03678 ,0.00336 ,0.00040 ,0.00009 |
| 589 | +,0.19886 ,0.05470 ,0.03203 ,0.00312 ,0.00039 ,0.00011 |
| 590 | +,0.18802 ,0.05128 ,0.02818 ,0.00291 ,0.00038 ,0.00012 |
| 591 | +,0.17826 ,0.04823 ,0.02502 ,0.00273 ,0.00037 ,0.00013 |
| 592 | +,0.16945 ,0.04551 ,0.02239 ,0.00256 ,0.00036 ,0.00014 |
| 593 | +,0.16146 ,0.04307 ,0.02017 ,0.00242 ,0.00035 ,0.00014 |
| 594 | +,0.15416 ,0.04085 ,0.01829 ,0.00228 ,0.00033 ,0.00014 |
| 595 | +,0.14747 ,0.03884 ,0.01668 ,0.00216 ,0.00032 ,0.00014 |
| 596 | +,0.14134 ,0.03700 ,0.01529 ,0.00205 ,0.00031 ,0.00014 |
| 597 | +,0.13566 ,0.03532 ,0.01409 ,0.00195 ,0.00030 ,0.00014 |
| 598 | +,0.13042 ,0.03377 ,0.01303 ,0.00186 ,0.00029 ,0.00014 |
| 599 | +,0.12554 ,0.03234 ,0.01210 ,0.00177 ,0.00028 ,0.00014/ |
| 600 | DATA ((F(I,30,K),I=1,6),K=1,19)/ |
| 601 | + 0.33554 ,0.09682 ,0.12392 ,0.00490 ,0.00005 ,0.00000 |
| 602 | +,0.29929 ,0.08463 ,0.09185 ,0.00435 ,0.00017 ,0.00000 |
| 603 | +,0.27043 ,0.07515 ,0.07073 ,0.00389 ,0.00023 ,0.00000 |
| 604 | +,0.24682 ,0.06757 ,0.05615 ,0.00351 ,0.00026 ,0.00000 |
| 605 | +,0.22710 ,0.06135 ,0.04568 ,0.00319 ,0.00028 ,0.00000 |
| 606 | +,0.21034 ,0.05615 ,0.03793 ,0.00292 ,0.00028 ,0.00002 |
| 607 | +,0.19586 ,0.05172 ,0.03201 ,0.00268 ,0.00028 ,0.00005 |
| 608 | +,0.18321 ,0.04790 ,0.02740 ,0.00247 ,0.00027 ,0.00006 |
| 609 | +,0.17205 ,0.04456 ,0.02373 ,0.00229 ,0.00027 ,0.00007 |
| 610 | +,0.16212 ,0.04163 ,0.02077 ,0.00213 ,0.00026 ,0.00008 |
| 611 | +,0.15323 ,0.03904 ,0.01836 ,0.00199 ,0.00025 ,0.00009 |
| 612 | +,0.14523 ,0.03672 ,0.01637 ,0.00186 ,0.00024 ,0.00009 |
| 613 | +,0.13800 ,0.03465 ,0.01469 ,0.00175 ,0.00023 ,0.00009 |
| 614 | +,0.13142 ,0.03278 ,0.01329 ,0.00165 ,0.00023 ,0.00009 |
| 615 | +,0.12540 ,0.03108 ,0.01208 ,0.00155 ,0.00022 ,0.00009 |
| 616 | +,0.11989 ,0.02954 ,0.01104 ,0.00147 ,0.00021 ,0.00010 |
| 617 | +,0.11480 ,0.02813 ,0.01015 ,0.00140 ,0.00020 ,0.00009 |
| 618 | +,0.11012 ,0.02684 ,0.00937 ,0.00133 ,0.00019 ,0.00009 |
| 619 | +,0.10578 ,0.02565 ,0.00868 ,0.00127 ,0.00019 ,0.00009/ |
| 620 | DATA ((F(I,31,K),I=1,6),K=1,19)/ |
| 621 | + 0.29901 ,0.08112 ,0.09765 ,0.00371 ,0.00004 ,0.00000 |
| 622 | +,0.26477 ,0.07038 ,0.07131 ,0.00326 ,0.00012 ,0.00000 |
| 623 | +,0.23773 ,0.06210 ,0.05425 ,0.00290 ,0.00016 ,0.00000 |
| 624 | +,0.21577 ,0.05551 ,0.04262 ,0.00260 ,0.00018 ,0.00000 |
| 625 | +,0.19755 ,0.05014 ,0.03437 ,0.00235 ,0.00019 ,0.00000 |
| 626 | +,0.18214 ,0.04568 ,0.02832 ,0.00214 ,0.00019 ,0.00001 |
| 627 | +,0.16890 ,0.04189 ,0.02374 ,0.00195 ,0.00019 ,0.00003 |
| 628 | +,0.15738 ,0.03864 ,0.02020 ,0.00179 ,0.00019 ,0.00004 |
| 629 | +,0.14726 ,0.03582 ,0.01740 ,0.00165 ,0.00018 ,0.00005 |
| 630 | +,0.13830 ,0.03335 ,0.01516 ,0.00153 ,0.00017 ,0.00005 |
| 631 | +,0.13030 ,0.03117 ,0.01335 ,0.00142 ,0.00017 ,0.00006 |
| 632 | +,0.12313 ,0.02923 ,0.01185 ,0.00133 ,0.00016 ,0.00006 |
| 633 | +,0.11667 ,0.02750 ,0.01061 ,0.00125 ,0.00016 ,0.00006 |
| 634 | +,0.11081 ,0.02594 ,0.00956 ,0.00117 ,0.00015 ,0.00006 |
| 635 | +,0.10546 ,0.02454 ,0.00867 ,0.00110 ,0.00015 ,0.00006 |
| 636 | +,0.10058 ,0.02327 ,0.00790 ,0.00104 ,0.00014 ,0.00006 |
| 637 | +,0.09609 ,0.02210 ,0.00725 ,0.00099 ,0.00013 ,0.00006 |
| 638 | +,0.09198 ,0.02104 ,0.00667 ,0.00094 ,0.00013 ,0.00006 |
| 639 | +,0.08816 ,0.02006 ,0.00617 ,0.00089 ,0.00012 ,0.00006/ |
| 640 | DATA ((F(I,32,K),I=1,6),K=1,19)/ |
| 641 | + 0.26359 ,0.06703 ,0.07607 ,0.00277 ,0.00003 ,0.00000 |
| 642 | +,0.23168 ,0.05771 ,0.05473 ,0.00242 ,0.00008 ,0.00000 |
| 643 | +,0.20668 ,0.05058 ,0.04112 ,0.00213 ,0.00011 ,0.00000 |
| 644 | +,0.18653 ,0.04496 ,0.03198 ,0.00190 ,0.00012 ,0.00000 |
| 645 | +,0.16991 ,0.04040 ,0.02556 ,0.00171 ,0.00013 ,0.00000 |
| 646 | +,0.15594 ,0.03663 ,0.02090 ,0.00154 ,0.00013 ,0.00001 |
| 647 | +,0.14400 ,0.03344 ,0.01740 ,0.00140 ,0.00013 ,0.00002 |
| 648 | +,0.13364 ,0.03073 ,0.01472 ,0.00128 ,0.00013 ,0.00003 |
| 649 | +,0.12459 ,0.02838 ,0.01262 ,0.00118 ,0.00012 ,0.00004 |
| 650 | +,0.11661 ,0.02633 ,0.01094 ,0.00109 ,0.00012 ,0.00004 |
| 651 | +,0.10951 ,0.02452 ,0.00959 ,0.00101 ,0.00011 ,0.00004 |
| 652 | +,0.10317 ,0.02293 ,0.00849 ,0.00094 ,0.00011 ,0.00004 |
| 653 | +,0.09748 ,0.02151 ,0.00757 ,0.00088 ,0.00010 ,0.00004 |
| 654 | +,0.09233 ,0.02024 ,0.00680 ,0.00082 ,0.00010 ,0.00004 |
| 655 | +,0.08765 ,0.01909 ,0.00615 ,0.00077 ,0.00009 ,0.00004 |
| 656 | +,0.08340 ,0.01805 ,0.00559 ,0.00073 ,0.00009 ,0.00004 |
| 657 | +,0.07949 ,0.01710 ,0.00511 ,0.00069 ,0.00009 ,0.00004 |
| 658 | +,0.07591 ,0.01625 ,0.00470 ,0.00065 ,0.00008 ,0.00004 |
| 659 | +,0.07260 ,0.01546 ,0.00434 ,0.00062 ,0.00008 ,0.00004/ |
| 660 | DATA ((F(I,33,K),I=1,6),K=1,19)/ |
| 661 | + 0.22968 ,0.05458 ,0.05854 ,0.00205 ,0.00002 ,0.00000 |
| 662 | +,0.20038 ,0.04663 ,0.04150 ,0.00176 ,0.00005 ,0.00000 |
| 663 | +,0.17759 ,0.04060 ,0.03080 ,0.00154 ,0.00007 ,0.00000 |
| 664 | +,0.15934 ,0.03589 ,0.02369 ,0.00137 ,0.00008 ,0.00000 |
| 665 | +,0.14441 ,0.03207 ,0.01877 ,0.00122 ,0.00008 ,0.00000 |
| 666 | +,0.13191 ,0.02894 ,0.01524 ,0.00110 ,0.00009 ,0.00000 |
| 667 | +,0.12129 ,0.02631 ,0.01260 ,0.00099 ,0.00008 ,0.00001 |
| 668 | +,0.11212 ,0.02407 ,0.01059 ,0.00091 ,0.00008 ,0.00001 |
| 669 | +,0.10414 ,0.02215 ,0.00903 ,0.00083 ,0.00008 ,0.00002 |
| 670 | +,0.09714 ,0.02047 ,0.00780 ,0.00076 ,0.00007 ,0.00002 |
| 671 | +,0.09092 ,0.01901 ,0.00681 ,0.00070 ,0.00007 ,0.00003 |
| 672 | +,0.08540 ,0.01772 ,0.00600 ,0.00065 ,0.00007 ,0.00003 |
| 673 | +,0.08046 ,0.01657 ,0.00534 ,0.00061 ,0.00007 ,0.00003 |
| 674 | +,0.07599 ,0.01554 ,0.00478 ,0.00057 ,0.00006 ,0.00002 |
| 675 | +,0.07195 ,0.01462 ,0.00431 ,0.00053 ,0.00006 ,0.00002 |
| 676 | +,0.06828 ,0.01380 ,0.00391 ,0.00050 ,0.00006 ,0.00003 |
| 677 | +,0.06493 ,0.01304 ,0.00357 ,0.00047 ,0.00006 ,0.00003 |
| 678 | +,0.06186 ,0.01236 ,0.00327 ,0.00044 ,0.00006 ,0.00003 |
| 679 | +,0.05904 ,0.01173 ,0.00301 ,0.00042 ,0.00005 ,0.00003/ |
| 680 | DATA ((F(I,34,K),I=1,6),K=1,19)/ |
| 681 | + 0.19765 ,0.04372 ,0.04441 ,0.00148 ,0.00001 ,0.00000 |
| 682 | +,0.17111 ,0.03707 ,0.03101 ,0.00127 ,0.00004 ,0.00000 |
| 683 | +,0.15065 ,0.03206 ,0.02273 ,0.00110 ,0.00005 ,0.00000 |
| 684 | +,0.13437 ,0.02817 ,0.01731 ,0.00097 ,0.00005 ,0.00000 |
| 685 | +,0.12114 ,0.02504 ,0.01359 ,0.00086 ,0.00006 ,0.00000 |
| 686 | +,0.11013 ,0.02249 ,0.01095 ,0.00077 ,0.00006 ,0.00000 |
| 687 | +,0.10081 ,0.02035 ,0.00899 ,0.00069 ,0.00005 ,0.00001 |
| 688 | +,0.09282 ,0.01854 ,0.00752 ,0.00063 ,0.00005 ,0.00001 |
| 689 | +,0.08588 ,0.01700 ,0.00638 ,0.00058 ,0.00005 ,0.00001 |
| 690 | +,0.07982 ,0.01565 ,0.00548 ,0.00053 ,0.00005 ,0.00001 |
| 691 | +,0.07447 ,0.01449 ,0.00477 ,0.00048 ,0.00005 ,0.00002 |
| 692 | +,0.06972 ,0.01346 ,0.00419 ,0.00045 ,0.00005 ,0.00002 |
| 693 | +,0.06549 ,0.01255 ,0.00371 ,0.00042 ,0.00004 ,0.00002 |
| 694 | +,0.06168 ,0.01174 ,0.00331 ,0.00039 ,0.00004 ,0.00002 |
| 695 | +,0.05825 ,0.01101 ,0.00298 ,0.00036 ,0.00004 ,0.00001 |
| 696 | +,0.05514 ,0.01036 ,0.00269 ,0.00034 ,0.00004 ,0.00002 |
| 697 | +,0.05230 ,0.00977 ,0.00245 ,0.00032 ,0.00004 ,0.00002 |
| 698 | +,0.04971 ,0.00924 ,0.00225 ,0.00030 ,0.00003 ,0.00002 |
| 699 | +,0.04734 ,0.00875 ,0.00207 ,0.00028 ,0.00003 ,0.00002/ |
| 700 | DATA ((F(I,35,K),I=1,6),K=1,19)/ |
| 701 | + 0.16776 ,0.03442 ,0.03318 ,0.00106 ,0.00001 ,0.00000 |
| 702 | +,0.14409 ,0.02895 ,0.02281 ,0.00089 ,0.00002 ,0.00000 |
| 703 | +,0.12600 ,0.02486 ,0.01651 ,0.00077 ,0.00003 ,0.00000 |
| 704 | +,0.11171 ,0.02171 ,0.01243 ,0.00067 ,0.00003 ,0.00000 |
| 705 | +,0.10017 ,0.01919 ,0.00968 ,0.00059 ,0.00003 ,0.00000 |
| 706 | +,0.09063 ,0.01714 ,0.00773 ,0.00053 ,0.00003 ,0.00000 |
| 707 | +,0.08259 ,0.01545 ,0.00631 ,0.00047 ,0.00003 ,0.00001 |
| 708 | +,0.07572 ,0.01402 ,0.00525 ,0.00043 ,0.00003 ,0.00001 |
| 709 | +,0.06979 ,0.01280 ,0.00443 ,0.00039 ,0.00003 ,0.00001 |
| 710 | +,0.06462 ,0.01175 ,0.00379 ,0.00035 ,0.00003 ,0.00001 |
| 711 | +,0.06009 ,0.01083 ,0.00328 ,0.00033 ,0.00003 ,0.00001 |
| 712 | +,0.05608 ,0.01003 ,0.00287 ,0.00030 ,0.00003 ,0.00001 |
| 713 | +,0.05251 ,0.00932 ,0.00254 ,0.00028 ,0.00003 ,0.00001 |
| 714 | +,0.04931 ,0.00870 ,0.00226 ,0.00026 ,0.00003 ,0.00001 |
| 715 | +,0.04644 ,0.00814 ,0.00202 ,0.00024 ,0.00002 ,0.00001 |
| 716 | +,0.04385 ,0.00763 ,0.00183 ,0.00022 ,0.00002 ,0.00001 |
| 717 | +,0.04148 ,0.00718 ,0.00166 ,0.00021 ,0.00002 ,0.00001 |
| 718 | +,0.03934 ,0.00677 ,0.00152 ,0.00020 ,0.00002 ,0.00001 |
| 719 | +,0.03737 ,0.00640 ,0.00139 ,0.00019 ,0.00002 ,0.00001/ |
| 720 | DATA ((F(I,36,K),I=1,6),K=1,19)/ |
| 721 | + 0.14028 ,0.02658 ,0.02436 ,0.00074 ,0.00001 ,0.00000 |
| 722 | +,0.11952 ,0.02217 ,0.01648 ,0.00062 ,0.00001 ,0.00000 |
| 723 | +,0.10378 ,0.01891 ,0.01178 ,0.00053 ,0.00002 ,0.00000 |
| 724 | +,0.09145 ,0.01641 ,0.00878 ,0.00046 ,0.00002 ,0.00000 |
| 725 | +,0.08154 ,0.01442 ,0.00677 ,0.00040 ,0.00002 ,0.00000 |
| 726 | +,0.07340 ,0.01282 ,0.00537 ,0.00036 ,0.00002 ,0.00000 |
| 727 | +,0.06658 ,0.01150 ,0.00435 ,0.00032 ,0.00002 ,0.00000 |
| 728 | +,0.06078 ,0.01039 ,0.00359 ,0.00028 ,0.00002 ,0.00000 |
| 729 | +,0.05580 ,0.00944 ,0.00302 ,0.00026 ,0.00002 ,0.00000 |
| 730 | +,0.05148 ,0.00864 ,0.00257 ,0.00023 ,0.00002 ,0.00000 |
| 731 | +,0.04769 ,0.00793 ,0.00222 ,0.00021 ,0.00002 ,0.00000 |
| 732 | +,0.04436 ,0.00732 ,0.00193 ,0.00020 ,0.00002 ,0.00001 |
| 733 | +,0.04141 ,0.00679 ,0.00170 ,0.00018 ,0.00001 ,0.00001 |
| 734 | +,0.03877 ,0.00631 ,0.00151 ,0.00017 ,0.00001 ,0.00001 |
| 735 | +,0.03641 ,0.00589 ,0.00135 ,0.00016 ,0.00001 ,0.00001 |
| 736 | +,0.03429 ,0.00551 ,0.00122 ,0.00015 ,0.00001 ,0.00001 |
| 737 | +,0.03235 ,0.00517 ,0.00110 ,0.00014 ,0.00001 ,0.00001 |
| 738 | +,0.03060 ,0.00486 ,0.00101 ,0.00013 ,0.00001 ,0.00001 |
| 739 | +,0.02900 ,0.00458 ,0.00092 ,0.00012 ,0.00001 ,0.00001/ |
| 740 | DATA ((F(I,37,K),I=1,6),K=1,19)/ |
| 741 | + 0.09310 ,0.01482 ,0.01233 ,0.00033 ,0.00000 ,0.00000 |
| 742 | +,0.07799 ,0.01215 ,0.00808 ,0.00027 ,0.00000 ,0.00000 |
| 743 | +,0.06672 ,0.01021 ,0.00562 ,0.00023 ,0.00001 ,0.00000 |
| 744 | +,0.05803 ,0.00874 ,0.00409 ,0.00020 ,0.00001 ,0.00000 |
| 745 | +,0.05114 ,0.00759 ,0.00310 ,0.00017 ,0.00001 ,0.00000 |
| 746 | +,0.04554 ,0.00668 ,0.00242 ,0.00015 ,0.00001 ,0.00000 |
| 747 | +,0.04091 ,0.00593 ,0.00193 ,0.00013 ,0.00001 ,0.00000 |
| 748 | +,0.03701 ,0.00531 ,0.00158 ,0.00012 ,0.00001 ,0.00000 |
| 749 | +,0.03369 ,0.00478 ,0.00131 ,0.00010 ,0.00001 ,0.00000 |
| 750 | +,0.03083 ,0.00434 ,0.00111 ,0.00009 ,0.00001 ,0.00000 |
| 751 | +,0.02835 ,0.00396 ,0.00095 ,0.00009 ,0.00001 ,0.00000 |
| 752 | +,0.02619 ,0.00363 ,0.00082 ,0.00008 ,0.00001 ,0.00000 |
| 753 | +,0.02428 ,0.00334 ,0.00072 ,0.00007 ,0.00001 ,0.00000 |
| 754 | +,0.02259 ,0.00309 ,0.00063 ,0.00007 ,0.00001 ,0.00000 |
| 755 | +,0.02109 ,0.00286 ,0.00056 ,0.00006 ,0.00000 ,0.00000 |
| 756 | +,0.01974 ,0.00266 ,0.00050 ,0.00006 ,0.00001 ,0.00000 |
| 757 | +,0.01853 ,0.00248 ,0.00046 ,0.00005 ,0.00001 ,0.00000 |
| 758 | +,0.01744 ,0.00232 ,0.00041 ,0.00005 ,0.00001 ,0.00000 |
| 759 | +,0.01644 ,0.00218 ,0.00038 ,0.00005 ,0.00000 ,0.00000/ |
| 760 | DATA ((F(I,38,K),I=1,6),K=1,19)/ |
| 761 | + 0.05675 ,0.00740 ,0.00563 ,0.00013 ,0.00000 ,0.00000 |
| 762 | +,0.04666 ,0.00596 ,0.00356 ,0.00011 ,0.00000 ,0.00000 |
| 763 | +,0.03928 ,0.00492 ,0.00241 ,0.00009 ,0.00000 ,0.00000 |
| 764 | +,0.03367 ,0.00415 ,0.00171 ,0.00008 ,0.00000 ,0.00000 |
| 765 | +,0.02930 ,0.00356 ,0.00127 ,0.00006 ,0.00000 ,0.00000 |
| 766 | +,0.02579 ,0.00310 ,0.00097 ,0.00006 ,0.00000 ,0.00000 |
| 767 | +,0.02292 ,0.00272 ,0.00077 ,0.00005 ,0.00000 ,0.00000 |
| 768 | +,0.02053 ,0.00241 ,0.00062 ,0.00004 ,0.00000 ,0.00000 |
| 769 | +,0.01852 ,0.00215 ,0.00051 ,0.00004 ,0.00000 ,0.00000 |
| 770 | +,0.01680 ,0.00194 ,0.00043 ,0.00003 ,0.00000 ,0.00000 |
| 771 | +,0.01532 ,0.00175 ,0.00036 ,0.00003 ,0.00000 ,0.00000 |
| 772 | +,0.01404 ,0.00159 ,0.00031 ,0.00003 ,0.00000 ,0.00000 |
| 773 | +,0.01293 ,0.00146 ,0.00027 ,0.00003 ,0.00000 ,0.00000 |
| 774 | +,0.01195 ,0.00134 ,0.00024 ,0.00002 ,0.00000 ,0.00000 |
| 775 | +,0.01108 ,0.00123 ,0.00021 ,0.00002 ,0.00000 ,0.00000 |
| 776 | +,0.01031 ,0.00114 ,0.00019 ,0.00002 ,0.00000 ,0.00000 |
| 777 | +,0.00962 ,0.00105 ,0.00017 ,0.00002 ,0.00000 ,0.00000 |
| 778 | +,0.00900 ,0.00098 ,0.00015 ,0.00002 ,0.00000 ,0.00000 |
| 779 | +,0.00844 ,0.00092 ,0.00014 ,0.00002 ,0.00000 ,0.00000/ |
| 780 | DATA ((F(I,39,K),I=1,6),K=1,19)/ |
| 781 | + 0.03085 ,0.00319 ,0.00223 ,0.00005 ,0.00000 ,0.00000 |
| 782 | +,0.02484 ,0.00251 ,0.00135 ,0.00004 ,0.00000 ,0.00000 |
| 783 | +,0.02054 ,0.00204 ,0.00089 ,0.00003 ,0.00000 ,0.00000 |
| 784 | +,0.01733 ,0.00169 ,0.00062 ,0.00002 ,0.00000 ,0.00000 |
| 785 | +,0.01486 ,0.00143 ,0.00045 ,0.00002 ,0.00000 ,0.00000 |
| 786 | +,0.01291 ,0.00123 ,0.00034 ,0.00002 ,0.00000 ,0.00000 |
| 787 | +,0.01134 ,0.00107 ,0.00026 ,0.00001 ,0.00000 ,0.00000 |
| 788 | +,0.01004 ,0.00093 ,0.00021 ,0.00001 ,0.00000 ,0.00000 |
| 789 | +,0.00896 ,0.00083 ,0.00017 ,0.00001 ,0.00000 ,0.00000 |
| 790 | +,0.00805 ,0.00074 ,0.00014 ,0.00001 ,0.00000 ,0.00000 |
| 791 | +,0.00728 ,0.00066 ,0.00012 ,0.00001 ,0.00000 ,0.00000 |
| 792 | +,0.00661 ,0.00059 ,0.00010 ,0.00001 ,0.00000 ,0.00000 |
| 793 | +,0.00604 ,0.00054 ,0.00009 ,0.00001 ,0.00000 ,0.00000 |
| 794 | +,0.00554 ,0.00049 ,0.00008 ,0.00001 ,0.00000 ,0.00000 |
| 795 | +,0.00510 ,0.00045 ,0.00007 ,0.00001 ,0.00000 ,0.00000 |
| 796 | +,0.00471 ,0.00041 ,0.00006 ,0.00001 ,0.00000 ,0.00000 |
| 797 | +,0.00436 ,0.00038 ,0.00005 ,0.00001 ,0.00000 ,0.00000 |
| 798 | +,0.00405 ,0.00035 ,0.00005 ,0.00000 ,0.00000 ,0.00000 |
| 799 | +,0.00378 ,0.00032 ,0.00004 ,0.00000 ,0.00000 ,0.00000/ |
| 800 | DATA ((F(I,40,K),I=1,6),K=1,19)/ |
| 801 | + 0.01426 ,0.00111 ,0.00072 ,0.00001 ,0.00000 ,0.00000 |
| 802 | +,0.01121 ,0.00085 ,0.00042 ,0.00001 ,0.00000 ,0.00000 |
| 803 | +,0.00907 ,0.00068 ,0.00026 ,0.00001 ,0.00000 ,0.00000 |
| 804 | +,0.00751 ,0.00055 ,0.00018 ,0.00001 ,0.00000 ,0.00000 |
| 805 | +,0.00633 ,0.00046 ,0.00013 ,0.00000 ,0.00000 ,0.00000 |
| 806 | +,0.00542 ,0.00039 ,0.00009 ,0.00000 ,0.00000 ,0.00000 |
| 807 | +,0.00469 ,0.00033 ,0.00007 ,0.00000 ,0.00000 ,0.00000 |
| 808 | +,0.00410 ,0.00029 ,0.00006 ,0.00000 ,0.00000 ,0.00000 |
| 809 | +,0.00362 ,0.00025 ,0.00004 ,0.00000 ,0.00000 ,0.00000 |
| 810 | +,0.00321 ,0.00022 ,0.00004 ,0.00000 ,0.00000 ,0.00000 |
| 811 | +,0.00287 ,0.00020 ,0.00003 ,0.00000 ,0.00000 ,0.00000 |
| 812 | +,0.00259 ,0.00018 ,0.00003 ,0.00000 ,0.00000 ,0.00000 |
| 813 | +,0.00234 ,0.00016 ,0.00002 ,0.00000 ,0.00000 ,0.00000 |
| 814 | +,0.00213 ,0.00014 ,0.00002 ,0.00000 ,0.00000 ,0.00000 |
| 815 | +,0.00194 ,0.00013 ,0.00002 ,0.00000 ,0.00000 ,0.00000 |
| 816 | +,0.00178 ,0.00012 ,0.00002 ,0.00000 ,0.00000 ,0.00000 |
| 817 | +,0.00163 ,0.00011 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 818 | +,0.00151 ,0.00010 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 819 | +,0.00139 ,0.00009 ,0.00001 ,0.00000 ,0.00000 ,0.00000/ |
| 820 | DATA ((F(I,41,K),I=1,6),K=1,19)/ |
| 821 | + 0.00115 ,0.00004 ,0.00002 ,0.00000 ,0.00000 ,0.00000 |
| 822 | +,0.00085 ,0.00003 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 823 | +,0.00064 ,0.00002 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 824 | +,0.00051 ,0.00002 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 825 | +,0.00041 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 826 | +,0.00033 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 827 | +,0.00028 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 828 | +,0.00023 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 829 | +,0.00020 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 830 | +,0.00017 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 831 | +,0.00014 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 832 | +,0.00013 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 833 | +,0.00011 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 834 | +,0.00010 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 835 | +,0.00009 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 836 | +,0.00008 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 837 | +,0.00007 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 838 | +,0.00006 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 839 | +,0.00005 ,0.00001 ,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, |
| 841 | . 1.D-3,2.D-3,4.D-3,6.D-3,8.D-3, |
| 842 | . 1.D-2,2.D-2,4.D-2,6.D-2,8.D-2, |
| 843 | . .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0, |
| 844 | . .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0, |
| 845 | . .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0, |
| 846 | . .8D0,.9D0,1.D0/ |
| 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 10 |
| 853 | INIT=1 |
| 854 | DO 20 N=1,41 |
| 855 | DO 20 M=1,19 |
| 856 | C READ(65,50)F(1,N,M),F(2,N,M),F(3,N,M),F(4,N,M),F(5,N,M),F(6,N,M) |
| 857 | DO 25 I=1,6 |
| 858 | 25 F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I) |
| 859 | 20 CONTINUE |
| 860 | DO 30 J=1,15 |
| 861 | XX(J)= LOG10(XX(J))+ONEDO |
| 862 | DO 30 I=1,5 |
| 863 | DO 30 K=1,19 |
| 864 | 30 F(I,J,K) = LOG( F(I,J,K))*F(I,16,K)/ LOG( F(I,16,K)) |
| 865 | 50 FORMAT(6F10.5) |
| 866 | DO 40 I=1,6 |
| 867 | DO 40 M=1,19 |
| 868 | 40 F(I,42,M)=ZEROD |
| 869 | 10 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 | 70 N=N+1 |
| 879 | IF(XXX.GT.XX(N+1)) GOTO 70 |
| 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 60 I=1,6 |
| 885 | G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1) |
| 886 | . + A*(ONED-B)*F(I,N+1,M) + A*B*F(I,N+1,M+1) |
| 887 | IF(N.GE.16) GOTO 65 |
| 888 | IF(I.EQ.6) GOTO 65 |
| 889 | FAC=(ONED-B)*F(I,16,M)+B*F(I,16,M+1) |
| 890 | G(I)=FAC**(G(I)/FAC) |
| 891 | 65 CONTINUE |
| 892 | G(I)=G(I)*(ONED-X)**N0(I) |
| 893 | 60 CONTINUE |
| 894 | UPV=G(1) |
| 895 | DNV=G(2) |
| 896 | SEA=G(4) |
| 897 | STR=G(4) |
| 898 | CHM=G(5) |
| 899 | GL =G(3) |
| 900 | BOT=G(6) |
| 901 | RETURN |
| 902 | END |
git://git.uio.no / u / mrichter / AliRoot.git / blame