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