| 21886bb6 |
1 | * |
| 2 | * $Id$ |
| 3 | * |
| 4 | * $Log$ |
| 5 | * Revision 1.1.1.2 1996/10/30 08:30:59 cernlib |
| 6 | * Version 7.04 |
| 7 | * |
| 8 | * Revision 1.1.1.1 1996/04/12 15:29:49 plothow |
| 9 | * Version 7.01 |
| 10 | * |
| 11 | * |
| 12 | #include "pdf/pilot.h" |
| 13 | C----------------------------------------------------------------------- |
| 14 | SUBROUTINE STRCBP(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.01444 ,0.00899 ,4.02455 ,0.23556 ,0.02527 ,0.00000 |
| 22 | +,0.01569 ,0.00972 ,11.08499 ,0.33533 ,0.12492 ,0.00000 |
| 23 | +,0.01685 ,0.01040 ,19.11145 ,0.46687 ,0.25633 ,0.00000 |
| 24 | +,0.01794 ,0.01104 ,27.77417 ,0.62595 ,0.41527 ,0.00000 |
| 25 | +,0.01896 ,0.01164 ,36.61528 ,0.80214 ,0.59625 ,0.01477 |
| 26 | +,0.01994 ,0.01221 ,45.69736 ,0.96571 ,0.79693 ,0.12657 |
| 27 | +,0.02087 ,0.01276 ,54.92906 ,1.12005 ,1.01480 ,0.31759 |
| 28 | +,0.02177 ,0.01328 ,64.24933 ,1.28915 ,1.24751 ,0.50884 |
| 29 | +,0.02264 ,0.01378 ,73.60976 ,1.46702 ,1.49282 ,0.71159 |
| 30 | +,0.02348 ,0.01427 ,82.95361 ,1.65274 ,1.74845 ,0.92177 |
| 31 | +,0.02429 ,0.01474 ,92.14075 ,1.84305 ,2.01020 ,1.13651 |
| 32 | +,0.02508 ,0.01520,101.30438 ,2.03925 ,2.27982 ,1.35721 |
| 33 | +,0.02584 ,0.01564,110.45287 ,2.24108 ,2.55700 ,1.58363 |
| 34 | +,0.02658 ,0.01607,119.38998 ,2.44444 ,2.83612 ,1.81134 |
| 35 | +,0.02731 ,0.01649,128.22977 ,2.65080 ,3.11923 ,2.04199 |
| 36 | +,0.02801 ,0.01690,137.03922 ,2.86123 ,3.40779 ,2.27678 |
| 37 | +,0.02870 ,0.01729,145.55078 ,3.06975 ,3.69366 ,2.50920 |
| 38 | +,0.02937 ,0.01768,154.11171 ,3.28332 ,3.98634 ,2.74690 |
| 39 | +,0.03003 ,0.01806,162.33972 ,3.49339 ,4.27417 ,2.98054/ |
| 40 | DATA ((F(I,2,K),I=1,6),K=1,19)/ |
| 41 | + 0.02102 ,0.01294 ,3.79297 ,0.23651 ,0.02301 ,0.00000 |
| 42 | +,0.02274 ,0.01394 ,9.38434 ,0.32422 ,0.11070 ,0.00000 |
| 43 | +,0.02433 ,0.01486 ,15.39411 ,0.43486 ,0.22131 ,0.00000 |
| 44 | +,0.02581 ,0.01572 ,21.65680 ,0.56393 ,0.35034 ,0.00000 |
| 45 | +,0.02720 ,0.01652 ,27.88220 ,0.70278 ,0.49300 ,0.01154 |
| 46 | +,0.02852 ,0.01728 ,34.13873 ,0.82852 ,0.64730 ,0.09732 |
| 47 | +,0.02978 ,0.01800 ,40.37834 ,0.94438 ,0.81129 ,0.24185 |
| 48 | +,0.03098 ,0.01869 ,46.57191 ,1.06909 ,0.98324 ,0.38366 |
| 49 | +,0.03214 ,0.01936 ,52.69756 ,1.19811 ,1.16155 ,0.53165 |
| 50 | +,0.03325 ,0.02000 ,58.72679 ,1.33087 ,1.34467 ,0.68284 |
| 51 | +,0.03432 ,0.02061 ,64.57495 ,1.46515 ,1.52974 ,0.83530 |
| 52 | +,0.03536 ,0.02120 ,70.33940 ,1.60193 ,1.71810 ,0.99012 |
| 53 | +,0.03637 ,0.02177 ,76.03160 ,1.74111 ,1.90961 ,1.14721 |
| 54 | +,0.03734 ,0.02233 ,81.52925 ,1.87993 ,2.10052 ,1.30359 |
| 55 | +,0.03829 ,0.02287 ,86.91275 ,2.01947 ,2.29234 ,1.46050 |
| 56 | +,0.03921 ,0.02339 ,92.23016 ,2.16053 ,2.48615 ,1.61882 |
| 57 | +,0.04010 ,0.02390 ,97.31372 ,2.29914 ,2.67654 ,1.77423 |
| 58 | +,0.04098 ,0.02439,102.39018 ,2.44004 ,2.86999 ,1.93195 |
| 59 | +,0.04182 ,0.02487,107.21939 ,2.57758 ,3.05879 ,2.08580/ |
| 60 | DATA ((F(I,3,K),I=1,6),K=1,19)/ |
| 61 | + 0.03058 ,0.01863 ,3.57378 ,0.23671 ,0.02069 ,0.00000 |
| 62 | +,0.03295 ,0.01999 ,7.94337 ,0.31271 ,0.09680 ,0.00000 |
| 63 | +,0.03512 ,0.02123 ,12.39642 ,0.40441 ,0.18861 ,0.00000 |
| 64 | +,0.03713 ,0.02238 ,16.87996 ,0.50762 ,0.29194 ,0.00000 |
| 65 | +,0.03901 ,0.02345 ,21.22090 ,0.61549 ,0.40288 ,0.00890 |
| 66 | +,0.04078 ,0.02445 ,25.48773 ,0.71081 ,0.51997 ,0.07391 |
| 67 | +,0.04246 ,0.02540 ,29.66095 ,0.79655 ,0.64184 ,0.18196 |
| 68 | +,0.04406 ,0.02631 ,33.73145 ,0.88726 ,0.76729 ,0.28589 |
| 69 | +,0.04560 ,0.02717 ,37.69373 ,0.97956 ,0.89529 ,0.39267 |
| 70 | +,0.04707 ,0.02800 ,41.53676 ,1.07319 ,1.02485 ,0.50018 |
| 71 | +,0.04848 ,0.02880 ,45.21126 ,1.16665 ,1.15410 ,0.60722 |
| 72 | +,0.04984 ,0.02956 ,48.78828 ,1.26074 ,1.28408 ,0.71461 |
| 73 | +,0.05115 ,0.03030 ,52.28018 ,1.35542 ,1.41478 ,0.82237 |
| 74 | +,0.05242 ,0.03101 ,55.61154 ,1.44889 ,1.54375 ,0.92857 |
| 75 | +,0.05365 ,0.03170 ,58.83902 ,1.54197 ,1.67211 ,1.03411 |
| 76 | +,0.05484 ,0.03236 ,61.99710 ,1.63524 ,1.80066 ,1.13966 |
| 77 | +,0.05599 ,0.03300 ,64.98114 ,1.72610 ,1.92587 ,1.24240 |
| 78 | +,0.05712 ,0.03363 ,67.93896 ,1.81777 ,2.05212 ,1.34585 |
| 79 | +,0.05821 ,0.03424 ,70.72050 ,1.90655 ,2.17438 ,1.44600/ |
| 80 | DATA ((F(I,4,K),I=1,6),K=1,19)/ |
| 81 | + 0.03808 ,0.02306 ,3.45071 ,0.23635 ,0.01930 ,0.00000 |
| 82 | +,0.04092 ,0.02467 ,7.20441 ,0.30566 ,0.08884 ,0.00000 |
| 83 | +,0.04352 ,0.02615 ,10.91881 ,0.38711 ,0.17052 ,0.00000 |
| 84 | +,0.04593 ,0.02751 ,14.58538 ,0.47692 ,0.26054 ,0.00000 |
| 85 | +,0.04816 ,0.02876 ,18.08087 ,0.56922 ,0.35559 ,0.00759 |
| 86 | +,0.05025 ,0.02994 ,21.47160 ,0.64962 ,0.45450 ,0.06249 |
| 87 | +,0.05224 ,0.03106 ,24.74931 ,0.72093 ,0.55619 ,0.15303 |
| 88 | +,0.05413 ,0.03211 ,27.91264 ,0.79561 ,0.65978 ,0.23912 |
| 89 | +,0.05593 ,0.03312 ,30.96225 ,0.87089 ,0.76447 ,0.32677 |
| 90 | +,0.05765 ,0.03408 ,33.89355 ,0.94661 ,0.86956 ,0.41428 |
| 91 | +,0.05930 ,0.03500 ,36.67148 ,1.02162 ,0.97360 ,0.50076 |
| 92 | +,0.06089 ,0.03589 ,39.35490 ,1.09661 ,1.07749 ,0.58691 |
| 93 | +,0.06242 ,0.03674 ,41.95605 ,1.17158 ,1.18128 ,0.67281 |
| 94 | +,0.06390 ,0.03755 ,44.41843 ,1.24516 ,1.28309 ,0.75696 |
| 95 | +,0.06532 ,0.03834 ,46.78818 ,1.31801 ,1.38385 ,0.84012 |
| 96 | +,0.06670 ,0.03911 ,49.09354 ,1.39063 ,1.48424 ,0.92285 |
| 97 | +,0.06803 ,0.03984 ,51.25531 ,1.46102 ,1.58152 ,1.00297 |
| 98 | +,0.06933 ,0.04056 ,53.38844 ,1.53173 ,1.67917 ,1.08329 |
| 99 | +,0.07058 ,0.04125 ,55.37946 ,1.59987 ,1.77329 ,1.16068/ |
| 100 | DATA ((F(I,5,K),I=1,6),K=1,19)/ |
| 101 | + 0.04449 ,0.02682 ,3.36545 ,0.23582 ,0.01830 ,0.00000 |
| 102 | +,0.04772 ,0.02865 ,6.72159 ,0.30045 ,0.08326 ,0.00000 |
| 103 | +,0.05067 ,0.03031 ,9.97691 ,0.37500 ,0.15813 ,0.00000 |
| 104 | +,0.05339 ,0.03183 ,13.14601 ,0.45599 ,0.23944 ,0.00000 |
| 105 | +,0.05591 ,0.03325 ,16.13414 ,0.53827 ,0.32427 ,0.00676 |
| 106 | +,0.05827 ,0.03456 ,19.00514 ,0.60921 ,0.41168 ,0.05528 |
| 107 | +,0.06050 ,0.03581 ,21.75699 ,0.67149 ,0.50078 ,0.13487 |
| 108 | +,0.06262 ,0.03698 ,24.39233 ,0.73627 ,0.59087 ,0.20993 |
| 109 | +,0.06463 ,0.03810 ,26.91505 ,0.80112 ,0.68131 ,0.28587 |
| 110 | +,0.06656 ,0.03917 ,29.32381 ,0.86597 ,0.77155 ,0.36124 |
| 111 | +,0.06840 ,0.04019 ,31.59154 ,0.92986 ,0.86041 ,0.43532 |
| 112 | +,0.07017 ,0.04117 ,33.76962 ,0.99341 ,0.94871 ,0.50876 |
| 113 | +,0.07187 ,0.04210 ,35.86992 ,1.05667 ,1.03652 ,0.58165 |
| 114 | +,0.07350 ,0.04300 ,37.84656 ,1.11847 ,1.12228 ,0.65275 |
| 115 | +,0.07508 ,0.04387 ,39.73930 ,1.17942 ,1.20682 ,0.72273 |
| 116 | +,0.07661 ,0.04471 ,41.57269 ,1.23996 ,1.29073 ,0.79209 |
| 117 | +,0.07808 ,0.04551 ,43.28194 ,1.29842 ,1.37174 ,0.85904 |
| 118 | +,0.07951 ,0.04630 ,44.96307 ,1.35695 ,1.45281 ,0.92591 |
| 119 | +,0.08089 ,0.04705 ,46.52278 ,1.41317 ,1.53067 ,0.99014/ |
| 120 | DATA ((F(I,6,K),I=1,6),K=1,19)/ |
| 121 | + 0.05019 ,0.03015 ,3.30038 ,0.23523 ,0.01752 ,0.00000 |
| 122 | +,0.05376 ,0.03216 ,6.36904 ,0.29626 ,0.07898 ,0.00000 |
| 123 | +,0.05701 ,0.03398 ,9.30149 ,0.36565 ,0.14878 ,0.00000 |
| 124 | +,0.06000 ,0.03565 ,12.12589 ,0.44020 ,0.22371 ,0.00000 |
| 125 | +,0.06276 ,0.03719 ,14.76616 ,0.51524 ,0.30119 ,0.00616 |
| 126 | +,0.06535 ,0.03863 ,17.28401 ,0.57942 ,0.38041 ,0.05015 |
| 127 | +,0.06778 ,0.03998 ,19.68117 ,0.63533 ,0.46064 ,0.12200 |
| 128 | +,0.07009 ,0.04126 ,21.96275 ,0.69317 ,0.54128 ,0.18935 |
| 129 | +,0.07229 ,0.04247 ,24.13446 ,0.75077 ,0.62183 ,0.25714 |
| 130 | +,0.07439 ,0.04363 ,26.19702 ,0.80810 ,0.70182 ,0.32412 |
| 131 | +,0.07639 ,0.04473 ,28.12852 ,0.86436 ,0.78027 ,0.38969 |
| 132 | +,0.07831 ,0.04578 ,29.97527 ,0.92009 ,0.85792 ,0.45444 |
| 133 | +,0.08015 ,0.04679 ,31.74844 ,0.97537 ,0.93485 ,0.51847 |
| 134 | +,0.08192 ,0.04776 ,33.40935 ,1.02919 ,1.00975 ,0.58072 |
| 135 | +,0.08363 ,0.04869 ,34.99327 ,1.08211 ,1.08334 ,0.64181 |
| 136 | +,0.08528 ,0.04959 ,36.52209 ,1.13452 ,1.15617 ,0.70218 |
| 137 | +,0.08686 ,0.05045 ,37.94052 ,1.18497 ,1.22629 ,0.76027 |
| 138 | +,0.08841 ,0.05129 ,39.33195 ,1.23537 ,1.29628 ,0.81817 |
| 139 | +,0.08989 ,0.05209 ,40.61653 ,1.28364 ,1.36332 ,0.87362/ |
| 140 | DATA ((F(I,7,K),I=1,6),K=1,19)/ |
| 141 | + 0.07294 ,0.04336 ,3.10304 ,0.23209 ,0.01507 ,0.00000 |
| 142 | +,0.07778 ,0.04603 ,5.38441 ,0.28221 ,0.06598 ,0.00000 |
| 143 | +,0.08214 ,0.04844 ,7.47361 ,0.33664 ,0.12116 ,0.00000 |
| 144 | +,0.08612 ,0.05062 ,9.42047 ,0.39312 ,0.17835 ,0.00000 |
| 145 | +,0.08977 ,0.05262 ,11.19133 ,0.44841 ,0.23585 ,0.00455 |
| 146 | +,0.09316 ,0.05448 ,12.83961 ,0.49452 ,0.29328 ,0.03652 |
| 147 | +,0.09635 ,0.05621 ,14.37465 ,0.53369 ,0.35027 ,0.08809 |
| 148 | +,0.09935 ,0.05784 ,15.80634 ,0.57354 ,0.40655 ,0.13549 |
| 149 | +,0.10219 ,0.05937 ,17.14357 ,0.61260 ,0.46187 ,0.18249 |
| 150 | +,0.10489 ,0.06083 ,18.39125 ,0.65091 ,0.51602 ,0.22826 |
| 151 | +,0.10745 ,0.06221 ,19.53844 ,0.68801 ,0.56844 ,0.27251 |
| 152 | +,0.10989 ,0.06352 ,20.61833 ,0.72432 ,0.61970 ,0.31567 |
| 153 | +,0.11223 ,0.06477 ,21.64040 ,0.75993 ,0.66991 ,0.35788 |
| 154 | +,0.11447 ,0.06597 ,22.58189 ,0.79423 ,0.71827 ,0.39849 |
| 155 | +,0.11661 ,0.06711 ,23.46706 ,0.82761 ,0.76532 ,0.43795 |
| 156 | +,0.11868 ,0.06822 ,24.31122 ,0.86036 ,0.81146 ,0.47659 |
| 157 | +,0.12066 ,0.06927 ,25.08073 ,0.89160 ,0.85546 ,0.51344 |
| 158 | +,0.12258 ,0.07029 ,25.82898 ,0.92255 ,0.89904 ,0.54987 |
| 159 | +,0.12442 ,0.07126 ,26.50706 ,0.95192 ,0.94041 ,0.58446/ |
| 160 | DATA ((F(I,8,K),I=1,6),K=1,19)/ |
| 161 | + 0.10589 ,0.06227 ,2.90973 ,0.22638 ,0.01261 ,0.00000 |
| 162 | +,0.11232 ,0.06576 ,4.54494 ,0.26598 ,0.05355 ,0.00000 |
| 163 | +,0.11806 ,0.06886 ,5.98824 ,0.30702 ,0.09583 ,0.00000 |
| 164 | +,0.12326 ,0.07166 ,7.28878 ,0.34816 ,0.13815 ,0.00000 |
| 165 | +,0.12799 ,0.07419 ,8.43743 ,0.38735 ,0.17954 ,0.00327 |
| 166 | +,0.13235 ,0.07652 ,9.47828 ,0.41914 ,0.21993 ,0.02588 |
| 167 | +,0.13642 ,0.07868 ,10.42376 ,0.44540 ,0.25921 ,0.06192 |
| 168 | +,0.14023 ,0.08069 ,11.28520 ,0.47169 ,0.29730 ,0.09441 |
| 169 | +,0.14381 ,0.08258 ,12.07229 ,0.49703 ,0.33415 ,0.12612 |
| 170 | +,0.14718 ,0.08436 ,12.79120 ,0.52153 ,0.36970 ,0.15658 |
| 171 | +,0.15037 ,0.08603 ,13.43755 ,0.54491 ,0.40364 ,0.18562 |
| 172 | +,0.15339 ,0.08761 ,14.03450 ,0.56750 ,0.43640 ,0.21361 |
| 173 | +,0.15628 ,0.08911 ,14.58967 ,0.58939 ,0.46813 ,0.24066 |
| 174 | +,0.15902 ,0.09053 ,15.09001 ,0.61023 ,0.49833 ,0.26641 |
| 175 | +,0.16163 ,0.09189 ,15.55197 ,0.63028 ,0.52741 ,0.29116 |
| 176 | +,0.16415 ,0.09319 ,15.98585 ,0.64977 ,0.55565 ,0.31517 |
| 177 | +,0.16654 ,0.09442 ,16.37167 ,0.66814 ,0.58230 ,0.33784 |
| 178 | +,0.16885 ,0.09561 ,16.74289 ,0.68620 ,0.60847 ,0.36006 |
| 179 | +,0.17105 ,0.09674 ,17.07021 ,0.70314 ,0.63308 ,0.38097/ |
| 180 | DATA ((F(I,9,K),I=1,6),K=1,19)/ |
| 181 | + 0.13156 ,0.07687 ,2.79607 ,0.22142 ,0.01119 ,0.00000 |
| 182 | +,0.13905 ,0.08088 ,4.11064 ,0.25511 ,0.04665 ,0.00000 |
| 183 | +,0.14569 ,0.08442 ,5.24809 ,0.28905 ,0.08222 ,0.00000 |
| 184 | +,0.15167 ,0.08758 ,6.25171 ,0.32239 ,0.11709 ,0.00000 |
| 185 | +,0.15708 ,0.09043 ,7.12113 ,0.35363 ,0.15065 ,0.00266 |
| 186 | +,0.16205 ,0.09303 ,7.89487 ,0.37850 ,0.18293 ,0.02083 |
| 187 | +,0.16665 ,0.09543 ,8.58581 ,0.39864 ,0.21395 ,0.04960 |
| 188 | +,0.17094 ,0.09766 ,9.20511 ,0.41863 ,0.24371 ,0.07523 |
| 189 | +,0.17495 ,0.09973 ,9.76218 ,0.43769 ,0.27221 ,0.10002 |
| 190 | +,0.17872 ,0.10167 ,10.26320 ,0.45594 ,0.29945 ,0.12361 |
| 191 | +,0.18227 ,0.10349 ,10.70609 ,0.47320 ,0.32524 ,0.14593 |
| 192 | +,0.18562 ,0.10520 ,11.10936 ,0.48973 ,0.34994 ,0.16727 |
| 193 | +,0.18880 ,0.10682 ,11.47946 ,0.50563 ,0.37368 ,0.18774 |
| 194 | +,0.19181 ,0.10835 ,11.80725 ,0.52064 ,0.39611 ,0.20709 |
| 195 | +,0.19468 ,0.10980 ,12.10545 ,0.53498 ,0.41756 ,0.22558 |
| 196 | +,0.19742 ,0.11118 ,12.38223 ,0.54882 ,0.43826 ,0.24340 |
| 197 | +,0.20002 ,0.11249 ,12.62300 ,0.56176 ,0.45766 ,0.26012 |
| 198 | +,0.20253 ,0.11374 ,12.85285 ,0.57442 ,0.47661 ,0.27642 |
| 199 | +,0.20491 ,0.11493 ,13.05039 ,0.58619 ,0.49430 ,0.29166/ |
| 200 | DATA ((F(I,10,K),I=1,6),K=1,19)/ |
| 201 | + 0.15335 ,0.08921 ,2.71533 ,0.21718 ,0.01023 ,0.00000 |
| 202 | +,0.16160 ,0.09357 ,3.82752 ,0.24691 ,0.04211 ,0.00000 |
| 203 | +,0.16888 ,0.09739 ,4.77342 ,0.27626 ,0.07342 ,0.00000 |
| 204 | +,0.17539 ,0.10078 ,5.59377 ,0.30465 ,0.10364 ,0.00000 |
| 205 | +,0.18126 ,0.10382 ,6.29307 ,0.33089 ,0.13235 ,0.00228 |
| 206 | +,0.18661 ,0.10658 ,6.90616 ,0.35146 ,0.15968 ,0.01774 |
| 207 | +,0.19156 ,0.10912 ,7.44576 ,0.36784 ,0.18569 ,0.04208 |
| 208 | +,0.19615 ,0.11146 ,7.92272 ,0.38396 ,0.21042 ,0.06357 |
| 209 | +,0.20043 ,0.11363 ,8.34599 ,0.39920 ,0.23392 ,0.08420 |
| 210 | +,0.20443 ,0.11565 ,8.72145 ,0.41368 ,0.25622 ,0.10369 |
| 211 | +,0.20818 ,0.11753 ,9.04832 ,0.42726 ,0.27717 ,0.12201 |
| 212 | +,0.21171 ,0.11930 ,9.34207 ,0.44019 ,0.29712 ,0.13942 |
| 213 | +,0.21505 ,0.12096 ,9.60836 ,0.45253 ,0.31617 ,0.15603 |
| 214 | +,0.21820 ,0.12252 ,9.84023 ,0.46410 ,0.33408 ,0.17165 |
| 215 | +,0.22119 ,0.12400 ,10.04822 ,0.47508 ,0.35109 ,0.18648 |
| 216 | +,0.22404 ,0.12541 ,10.23903 ,0.48563 ,0.36744 ,0.20071 |
| 217 | +,0.22674 ,0.12673 ,10.40109 ,0.49541 ,0.38266 ,0.21399 |
| 218 | +,0.22933 ,0.12799 ,10.55464 ,0.50493 ,0.39747 ,0.22689 |
| 219 | +,0.23178 ,0.12918 ,10.68291 ,0.51372 ,0.41122 ,0.23889/ |
| 220 | DATA ((F(I,11,K),I=1,6),K=1,19)/ |
| 221 | + 0.17262 ,0.10008 ,2.65192 ,0.21341 ,0.00952 ,0.00000 |
| 222 | +,0.18143 ,0.10468 ,3.62053 ,0.24023 ,0.03881 ,0.00000 |
| 223 | +,0.18916 ,0.10868 ,4.43046 ,0.26627 ,0.06712 ,0.00000 |
| 224 | +,0.19604 ,0.11222 ,5.12214 ,0.29114 ,0.09409 ,0.00000 |
| 225 | +,0.20221 ,0.11536 ,5.70328 ,0.31386 ,0.11943 ,0.00201 |
| 226 | +,0.20782 ,0.11821 ,6.20594 ,0.33140 ,0.14332 ,0.01559 |
| 227 | +,0.21298 ,0.12081 ,6.64253 ,0.34513 ,0.16587 ,0.03687 |
| 228 | +,0.21775 ,0.12319 ,7.02347 ,0.35857 ,0.18715 ,0.05551 |
| 229 | +,0.22218 ,0.12540 ,7.35721 ,0.37117 ,0.20723 ,0.07329 |
| 230 | +,0.22632 ,0.12745 ,7.64940 ,0.38305 ,0.22616 ,0.08998 |
| 231 | +,0.23017 ,0.12934 ,7.89990 ,0.39411 ,0.24384 ,0.10558 |
| 232 | +,0.23378 ,0.13111 ,8.12212 ,0.40456 ,0.26057 ,0.12033 |
| 233 | +,0.23720 ,0.13278 ,8.32110 ,0.41449 ,0.27647 ,0.13433 |
| 234 | +,0.24040 ,0.13433 ,8.49126 ,0.42372 ,0.29133 ,0.14743 |
| 235 | +,0.24344 ,0.13579 ,8.64157 ,0.43244 ,0.30538 ,0.15982 |
| 236 | +,0.24633 ,0.13718 ,8.77773 ,0.44077 ,0.31882 ,0.17165 |
| 237 | +,0.24905 ,0.13848 ,8.89028 ,0.44842 ,0.33127 ,0.18264 |
| 238 | +,0.25166 ,0.13972 ,8.99608 ,0.45586 ,0.34334 ,0.19328 |
| 239 | +,0.25411 ,0.14088 ,9.08132 ,0.46266 ,0.35448 ,0.20313/ |
| 240 | DATA ((F(I,12,K),I=1,6),K=1,19)/ |
| 241 | + 0.24815 ,0.14220 ,2.42838 ,0.19623 ,0.00732 ,0.00000 |
| 242 | +,0.25831 ,0.14718 ,3.00860 ,0.21418 ,0.02898 ,0.00000 |
| 243 | +,0.26703 ,0.15139 ,3.46539 ,0.23067 ,0.04879 ,0.00000 |
| 244 | +,0.27464 ,0.15501 ,3.83310 ,0.24571 ,0.06685 ,0.00000 |
| 245 | +,0.28133 ,0.15815 ,4.12414 ,0.25887 ,0.08321 ,0.00131 |
| 246 | +,0.28729 ,0.16093 ,4.36170 ,0.26835 ,0.09815 ,0.00999 |
| 247 | +,0.29268 ,0.16340 ,4.55618 ,0.27519 ,0.11185 ,0.02337 |
| 248 | +,0.29759 ,0.16563 ,4.71562 ,0.28173 ,0.12444 ,0.03479 |
| 249 | +,0.30207 ,0.16764 ,4.84657 ,0.28766 ,0.13603 ,0.04543 |
| 250 | +,0.30618 ,0.16946 ,4.95332 ,0.29307 ,0.14670 ,0.05523 |
| 251 | +,0.30994 ,0.17110 ,5.03682 ,0.29793 ,0.15646 ,0.06420 |
| 252 | +,0.31343 ,0.17261 ,5.10508 ,0.30239 ,0.16551 ,0.07253 |
| 253 | +,0.31668 ,0.17400 ,5.16131 ,0.30651 ,0.17394 ,0.08030 |
| 254 | +,0.31966 ,0.17527 ,5.20279 ,0.31020 ,0.18166 ,0.08745 |
| 255 | +,0.32246 ,0.17643 ,5.23461 ,0.31358 ,0.18883 ,0.09410 |
| 256 | +,0.32509 ,0.17752 ,5.26001 ,0.31674 ,0.19558 ,0.10036 |
| 257 | +,0.32751 ,0.17850 ,5.27418 ,0.31950 ,0.20170 ,0.10607 |
| 258 | +,0.32983 ,0.17943 ,5.28605 ,0.32215 ,0.20756 ,0.11154 |
| 259 | +,0.33195 ,0.18027 ,5.28837 ,0.32444 ,0.21286 ,0.11651/ |
| 260 | DATA ((F(I,13,K),I=1,6),K=1,19)/ |
| 261 | + 0.35195 ,0.19835 ,2.13358 ,0.16733 ,0.00521 ,0.00000 |
| 262 | +,0.36159 ,0.20227 ,2.40907 ,0.17709 ,0.01997 ,0.00000 |
| 263 | +,0.36950 ,0.20536 ,2.60316 ,0.18538 ,0.03267 ,0.00000 |
| 264 | +,0.37611 ,0.20785 ,2.74201 ,0.19246 ,0.04367 ,0.00000 |
| 265 | +,0.38168 ,0.20983 ,2.83714 ,0.19817 ,0.05319 ,0.00078 |
| 266 | +,0.38644 ,0.21146 ,2.90338 ,0.20160 ,0.06155 ,0.00583 |
| 267 | +,0.39057 ,0.21280 ,2.94758 ,0.20345 ,0.06893 ,0.01346 |
| 268 | +,0.39417 ,0.21390 ,2.97496 ,0.20513 ,0.07548 ,0.01976 |
| 269 | +,0.39733 ,0.21480 ,2.98949 ,0.20647 ,0.08132 ,0.02548 |
| 270 | +,0.40010 ,0.21555 ,2.99378 ,0.20756 ,0.08653 ,0.03061 |
| 271 | +,0.40250 ,0.21612 ,2.98855 ,0.20837 ,0.09114 ,0.03518 |
| 272 | +,0.40463 ,0.21659 ,2.97790 ,0.20899 ,0.09529 ,0.03933 |
| 273 | +,0.40653 ,0.21696 ,2.96343 ,0.20948 ,0.09905 ,0.04312 |
| 274 | +,0.40818 ,0.21723 ,2.94387 ,0.20977 ,0.10239 ,0.04652 |
| 275 | +,0.40964 ,0.21743 ,2.92166 ,0.20993 ,0.10541 ,0.04962 |
| 276 | +,0.41096 ,0.21757 ,2.89827 ,0.21002 ,0.10819 ,0.05248 |
| 277 | +,0.41207 ,0.21763 ,2.87136 ,0.20994 ,0.11061 ,0.05503 |
| 278 | +,0.41311 ,0.21767 ,2.84504 ,0.20985 ,0.11289 ,0.05743 |
| 279 | +,0.41396 ,0.21762 ,2.81591 ,0.20960 ,0.11486 ,0.05956/ |
| 280 | DATA ((F(I,14,K),I=1,6),K=1,19)/ |
| 281 | + 0.42610 ,0.23607 ,1.90412 ,0.14283 ,0.00401 ,0.00000 |
| 282 | +,0.43339 ,0.23799 ,2.03907 ,0.14835 ,0.01505 ,0.00000 |
| 283 | +,0.43900 ,0.23918 ,2.11914 ,0.15268 ,0.02418 ,0.00000 |
| 284 | +,0.44336 ,0.23992 ,2.16425 ,0.15607 ,0.03182 ,0.00000 |
| 285 | +,0.44673 ,0.24024 ,2.18333 ,0.15850 ,0.03822 ,0.00053 |
| 286 | +,0.44938 ,0.24031 ,2.18641 ,0.15939 ,0.04366 ,0.00395 |
| 287 | +,0.45146 ,0.24017 ,2.17803 ,0.15925 ,0.04834 ,0.00904 |
| 288 | +,0.45307 ,0.23987 ,2.16153 ,0.15904 ,0.05240 ,0.01316 |
| 289 | +,0.45430 ,0.23944 ,2.13938 ,0.15867 ,0.05591 ,0.01683 |
| 290 | +,0.45520 ,0.23892 ,2.11315 ,0.15818 ,0.05898 ,0.02005 |
| 291 | +,0.45578 ,0.23829 ,2.08317 ,0.15755 ,0.06160 ,0.02287 |
| 292 | +,0.45616 ,0.23760 ,2.05187 ,0.15686 ,0.06391 ,0.02539 |
| 293 | +,0.45638 ,0.23687 ,2.02005 ,0.15612 ,0.06596 ,0.02764 |
| 294 | +,0.45638 ,0.23609 ,1.98678 ,0.15531 ,0.06772 ,0.02964 |
| 295 | +,0.45626 ,0.23527 ,1.95347 ,0.15445 ,0.06927 ,0.03142 |
| 296 | +,0.45605 ,0.23445 ,1.92084 ,0.15359 ,0.07067 ,0.03304 |
| 297 | +,0.45567 ,0.23357 ,1.88745 ,0.15266 ,0.07183 ,0.03446 |
| 298 | +,0.45527 ,0.23271 ,1.85559 ,0.15176 ,0.07291 ,0.03578 |
| 299 | +,0.45471 ,0.23181 ,1.82319 ,0.15079 ,0.07380 ,0.03692/ |
| 300 | DATA ((F(I,15,K),I=1,6),K=1,19)/ |
| 301 | + 0.48256 ,0.26222 ,1.70710 ,0.12174 ,0.00318 ,0.00000 |
| 302 | +,0.48666 ,0.26175 ,1.76097 ,0.12471 ,0.01178 ,0.00000 |
| 303 | +,0.48927 ,0.26081 ,1.77857 ,0.12674 ,0.01867 ,0.00000 |
| 304 | +,0.49084 ,0.25959 ,1.77480 ,0.12810 ,0.02426 ,-0.00001 |
| 305 | +,0.49158 ,0.25815 ,1.75620 ,0.12877 ,0.02882 ,0.00038 |
| 306 | +,0.49176 ,0.25659 ,1.72958 ,0.12838 ,0.03262 ,0.00285 |
| 307 | +,0.49151 ,0.25494 ,1.69783 ,0.12729 ,0.03580 ,0.00649 |
| 308 | +,0.49090 ,0.25324 ,1.66296 ,0.12621 ,0.03848 ,0.00937 |
| 309 | +,0.49003 ,0.25150 ,1.62651 ,0.12508 ,0.04076 ,0.01190 |
| 310 | +,0.48895 ,0.24973 ,1.58929 ,0.12391 ,0.04270 ,0.01409 |
| 311 | +,0.48763 ,0.24795 ,1.55135 ,0.12269 ,0.04431 ,0.01597 |
| 312 | +,0.48620 ,0.24618 ,1.51414 ,0.12147 ,0.04569 ,0.01762 |
| 313 | +,0.48470 ,0.24443 ,1.47803 ,0.12025 ,0.04689 ,0.01909 |
| 314 | +,0.48305 ,0.24268 ,1.44230 ,0.11902 ,0.04789 ,0.02036 |
| 315 | +,0.48134 ,0.24095 ,1.40769 ,0.11781 ,0.04874 ,0.02149 |
| 316 | +,0.47962 ,0.23927 ,1.37458 ,0.11662 ,0.04948 ,0.02250 |
| 317 | +,0.47778 ,0.23756 ,1.34194 ,0.11541 ,0.05007 ,0.02337 |
| 318 | +,0.47599 ,0.23593 ,1.31113 ,0.11425 ,0.05061 ,0.02416 |
| 319 | +,0.47409 ,0.23428 ,1.28078 ,0.11307 ,0.05102 ,0.02483/ |
| 320 | DATA ((F(I,16,K),I=1,6),K=1,19)/ |
| 321 | + 0.52609 ,0.27968 ,1.53244 ,0.10351 ,0.00257 ,0.00000 |
| 322 | +,0.52652 ,0.27673 ,1.53529 ,0.10485 ,0.00941 ,0.00000 |
| 323 | +,0.52579 ,0.27362 ,1.51554 ,0.10548 ,0.01473 ,0.00000 |
| 324 | +,0.52433 ,0.27046 ,1.48407 ,0.10565 ,0.01896 ,-0.00001 |
| 325 | +,0.52227 ,0.26730 ,1.44536 ,0.10533 ,0.02232 ,0.00029 |
| 326 | +,0.51988 ,0.26418 ,1.40390 ,0.10427 ,0.02505 ,0.00213 |
| 327 | +,0.51723 ,0.26111 ,1.36135 ,0.10274 ,0.02729 ,0.00482 |
| 328 | +,0.51438 ,0.25810 ,1.31881 ,0.10127 ,0.02914 ,0.00692 |
| 329 | +,0.51142 ,0.25517 ,1.27710 ,0.09980 ,0.03067 ,0.00874 |
| 330 | +,0.50837 ,0.25230 ,1.23658 ,0.09836 ,0.03195 ,0.01029 |
| 331 | +,0.50519 ,0.24949 ,1.19705 ,0.09692 ,0.03297 ,0.01160 |
| 332 | +,0.50201 ,0.24676 ,1.15936 ,0.09551 ,0.03383 ,0.01274 |
| 333 | +,0.49886 ,0.24412 ,1.12361 ,0.09414 ,0.03455 ,0.01374 |
| 334 | +,0.49565 ,0.24154 ,1.08915 ,0.09279 ,0.03513 ,0.01459 |
| 335 | +,0.49245 ,0.23903 ,1.05640 ,0.09148 ,0.03560 ,0.01534 |
| 336 | +,0.48933 ,0.23662 ,1.02549 ,0.09022 ,0.03600 ,0.01600 |
| 337 | +,0.48615 ,0.23423 ,0.99565 ,0.08896 ,0.03629 ,0.01655 |
| 338 | +,0.48309 ,0.23194 ,0.96770 ,0.08777 ,0.03655 ,0.01705 |
| 339 | +,0.47997 ,0.22968 ,0.94068 ,0.08658 ,0.03671 ,0.01747/ |
| 340 | DATA ((F(I,17,K),I=1,6),K=1,19)/ |
| 341 | + 0.56617 ,0.29189 ,1.33863 ,0.08415 ,0.00201 ,0.00001 |
| 342 | +,0.56168 ,0.28593 ,1.30193 ,0.08424 ,0.00723 ,0.00001 |
| 343 | +,0.55660 ,0.28022 ,1.25503 ,0.08387 ,0.01117 ,0.00001 |
| 344 | +,0.55125 ,0.27483 ,1.20487 ,0.08320 ,0.01422 ,0.00001 |
| 345 | +,0.54568 ,0.26971 ,1.15381 ,0.08225 ,0.01658 ,0.00022 |
| 346 | +,0.54010 ,0.26484 ,1.10429 ,0.08081 ,0.01845 ,0.00154 |
| 347 | +,0.53453 ,0.26020 ,1.05682 ,0.07910 ,0.01994 ,0.00344 |
| 348 | +,0.52899 ,0.25579 ,1.01175 ,0.07748 ,0.02114 ,0.00490 |
| 349 | +,0.52352 ,0.25157 ,0.96926 ,0.07591 ,0.02210 ,0.00615 |
| 350 | +,0.51815 ,0.24754 ,0.92931 ,0.07440 ,0.02288 ,0.00719 |
| 351 | +,0.51283 ,0.24366 ,0.89151 ,0.07293 ,0.02347 ,0.00806 |
| 352 | +,0.50765 ,0.23995 ,0.85625 ,0.07152 ,0.02395 ,0.00881 |
| 353 | +,0.50261 ,0.23641 ,0.82339 ,0.07017 ,0.02434 ,0.00945 |
| 354 | +,0.49764 ,0.23299 ,0.79237 ,0.06886 ,0.02463 ,0.00999 |
| 355 | +,0.49278 ,0.22972 ,0.76335 ,0.06760 ,0.02484 ,0.01045 |
| 356 | +,0.48810 ,0.22659 ,0.73629 ,0.06640 ,0.02501 ,0.01086 |
| 357 | +,0.48344 ,0.22354 ,0.71060 ,0.06522 ,0.02511 ,0.01118 |
| 358 | +,0.47899 ,0.22064 ,0.68672 ,0.06411 ,0.02519 ,0.01148 |
| 359 | +,0.47455 ,0.21780 ,0.66399 ,0.06302 ,0.02520 ,0.01172/ |
| 360 | DATA ((F(I,18,K),I=1,6),K=1,19)/ |
| 361 | + 0.59291 ,0.29541 ,1.16734 ,0.06806 ,0.00158 ,0.00001 |
| 362 | +,0.58343 ,0.28672 ,1.10746 ,0.06746 ,0.00561 ,0.00001 |
| 363 | +,0.57403 ,0.27874 ,1.04619 ,0.06656 ,0.00857 ,0.00001 |
| 364 | +,0.56486 ,0.27142 ,0.98740 ,0.06550 ,0.01081 ,0.00001 |
| 365 | +,0.55595 ,0.26462 ,0.93181 ,0.06428 ,0.01249 ,0.00016 |
| 366 | +,0.54736 ,0.25831 ,0.88041 ,0.06275 ,0.01379 ,0.00112 |
| 367 | +,0.53906 ,0.25242 ,0.83292 ,0.06106 ,0.01481 ,0.00250 |
| 368 | +,0.53104 ,0.24688 ,0.78913 ,0.05948 ,0.01559 ,0.00354 |
| 369 | +,0.52333 ,0.24166 ,0.74886 ,0.05798 ,0.01621 ,0.00441 |
| 370 | +,0.51590 ,0.23672 ,0.71178 ,0.05655 ,0.01669 ,0.00513 |
| 371 | +,0.50866 ,0.23203 ,0.67742 ,0.05519 ,0.01703 ,0.00572 |
| 372 | +,0.50170 ,0.22760 ,0.64582 ,0.05389 ,0.01729 ,0.00622 |
| 373 | +,0.49504 ,0.22341 ,0.61676 ,0.05266 ,0.01749 ,0.00665 |
| 374 | +,0.48857 ,0.21938 ,0.58971 ,0.05147 ,0.01762 ,0.00700 |
| 375 | +,0.48232 ,0.21555 ,0.56470 ,0.05035 ,0.01770 ,0.00730 |
| 376 | +,0.47634 ,0.21192 ,0.54161 ,0.04928 ,0.01775 ,0.00755 |
| 377 | +,0.47045 ,0.20842 ,0.51994 ,0.04824 ,0.01776 ,0.00775 |
| 378 | +,0.46484 ,0.20510 ,0.49994 ,0.04727 ,0.01776 ,0.00793 |
| 379 | +,0.45933 ,0.20188 ,0.48111 ,0.04632 ,0.01771 ,0.00807/ |
| 380 | DATA ((F(I,19,K),I=1,6),K=1,19)/ |
| 381 | + 0.60821 ,0.29194 ,1.01533 ,0.05472 ,0.00125 ,0.00000 |
| 382 | +,0.59387 ,0.28093 ,0.94258 ,0.05377 ,0.00437 ,0.00000 |
| 383 | +,0.58036 ,0.27105 ,0.87468 ,0.05264 ,0.00661 ,0.00000 |
| 384 | +,0.56765 ,0.26218 ,0.81311 ,0.05142 ,0.00827 ,0.00000 |
| 385 | +,0.55566 ,0.25406 ,0.75731 ,0.05014 ,0.00948 ,0.00012 |
| 386 | +,0.54436 ,0.24663 ,0.70729 ,0.04866 ,0.01040 ,0.00083 |
| 387 | +,0.53363 ,0.23977 ,0.66223 ,0.04710 ,0.01109 ,0.00183 |
| 388 | +,0.52344 ,0.23339 ,0.62154 ,0.04566 ,0.01162 ,0.00259 |
| 389 | +,0.51377 ,0.22744 ,0.58478 ,0.04430 ,0.01201 ,0.00321 |
| 390 | +,0.50455 ,0.22187 ,0.55144 ,0.04303 ,0.01229 ,0.00371 |
| 391 | +,0.49570 ,0.21662 ,0.52101 ,0.04181 ,0.01250 ,0.00412 |
| 392 | +,0.48727 ,0.21170 ,0.49337 ,0.04067 ,0.01263 ,0.00447 |
| 393 | +,0.47926 ,0.20707 ,0.46823 ,0.03959 ,0.01273 ,0.00475 |
| 394 | +,0.47156 ,0.20266 ,0.44512 ,0.03857 ,0.01277 ,0.00498 |
| 395 | +,0.46417 ,0.19849 ,0.42391 ,0.03760 ,0.01278 ,0.00517 |
| 396 | +,0.45712 ,0.19455 ,0.40446 ,0.03668 ,0.01278 ,0.00533 |
| 397 | +,0.45028 ,0.19078 ,0.38641 ,0.03580 ,0.01274 ,0.00546 |
| 398 | +,0.44378 ,0.18721 ,0.36985 ,0.03498 ,0.01270 ,0.00556 |
| 399 | +,0.43745 ,0.18378 ,0.35440 ,0.03418 ,0.01262 ,0.00564/ |
| 400 | DATA ((F(I,20,K),I=1,6),K=1,19)/ |
| 401 | + 0.61360 ,0.28295 ,0.88033 ,0.04371 ,0.00099 ,0.00000 |
| 402 | +,0.59473 ,0.27007 ,0.80150 ,0.04262 ,0.00341 ,0.00000 |
| 403 | +,0.57744 ,0.25872 ,0.73182 ,0.04142 ,0.00512 ,0.00000 |
| 404 | +,0.56153 ,0.24866 ,0.67096 ,0.04021 ,0.00636 ,0.00000 |
| 405 | +,0.54680 ,0.23959 ,0.61745 ,0.03897 ,0.00723 ,0.00009 |
| 406 | +,0.53313 ,0.23137 ,0.57056 ,0.03762 ,0.00788 ,0.00062 |
| 407 | +,0.52031 ,0.22385 ,0.52912 ,0.03624 ,0.00836 ,0.00136 |
| 408 | +,0.50829 ,0.21691 ,0.49231 ,0.03497 ,0.00871 ,0.00191 |
| 409 | +,0.49698 ,0.21050 ,0.45952 ,0.03379 ,0.00896 ,0.00235 |
| 410 | +,0.48629 ,0.20453 ,0.43017 ,0.03269 ,0.00912 ,0.00271 |
| 411 | +,0.47613 ,0.19896 ,0.40372 ,0.03164 ,0.00923 ,0.00300 |
| 412 | +,0.46653 ,0.19375 ,0.37992 ,0.03067 ,0.00930 ,0.00323 |
| 413 | +,0.45745 ,0.18889 ,0.35846 ,0.02976 ,0.00933 ,0.00343 |
| 414 | +,0.44879 ,0.18428 ,0.33893 ,0.02889 ,0.00933 ,0.00358 |
| 415 | +,0.44053 ,0.17994 ,0.32115 ,0.02808 ,0.00930 ,0.00370 |
| 416 | +,0.43269 ,0.17587 ,0.30495 ,0.02732 ,0.00927 ,0.00381 |
| 417 | +,0.42512 ,0.17198 ,0.29004 ,0.02659 ,0.00922 ,0.00388 |
| 418 | +,0.41797 ,0.16832 ,0.27643 ,0.02590 ,0.00916 ,0.00395 |
| 419 | +,0.41104 ,0.16481 ,0.26383 ,0.02525 ,0.00908 ,0.00399/ |
| 420 | DATA ((F(I,21,K),I=1,6),K=1,19)/ |
| 421 | + 0.61036 ,0.26974 ,0.76051 ,0.03470 ,0.00076 ,0.00000 |
| 422 | +,0.58740 ,0.25546 ,0.68016 ,0.03359 ,0.00266 ,0.00000 |
| 423 | +,0.56676 ,0.24307 ,0.61182 ,0.03244 ,0.00397 ,0.00000 |
| 424 | +,0.54809 ,0.23219 ,0.55375 ,0.03130 ,0.00488 ,0.00000 |
| 425 | +,0.53100 ,0.22250 ,0.50393 ,0.03017 ,0.00553 ,0.00006 |
| 426 | +,0.51532 ,0.21379 ,0.46104 ,0.02898 ,0.00599 ,0.00046 |
| 427 | +,0.50080 ,0.20589 ,0.42374 ,0.02780 ,0.00632 ,0.00101 |
| 428 | +,0.48729 ,0.19865 ,0.39104 ,0.02671 ,0.00654 ,0.00141 |
| 429 | +,0.47465 ,0.19201 ,0.36229 ,0.02571 ,0.00670 ,0.00173 |
| 430 | +,0.46283 ,0.18587 ,0.33684 ,0.02477 ,0.00680 ,0.00199 |
| 431 | +,0.45169 ,0.18016 ,0.31414 ,0.02390 ,0.00685 ,0.00219 |
| 432 | +,0.44119 ,0.17485 ,0.29391 ,0.02309 ,0.00687 ,0.00235 |
| 433 | +,0.43133 ,0.16992 ,0.27579 ,0.02233 ,0.00687 ,0.00248 |
| 434 | +,0.42196 ,0.16527 ,0.25942 ,0.02162 ,0.00685 ,0.00259 |
| 435 | +,0.41307 ,0.16092 ,0.24464 ,0.02095 ,0.00681 ,0.00267 |
| 436 | +,0.40466 ,0.15685 ,0.23127 ,0.02033 ,0.00676 ,0.00273 |
| 437 | +,0.39662 ,0.15297 ,0.21905 ,0.01973 ,0.00670 ,0.00278 |
| 438 | +,0.38903 ,0.14934 ,0.20793 ,0.01918 ,0.00663 ,0.00282 |
| 439 | +,0.38172 ,0.14587 ,0.19771 ,0.01865 ,0.00656 ,0.00284/ |
| 440 | DATA ((F(I,22,K),I=1,6),K=1,19)/ |
| 441 | + 0.59951 ,0.25324 ,0.65427 ,0.02733 ,0.00061 ,0.00000 |
| 442 | +,0.57299 ,0.23805 ,0.57545 ,0.02628 ,0.00208 ,0.00001 |
| 443 | +,0.54947 ,0.22503 ,0.51043 ,0.02522 ,0.00307 ,0.00000 |
| 444 | +,0.52849 ,0.21371 ,0.45643 ,0.02420 ,0.00376 ,0.00001 |
| 445 | +,0.50950 ,0.20372 ,0.41099 ,0.02321 ,0.00422 ,0.00005 |
| 446 | +,0.49224 ,0.19480 ,0.37249 ,0.02220 ,0.00455 ,0.00035 |
| 447 | +,0.47639 ,0.18677 ,0.33945 ,0.02119 ,0.00477 ,0.00075 |
| 448 | +,0.46175 ,0.17947 ,0.31085 ,0.02029 ,0.00492 ,0.00105 |
| 449 | +,0.44817 ,0.17279 ,0.28596 ,0.01945 ,0.00501 ,0.00128 |
| 450 | +,0.43548 ,0.16667 ,0.26413 ,0.01868 ,0.00507 ,0.00147 |
| 451 | +,0.42363 ,0.16099 ,0.24485 ,0.01796 ,0.00509 ,0.00160 |
| 452 | +,0.41255 ,0.15574 ,0.22781 ,0.01730 ,0.00508 ,0.00171 |
| 453 | +,0.40218 ,0.15088 ,0.21266 ,0.01668 ,0.00506 ,0.00180 |
| 454 | +,0.39236 ,0.14634 ,0.19908 ,0.01610 ,0.00502 ,0.00187 |
| 455 | +,0.38310 ,0.14209 ,0.18689 ,0.01556 ,0.00498 ,0.00192 |
| 456 | +,0.37438 ,0.13811 ,0.17591 ,0.01506 ,0.00494 ,0.00197 |
| 457 | +,0.36606 ,0.13436 ,0.16595 ,0.01458 ,0.00488 ,0.00199 |
| 458 | +,0.35822 ,0.13085 ,0.15693 ,0.01414 ,0.00482 ,0.00202 |
| 459 | +,0.35071 ,0.12752 ,0.14869 ,0.01371 ,0.00475 ,0.00203/ |
| 460 | DATA ((F(I,23,K),I=1,6),K=1,19)/ |
| 461 | + 0.58216 ,0.23452 ,0.56032 ,0.02136 ,0.00048 ,0.00000 |
| 462 | +,0.55264 ,0.21887 ,0.48514 ,0.02042 ,0.00162 ,0.00001 |
| 463 | +,0.52681 ,0.20559 ,0.42463 ,0.01949 ,0.00237 ,0.00000 |
| 464 | +,0.50401 ,0.19415 ,0.37534 ,0.01860 ,0.00288 ,0.00001 |
| 465 | +,0.48356 ,0.18413 ,0.33456 ,0.01776 ,0.00322 ,0.00004 |
| 466 | +,0.46513 ,0.17526 ,0.30050 ,0.01690 ,0.00345 ,0.00026 |
| 467 | +,0.44833 ,0.16731 ,0.27162 ,0.01608 ,0.00360 ,0.00056 |
| 468 | +,0.43291 ,0.16012 ,0.24689 ,0.01533 ,0.00370 ,0.00078 |
| 469 | +,0.41870 ,0.15359 ,0.22558 ,0.01464 ,0.00375 ,0.00095 |
| 470 | +,0.40550 ,0.14763 ,0.20706 ,0.01402 ,0.00378 ,0.00108 |
| 471 | +,0.39323 ,0.14212 ,0.19084 ,0.01344 ,0.00378 ,0.00117 |
| 472 | +,0.38180 ,0.13706 ,0.17660 ,0.01290 ,0.00376 ,0.00125 |
| 473 | +,0.37116 ,0.13239 ,0.16403 ,0.01240 ,0.00373 ,0.00131 |
| 474 | +,0.36113 ,0.12804 ,0.15284 ,0.01194 ,0.00369 ,0.00136 |
| 475 | +,0.35170 ,0.12399 ,0.14286 ,0.01151 ,0.00365 ,0.00139 |
| 476 | +,0.34287 ,0.12021 ,0.13392 ,0.01111 ,0.00361 ,0.00142 |
| 477 | +,0.33446 ,0.11665 ,0.12585 ,0.01073 ,0.00355 ,0.00143 |
| 478 | +,0.32657 ,0.11334 ,0.11858 ,0.01039 ,0.00350 ,0.00145 |
| 479 | +,0.31903 ,0.11020 ,0.11198 ,0.01005 ,0.00345 ,0.00145/ |
| 480 | DATA ((F(I,24,K),I=1,6),K=1,19)/ |
| 481 | + 0.55924 ,0.21434 ,0.47743 ,0.01656 ,0.00038 ,0.00001 |
| 482 | +,0.52733 ,0.19865 ,0.40722 ,0.01573 ,0.00126 ,0.00001 |
| 483 | +,0.49974 ,0.18545 ,0.35192 ,0.01494 ,0.00183 ,0.00001 |
| 484 | +,0.47562 ,0.17417 ,0.30762 ,0.01419 ,0.00221 ,0.00001 |
| 485 | +,0.45417 ,0.16435 ,0.27154 ,0.01348 ,0.00245 ,0.00003 |
| 486 | +,0.43497 ,0.15572 ,0.24175 ,0.01278 ,0.00261 ,0.00020 |
| 487 | +,0.41758 ,0.14804 ,0.21678 ,0.01211 ,0.00271 ,0.00042 |
| 488 | +,0.40171 ,0.14112 ,0.19563 ,0.01150 ,0.00277 ,0.00058 |
| 489 | +,0.38717 ,0.13487 ,0.17756 ,0.01096 ,0.00280 ,0.00070 |
| 490 | +,0.37378 ,0.12919 ,0.16201 ,0.01045 ,0.00281 ,0.00079 |
| 491 | +,0.36133 ,0.12398 ,0.14848 ,0.00999 ,0.00279 ,0.00086 |
| 492 | +,0.34981 ,0.11919 ,0.13669 ,0.00956 ,0.00278 ,0.00092 |
| 493 | +,0.33913 ,0.11479 ,0.12635 ,0.00916 ,0.00275 ,0.00096 |
| 494 | +,0.32908 ,0.11072 ,0.11720 ,0.00880 ,0.00271 ,0.00098 |
| 495 | +,0.31968 ,0.10693 ,0.10908 ,0.00846 ,0.00267 ,0.00101 |
| 496 | +,0.31091 ,0.10342 ,0.10185 ,0.00814 ,0.00263 ,0.00102 |
| 497 | +,0.30260 ,0.10012 ,0.09536 ,0.00785 ,0.00258 ,0.00103 |
| 498 | +,0.29482 ,0.09705 ,0.08953 ,0.00757 ,0.00254 ,0.00104 |
| 499 | +,0.28741 ,0.09415 ,0.08427 ,0.00731 ,0.00249 ,0.00104/ |
| 500 | DATA ((F(I,25,K),I=1,6),K=1,19)/ |
| 501 | + 0.53163 ,0.19347 ,0.40464 ,0.01271 ,0.00029 ,0.00001 |
| 502 | +,0.49801 ,0.17808 ,0.34016 ,0.01201 ,0.00097 ,0.00000 |
| 503 | +,0.46924 ,0.16524 ,0.29033 ,0.01135 ,0.00140 ,0.00001 |
| 504 | +,0.44429 ,0.15435 ,0.25106 ,0.01073 ,0.00168 ,0.00001 |
| 505 | +,0.42228 ,0.14495 ,0.21951 ,0.01015 ,0.00185 ,0.00003 |
| 506 | +,0.40271 ,0.13673 ,0.19377 ,0.00958 ,0.00197 ,0.00015 |
| 507 | +,0.38509 ,0.12944 ,0.17243 ,0.00904 ,0.00203 ,0.00031 |
| 508 | +,0.36909 ,0.12293 ,0.15451 ,0.00856 ,0.00207 ,0.00043 |
| 509 | +,0.35451 ,0.11706 ,0.13934 ,0.00813 ,0.00208 ,0.00052 |
| 510 | +,0.34114 ,0.11175 ,0.12638 ,0.00773 ,0.00208 ,0.00058 |
| 511 | +,0.32878 ,0.10690 ,0.11520 ,0.00736 ,0.00206 ,0.00063 |
| 512 | +,0.31739 ,0.10247 ,0.10551 ,0.00703 ,0.00204 ,0.00067 |
| 513 | +,0.30685 ,0.09841 ,0.09707 ,0.00672 ,0.00202 ,0.00069 |
| 514 | +,0.29699 ,0.09466 ,0.08964 ,0.00643 ,0.00198 ,0.00071 |
| 515 | +,0.28779 ,0.09119 ,0.08309 ,0.00617 ,0.00195 ,0.00073 |
| 516 | +,0.27923 ,0.08797 ,0.07728 ,0.00593 ,0.00191 ,0.00074 |
| 517 | +,0.27115 ,0.08497 ,0.07210 ,0.00570 ,0.00187 ,0.00074 |
| 518 | +,0.26361 ,0.08217 ,0.06746 ,0.00549 ,0.00184 ,0.00074 |
| 519 | +,0.25644 ,0.07954 ,0.06329 ,0.00529 ,0.00180 ,0.00074/ |
| 520 | DATA ((F(I,26,K),I=1,6),K=1,19)/ |
| 521 | + 0.50029 ,0.17253 ,0.34099 ,0.00968 ,0.00022 ,0.00000 |
| 522 | +,0.46562 ,0.15773 ,0.28262 ,0.00910 ,0.00074 ,0.00000 |
| 523 | +,0.43621 ,0.14550 ,0.23830 ,0.00856 ,0.00106 ,0.00000 |
| 524 | +,0.41092 ,0.13519 ,0.20391 ,0.00805 ,0.00126 ,0.00000 |
| 525 | +,0.38875 ,0.12635 ,0.17663 ,0.00758 ,0.00139 ,0.00001 |
| 526 | +,0.36919 ,0.11866 ,0.15462 ,0.00713 ,0.00146 ,0.00010 |
| 527 | +,0.35167 ,0.11188 ,0.13655 ,0.00670 ,0.00150 ,0.00022 |
| 528 | +,0.33583 ,0.10585 ,0.12153 ,0.00633 ,0.00153 ,0.00031 |
| 529 | +,0.32147 ,0.10045 ,0.10890 ,0.00598 ,0.00153 ,0.00037 |
| 530 | +,0.30835 ,0.09558 ,0.09820 ,0.00567 ,0.00153 ,0.00042 |
| 531 | +,0.29631 ,0.09114 ,0.08903 ,0.00539 ,0.00151 ,0.00045 |
| 532 | +,0.28522 ,0.08711 ,0.08114 ,0.00513 ,0.00149 ,0.00048 |
| 533 | +,0.27499 ,0.08342 ,0.07430 ,0.00489 ,0.00146 ,0.00050 |
| 534 | +,0.26548 ,0.08002 ,0.06832 ,0.00467 ,0.00144 ,0.00051 |
| 535 | +,0.25664 ,0.07689 ,0.06307 ,0.00447 ,0.00141 ,0.00052 |
| 536 | +,0.24842 ,0.07400 ,0.05844 ,0.00428 ,0.00138 ,0.00052 |
| 537 | +,0.24068 ,0.07131 ,0.05433 ,0.00411 ,0.00135 ,0.00053 |
| 538 | +,0.23347 ,0.06881 ,0.05066 ,0.00395 ,0.00132 ,0.00053 |
| 539 | +,0.22665 ,0.06647 ,0.04738 ,0.00380 ,0.00129 ,0.00052/ |
| 540 | DATA ((F(I,27,K),I=1,6),K=1,19)/ |
| 541 | + 0.46607 ,0.15195 ,0.28547 ,0.00728 ,0.00017 ,0.00000 |
| 542 | +,0.43097 ,0.13799 ,0.23335 ,0.00681 ,0.00056 ,0.00000 |
| 543 | +,0.40146 ,0.12654 ,0.19442 ,0.00637 ,0.00080 ,0.00000 |
| 544 | +,0.37627 ,0.11696 ,0.16464 ,0.00597 ,0.00095 ,0.00000 |
| 545 | +,0.35433 ,0.10880 ,0.14131 ,0.00560 ,0.00104 ,0.00001 |
| 546 | +,0.33508 ,0.10173 ,0.12268 ,0.00524 ,0.00109 ,0.00007 |
| 547 | +,0.31794 ,0.09554 ,0.10754 ,0.00491 ,0.00111 ,0.00016 |
| 548 | +,0.30253 ,0.09005 ,0.09506 ,0.00462 ,0.00112 ,0.00022 |
| 549 | +,0.28861 ,0.08516 ,0.08465 ,0.00436 ,0.00112 ,0.00027 |
| 550 | +,0.27595 ,0.08076 ,0.07589 ,0.00412 ,0.00111 ,0.00030 |
| 551 | +,0.26438 ,0.07678 ,0.06844 ,0.00390 ,0.00110 ,0.00032 |
| 552 | +,0.25376 ,0.07316 ,0.06207 ,0.00370 ,0.00108 ,0.00034 |
| 553 | +,0.24401 ,0.06988 ,0.05658 ,0.00352 ,0.00106 ,0.00035 |
| 554 | +,0.23496 ,0.06685 ,0.05180 ,0.00336 ,0.00104 ,0.00036 |
| 555 | +,0.22658 ,0.06407 ,0.04763 ,0.00320 ,0.00101 ,0.00037 |
| 556 | +,0.21882 ,0.06152 ,0.04397 ,0.00306 ,0.00099 ,0.00037 |
| 557 | +,0.21152 ,0.05914 ,0.04073 ,0.00293 ,0.00097 ,0.00037 |
| 558 | +,0.20475 ,0.05695 ,0.03786 ,0.00281 ,0.00094 ,0.00037 |
| 559 | +,0.19836 ,0.05489 ,0.03530 ,0.00270 ,0.00092 ,0.00037/ |
| 560 | DATA ((F(I,28,K),I=1,6),K=1,19)/ |
| 561 | + 0.42981 ,0.13220 ,0.23735 ,0.00543 ,0.00012 ,-0.00001 |
| 562 | +,0.39492 ,0.11926 ,0.19136 ,0.00505 ,0.00042 ,-0.00001 |
| 563 | +,0.36579 ,0.10873 ,0.15758 ,0.00470 ,0.00059 ,-0.00001 |
| 564 | +,0.34110 ,0.09998 ,0.13207 ,0.00439 ,0.00070 ,-0.00001 |
| 565 | +,0.31976 ,0.09256 ,0.11232 ,0.00410 ,0.00077 ,0.00000 |
| 566 | +,0.30111 ,0.08618 ,0.09673 ,0.00383 ,0.00080 ,0.00005 |
| 567 | +,0.28458 ,0.08061 ,0.08416 ,0.00357 ,0.00082 ,0.00012 |
| 568 | +,0.26981 ,0.07570 ,0.07389 ,0.00335 ,0.00082 ,0.00016 |
| 569 | +,0.25654 ,0.07134 ,0.06539 ,0.00315 ,0.00082 ,0.00019 |
| 570 | +,0.24452 ,0.06744 ,0.05829 ,0.00296 ,0.00081 ,0.00022 |
| 571 | +,0.23354 ,0.06391 ,0.05229 ,0.00280 ,0.00079 ,0.00023 |
| 572 | +,0.22353 ,0.06073 ,0.04719 ,0.00265 ,0.00078 ,0.00024 |
| 573 | +,0.21436 ,0.05784 ,0.04282 ,0.00251 ,0.00076 ,0.00025 |
| 574 | +,0.20589 ,0.05519 ,0.03904 ,0.00239 ,0.00074 ,0.00026 |
| 575 | +,0.19806 ,0.05277 ,0.03575 ,0.00228 ,0.00072 ,0.00026 |
| 576 | +,0.19083 ,0.05054 ,0.03288 ,0.00217 ,0.00071 ,0.00026 |
| 577 | +,0.18406 ,0.04848 ,0.03036 ,0.00207 ,0.00069 ,0.00026 |
| 578 | +,0.17779 ,0.04658 ,0.02813 ,0.00199 ,0.00067 ,0.00026 |
| 579 | +,0.17189 ,0.04480 ,0.02615 ,0.00190 ,0.00065 ,0.00026/ |
| 580 | DATA ((F(I,29,K),I=1,6),K=1,19)/ |
| 581 | + 0.39228 ,0.11354 ,0.19583 ,0.00398 ,0.00009 ,-0.00001 |
| 582 | +,0.35811 ,0.10175 ,0.15576 ,0.00369 ,0.00031 ,-0.00001 |
| 583 | +,0.32981 ,0.09224 ,0.12676 ,0.00342 ,0.00044 ,-0.00001 |
| 584 | +,0.30599 ,0.08437 ,0.10516 ,0.00318 ,0.00052 ,-0.00001 |
| 585 | +,0.28553 ,0.07775 ,0.08862 ,0.00296 ,0.00056 ,0.00000 |
| 586 | +,0.26775 ,0.07208 ,0.07569 ,0.00275 ,0.00058 ,0.00004 |
| 587 | +,0.25208 ,0.06716 ,0.06538 ,0.00256 ,0.00059 ,0.00008 |
| 588 | +,0.23813 ,0.06284 ,0.05701 ,0.00239 ,0.00059 ,0.00011 |
| 589 | +,0.22565 ,0.05901 ,0.05014 ,0.00224 ,0.00059 ,0.00014 |
| 590 | +,0.21439 ,0.05560 ,0.04444 ,0.00210 ,0.00058 ,0.00015 |
| 591 | +,0.20415 ,0.05253 ,0.03965 ,0.00198 ,0.00057 ,0.00016 |
| 592 | +,0.19484 ,0.04977 ,0.03561 ,0.00187 ,0.00055 ,0.00017 |
| 593 | +,0.18635 ,0.04728 ,0.03217 ,0.00177 ,0.00054 ,0.00018 |
| 594 | +,0.17853 ,0.04499 ,0.02920 ,0.00168 ,0.00052 ,0.00018 |
| 595 | +,0.17132 ,0.04291 ,0.02664 ,0.00160 ,0.00051 ,0.00018 |
| 596 | +,0.16468 ,0.04100 ,0.02441 ,0.00152 ,0.00050 ,0.00018 |
| 597 | +,0.15849 ,0.03924 ,0.02246 ,0.00145 ,0.00048 ,0.00018 |
| 598 | +,0.15276 ,0.03761 ,0.02074 ,0.00138 ,0.00047 ,0.00018 |
| 599 | +,0.14738 ,0.03610 ,0.01923 ,0.00132 ,0.00045 ,0.00018/ |
| 600 | DATA ((F(I,30,K),I=1,6),K=1,19)/ |
| 601 | + 0.35427 ,0.09625 ,0.16023 ,0.00289 ,0.00007 ,0.00000 |
| 602 | +,0.32132 ,0.08569 ,0.12574 ,0.00267 ,0.00023 ,0.00000 |
| 603 | +,0.29427 ,0.07723 ,0.10114 ,0.00246 ,0.00032 ,0.00000 |
| 604 | +,0.27157 ,0.07028 ,0.08304 ,0.00228 ,0.00038 ,0.00000 |
| 605 | +,0.25225 ,0.06446 ,0.06935 ,0.00211 ,0.00041 ,0.00000 |
| 606 | +,0.23555 ,0.05951 ,0.05875 ,0.00196 ,0.00042 ,0.00003 |
| 607 | +,0.22089 ,0.05523 ,0.05036 ,0.00182 ,0.00043 ,0.00006 |
| 608 | +,0.20791 ,0.05148 ,0.04362 ,0.00169 ,0.00042 ,0.00008 |
| 609 | +,0.19635 ,0.04818 ,0.03812 ,0.00158 ,0.00042 ,0.00010 |
| 610 | +,0.18596 ,0.04525 ,0.03359 ,0.00148 ,0.00041 ,0.00011 |
| 611 | +,0.17656 ,0.04262 ,0.02983 ,0.00139 ,0.00040 ,0.00011 |
| 612 | +,0.16803 ,0.04026 ,0.02666 ,0.00131 ,0.00039 ,0.00012 |
| 613 | +,0.16026 ,0.03814 ,0.02397 ,0.00123 ,0.00038 ,0.00012 |
| 614 | +,0.15314 ,0.03620 ,0.02167 ,0.00117 ,0.00037 ,0.00012 |
| 615 | +,0.14659 ,0.03444 ,0.01969 ,0.00111 ,0.00036 ,0.00012 |
| 616 | +,0.14058 ,0.03283 ,0.01797 ,0.00105 ,0.00035 ,0.00013 |
| 617 | +,0.13498 ,0.03135 ,0.01648 ,0.00100 ,0.00033 ,0.00013 |
| 618 | +,0.12981 ,0.02999 ,0.01517 ,0.00095 ,0.00032 ,0.00012 |
| 619 | +,0.12499 ,0.02872 ,0.01402 ,0.00091 ,0.00031 ,0.00012/ |
| 620 | DATA ((F(I,31,K),I=1,6),K=1,19)/ |
| 621 | + 0.31635 ,0.08047 ,0.12992 ,0.00206 ,0.00005 ,0.00000 |
| 622 | +,0.28505 ,0.07117 ,0.10057 ,0.00189 ,0.00017 ,0.00000 |
| 623 | +,0.25956 ,0.06377 ,0.07995 ,0.00174 ,0.00023 ,0.00000 |
| 624 | +,0.23831 ,0.05773 ,0.06496 ,0.00161 ,0.00027 ,0.00000 |
| 625 | +,0.22033 ,0.05271 ,0.05375 ,0.00148 ,0.00029 ,0.00000 |
| 626 | +,0.20487 ,0.04845 ,0.04516 ,0.00137 ,0.00030 ,0.00002 |
| 627 | +,0.19136 ,0.04478 ,0.03842 ,0.00127 ,0.00030 ,0.00004 |
| 628 | +,0.17946 ,0.04159 ,0.03305 ,0.00117 ,0.00030 ,0.00006 |
| 629 | +,0.16890 ,0.03879 ,0.02871 ,0.00109 ,0.00029 ,0.00007 |
| 630 | +,0.15945 ,0.03631 ,0.02515 ,0.00102 ,0.00029 ,0.00007 |
| 631 | +,0.15092 ,0.03409 ,0.02221 ,0.00096 ,0.00028 ,0.00008 |
| 632 | +,0.14322 ,0.03211 ,0.01975 ,0.00090 ,0.00027 ,0.00008 |
| 633 | +,0.13623 ,0.03033 ,0.01768 ,0.00084 ,0.00026 ,0.00008 |
| 634 | +,0.12983 ,0.02872 ,0.01592 ,0.00080 ,0.00025 ,0.00008 |
| 635 | +,0.12398 ,0.02725 ,0.01441 ,0.00075 ,0.00025 ,0.00009 |
| 636 | +,0.11861 ,0.02591 ,0.01310 ,0.00071 ,0.00024 ,0.00009 |
| 637 | +,0.11363 ,0.02469 ,0.01197 ,0.00068 ,0.00023 ,0.00009 |
| 638 | +,0.10904 ,0.02357 ,0.01098 ,0.00064 ,0.00022 ,0.00009 |
| 639 | +,0.10477 ,0.02252 ,0.01012 ,0.00061 ,0.00021 ,0.00008/ |
| 640 | DATA ((F(I,32,K),I=1,6),K=1,19)/ |
| 641 | + 0.27922 ,0.06629 ,0.10427 ,0.00145 ,0.00004 ,0.00000 |
| 642 | +,0.24991 ,0.05825 ,0.07961 ,0.00133 ,0.00012 ,0.00000 |
| 643 | +,0.22623 ,0.05189 ,0.06253 ,0.00121 ,0.00017 ,0.00000 |
| 644 | +,0.20664 ,0.04673 ,0.05028 ,0.00112 ,0.00020 ,0.00000 |
| 645 | +,0.19015 ,0.04245 ,0.04121 ,0.00103 ,0.00021 ,0.00000 |
| 646 | +,0.17605 ,0.03885 ,0.03434 ,0.00094 ,0.00021 ,0.00002 |
| 647 | +,0.16378 ,0.03577 ,0.02900 ,0.00087 ,0.00021 ,0.00003 |
| 648 | +,0.15303 ,0.03309 ,0.02477 ,0.00080 ,0.00021 ,0.00004 |
| 649 | +,0.14351 ,0.03076 ,0.02138 ,0.00074 ,0.00021 ,0.00005 |
| 650 | +,0.13503 ,0.02870 ,0.01862 ,0.00069 ,0.00020 ,0.00005 |
| 651 | +,0.12742 ,0.02686 ,0.01636 ,0.00065 ,0.00020 ,0.00006 |
| 652 | +,0.12057 ,0.02523 ,0.01447 ,0.00061 ,0.00019 ,0.00006 |
| 653 | +,0.11437 ,0.02377 ,0.01289 ,0.00057 ,0.00018 ,0.00006 |
| 654 | +,0.10871 ,0.02244 ,0.01156 ,0.00054 ,0.00018 ,0.00006 |
| 655 | +,0.10354 ,0.02124 ,0.01042 ,0.00051 ,0.00017 ,0.00006 |
| 656 | +,0.09881 ,0.02016 ,0.00944 ,0.00048 ,0.00017 ,0.00006 |
| 657 | +,0.09445 ,0.01915 ,0.00859 ,0.00045 ,0.00016 ,0.00006 |
| 658 | +,0.09045 ,0.01823 ,0.00786 ,0.00043 ,0.00015 ,0.00005 |
| 659 | +,0.08672 ,0.01739 ,0.00722 ,0.00041 ,0.00015 ,0.00005/ |
| 660 | DATA ((F(I,33,K),I=1,6),K=1,19)/ |
| 661 | + 0.24336 ,0.05379 ,0.08279 ,0.00100 ,0.00002 ,0.00000 |
| 662 | +,0.21638 ,0.04695 ,0.06233 ,0.00091 ,0.00008 ,0.00000 |
| 663 | +,0.19471 ,0.04157 ,0.04837 ,0.00083 ,0.00012 ,0.00000 |
| 664 | +,0.17693 ,0.03724 ,0.03849 ,0.00076 ,0.00014 ,0.00000 |
| 665 | +,0.16203 ,0.03367 ,0.03124 ,0.00070 ,0.00014 ,0.00000 |
| 666 | +,0.14934 ,0.03069 ,0.02581 ,0.00064 ,0.00015 ,0.00001 |
| 667 | +,0.13839 ,0.02813 ,0.02163 ,0.00059 ,0.00015 ,0.00001 |
| 668 | +,0.12881 ,0.02593 ,0.01834 ,0.00054 ,0.00014 ,0.00002 |
| 669 | +,0.12038 ,0.02401 ,0.01573 ,0.00050 ,0.00014 ,0.00003 |
| 670 | +,0.11290 ,0.02233 ,0.01362 ,0.00047 ,0.00013 ,0.00003 |
| 671 | +,0.10620 ,0.02084 ,0.01190 ,0.00043 ,0.00013 ,0.00004 |
| 672 | +,0.10019 ,0.01951 ,0.01047 ,0.00040 ,0.00013 ,0.00004 |
| 673 | +,0.09478 ,0.01832 ,0.00928 ,0.00038 ,0.00012 ,0.00004 |
| 674 | +,0.08984 ,0.01726 ,0.00829 ,0.00035 ,0.00012 ,0.00004 |
| 675 | +,0.08536 ,0.01629 ,0.00744 ,0.00033 ,0.00011 ,0.00004 |
| 676 | +,0.08127 ,0.01542 ,0.00672 ,0.00032 ,0.00011 ,0.00003 |
| 677 | +,0.07750 ,0.01462 ,0.00610 ,0.00030 ,0.00010 ,0.00004 |
| 678 | +,0.07404 ,0.01389 ,0.00556 ,0.00028 ,0.00010 ,0.00004 |
| 679 | +,0.07084 ,0.01322 ,0.00509 ,0.00027 ,0.00010 ,0.00004/ |
| 680 | DATA ((F(I,34,K),I=1,6),K=1,19)/ |
| 681 | + 0.20929 ,0.04291 ,0.06492 ,0.00068 ,0.00002 ,0.00000 |
| 682 | +,0.18482 ,0.03720 ,0.04818 ,0.00062 ,0.00006 ,0.00000 |
| 683 | +,0.16532 ,0.03274 ,0.03693 ,0.00056 ,0.00008 ,0.00000 |
| 684 | +,0.14941 ,0.02917 ,0.02907 ,0.00051 ,0.00009 ,0.00000 |
| 685 | +,0.13616 ,0.02625 ,0.02337 ,0.00047 ,0.00010 ,0.00000 |
| 686 | +,0.12494 ,0.02382 ,0.01914 ,0.00043 ,0.00010 ,0.00000 |
| 687 | +,0.11530 ,0.02175 ,0.01591 ,0.00039 ,0.00010 ,0.00001 |
| 688 | +,0.10691 ,0.01997 ,0.01340 ,0.00036 ,0.00010 ,0.00001 |
| 689 | +,0.09956 ,0.01842 ,0.01141 ,0.00033 ,0.00009 ,0.00002 |
| 690 | +,0.09305 ,0.01707 ,0.00982 ,0.00031 ,0.00009 ,0.00002 |
| 691 | +,0.08725 ,0.01589 ,0.00853 ,0.00028 ,0.00009 ,0.00002 |
| 692 | +,0.08206 ,0.01483 ,0.00747 ,0.00026 ,0.00008 ,0.00002 |
| 693 | +,0.07741 ,0.01388 ,0.00659 ,0.00025 ,0.00008 ,0.00003 |
| 694 | +,0.07318 ,0.01304 ,0.00586 ,0.00023 ,0.00008 ,0.00002 |
| 695 | +,0.06935 ,0.01228 ,0.00524 ,0.00022 ,0.00007 ,0.00002 |
| 696 | +,0.06586 ,0.01159 ,0.00471 ,0.00020 ,0.00007 ,0.00002 |
| 697 | +,0.06265 ,0.01096 ,0.00426 ,0.00019 ,0.00007 ,0.00002 |
| 698 | +,0.05972 ,0.01039 ,0.00387 ,0.00018 ,0.00007 ,0.00002 |
| 699 | +,0.05701 ,0.00987 ,0.00353 ,0.00017 ,0.00006 ,0.00002/ |
| 700 | DATA ((F(I,35,K),I=1,6),K=1,19)/ |
| 701 | + 0.17738 ,0.03362 ,0.05021 ,0.00045 ,0.00001 ,0.00000 |
| 702 | +,0.15555 ,0.02894 ,0.03674 ,0.00041 ,0.00004 ,0.00000 |
| 703 | +,0.13828 ,0.02531 ,0.02779 ,0.00037 ,0.00006 ,0.00000 |
| 704 | +,0.12430 ,0.02243 ,0.02163 ,0.00033 ,0.00006 ,0.00000 |
| 705 | +,0.11271 ,0.02008 ,0.01722 ,0.00030 ,0.00006 ,0.00000 |
| 706 | +,0.10296 ,0.01813 ,0.01398 ,0.00028 ,0.00006 ,0.00000 |
| 707 | +,0.09462 ,0.01649 ,0.01153 ,0.00025 ,0.00006 ,0.00001 |
| 708 | +,0.08738 ,0.01508 ,0.00964 ,0.00023 ,0.00006 ,0.00001 |
| 709 | +,0.08107 ,0.01386 ,0.00815 ,0.00021 ,0.00006 ,0.00001 |
| 710 | +,0.07551 ,0.01281 ,0.00697 ,0.00020 ,0.00006 ,0.00001 |
| 711 | +,0.07057 ,0.01187 ,0.00602 ,0.00018 ,0.00006 ,0.00001 |
| 712 | +,0.06617 ,0.01105 ,0.00525 ,0.00017 ,0.00006 ,0.00002 |
| 713 | +,0.06223 ,0.01032 ,0.00461 ,0.00015 ,0.00005 ,0.00002 |
| 714 | +,0.05867 ,0.00966 ,0.00407 ,0.00014 ,0.00005 ,0.00002 |
| 715 | +,0.05545 ,0.00907 ,0.00363 ,0.00014 ,0.00005 ,0.00002 |
| 716 | +,0.05253 ,0.00854 ,0.00325 ,0.00013 ,0.00004 ,0.00002 |
| 717 | +,0.04985 ,0.00806 ,0.00293 ,0.00012 ,0.00004 ,0.00002 |
| 718 | +,0.04740 ,0.00763 ,0.00265 ,0.00011 ,0.00004 ,0.00002 |
| 719 | +,0.04515 ,0.00722 ,0.00241 ,0.00011 ,0.00004 ,0.00002/ |
| 720 | DATA ((F(I,36,K),I=1,6),K=1,19)/ |
| 721 | + 0.14797 ,0.02582 ,0.03824 ,0.00029 ,0.00001 ,0.00000 |
| 722 | +,0.12883 ,0.02206 ,0.02757 ,0.00026 ,0.00003 ,0.00000 |
| 723 | +,0.11381 ,0.01918 ,0.02059 ,0.00024 ,0.00004 ,0.00000 |
| 724 | +,0.10173 ,0.01690 ,0.01584 ,0.00021 ,0.00004 ,0.00000 |
| 725 | +,0.09177 ,0.01505 ,0.01248 ,0.00019 ,0.00004 ,0.00000 |
| 726 | +,0.08344 ,0.01353 ,0.01004 ,0.00018 ,0.00004 ,0.00000 |
| 727 | +,0.07634 ,0.01225 ,0.00821 ,0.00016 ,0.00004 ,0.00001 |
| 728 | +,0.07023 ,0.01116 ,0.00681 ,0.00015 ,0.00004 ,0.00001 |
| 729 | +,0.06490 ,0.01022 ,0.00572 ,0.00013 ,0.00004 ,0.00001 |
| 730 | +,0.06024 ,0.00940 ,0.00486 ,0.00012 ,0.00004 ,0.00001 |
| 731 | +,0.05611 ,0.00869 ,0.00417 ,0.00011 ,0.00004 ,0.00001 |
| 732 | +,0.05245 ,0.00806 ,0.00362 ,0.00010 ,0.00004 ,0.00001 |
| 733 | +,0.04918 ,0.00751 ,0.00316 ,0.00010 ,0.00003 ,0.00001 |
| 734 | +,0.04623 ,0.00701 ,0.00278 ,0.00009 ,0.00003 ,0.00001 |
| 735 | +,0.04357 ,0.00656 ,0.00247 ,0.00008 ,0.00003 ,0.00001 |
| 736 | +,0.04117 ,0.00616 ,0.00220 ,0.00008 ,0.00003 ,0.00001 |
| 737 | +,0.03897 ,0.00580 ,0.00197 ,0.00007 ,0.00003 ,0.00001 |
| 738 | +,0.03697 ,0.00547 ,0.00178 ,0.00007 ,0.00003 ,0.00001 |
| 739 | +,0.03513 ,0.00517 ,0.00161 ,0.00007 ,0.00002 ,0.00001/ |
| 740 | DATA ((F(I,37,K),I=1,6),K=1,19)/ |
| 741 | + 0.09745 ,0.01419 ,0.02101 ,0.00011 ,0.00001 ,0.00000 |
| 742 | +,0.08358 ,0.01195 ,0.01466 ,0.00010 ,0.00001 ,0.00000 |
| 743 | +,0.07286 ,0.01025 ,0.01065 ,0.00009 ,0.00001 ,0.00000 |
| 744 | +,0.06435 ,0.00893 ,0.00800 ,0.00008 ,0.00002 ,0.00000 |
| 745 | +,0.05744 ,0.00787 ,0.00617 ,0.00007 ,0.00002 ,0.00000 |
| 746 | +,0.05171 ,0.00700 ,0.00486 ,0.00006 ,0.00002 ,0.00000 |
| 747 | +,0.04688 ,0.00628 ,0.00391 ,0.00006 ,0.00002 ,0.00000 |
| 748 | +,0.04276 ,0.00567 ,0.00319 ,0.00005 ,0.00002 ,0.00000 |
| 749 | +,0.03921 ,0.00515 ,0.00264 ,0.00005 ,0.00002 ,0.00000 |
| 750 | +,0.03612 ,0.00471 ,0.00221 ,0.00004 ,0.00002 ,0.00000 |
| 751 | +,0.03341 ,0.00432 ,0.00187 ,0.00004 ,0.00001 ,0.00000 |
| 752 | +,0.03101 ,0.00398 ,0.00161 ,0.00004 ,0.00001 ,0.00000 |
| 753 | +,0.02889 ,0.00368 ,0.00139 ,0.00003 ,0.00001 ,0.00000 |
| 754 | +,0.02700 ,0.00342 ,0.00121 ,0.00003 ,0.00001 ,0.00000 |
| 755 | +,0.02530 ,0.00318 ,0.00106 ,0.00003 ,0.00001 ,0.00000 |
| 756 | +,0.02377 ,0.00297 ,0.00094 ,0.00003 ,0.00001 ,0.00000 |
| 757 | +,0.02239 ,0.00278 ,0.00084 ,0.00003 ,0.00001 ,0.00000 |
| 758 | +,0.02113 ,0.00261 ,0.00075 ,0.00002 ,0.00001 ,0.00000 |
| 759 | +,0.01998 ,0.00246 ,0.00068 ,0.00002 ,0.00001 ,0.00000/ |
| 760 | DATA ((F(I,38,K),I=1,6),K=1,19)/ |
| 761 | + 0.05868 ,0.00697 ,0.01052 ,0.00004 ,0.00000 ,0.00000 |
| 762 | +,0.04951 ,0.00577 ,0.00709 ,0.00003 ,0.00000 ,0.00000 |
| 763 | +,0.04254 ,0.00488 ,0.00500 ,0.00003 ,0.00000 ,0.00000 |
| 764 | +,0.03709 ,0.00419 ,0.00365 ,0.00003 ,0.00001 ,0.00000 |
| 765 | +,0.03272 ,0.00365 ,0.00275 ,0.00002 ,0.00000 ,0.00000 |
| 766 | +,0.02914 ,0.00322 ,0.00212 ,0.00002 ,0.00000 ,0.00000 |
| 767 | +,0.02616 ,0.00286 ,0.00167 ,0.00002 ,0.00000 ,0.00000 |
| 768 | +,0.02364 ,0.00256 ,0.00134 ,0.00002 ,0.00000 ,0.00000 |
| 769 | +,0.02149 ,0.00230 ,0.00109 ,0.00001 ,0.00000 ,0.00000 |
| 770 | +,0.01964 ,0.00209 ,0.00090 ,0.00001 ,0.00000 ,0.00000 |
| 771 | +,0.01802 ,0.00190 ,0.00075 ,0.00001 ,0.00000 ,0.00000 |
| 772 | +,0.01661 ,0.00174 ,0.00064 ,0.00001 ,0.00000 ,0.00000 |
| 773 | +,0.01537 ,0.00160 ,0.00054 ,0.00001 ,0.00000 ,0.00000 |
| 774 | +,0.01426 ,0.00147 ,0.00047 ,0.00001 ,0.00000 ,0.00000 |
| 775 | +,0.01328 ,0.00136 ,0.00041 ,0.00001 ,0.00000 ,0.00000 |
| 776 | +,0.01241 ,0.00126 ,0.00036 ,0.00001 ,0.00000 ,0.00000 |
| 777 | +,0.01162 ,0.00118 ,0.00032 ,0.00001 ,0.00000 ,0.00000 |
| 778 | +,0.01091 ,0.00110 ,0.00028 ,0.00001 ,0.00000 ,0.00000 |
| 779 | +,0.01026 ,0.00103 ,0.00025 ,0.00001 ,0.00000 ,0.00000/ |
| 780 | DATA ((F(I,39,K),I=1,6),K=1,19)/ |
| 781 | + 0.03135 ,0.00294 ,0.00465 ,0.00001 ,0.00000 ,0.00000 |
| 782 | +,0.02598 ,0.00239 ,0.00301 ,0.00001 ,0.00000 ,0.00000 |
| 783 | +,0.02196 ,0.00199 ,0.00205 ,0.00001 ,0.00000 ,0.00000 |
| 784 | +,0.01887 ,0.00168 ,0.00146 ,0.00001 ,0.00000 ,0.00000 |
| 785 | +,0.01643 ,0.00145 ,0.00107 ,0.00001 ,0.00000 ,0.00000 |
| 786 | +,0.01446 ,0.00126 ,0.00080 ,0.00001 ,0.00000 ,0.00000 |
| 787 | +,0.01284 ,0.00111 ,0.00062 ,0.00000 ,0.00000 ,0.00000 |
| 788 | +,0.01148 ,0.00098 ,0.00049 ,0.00000 ,0.00000 ,0.00000 |
| 789 | +,0.01034 ,0.00087 ,0.00039 ,0.00000 ,0.00000 ,0.00000 |
| 790 | +,0.00936 ,0.00078 ,0.00032 ,0.00000 ,0.00000 ,0.00000 |
| 791 | +,0.00852 ,0.00071 ,0.00026 ,0.00000 ,0.00000 ,0.00000 |
| 792 | +,0.00779 ,0.00064 ,0.00022 ,0.00000 ,0.00000 ,0.00000 |
| 793 | +,0.00715 ,0.00059 ,0.00018 ,0.00000 ,0.00000 ,0.00000 |
| 794 | +,0.00659 ,0.00054 ,0.00016 ,0.00000 ,0.00000 ,0.00000 |
| 795 | +,0.00609 ,0.00049 ,0.00013 ,0.00000 ,0.00000 ,0.00000 |
| 796 | +,0.00565 ,0.00045 ,0.00012 ,0.00000 ,0.00000 ,0.00000 |
| 797 | +,0.00525 ,0.00042 ,0.00010 ,0.00000 ,0.00000 ,0.00000 |
| 798 | +,0.00490 ,0.00039 ,0.00009 ,0.00000 ,0.00000 ,0.00000 |
| 799 | +,0.00458 ,0.00036 ,0.00008 ,0.00000 ,0.00000 ,0.00000/ |
| 800 | DATA ((F(I,40,K),I=1,6),K=1,19)/ |
| 801 | + 0.01414 ,0.00099 ,0.00171 ,0.00000 ,0.00000 ,0.00000 |
| 802 | +,0.01147 ,0.00079 ,0.00106 ,0.00000 ,0.00000 ,0.00000 |
| 803 | +,0.00952 ,0.00065 ,0.00069 ,0.00000 ,0.00000 ,0.00000 |
| 804 | +,0.00804 ,0.00054 ,0.00047 ,0.00000 ,0.00000 ,0.00000 |
| 805 | +,0.00690 ,0.00046 ,0.00034 ,0.00000 ,0.00000 ,0.00000 |
| 806 | +,0.00599 ,0.00039 ,0.00025 ,0.00000 ,0.00000 ,0.00000 |
| 807 | +,0.00525 ,0.00034 ,0.00018 ,0.00000 ,0.00000 ,0.00000 |
| 808 | +,0.00464 ,0.00030 ,0.00014 ,0.00000 ,0.00000 ,0.00000 |
| 809 | +,0.00413 ,0.00026 ,0.00011 ,0.00000 ,0.00000 ,0.00000 |
| 810 | +,0.00370 ,0.00023 ,0.00009 ,0.00000 ,0.00000 ,0.00000 |
| 811 | +,0.00333 ,0.00021 ,0.00007 ,0.00000 ,0.00000 ,0.00000 |
| 812 | +,0.00302 ,0.00019 ,0.00006 ,0.00000 ,0.00000 ,0.00000 |
| 813 | +,0.00274 ,0.00017 ,0.00005 ,0.00000 ,0.00000 ,0.00000 |
| 814 | +,0.00251 ,0.00015 ,0.00004 ,0.00000 ,0.00000 ,0.00000 |
| 815 | +,0.00230 ,0.00014 ,0.00003 ,0.00000 ,0.00000 ,0.00000 |
| 816 | +,0.00212 ,0.00013 ,0.00003 ,0.00000 ,0.00000 ,0.00000 |
| 817 | +,0.00195 ,0.00012 ,0.00003 ,0.00000 ,0.00000 ,0.00000 |
| 818 | +,0.00181 ,0.00011 ,0.00002 ,0.00000 ,0.00000 ,0.00000 |
| 819 | +,0.00168 ,0.00010 ,0.00002 ,0.00000 ,0.00000 ,0.00000/ |
| 820 | DATA ((F(I,41,K),I=1,6),K=1,19)/ |
| 821 | + 0.00105 ,0.00003 ,0.00008 ,0.00000 ,0.00000 ,0.00000 |
| 822 | +,0.00080 ,0.00002 ,0.00004 ,0.00000 ,0.00000 ,0.00000 |
| 823 | +,0.00063 ,0.00002 ,0.00002 ,0.00000 ,0.00000 ,0.00000 |
| 824 | +,0.00051 ,0.00001 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 825 | +,0.00042 ,0.00001 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 826 | +,0.00035 ,0.00001 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 827 | +,0.00029 ,0.00001 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 828 | +,0.00025 ,0.00001 ,0.00001 ,0.00000 ,0.00000 ,0.00000 |
| 829 | +,0.00021 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 830 | +,0.00018 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 831 | +,0.00016 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 832 | +,0.00014 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 833 | +,0.00012 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 834 | +,0.00011 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 835 | +,0.00010 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 836 | +,0.00009 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 837 | +,0.00008 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 838 | +,0.00007 ,0.00001 ,0.00000 ,0.00000 ,0.00000 ,0.00000 |
| 839 | +,0.00006 ,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(67,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 | XSAVE = X |
| 871 | IF(X.LT.XMIN) X=XMIN |
| 872 | IF(X.GT.XMAX) X=XMAX |
| 873 | QSQ=SCALE**2 |
| 874 | IF(QSQ.LT.QSQMIN) QSQ=QSQMIN |
| 875 | IF(QSQ.GT.QSQMAX) QSQ=QSQMAX |
| 876 | XXX=X |
| 877 | IF(X.LT.PONED) XXX= LOG10(X)+ONEDO |
| 878 | N=0 |
| 879 | 70 N=N+1 |
| 880 | IF(XXX.GT.XX(N+1)) GOTO 70 |
| 881 | A=(XXX-XX(N))/(XX(N+1)-XX(N)) |
| 882 | RM= LOG(QSQ/QSQMIN)/ LOG(TWOD) |
| 883 | B=RM-AINT(RM) |
| 884 | M=1+ INT(RM) |
| 885 | DO 60 I=1,6 |
| 886 | G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1) |
| 887 | . + A*(ONED-B)*F(I,N+1,M) + A*B*F(I,N+1,M+1) |
| 888 | IF(N.GE.16) GOTO 65 |
| 889 | IF(I.EQ.6) GOTO 65 |
| 890 | FAC=(ONED-B)*F(I,16,M)+B*F(I,16,M+1) |
| 891 | G(I)=FAC**(G(I)/FAC) |
| 892 | 65 CONTINUE |
| 893 | G(I)=G(I)*(ONED-X)**N0(I) |
| 894 | 60 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 | X = XSAVE |
| 903 | RETURN |
| 904 | END |
git://git.uio.no / u / mrichter / AliRoot.git / blame