+++ /dev/null
-#include "pdf/pilot.h"
- SUBROUTINE SFMS130(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU)
-C
-C THIS IS THE alphas=0.130 FIT -- May 1995 -- standard Q^2 range
-C
-#include "pdf/impdp.inc"
-C
- PARAMETER(NX=47)
- PARAMETER(NTENTH=21)
- DIMENSION F(8,NX,20),G(8),XX(NX),N0(8)
- DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=1,7)/
- + .00145, .00341, 8.97173, .70631, .15951,
- + .00000, .42112, .70932,
- + .00195, .00370, 21.90480, 1.19723, .65448,
- + .00000, .91481, 1.20088,
- + .00241, .00397, 39.05281, 1.80629, 1.26685,
- + .00000, 1.52615, 1.81047,
- + .00282, .00421, 59.39211, 2.50449, 1.96787,
- + .15991, 2.22633, 2.50914,
- + .00321, .00445, 82.46889, 3.28433, 2.75020,
- + .99243, 3.00792, 3.28941,
- + .00358, .00467, 107.99681, 4.13912, 3.60721,
- + 1.87580, 3.86428, 4.14459,
- + .00393, .00488, 135.18617, 5.04914, 4.51927,
- + 2.81308, 4.77575, 5.05498 /
- DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=8,14)/
- + .00427, .00508, 163.95160, 6.01197, 5.48396,
- + 3.80070, 5.73991, 6.01815,
- + .00460, .00528, 193.94818, 7.01879, 6.49250,
- + 4.83005, 6.74796, 7.02529,
- + .00491, .00546, 224.90520, 8.06265, 7.53796,
- + 5.89456, 7.79297, 8.06945,
- + .00521, .00564, 256.61942, 9.13814, 8.61496,
- + 6.98912, 8.86953, 9.14523,
- + .00551, .00582, 288.94693, 10.24123, 9.71946,
- + 8.10991, 9.97364, 10.24859,
- + .00579, .00599, 321.78876, 11.36910, 10.84867,
- + 9.25427, 11.10246, 11.37672,
- + .00607, .00615, 354.90732, 12.51540, 11.99624,
- + 10.41604, 12.24968, 12.52328 /
- DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=15,19)/
- + .00634, .00632, 388.08878, 13.67410, 13.15614,
- + 11.58928, 13.40924, 13.68221,
- + .00660, .00647, 421.57944, 14.85103, 14.33423,
- + 12.77993, 14.58700, 14.85938,
- + .00686, .00662, 455.24307, 16.04232, 15.52661,
- + 13.98418, 15.77907, 16.05088,
- + .00711, .00677, 488.59973, 17.23502, 16.72036,
- + 15.18921, 16.97252, 17.24380,
- + .00735, .00692, 522.26788, 18.44496, 17.93132,
- + 16.41086, 18.18320, 18.45395 /
- DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=1,7)/
- + .00253, .00457, 8.25009, .66508, .14168,
- + .00000, .39140, .66804,
- + .00326, .00499, 18.93998, 1.07771, .55863,
- + .00000, .80673, 1.08113,
- + .00392, .00537, 32.49142, 1.57101, 1.05546,
- + .00000, 1.30225, 1.57482,
- + .00451, .00573, 48.05289, 2.12156, 1.60902,
- + .12561, 1.85471, 2.12572,
- + .00507, .00606, 65.26363, 2.72355, 2.21366,
- + .77230, 2.45838, 2.72802,
- + .00560, .00637, 83.90363, 3.37180, 2.86427,
- + 1.44583, 3.10814, 3.37654,
- + .00611, .00666, 103.39499, 4.05152, 3.54615,
- + 2.14950, 3.78924, 4.05653 /
- DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=8,14)/
- + .00659, .00694, 123.69079, 4.76120, 4.25780,
- + 2.88091, 4.50019, 4.76645,
- + .00705, .00721, 144.55658, 5.49457, 4.99299,
- + 3.63404, 5.23473, 5.50005,
- + .00749, .00747, 165.81564, 6.24685, 5.74697,
- + 4.40443, 5.98810, 6.25254,
- + .00792, .00772, 187.34157, 7.01443, 6.51614,
- + 5.18873, 6.75670, 7.02033,
- + .00833, .00796, 209.04994, 7.79474, 7.29795,
- + 5.98455, 7.53797, 7.80083,
- + .00873, .00819, 230.88733, 8.58605, 8.09067,
- + 6.79032, 8.33020, 8.59233,
- + .00911, .00842, 252.70547, 9.38414, 8.89010,
- + 7.60195, 9.12914, 9.39059 /
- DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=15,19)/
- + .00949, .00864, 274.37265, 10.18504, 9.69227,
- + 8.41560, 9.93087, 10.19166,
- + .00986, .00885, 296.07019, 10.99321, 10.50165,
- + 9.23578, 10.73981, 10.99999,
- + .01021, .00906, 317.71695, 11.80612, 11.31571,
- + 10.06005, 11.55346, 11.81306,
- + .01056, .00926, 339.00198, 12.61497, 12.12568,
- + 10.87969, 12.36303, 12.62206,
- + .01090, .00945, 360.35056, 13.43110, 12.94287,
- + 11.70607, 13.17984, 13.43833 /
- DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=1,7)/
- + .00425, .00612, 7.58296, .62588, .12529,
- + .00000, .36358, .62886,
- + .00531, .00673, 16.36875, .97032, .47435,
- + .00000, .71070, .97364,
- + .00626, .00728, 27.01918, 1.36734, .87515,
- + .00000, 1.10992, 1.37093,
- + .00712, .00779, 38.85864, 1.79884, 1.30987,
- + .09816, 1.54331, 1.80268,
- + .00793, .00825, 51.62027, 2.26079, 1.77464,
- + .59813, 2.00691, 2.26485,
- + .00868, .00869, 65.14942, 2.74950, 2.26589,
- + 1.10921, 2.49711, 2.75377,
- + .00940, .00910, 79.03492, 3.25422, 2.77291,
- + 1.63498, 3.00319, 3.25867 /
- DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=8,14)/
- + .01008, .00949, 93.26187, 3.77421, 3.29501,
- + 2.17406, 3.52441, 3.77883,
- + .01073, .00987, 107.67826, 4.30521, 3.82795,
- + 2.72240, 4.05656, 4.30999,
- + .01136, .01022, 122.17532, 4.84408, 4.36863,
- + 3.27718, 4.59649, 4.84901,
- + .01196, .01057, 136.67989, 5.38855, 4.91480,
- + 3.83633, 5.14197, 5.39363,
- + .01253, .01090, 151.14815, 5.93711, 5.46495,
- + 4.39850, 5.69146, 5.94232,
- + .01309, .01121, 165.55626, 6.48881, 6.01815,
- + 4.96289, 6.24405, 6.49415,
- + .01363, .01152, 179.81464, 7.04092, 6.57169,
- + 5.52689, 6.79699, 7.04638 /
- DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=15,19)/
- + .01416, .01182, 193.84564, 7.59092, 7.12304,
- + 6.08807, 7.34779, 7.59650,
- + .01466, .01210, 207.78363, 8.14221, 7.67561,
- + 6.64989, 7.89983, 8.14790,
- + .01516, .01238, 221.58186, 8.69324, 8.22787,
- + 7.21089, 8.45158, 8.69904,
- + .01564, .01265, 235.04161, 9.23805, 8.77387,
- + 7.76517, 8.99709, 9.24396,
- + .01611, .01292, 248.45462, 9.78478, 9.32173,
- + 8.32089, 9.54449, 9.79079 /
- DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=1,7)/
- + .00568, .00726, 7.21520, .60375, .11633,
- + .00000, .34810, .60680,
- + .00700, .00803, 15.02376, .91246, .42986,
- + .00000, .65953, .91580,
- + .00818, .00871, 24.24597, 1.26089, .78224,
- + .00000, 1.01018, 1.26446,
- + .00925, .00932, 34.30429, 1.63382, 1.15852,
- + .08475, 1.38500, 1.63760,
- + .01024, .00989, 44.98284, 2.02818, 1.55583,
- + .51372, 1.78103, 2.03215,
- + .01118, .01042, 56.16156, 2.44110, 1.97140,
- + .94748, 2.19544, 2.44523,
- + .01206, .01093, 67.50828, 2.86377, 2.39646,
- + 1.38969, 2.61947, 2.86805 /
- DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=8,14)/
- + .01289, .01140, 79.02312, 3.29583, 2.83072,
- + 1.83946, 3.05277, 3.30026,
- + .01369, .01185, 90.59126, 3.73396, 3.27089,
- + 2.29369, 3.49206, 3.73852,
- + .01445, .01228, 102.13345, 4.17579, 3.71461,
- + 2.75028, 3.93495, 4.18048,
- + .01518, .01270, 113.59947, 4.61964, 4.16023,
- + 3.20775, 4.37981, 4.62445,
- + .01589, .01309, 124.96193, 5.06446, 4.60670,
- + 3.66519, 4.82556, 5.06938,
- + .01657, .01347, 136.20905, 5.50964, 5.05345,
- + 4.12214, 5.27162, 5.51466,
- + .01722, .01384, 147.27547, 5.95310, 5.49839,
- + 4.57663, 5.71592, 5.95823 /
- DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=15,19)/
- + .01785, .01419, 158.10556, 6.39294, 5.93965,
- + 5.02684, 6.15656, 6.39817,
- + .01847, .01454, 168.81200, 6.83207, 6.38012,
- + 5.47575, 6.59645, 6.83739,
- + .01907, .01487, 179.36188, 7.26935, 6.81867,
- + 5.92226, 7.03445, 7.27475,
- + .01964, .01519, 189.60268, 7.70007, 7.25063,
- + 6.36177, 7.46586, 7.70556,
- + .02021, .01551, 199.76869, 8.13091, 7.68264,
- + 6.80094, 7.89736, 8.13649 /
- DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=1,7)/
- + .00694, .00820, 6.96326, .58834, .11023,
- + .00000, .33745, .59148,
- + .00849, .00910, 14.13319, .87340, .40027,
- + .00000, .62526, .87680,
- + .00987, .00989, 22.44636, 1.19043, .72137,
- + .00000, .94454, 1.19404,
- + .01111, .01060, 31.39114, 1.52610, 1.06050,
- + .07625, 1.28213, 1.52990,
- + .01227, .01125, 40.78522, 1.87798, 1.41544,
- + .46054, 1.63570, 1.88195,
- + .01335, .01187, 50.53088, 2.24373, 1.78392,
- + .84613, 2.00296, 2.24785,
- + .01437, .01244, 60.34471, 2.61576, 2.15843,
- + 1.23670, 2.37636, 2.62002 /
- DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=8,14)/
- + .01533, .01299, 70.23557, 2.99395, 2.53889,
- + 1.63170, 2.75580, 2.99834,
- + .01625, .01350, 80.11086, 3.37555, 2.92259,
- + 2.02857, 3.13856, 3.38006,
- + .01713, .01399, 89.90868, 3.75863, 3.30762,
- + 2.42566, 3.52272, 3.76325,
- + .01797, .01446, 99.59186, 4.14189, 3.69271,
- + 2.82183, 3.90699, 4.14662,
- + .01878, .01491, 109.14227, 4.52452, 4.07705,
- + 3.21645, 4.29057, 4.52935,
- + .01956, .01535, 118.55435, 4.90613, 4.46028,
- + 3.60923, 4.67307, 4.91106,
- + .02031, .01576, 127.77693, 5.28501, 4.84069,
- + 3.99857, 5.05280, 5.29003 /
- DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=15,19)/
- + .02103, .01617, 136.76628, 5.65962, 5.21676,
- + 4.38303, 5.42821, 5.66473,
- + .02174, .01656, 145.62187, 6.03257, 5.59110,
- + 4.76525, 5.80193, 6.03777,
- + .02242, .01693, 154.31879, 6.40295, 5.96279,
- + 5.14439, 6.17303, 6.40822,
- + .02308, .01730, 162.73064, 6.76678, 6.32789,
- + 5.51656, 6.53756, 6.77213,
- + .02372, .01765, 171.05791, 7.12987, 6.69220,
- + 5.88756, 6.90132, 7.13530 /
- DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=1,7)/
- + .00810, .00902, 6.77247, .57652, .10565,
- + .00000, .32936, .57977,
- + .00985, .01003, 13.47605, .84415, .37838,
- + .00000, .59977, .84764,
- + .01140, .01091, 21.13824, 1.13844, .67685,
- + .00000, .89634, 1.14213,
- + .01280, .01171, 29.29614, 1.44744, .98941,
- + .07019, 1.20729, 1.45131,
- + .01409, .01244, 37.79176, 1.76920, 1.31429,
- + .42275, 1.53075, 1.77322,
- + .01531, .01312, 46.54340, 2.10173, 1.64963,
- + .77438, 1.86482, 2.10590,
- + .01645, .01376, 55.30159, 2.43832, 1.98877,
- + 1.12879, 2.20280, 2.44262 /
- DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=8,14)/
- + .01752, .01437, 64.08105, 2.77901, 2.33179,
- + 1.48562, 2.54476, 2.78343,
- + .01855, .01494, 72.80413, 3.12144, 2.67638,
- + 1.84273, 2.88836, 3.12597,
- + .01953, .01548, 81.42059, 3.46399, 3.02094,
- + 2.19873, 3.23201, 3.46864,
- + .02047, .01600, 89.90174, 3.80560, 3.36442,
- + 2.55275, 3.57464, 3.81035,
- + .02137, .01650, 98.23544, 4.14564, 3.70622,
- + 2.90430, 3.91564, 4.15049,
- + .02223, .01698, 106.42037, 4.48385, 4.04609,
- + 3.25324, 4.25475, 4.48878,
- + .02307, .01744, 114.41388, 4.81877, 4.38258,
- + 3.59822, 4.59053, 4.82379 /
- DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=15,19)/
- + .02387, .01789, 122.18080, 5.14911, 4.71442,
- + 3.93801, 4.92168, 5.15422,
- + .02465, .01831, 129.81091, 5.47726, 5.04399,
- + 4.27506, 5.25060, 5.48244,
- + .02541, .01873, 137.28435, 5.80244, 5.37053,
- + 4.60867, 5.57653, 5.80770,
- + .02614, .01913, 144.49228, 6.12121, 5.69060,
- + 4.93544, 5.89600, 6.12654,
- + .02685, .01952, 151.61221, 6.43875, 6.00939,
- + 5.26058, 6.21422, 6.44416 /
- DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=1,7)/
- + .01291, .01216, 6.20156, .54036, .09215,
- + .00000, .30504, .54410,
- + .01547, .01360, 11.60259, .75851, .31588,
- + .00000, .52618, .76249,
- + .01772, .01486, 17.50877, .99023, .55217,
- + .00000, .76035, .99442,
- + .01973, .01598, 23.59314, 1.22739, .79322,
- + .05395, .99958, 1.23175,
- + .02158, .01701, 29.76331, 1.46923, 1.03850,
- + .32220, 1.24326, 1.47376,
- + .02331, .01796, 35.97956, 1.71481, 1.28715,
- + .58480, 1.49048, 1.71948,
- + .02492, .01885, 42.07872, 1.95960, 1.53473,
- + .84539, 1.73676, 1.96441 /
- DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=8,14)/
- + .02645, .01969, 48.08881, 2.20404, 1.78174,
- + 1.10413, 1.98256, 2.20898,
- + .02789, .02048, 53.96851, 2.44676, 2.02682,
- + 1.35985, 2.22655, 2.45182,
- + .02926, .02123, 59.69471, 2.68691, 2.26916,
- + 1.61191, 2.46786, 2.69207,
- + .03056, .02194, 65.25824, 2.92397, 2.50829,
- + 1.85998, 2.70602, 2.92924,
- + .03181, .02262, 70.65990, 3.15776, 2.74400,
- + 2.10397, 2.94083, 3.16313,
- + .03301, .02327, 75.90666, 3.38828, 2.97635,
- + 2.34400, 3.17232, 3.39374,
- + .03416, .02389, 80.97660, 3.61471, 3.20450,
- + 2.57934, 3.39967, 3.62026 /
- DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=15,19)/
- + .03527, .02449, 85.85220, 3.83630, 3.42773,
- + 2.80931, 3.62213, 3.84194,
- + .03634, .02507, 90.59946, 4.05488, 3.64788,
- + 3.03580, 3.84154, 4.06060,
- + .03737, .02562, 95.20920, 4.27005, 3.86454,
- + 3.25844, 4.05751, 4.27586,
- + .03837, .02616, 99.61356, 4.47953, 4.07544,
- + 3.47501, 4.26774, 4.48541,
- + .03934, .02668, 103.93369, 4.68703, 4.28430,
- + 3.68924, 4.47596, 4.69298 /
- DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=1,7)/
- + .02034, .01652, 5.65225, .50432, .07968,
- + .00000, .28159, .50893,
- + .02407, .01858, 9.94245, .67927, .26081,
- + .00000, .45986, .68419,
- + .02731, .02036, 14.43102, .85896, .44558,
- + .00000, .64228, .86416,
- + .03020, .02193, 18.90255, 1.03828, .62923,
- + .04100, .82392, 1.04372,
- + .03283, .02337, 23.31495, 1.21738, .81214,
- + .24288, 1.00506, 1.22303,
- + .03527, .02469, 27.65916, 1.39603, .99422,
- + .43682, 1.18555, 1.40189,
- + .03754, .02592, 31.83426, 1.57138, 1.17267,
- + .62626, 1.36256, 1.57741 /
- DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=8,14)/
- + .03967, .02707, 35.87514, 1.74408, 1.34822,
- + .81172, 1.53678, 1.75028,
- + .04168, .02815, 39.76421, 1.91344, 1.52022,
- + .99269, 1.70755, 1.91980,
- + .04358, .02917, 43.49528, 2.07912, 1.68834,
- + 1.16900, 1.87453, 2.08562,
- + .04538, .03013, 47.07044, 2.24097, 1.85248,
- + 1.34068, 2.03761, 2.24761,
- + .04710, .03105, 50.49731, 2.39905, 2.01271,
- + 1.50787, 2.19683, 2.40582,
- + .04875, .03193, 53.78654, 2.55353, 2.16922,
- + 1.67085, 2.35240, 2.56043,
- + .05032, .03277, 56.92845, 2.70399, 2.32159,
- + 1.82927, 2.50388, 2.71100 /
- DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=15,19)/
- + .05183, .03357, 59.91586, 2.85003, 2.46945,
- + 1.98279, 2.65089, 2.85716,
- + .05328, .03434, 62.79673, 2.99304, 2.61419,
- + 2.13286, 2.79482, 3.00028,
- + .05469, .03509, 65.56800, 3.13284, 2.75565,
- + 2.27934, 2.93551, 3.14018,
- + .05603, .03580, 68.18784, 3.26795, 2.89234,
- + 2.42079, 3.07146, 3.27539,
- + .05734, .03649, 70.73832, 3.40100, 3.02691,
- + 2.55987, 3.20532, 3.40854 /
- DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=1,7)/
- + .02643, .01989, 5.33300, .48281, .07281,
- + .00000, .26801, .48814,
- + .03106, .02241, 9.04815, .63501, .23161,
- + .00000, .42379, .64074,
- + .03507, .02459, 12.83521, .78836, .39040,
- + .00000, .58009, .79443,
- + .03861, .02650, 16.53288, .93916, .54584,
- + .03467, .73340, .94553,
- + .04183, .02824, 20.12173, 1.08794, .69870,
- + .20442, .88439, 1.09458,
- + .04481, .02984, 23.60596, 1.23480, .84922,
- + .36568, 1.03323, 1.24168,
- + .04756, .03131, 26.91204, 1.37760, .99535,
- + .52172, 1.17782, 1.38471 /
- DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=8,14)/
- + .05014, .03269, 30.07650, 1.51709, 1.13789,
- + .67320, 1.31896, 1.52441,
- + .05256, .03398, 33.09121, 1.65286, 1.27648,
- + .81988, 1.45626, 1.66038,
- + .05484, .03520, 35.95637, 1.78477, 1.41100,
- + .96178, 1.58958, 1.79247,
- + .05701, .03635, 38.67790, 1.91282, 1.54149,
- + 1.09906, 1.71894, 1.92069,
- + .05907, .03744, 41.26545, 2.03715, 1.66812,
- + 1.23195, 1.84451, 2.04518,
- + .06103, .03848, 43.73038, 2.15798, 1.79113,
- + 1.36078, 1.96652, 2.16618,
- + .06291, .03947, 46.06755, 2.27506, 1.91025,
- + 1.48534, 2.08470, 2.28340 /
- DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=15,19)/
- + .06470, .04041, 48.27351, 2.38812, 2.02526,
- + 1.60544, 2.19882, 2.39661,
- + .06643, .04132, 50.38773, 2.49835, 2.13734,
- + 1.72231, 2.31004, 2.50697,
- + .06809, .04220, 52.40919, 2.60564, 2.24639,
- + 1.83587, 2.41828, 2.61439,
- + .06969, .04303, 54.30672, 2.70886, 2.35130,
- + 1.94505, 2.52241, 2.71773,
- + .07123, .04384, 56.14520, 2.81013, 2.45420,
- + 2.05200, 2.62456, 2.81912 /
- DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=1,7)/
- + .03179, .02279, 5.10358, .46712, .06809,
- + .00000, .25829, .47305,
- + .03718, .02571, 8.43961, .60419, .21210,
- + .00000, .39915, .61059,
- + .04182, .02821, 11.77731, .74043, .35407,
- + .00000, .53852, .74725,
- + .04591, .03040, 14.98898, .87302, .49153,
- + .03066, .67377, .88019,
- + .04961, .03239, 18.06856, 1.00268, .62549,
- + .18012, .80577, 1.01016,
- + .05302, .03421, 21.02767, 1.12970, .75636,
- + .32097, .93489, 1.13747,
- + .05617, .03588, 23.80894, 1.25238, .88253,
- + .45634, 1.05948, 1.26042 /
- DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=8,14)/
- + .05910, .03745, 26.44914, 1.37149, 1.00485,
- + .58694, 1.18034, 1.37978,
- + .06186, .03891, 28.94529, 1.48680, 1.12312,
- + .71270, 1.29726, 1.49532,
- + .06445, .04028, 31.30086, 1.59826, 1.23733,
- + .83374, 1.41022, 1.60699,
- + .06690, .04157, 33.52361, 1.70596, 1.34759,
- + .95029, 1.51932, 1.71489,
- + .06923, .04280, 35.62395, 1.81008, 1.45412,
- + 1.06262, 1.62475, 1.81920,
- + .07145, .04396, 37.61330, 1.91087, 1.55718,
- + 1.17106, 1.72677, 1.92017,
- + .07356, .04507, 39.48883, 2.00813, 1.65660,
- + 1.27551, 1.82521, 2.01761 /
- DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=15,19)/
- + .07558, .04613, 41.24903, 2.10172, 1.75222,
- + 1.37584, 1.91991, 2.11136,
- + .07752, .04715, 42.92804, 2.19266, 1.84510,
- + 1.47314, 2.01190, 2.20245,
- + .07938, .04812, 44.52591, 2.28088, 1.93518,
- + 1.56739, 2.10114, 2.29082,
- + .08117, .04905, 46.01746, 2.36547, 2.02154,
- + 1.65769, 2.18669, 2.37555,
- + .08290, .04995, 47.45732, 2.44825, 2.10601,
- + 1.74591, 2.27039, 2.45847 /
- DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=1,7)/
- + .03673, .02553, 4.91482, .45426, .06446,
- + .00000, .25036, .46060,
- + .04275, .02879, 7.96518, .57999, .19742,
- + .00000, .38003, .58685,
- + .04793, .03157, 10.97152, .70361, .32698,
- + .00000, .50690, .71092,
- + .05247, .03401, 13.83031, .82289, .45133,
- + .02774, .62895, .83059,
- + .05657, .03620, 16.54461, .93872, .57162,
- + .16250, .74720, .94676,
- + .06034, .03821, 19.13077, 1.05148, .68838,
- + .28866, .86215, 1.05984,
- + .06381, .04005, 21.54247, 1.15980, .80032,
- + .40926, .97244, 1.16844 /
- DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=8,14)/
- + .06704, .04176, 23.81627, 1.26446, .90830,
- + .52502, 1.07891, 1.27336,
- + .07006, .04336, 25.95245, 1.36532, 1.01223,
- + .63599, 1.18144, 1.37448,
- + .07291, .04486, 27.95644, 1.46242, 1.11217,
- + .74235, 1.28009, 1.47180,
- + .07559, .04627, 29.83712, 1.55588, 1.20828,
- + .84436, 1.37499, 1.56548,
- + .07813, .04761, 31.60490, 1.64591, 1.30080,
- + .94233, 1.46638, 1.65571,
- + .08055, .04887, 33.27084, 1.73277, 1.39002,
- + 1.03661, 1.55453, 1.74277,
- + .08285, .05008, 34.83403, 1.81633, 1.47580,
- + 1.12710, 1.63930, 1.82652 /
- DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=15,19)/
- + .08505, .05122, 36.29396, 1.89648, 1.55805,
- + 1.21377, 1.72059, 1.90684,
- + .08716, .05232, 37.68100, 1.97414, 1.63772,
- + 1.29759, 1.79934, 1.98467,
- + .08918, .05337, 38.99577, 2.04930, 1.71479,
- + 1.37857, 1.87555, 2.05999,
- + .09111, .05438, 40.21697, 2.12115, 1.78846,
- + 1.45594, 1.94838, 2.13198,
- + .09299, .05535, 41.39225, 2.19130, 1.86036,
- + 1.53134, 2.01949, 2.20228 /
- DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=1,7)/
- + .05729, .03676, 4.32079, .41243, .05376,
- + .00000, .22540, .42062,
- + .06573, .04131, 6.58273, .50617, .15570,
- + .00000, .32367, .51510,
- + .07288, .04514, 8.70834, .59533, .25158,
- + .00000, .41654, .60487,
- + .07909, .04845, 10.65358, .67913, .34109,
- + .02000, .50348, .68920,
- + .08464, .05139, 12.44142, .75870, .42566,
- + .11614, .58580, .76923,
- + .08969, .05406, 14.09782, .83465, .50609,
- + .20431, .66422, .84560,
- + .09431, .05649, 15.60198, .90632, .58182,
- + .28712, .73813, .91766 /
- DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=8,14)/
- + .09857, .05873, 16.98759, .97448, .65368,
- + .36533, .80832, .98617,
- + .10254, .06081, 18.26130, 1.03922, .72183,
- + .43922, .87494, 1.05124,
- + .10625, .06274, 19.43187, 1.10070, .78647,
- + .50908, .93815, 1.11302,
- + .10972, .06455, 20.50929, 1.15913, .84784,
- + .57525, .99820, 1.17173,
- + .11300, .06624, 21.50360, 1.21476, .90623,
- + .63807, 1.05535, 1.22762,
- + .11610, .06785, 22.42455, 1.26784, .96191,
- + .69785, 1.10986, 1.28096,
- + .11904, .06936, 23.27370, 1.31835, 1.01488,
- + .75464, 1.16172, 1.33171 /
- DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=15,19)/
- + .12182, .07079, 24.05259, 1.36629, 1.06514,
- + .80847, 1.21094, 1.37987,
- + .12448, .07216, 24.78187, 1.41233, 1.11337,
- + .86006, 1.25818, 1.42612,
- + .12703, .07346, 25.46301, 1.45648, 1.15963,
- + .90948, 1.30349, 1.47048,
- + .12945, .07470, 26.08382, 1.49827, 1.20341,
- + .95625, 1.34637, 1.51245,
- + .13179, .07589, 26.67465, 1.53877, 1.24583,
- + 1.00150, 1.38793, 1.55314 /
- DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=1,7)/
- + .08880, .05423, 3.68945, .36591, .04378,
- + .00000, .19873, .37669,
- + .10026, .06037, 5.29736, .43225, .11930,
- + .00000, .27018, .44403,
- + .10981, .06545, 6.73290, .49328, .18782,
- + .00000, .33537, .50590,
- + .11798, .06977, 7.99157, .54910, .24995,
- + .01395, .39470, .56242,
- + .12520, .07355, 9.10605, .60085, .30722,
- + .08025, .44950, .61477,
- + .13170, .07694, 10.10534, .64921, .36050,
- + .13975, .50060, .66369,
- + .13758, .07999, 10.98410, .69396, .40968,
- + .19457, .54780, .70892 /
- DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=8,14)/
- + .14296, .08277, 11.77089, .73576, .45552,
- + .24546, .59183, .75116,
- + .14793, .08531, 12.47468, .77481, .49827,
- + .29278, .63293, .79062,
- + .15252, .08766, 13.10461, .81132, .53821,
- + .33686, .67134, .82750,
- + .15681, .08984, 13.66985, .84551, .57558,
- + .37803, .70729, .86204,
- + .16081, .09187, 14.17889, .87762, .61066,
- + .41661, .74104, .89447,
- + .16458, .09376, 14.63947, .90785, .64369,
- + .45287, .77281, .92500,
- + .16812, .09554, 15.05374, .93626, .67472,
- + .48692, .80267, .95369 /
- DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=15,19)/
- + .17146, .09721, 15.42384, .96286, .70380,
- + .51882, .83064, .98055,
- + .17463, .09879, 15.76315, .98812, .73141,
- + .54908, .85720, 1.00606,
- + .17764, .10029, 16.07312, 1.01209, .75762,
- + .57777, .88240, 1.03027,
- + .18050, .10170, 16.34717, 1.03449, .78214,
- + .60464, .90597, 1.05289,
- + .18324, .10305, 16.60378, 1.05602, .80571,
- + .63042, .92862, 1.07463 /
- DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=1,7)/
- + .11432, .06858, 3.30622, .33623, .03830,
- + -.00001, .18233, .34918,
- + .12775, .07574, 4.59543, .38872, .10048,
- + -.00001, .24024, .40286,
- + .13882, .08157, 5.70932, .43609, .15572,
- + -.00001, .29201, .45121,
- + .14819, .08646, 6.65830, .47869, .20493,
- + .01109, .33830, .49462,
- + .15641, .09071, 7.47751, .51760, .24960,
- + .06346, .38041, .53422,
- + .16375, .09448, 8.19556, .55347, .29059,
- + .10984, .41914, .57071,
- + .17033, .09783, 8.81229, .58623, .32795,
- + .15207, .45445, .60401 /
- DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=8,14)/
- + .17633, .10086, 9.35310, .61647, .36237,
- + .19084, .48701, .63475,
- + .18182, .10362, 9.82714, .64440, .39413,
- + .22653, .51707, .66313,
- + .18687, .10614, 10.24289, .67024, .42349,
- + .25945, .54486, .68937,
- + .19155, .10846, 10.60831, .69418, .45070,
- + .28993, .57062, .71369,
- + .19591, .11061, 10.93075, .71644, .47602,
- + .31825, .59457, .73629,
- + .19998, .11261, 11.21683, .73721, .49965,
- + .34466, .61692, .75739,
- + .20379, .11447, 11.46870, .75655, .52166,
- + .36926, .63774, .77701 /
- DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=15,19)/
- + .20737, .11620, 11.68827, .77447, .54212,
- + .39213, .65706, .79521,
- + .21075, .11783, 11.88582, .79136, .56141,
- + .41368, .67528, .81236,
- + .21395, .11937, 12.06263, .80726, .57958,
- + .43399, .69243, .82850,
- + .21696, .12081, 12.21381, .82196, .59644,
- + .45285, .70832, .84343,
- + .21985, .12218, 12.35318, .83601, .61255,
- + .47086, .72351, .85769 /
- DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=1,7)/
- + .13644, .08120, 3.02896, .31396, .03459,
- + -.00001, .17029, .32885,
- + .15130, .08904, 4.12006, .35763, .08824,
- + -.00001, .21956, .37385,
- + .16343, .09535, 5.03905, .39650, .13518,
- + -.00001, .26295, .41379,
- + .17363, .10059, 5.80427, .43102, .17646,
- + .00933, .30125, .44919,
- + .18249, .10510, 6.45123, .46219, .21350,
- + .05321, .33570, .48110,
- + .19037, .10907, 7.00779, .49061, .24714,
- + .09167, .36704, .51019,
- + .19738, .11257, 7.47629, .51630, .27750,
- + .12638, .39532, .53645 /
- DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=8,14)/
- + .20373, .11571, 7.87978, .53980, .30523,
- + .15800, .42117, .56046,
- + .20952, .11854, 8.22705, .56129, .33059,
- + .18687, .44482, .58242,
- + .21481, .12112, 8.52597, .58100, .35386,
- + .21331, .46650, .60254,
- + .21970, .12348, 8.78374, .59910, .37526,
- + .23762, .48643, .62102,
- + .22422, .12565, 9.00682, .61579, .39502,
- + .26006, .50483, .63806,
- + .22843, .12765, 9.20088, .63124, .41335,
- + .28086, .52187, .65384,
- + .23235, .12951, 9.36795, .64550, .43031,
- + .30011, .53762, .66839 /
- DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=15,19)/
- + .23601, .13122, 9.50977, .65861, .44595,
- + .31790, .55213, .68177,
- + .23946, .13283, 9.63474, .67088, .46062,
- + .33458, .56572, .69429,
- + .24272, .13434, 9.74396, .68234, .47436,
- + .35021, .57844, .70599,
- + .24577, .13574, 9.83363, .69284, .48701,
- + .36464, .59012, .71671,
- + .24868, .13707, 9.91472, .70281, .49905,
- + .37836, .60123, .72689 /
- DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=1,7)/
- + .15628, .09260, 2.81322, .29605, .03183,
- + .00000, .16078, .31276,
- + .17222, .10091, 3.76659, .33348, .07940,
- + .00000, .20392, .35161,
- + .18513, .10753, 4.55235, .36642, .12052,
- + .00000, .24146, .38569,
- + .19590, .11298, 5.19380, .39538, .15632,
- + .00812, .27425, .41557,
- + .20520, .11762, 5.72621, .42126, .18813,
- + .04613, .30344, .44223,
- + .21341, .12168, 6.17672, .44467, .21679,
- + .07920, .32979, .46632,
- + .22070, .12522, 6.54890, .46561, .24243,
- + .10881, .35335, .48785 /
- DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=8,14)/
- + .22725, .12839, 6.86413, .48461, .26567,
- + .13559, .37470, .50736,
- + .23319, .13122, 7.13066, .50185, .28679,
- + .15990, .39410, .52507,
- + .23861, .13379, 7.35587, .51752, .30603,
- + .18204, .41175, .54116,
- + .24357, .13612, 7.54630, .53181, .32361,
- + .20227, .42787, .55582,
- + .24816, .13824, 7.70794, .54488, .33975,
- + .22084, .44263, .56923,
- + .25241, .14020, 7.84576, .55690, .35463,
- + .23796, .45623, .58156,
- + .25635, .14200, 7.96125, .56789, .36832,
- + .25374, .46872, .59284 /
- DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=15,19)/
- + .26001, .14365, 8.05622, .57792, .38086,
- + .26823, .48013, .60313,
- + .26345, .14520, 8.13777, .58723, .39257,
- + .28177, .49076, .61269,
- + .26669, .14664, 8.20687, .59589, .40348,
- + .29439, .50066, .62156,
- + .26971, .14797, 8.26045, .60372, .41346,
- + .30598, .50967, .62960,
- + .27258, .14922, 8.30759, .61113, .42291,
- + .31696, .51820, .63720 /
- DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=1,7)/
- + .23590, .13868, 2.16171, .23745, .02396,
- + .00000, .13082, .26215,
- + .25446, .14758, 2.76970, .25885, .05562,
- + .00000, .15801, .28514,
- + .26899, .15435, 3.22983, .27695, .08189,
- + .00000, .18071, .30440,
- + .28075, .15968, 3.57588, .29221, .10395,
- + .00507, .19977, .32057,
- + .29063, .16404, 3.84121, .30531, .12288,
- + .02846, .21612, .33439,
- + .29914, .16771, 4.04948, .31671, .13943,
- + .04825, .23038, .34639,
- + .30648, .17079, 4.20655, .32650, .15378,
- + .06551, .24269, .35666 /
- DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=8,14)/
- + .31294, .17344, 4.32829, .33504, .16643,
- + .08076, .25350, .36562,
- + .31865, .17574, 4.42150, .34250, .17762,
- + .09428, .26300, .37342,
- + .32376, .17773, 4.49152, .34901, .18755,
- + .10632, .27139, .38023,
- + .32835, .17948, 4.54287, .35472, .19641,
- + .11711, .27881, .38619,
- + .33248, .18102, 4.57947, .35974, .20434,
- + .12681, .28542, .39143,
- + .33624, .18239, 4.60458, .36417, .21149,
- + .13559, .29132, .39604,
- + .33966, .18360, 4.61920, .36804, .21789,
- + .14351, .29657, .40007 /
- DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=15,19)/
- + .34276, .18466, 4.62450, .37139, .22362,
- + .15065, .30120, .40356,
- + .34562, .18562, 4.62435, .37438, .22885,
- + .15720, .30540, .40667,
- + .34826, .18649, 4.61922, .37704, .23362,
- + .16321, .30920, .40943,
- + .35065, .18724, 4.60760, .37928, .23785,
- + .16861, .31251, .41175,
- + .35291, .18794, 4.59432, .38133, .24180,
- + .17366, .31557, .41388 /
- DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=1,7)/
- + .34870, .20185, 1.60761, .17704, .01738,
- + -.00002, .10167, .21403,
- + .36659, .20828, 1.96903, .18737, .03734,
- + -.00001, .11730, .22529,
- + .37973, .21259, 2.20538, .19540, .05298,
- + -.00001, .12948, .23387,
- + .38971, .21554, 2.35707, .20160, .06543,
- + .00293, .13905, .24038,
- + .39759, .21762, 2.45432, .20644, .07561,
- + .01623, .14674, .24537,
- + .40400, .21912, 2.51666, .21027, .08410,
- + .02706, .15305, .24928,
- + .40916, .22011, 2.55005, .21318, .09113,
- + .03618, .15813, .25218 /
- DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=8,14)/
- + .41343, .22078, 2.56543, .21544, .09707,
- + .04399, .16231, .25438,
- + .41697, .22119, 2.56732, .21715, .10211,
- + .05069, .16575, .25599,
- + .41992, .22139, 2.55924, .21840, .10639,
- + .05648, .16857, .25712,
- + .42237, .22142, 2.54390, .21928, .11004,
- + .06150, .17087, .25785,
- + .42441, .22133, 2.52343, .21986, .11317,
- + .06590, .17276, .25827,
- + .42614, .22113, 2.49945, .22019, .11587,
- + .06976, .17430, .25843,
- + .42755, .22084, 2.47252, .22030, .11819,
- + .07315, .17553, .25836 /
- DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=15,19)/
- + .42868, .22047, 2.44299, .22021, .12015,
- + .07611, .17648, .25808,
- + .42962, .22005, 2.41287, .22000, .12187,
- + .07875, .17723, .25767,
- + .43040, .21960, 2.38229, .21968, .12335,
- + .08111, .17781, .25715,
- + .43097, .21908, 2.35033, .21919, .12458,
- + .08316, .17818, .25648,
- + .43146, .21855, 2.31919, .21867, .12568,
- + .08504, .17847, .25578 /
- DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=1,7)/
- + .43156, .24337, 1.36996, .14248, .01413,
- + .00001, .08555, .18770,
- + .44554, .24571, 1.60928, .14817, .02881,
- + .00000, .09594, .19319,
- + .45485, .24650, 1.74154, .15205, .03974,
- + .00000, .10344, .19666,
- + .46118, .24636, 1.80853, .15459, .04804,
- + .00201, .10889, .19869,
- + .46558, .24567, 1.83713, .15618, .05452,
- + .01104, .11293, .19975,
- + .46869, .24467, 1.84335, .15713, .05971,
- + .01816, .11598, .20015,
- + .47073, .24338, 1.83214, .15751, .06381,
- + .02399, .11820, .19997 /
- DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=8,14)/
- + .47203, .24197, 1.81166, .15751, .06714,
- + .02885, .11982, .19942,
- + .47275, .24046, 1.78492, .15723, .06984,
- + .03291, .12098, .19858,
- + .47302, .23888, 1.75418, .15672, .07203,
- + .03632, .12177, .19753,
- + .47294, .23726, 1.72109, .15603, .07381,
- + .03921, .12226, .19633,
- + .47257, .23563, 1.68685, .15522, .07526,
- + .04168, .12251, .19502,
- + .47197, .23401, 1.65231, .15431, .07643,
- + .04379, .12258, .19362,
- + .47118, .23239, 1.61764, .15332, .07736,
- + .04560, .12249, .19214 /
- DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=15,19)/
- + .47022, .23075, 1.58301, .15224, .07809,
- + .04712, .12226, .19061,
- + .46916, .22914, 1.54941, .15114, .07867,
- + .04846, .12194, .18908,
- + .46802, .22756, 1.51677, .15003, .07914,
- + .04962, .12156, .18755,
- + .46674, .22598, 1.48451, .14886, .07945,
- + .05059, .12107, .18596,
- + .46545, .22444, 1.45378, .14771, .07970,
- + .05146, .12056, .18441 /
- DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=1,7)/
- + .49642, .27083, 1.24381, .11851, .01198,
- + .00000, .07419, .16844,
- + .50483, .26869, 1.39643, .12149, .02341,
- + .00000, .08131, .17002,
- + .50920, .26582, 1.46080, .12301, .03151,
- + -.00001, .08598, .17022,
- + .51113, .26259, 1.47647, .12353, .03737,
- + .00149, .08902, .16950,
- + .51148, .25923, 1.46618, .12342, .04175,
- + .00805, .09100, .16819,
- + .51091, .25589, 1.44264, .12290, .04511,
- + .01308, .09226, .16659,
- + .50954, .25252, 1.40963, .12204, .04765,
- + .01710, .09295, .16471 /
- DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=8,14)/
- + .50770, .24924, 1.37291, .12100, .04960,
- + .02037, .09326, .16270,
- + .50550, .24606, 1.33439, .11982, .05111,
- + .02304, .09328, .16060,
- + .50306, .24295, 1.29540, .11854, .05225,
- + .02523, .09307, .15849,
- + .50045, .23994, 1.25683, .11720, .05311,
- + .02704, .09271, .15635,
- + .49770, .23704, 1.21925, .11584, .05376,
- + .02854, .09222, .15422,
- + .49489, .23424, 1.18303, .11447, .05423,
- + .02980, .09165, .15212,
- + .49201, .23154, 1.14811, .11308, .05454,
- + .03085, .09100, .15006 /
- DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=15,19)/
- + .48906, .22890, 1.11445, .11168, .05473,
- + .03171, .09028, .14801,
- + .48614, .22636, 1.08255, .11031, .05483,
- + .03243, .08954, .14603,
- + .48324, .22391, 1.05224, .10896, .05486,
- + .03304, .08879, .14410,
- + .48027, .22153, 1.02304, .10762, .05480,
- + .03353, .08798, .14219,
- + .47739, .21925, .99559, .10632, .05472,
- + .03396, .08720, .14036 /
- DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=1,7)/
- + .54788, .28796, 1.16251, .10008, .01030,
- + .00000, .06503, .15187,
- + .54982, .28147, 1.24605, .10126, .01943,
- + -.00001, .06981, .15057,
- + .54871, .27514, 1.26090, .10129, .02557,
- + -.00001, .07255, .14847,
- + .54586, .26911, 1.24196, .10060, .02980,
- + .00114, .07402, .14592,
- + .54202, .26338, 1.20736, .09950, .03283,
- + .00605, .07470, .14316,
- + .53767, .25800, 1.16665, .09818, .03505,
- + .00976, .07491, .14033,
- + .53290, .25286, 1.12225, .09668, .03663,
- + .01262, .07469, .13746 /
- DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=8,14)/
- + .52798, .24802, 1.07803, .09512, .03778,
- + .01491, .07426, .13466,
- + .52298, .24345, 1.03499, .09352, .03859,
- + .01673, .07366, .13192,
- + .51794, .23912, .99371, .09193, .03916,
- + .01819, .07295, .12925,
- + .51294, .23502, .95450, .09035, .03952,
- + .01937, .07216, .12668,
- + .50798, .23113, .91753, .08879, .03974,
- + .02033, .07132, .12420,
- + .50313, .22743, .88284, .08727, .03984,
- + .02111, .07045, .12182,
- + .49837, .22389, .85019, .08577, .03986,
- + .02173, .06957, .11952 /
- DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=15,19)/
- + .49364, .22050, .81939, .08431, .03978,
- + .02224, .06866, .11731,
- + .48906, .21728, .79066, .08291, .03966,
- + .02265, .06776, .11519,
- + .48460, .21419, .76375, .08155, .03950,
- + .02298, .06688, .11317,
- + .48018, .21121, .73828, .08022, .03929,
- + .02322, .06598, .11121,
- + .47592, .20838, .71454, .07895, .03907,
- + .02343, .06512, .10933 /
- DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=1,7)/
- + .59696, .29838, 1.08309, .08167, .00858,
- + -.00002, .05522, .13266,
- + .59016, .28694, 1.09774, .08134, .01553,
- + -.00001, .05789, .12884,
- + .58187, .27686, 1.06781, .08019, .01993,
- + .00000, .05899, .12486,
- + .57302, .26782, 1.02038, .07863, .02279,
- + .00082, .05921, .12091,
- + .56396, .25965, .96770, .07689, .02472,
- + .00435, .05890, .11708,
- + .55504, .25221, .91569, .07509, .02603,
- + .00691, .05830, .11346,
- + .54624, .24531, .86515, .07322, .02689,
- + .00886, .05751, .11001 /
- DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=8,14)/
- + .53771, .23897, .81806, .07142, .02745,
- + .01036, .05660, .10674,
- + .52946, .23309, .77450, .06968, .02776,
- + .01153, .05563, .10369,
- + .52152, .22761, .73437, .06798, .02793,
- + .01244, .05463, .10081,
- + .51386, .22250, .69747, .06635, .02798,
- + .01315, .05363, .09807,
- + .50650, .21771, .66361, .06480, .02793,
- + .01372, .05263, .09551,
- + .49943, .21321, .63254, .06331, .02781,
- + .01416, .05164, .09310,
- + .49261, .20897, .60392, .06188, .02765,
- + .01450, .05068, .09080 /
- DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=15,19)/
- + .48601, .20493, .57745, .06051, .02744,
- + .01475, .04973, .08864,
- + .47968, .20112, .55311, .05921, .02721,
- + .01495, .04882, .08658,
- + .47358, .19753, .53063, .05798, .02696,
- + .01510, .04794, .08462,
- + .46765, .19408, .50970, .05678, .02669,
- + .01518, .04707, .08275,
- + .46199, .19082, .49038, .05564, .02642,
- + .01524, .04624, .08100 /
- DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=1,7)/
- + .63159, .29953, 1.00799, .06659, .00710,
- + -.00003, .04657, .11446,
- + .61584, .28388, .97004, .06530, .01244,
- + -.00002, .04778, .10903,
- + .60049, .27069, .90969, .06348, .01562,
- + -.00003, .04786, .10400,
- + .58581, .25930, .84524, .06152, .01755,
- + .00059, .04732, .09936,
- + .57186, .24922, .78353, .05951, .01877,
- + .00316, .04648, .09510,
- + .55875, .24025, .72728, .05757, .01954,
- + .00500, .04549, .09120,
- + .54630, .23208, .67591, .05564, .01996,
- + .00634, .04442, .08762 /
- DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=8,14)/
- + .53458, .22466, .62999, .05384, .02018,
- + .00735, .04333, .08432,
- + .52352, .21790, .58891, .05214, .02025,
- + .00813, .04224, .08127,
- + .51305, .21168, .55210, .05053, .02021,
- + .00872, .04117, .07845,
- + .50315, .20590, .51904, .04902, .02010,
- + .00915, .04014, .07583,
- + .49378, .20053, .48930, .04759, .01994,
- + .00948, .03914, .07340,
- + .48486, .19556, .46248, .04625, .01975,
- + .00974, .03819, .07113,
- + .47637, .19091, .43817, .04498, .01952,
- + .00992, .03727, .06901 /
- DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=15,19)/
- + .46825, .18652, .41601, .04377, .01927,
- + .01004, .03638, .06703,
- + .46055, .18240, .39587, .04263, .01902,
- + .01013, .03554, .06518,
- + .45322, .17851, .37746, .04154, .01876,
- + .01019, .03473, .06344,
- + .44612, .17483, .36053, .04053, .01849,
- + .01021, .03396, .06178,
- + .43938, .17135, .34503, .03958, .01822,
- + .01022, .03323, .06022 /
- DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=1,7)/
- + .65359, .29370, .92960, .05398, .00584,
- + -.00001, .03885, .09726,
- + .62904, .27475, .85340, .05217, .00987,
- + .00000, .03905, .09100,
- + .60694, .25923, .77385, .05009, .01214,
- + -.00001, .03846, .08552,
- + .58690, .24609, .70071, .04799, .01344,
- + .00045, .03751, .08072,
- + .56853, .23468, .63607, .04596, .01418,
- + .00231, .03641, .07644,
- + .55171, .22467, .58004, .04406, .01461,
- + .00361, .03528, .07260,
- + .53609, .21567, .53101, .04227, .01478,
- + .00453, .03413, .06914 /
- DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=8,14)/
- + .52166, .20760, .48845, .04060, .01481,
- + .00521, .03302, .06603,
- + .50826, .20028, .45132, .03906, .01475,
- + .00573, .03195, .06320,
- + .49573, .19362, .41879, .03763, .01462,
- + .00610, .03093, .06062,
- + .48401, .18751, .39010, .03630, .01446,
- + .00637, .02996, .05824,
- + .47304, .18186, .36470, .03504, .01426,
- + .00656, .02905, .05607,
- + .46273, .17665, .34212, .03387, .01403,
- + .00670, .02819, .05408,
- + .45296, .17181, .32189, .03282, .01381,
- + .00680, .02737, .05220 /
- DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=15,19)/
- + .44370, .16727, .30369, .03179, .01356,
- + .00686, .02660, .05048,
- + .43497, .16303, .28730, .03083, .01332,
- + .00689, .02587, .04888,
- + .42670, .15906, .27249, .02994, .01309,
- + .00690, .02518, .04737,
- + .41879, .15530, .25898, .02909, .01285,
- + .00689, .02452, .04596,
- + .41131, .15177, .24669, .02830, .01262,
- + .00688, .02390, .04464 /
- DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=1,7)/
- + .66431, .28276, .84653, .04336, .00474,
- + -.00001, .03197, .08132,
- + .63153, .26127, .74452, .04130, .00777,
- + -.00002, .03156, .07481,
- + .60331, .24403, .65460, .03916, .00939,
- + -.00002, .03062, .06937,
- + .57848, .22974, .57878, .03712, .01026,
- + .00031, .02949, .06470,
- + .55631, .21746, .51526, .03520, .01070,
- + .00169, .02831, .06068,
- + .53635, .20682, .46221, .03348, .01090,
- + .00260, .02718, .05712,
- + .51811, .19738, .41729, .03187, .01095,
- + .00327, .02607, .05398 /
- DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=8,14)/
- + .50146, .18898, .37923, .03041, .01089,
- + .00374, .02504, .05117,
- + .48618, .18142, .34668, .02907, .01076,
- + .00407, .02406, .04866,
- + .47205, .17460, .31865, .02784, .01060,
- + .00432, .02315, .04640,
- + .45893, .16838, .29435, .02671, .01042,
- + .00449, .02230, .04435,
- + .44676, .16266, .27310, .02567, .01022,
- + .00459, .02151, .04247,
- + .43541, .15741, .25441, .02470, .01001,
- + .00466, .02077, .04075,
- + .42477, .15256, .23784, .02381, .00981,
- + .00472, .02007, .03917 /
- DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=15,19)/
- + .41473, .14803, .22313, .02297, .00960,
- + .00475, .01941, .03771,
- + .40530, .14383, .20999, .02220, .00939,
- + .00476, .01880, .03636,
- + .39642, .13991, .19818, .02148, .00920,
- + .00475, .01823, .03512,
- + .38796, .13621, .18754, .02080, .00900,
- + .00473, .01769, .03395,
- + .37999, .13276, .17790, .02016, .00881,
- + .00469, .01719, .03286 /
- DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=1,7)/
- + .66501, .26806, .76016, .03445, .00382,
- + -.00002, .02597, .06684,
- + .62480, .24477, .64287, .03232, .00608,
- + -.00001, .02518, .06056,
- + .59113, .22650, .54934, .03031, .00722,
- + -.00002, .02409, .05541,
- + .56229, .21151, .47509, .02840, .00778,
- + .00025, .02295, .05116,
- + .53691, .19883, .41540, .02670, .00804,
- + .00123, .02181, .04752,
- + .51441, .18793, .36705, .02518, .00813,
- + .00189, .02075, .04436,
- + .49410, .17834, .32712, .02382, .00808,
- + .00236, .01975, .04161 /
- DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=8,14)/
- + .47576, .16989, .29396, .02258, .00797,
- + .00269, .01883, .03920,
- + .45909, .16234, .26613, .02146, .00783,
- + .00292, .01799, .03704,
- + .44381, .15554, .24250, .02044, .00768,
- + .00307, .01721, .03511,
- + .42975, .14939, .22223, .01951, .00750,
- + .00317, .01648, .03339,
- + .41678, .14378, .20475, .01866, .00732,
- + .00323, .01581, .03183,
- + .40477, .13864, .18955, .01786, .00714,
- + .00328, .01521, .03041,
- + .39351, .13393, .17622, .01715, .00696,
- + .00329, .01463, .02911 /
- DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=15,19)/
- + .38297, .12955, .16448, .01650, .00679,
- + .00329, .01410, .02791,
- + .37314, .12549, .15406, .01589, .00663,
- + .00329, .01360, .02681,
- + .36394, .12172, .14477, .01532, .00646,
- + .00327, .01315, .02580,
- + .35520, .11820, .13642, .01479, .00630,
- + .00325, .01271, .02486,
- + .34701, .11491, .12891, .01429, .00615,
- + .00323, .01230, .02398 /
- DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=1,7)/
- + .65683, .25071, .67279, .02701, .00304,
- + .00005, .02080, .05405,
- + .61006, .22645, .54900, .02502, .00469,
- + .00002, .01982, .04824,
- + .57187, .20766, .45698, .02318, .00547,
- + .00003, .01870, .04364,
- + .53971, .19245, .38718, .02156, .00583,
- + .00019, .01760, .03986,
- + .51183, .17974, .33292, .02009, .00594,
- + .00091, .01656, .03672,
- + .48739, .16889, .29007, .01884, .00596,
- + .00139, .01564, .03399,
- + .46562, .15941, .25544, .01766, .00588,
- + .00169, .01477, .03169 /
- DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=8,14)/
- + .44613, .15111, .22718, .01664, .00577,
- + .00190, .01400, .02965,
- + .42852, .14376, .20383, .01574, .00564,
- + .00205, .01328, .02786,
- + .41250, .13719, .18424, .01492, .00550,
- + .00215, .01264, .02627,
- + .39787, .13125, .16766, .01418, .00534,
- + .00222, .01204, .02486,
- + .38445, .12587, .15352, .01349, .00518,
- + .00225, .01151, .02359,
- + .37207, .12097, .14132, .01286, .00504,
- + .00227, .01102, .02245,
- + .36055, .11649, .13069, .01233, .00490,
- + .00228, .01056, .02140 /
- DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=15,19)/
- + .34986, .11233, .12139, .01178, .00475,
- + .00227, .01014, .02046,
- + .33991, .10850, .11322, .01129, .00461,
- + .00225, .00975, .01960,
- + .33058, .10496, .10598, .01086, .00449,
- + .00223, .00938, .01878,
- + .32179, .10166, .09953, .01047, .00437,
- + .00221, .00905, .01802,
- + .31357, .09859, .09375, .01010, .00425,
- + .00218, .00874, .01732 /
- DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=1,7)/
- + .64065, .23200, .58715, .02115, .00225,
- + -.00014, .01625, .04297,
- + .58852, .20729, .46345, .01928, .00347,
- + -.00015, .01527, .03782,
- + .54674, .18842, .37639, .01765, .00404,
- + -.00013, .01425, .03381,
- + .51212, .17334, .31289, .01624, .00425,
- + .00002, .01328, .03060,
- + .48246, .16081, .26492, .01500, .00432,
- + .00056, .01240, .02795,
- + .45675, .15021, .22778, .01394, .00432,
- + .00091, .01162, .02570,
- + .43402, .14108, .19840, .01301, .00421,
- + .00114, .01090, .02378 /
- DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=8,14)/
- + .41382, .13310, .17477, .01219, .00411,
- + .00129, .01026, .02214,
- + .39575, .12606, .15547, .01145, .00400,
- + .00140, .00969, .02070,
- + .37940, .11981, .13951, .01081, .00388,
- + .00147, .00917, .01943,
- + .36454, .11421, .12615, .01022, .00376,
- + .00151, .00870, .01828,
- + .35100, .10916, .11484, .00969, .00364,
- + .00153, .00828, .01726,
- + .33855, .10457, .10517, .00923, .00352,
- + .00154, .00789, .01634,
- + .32708, .10038, .09681, .00877, .00341,
- + .00154, .00753, .01554 /
- DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=15,19)/
- + .31640, .09653, .08957, .00837, .00330,
- + .00153, .00721, .01479,
- + .30650, .09298, .08323, .00802, .00320,
- + .00152, .00691, .01411,
- + .29730, .08971, .07763, .00768, .00310,
- + .00151, .00663, .01351,
- + .28866, .08667, .07266, .00736, .00300,
- + .00149, .00637, .01294,
- + .28060, .08385, .06823, .00707, .00290,
- + .00147, .00613, .01241 /
- DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=1,7)/
- + .61804, .21189, .50473, .01606, .00178,
- + -.00004, .01267, .03361,
- + .56155, .18741, .38629, .01448, .00265,
- + -.00002, .01170, .02917,
- + .51709, .16893, .30663, .01312, .00301,
- + -.00003, .01078, .02580,
- + .48072, .15429, .25038, .01196, .00313,
- + .00007, .00994, .02317,
- + .44992, .14226, .20887, .01098, .00315,
- + .00044, .00919, .02097,
- + .42343, .13218, .17743, .01016, .00310,
- + .00067, .00855, .01915,
- + .40028, .12349, .15296, .00941, .00302,
- + .00083, .00798, .01759 /
- DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=8,14)/
- + .37985, .11599, .13355, .00877, .00293,
- + .00093, .00746, .01628,
- + .36164, .10941, .11791, .00820, .00283,
- + .00100, .00700, .01514,
- + .34534, .10357, .10511, .00769, .00274,
- + .00104, .00659, .01414,
- + .33058, .09836, .09447, .00724, .00264,
- + .00106, .00623, .01326,
- + .31715, .09370, .08553, .00685, .00254,
- + .00107, .00590, .01247,
- + .30492, .08949, .07796, .00648, .00244,
- + .00107, .00560, .01176,
- + .29363, .08564, .07147, .00617, .00236,
- + .00107, .00534, .01114 /
- DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=15,19)/
- + .28321, .08212, .06586, .00588, .00228,
- + .00106, .00509, .01056,
- + .27361, .07890, .06099, .00561, .00220,
- + .00105, .00486, .01004,
- + .26470, .07593, .05671, .00536, .00213,
- + .00104, .00464, .00958,
- + .25637, .07317, .05293, .00512, .00205,
- + .00102, .00445, .00914,
- + .24862, .07062, .04958, .00490, .00199,
- + .00100, .00428, .00875 /
- DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=1,7)/
- + .58965, .19166, .42772, .01211, .00134,
- + -.00003, .00966, .02584,
- + .53008, .16777, .31802, .01077, .00195,
- + -.00004, .00879, .02215,
- + .48387, .14997, .24702, .00967, .00221,
- + -.00003, .00800, .01937,
- + .44655, .13604, .19835, .00872, .00226,
- + .00004, .00732, .01722,
- + .41526, .12469, .16325, .00796, .00224,
- + .00031, .00672, .01548,
- + .38864, .11519, .13706, .00730, .00220,
- + .00049, .00620, .01404,
- + .36545, .10711, .11702, .00673, .00214,
- + .00058, .00574, .01284 /
- DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=8,14)/
- + .34518, .10014, .10134, .00624, .00206,
- + .00064, .00535, .01181,
- + .32726, .09407, .08885, .00580, .00198,
- + .00069, .00499, .01091,
- + .31125, .08873, .07872, .00542, .00190,
- + .00072, .00468, .01015,
- + .29683, .08398, .07038, .00509, .00182,
- + .00073, .00440, .00948,
- + .28380, .07972, .06342, .00479, .00175,
- + .00073, .00415, .00888,
- + .27196, .07588, .05755, .00451, .00169,
- + .00073, .00393, .00835,
- + .26109, .07242, .05256, .00429, .00162,
- + .00072, .00372, .00788 /
- DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=15,19)/
- + .25111, .06925, .04828, .00408, .00156,
- + .00071, .00354, .00744,
- + .24194, .06634, .04457, .00387, .00150,
- + .00070, .00337, .00706,
- + .23348, .06368, .04134, .00367, .00144,
- + .00071, .00321, .00672,
- + .22558, .06122, .03848, .00349, .00139,
- + .00069, .00307, .00641,
- + .21825, .05896, .03595, .00333, .00134,
- + .00067, .00293, .00612 /
- DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=1,7)/
- + .55671, .17150, .35716, .00892, .00101,
- + -.00001, .00728, .01953,
- + .49518, .14866, .25840, .00785, .00144,
- + -.00001, .00653, .01650,
- + .44816, .13180, .19669, .00697, .00159,
- + .00000, .00588, .01430,
- + .41060, .11872, .15543, .00624, .00162,
- + .00004, .00532, .01262,
- + .37939, .10818, .12629, .00567, .00160,
- + .00024, .00483, .01125,
- + .35306, .09941, .10492, .00515, .00155,
- + .00034, .00444, .01014,
- + .33032, .09198, .08878, .00473, .00150,
- + .00041, .00409, .00920 /
- DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=8,14)/
- + .31055, .08562, .07630, .00436, .00144,
- + .00045, .00378, .00843,
- + .29318, .08010, .06644, .00404, .00138,
- + .00047, .00351, .00776,
- + .27774, .07527, .05852, .00376, .00132,
- + .00050, .00327, .00718,
- + .26392, .07099, .05207, .00352, .00125,
- + .00051, .00306, .00667,
- + .25146, .06717, .04672, .00330, .00119,
- + .00051, .00288, .00624,
- + .24017, .06374, .04224, .00311, .00115,
- + .00050, .00272, .00585,
- + .22995, .06063, .03845, .00292, .00110,
- + .00050, .00257, .00550 /
- DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=15,19)/
- + .22052, .05783, .03521, .00277, .00105,
- + .00048, .00243, .00518,
- + .21186, .05527, .03241, .00264, .00101,
- + .00048, .00231, .00489,
- + .20388, .05293, .02998, .00252, .00098,
- + .00048, .00219, .00464,
- + .19649, .05077, .02786, .00240, .00093,
- + .00046, .00209, .00440,
- + .18966, .04880, .02598, .00229, .00089,
- + .00045, .00199, .00418 /
- DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=1,7)/
- + .52016, .15185, .29381, .00640, .00079,
- + .00005, .00540, .01451,
- + .45781, .13035, .20711, .00559, .00106,
- + .00005, .00477, .01212,
- + .41085, .11466, .15465, .00492, .00115,
- + .00005, .00425, .01038,
- + .37367, .10259, .12037, .00438, .00116,
- + .00008, .00381, .00908,
- + .34313, .09290, .09662, .00394, .00114,
- + .00019, .00345, .00803,
- + .31752, .08491, .07948, .00356, .00110,
- + .00026, .00313, .00719,
- + .29558, .07820, .06671, .00326, .00104,
- + .00030, .00287, .00648 /
- DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=8,14)/
- + .27662, .07248, .05694, .00299, .00099,
- + .00033, .00263, .00591,
- + .26003, .06752, .04928, .00276, .00094,
- + .00035, .00244, .00543,
- + .24537, .06321, .04317, .00256, .00090,
- + .00035, .00227, .00500,
- + .23231, .05940, .03823, .00239, .00085,
- + .00035, .00211, .00462,
- + .22059, .05603, .03418, .00224, .00081,
- + .00034, .00198, .00430,
- + .21004, .05302, .03079, .00209, .00077,
- + .00034, .00186, .00402,
- + .20044, .05030, .02794, .00198, .00074,
- + .00033, .00175, .00375 /
- DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=15,19)/
- + .19166, .04784, .02552, .00188, .00070,
- + .00033, .00165, .00353,
- + .18365, .04560, .02343, .00178, .00068,
- + .00032, .00156, .00333,
- + .17632, .04356, .02163, .00168, .00066,
- + .00031, .00148, .00314,
- + .16954, .04169, .02005, .00158, .00063,
- + .00031, .00141, .00297,
- + .16328, .03997, .01866, .00149, .00060,
- + .00031, .00134, .00283 /
- DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=1,7)/
- + .48090, .13323, .23815, .00463, .00054,
- + .00001, .00389, .01058,
- + .41895, .11324, .16385, .00397, .00074,
- + .00002, .00340, .00871,
- + .37279, .09882, .12007, .00344, .00080,
- + .00001, .00299, .00741,
- + .33665, .08781, .09216, .00307, .00080,
- + .00003, .00266, .00641,
- + .30720, .07905, .07313, .00273, .00078,
- + .00012, .00239, .00564,
- + .28268, .07187, .05961, .00248, .00074,
- + .00018, .00216, .00501,
- + .26183, .06588, .04965, .00224, .00070,
- + .00020, .00196, .00451 /
- DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=8,14)/
- + .24391, .06079, .04209, .00205, .00067,
- + .00022, .00180, .00407,
- + .22831, .05642, .03624, .00189, .00064,
- + .00024, .00166, .00372,
- + .21461, .05261, .03162, .00175, .00060,
- + .00023, .00153, .00341,
- + .20249, .04927, .02788, .00161, .00056,
- + .00023, .00142, .00314,
- + .19165, .04633, .02484, .00149, .00054,
- + .00023, .00132, .00292,
- + .18189, .04370, .02231, .00140, .00051,
- + .00023, .00124, .00272,
- + .17306, .04133, .02019, .00132, .00049,
- + .00023, .00117, .00254 /
- DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=15,19)/
- + .16503, .03921, .01839, .00125, .00046,
- + .00022, .00109, .00238,
- + .15771, .03729, .01685, .00117, .00043,
- + .00022, .00103, .00224,
- + .15103, .03553, .01552, .00110, .00041,
- + .00020, .00097, .00211,
- + .14485, .03392, .01437, .00105, .00040,
- + .00020, .00092, .00200,
- + .13917, .03245, .01335, .00099, .00038,
- + .00020, .00087, .00189 /
- DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=1,7)/
- + .44001, .11559, .19006, .00324, .00038,
- + .00003, .00278, .00754,
- + .37939, .09733, .12774, .00274, .00051,
- + .00002, .00238, .00615,
- + .33470, .08429, .09202, .00240, .00052,
- + .00002, .00206, .00518,
- + .30011, .07442, .06971, .00214, .00052,
- + .00003, .00183, .00443,
- + .27218, .06660, .05475, .00189, .00050,
- + .00008, .00161, .00388,
- + .24907, .06024, .04422, .00170, .00047,
- + .00011, .00146, .00343,
- + .22956, .05495, .03657, .00153, .00045,
- + .00013, .00131, .00307 /
- DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=8,14)/
- + .21287, .05049, .03084, .00140, .00042,
- + .00014, .00119, .00278,
- + .19842, .04667, .02642, .00129, .00040,
- + .00015, .00110, .00251,
- + .18581, .04337, .02295, .00118, .00038,
- + .00014, .00100, .00229,
- + .17467, .04049, .02017, .00109, .00036,
- + .00014, .00092, .00211,
- + .16475, .03794, .01791, .00102, .00034,
- + .00014, .00086, .00195,
- + .15589, .03568, .01605, .00095, .00032,
- + .00013, .00080, .00180,
- + .14790, .03366, .01449, .00088, .00030,
- + .00013, .00075, .00169 /
- DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=15,19)/
- + .14064, .03184, .01317, .00083, .00029,
- + .00013, .00070, .00158,
- + .13405, .03020, .01204, .00078, .00027,
- + .00013, .00066, .00148,
- + .12805, .02870, .01108, .00073, .00025,
- + .00012, .00063, .00140,
- + .12250, .02734, .01024, .00070, .00024,
- + .00012, .00059, .00131,
- + .11740, .02610, .00950, .00067, .00023,
- + .00011, .00055, .00123 /
- DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=1,7)/
- + .39819, .09919, .14914, .00220, .00031,
- + .00004, .00195, .00525,
- + .33978, .08269, .09797, .00184, .00036,
- + .00004, .00165, .00426,
- + .29723, .07103, .06939, .00159, .00037,
- + .00003, .00142, .00355,
- + .26461, .06228, .05188, .00139, .00036,
- + .00004, .00124, .00301,
- + .23845, .05540, .04033, .00122, .00034,
- + .00007, .00109, .00262,
- + .21702, .04983, .03232, .00107, .00033,
- + .00009, .00098, .00231,
- + .19897, .04524, .02655, .00098, .00031,
- + .00009, .00088, .00203 /
- DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=8,14)/
- + .18368, .04138, .02226, .00088, .00028,
- + .00010, .00080, .00183,
- + .17050, .03810, .01898, .00080, .00026,
- + .00010, .00072, .00166,
- + .15903, .03527, .01643, .00073, .00025,
- + .00010, .00066, .00152,
- + .14893, .03281, .01440, .00068, .00024,
- + .00010, .00061, .00139,
- + .13999, .03064, .01274, .00063, .00023,
- + .00010, .00057, .00127,
- + .13204, .02872, .01139, .00058, .00022,
- + .00010, .00053, .00118,
- + .12487, .02702, .01026, .00056, .00021,
- + .00009, .00049, .00108 /
- DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=15,19)/
- + .11840, .02549, .00931, .00052, .00019,
- + .00010, .00046, .00101,
- + .11255, .02411, .00850, .00050, .00018,
- + .00010, .00043, .00095,
- + .10721, .02287, .00781, .00047, .00018,
- + .00009, .00041, .00087,
- + .10232, .02172, .00721, .00044, .00017,
- + .00009, .00038, .00083,
- + .09785, .02069, .00668, .00040, .00016,
- + .00008, .00036, .00079 /
- DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=1,7)/
- + .35637, .08418, .11504, .00144, .00020,
- + .00002, .00134, .00363,
- + .30093, .06947, .07388, .00119, .00025,
- + .00003, .00113, .00287,
- + .26098, .05917, .05149, .00101, .00026,
- + .00003, .00096, .00236,
- + .23066, .05151, .03802, .00086, .00026,
- + .00003, .00084, .00199,
- + .20652, .04555, .02928, .00077, .00025,
- + .00006, .00075, .00169,
- + .18689, .04074, .02329, .00065, .00023,
- + .00007, .00066, .00150,
- + .17047, .03680, .01902, .00059, .00022,
- + .00007, .00059, .00132 /
- DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=8,14)/
- + .15663, .03351, .01587, .00053, .00020,
- + .00008, .00053, .00118,
- + .14477, .03071, .01348, .00047, .00019,
- + .00009, .00049, .00107,
- + .13448, .02832, .01163, .00044, .00018,
- + .00008, .00044, .00097,
- + .12548, .02625, .01016, .00041, .00017,
- + .00008, .00041, .00088,
- + .11755, .02444, .00898, .00037, .00016,
- + .00008, .00038, .00080,
- + .11050, .02284, .00800, .00034, .00015,
- + .00008, .00035, .00075,
- + .10418, .02142, .00720, .00033, .00014,
- + .00007, .00033, .00069 /
- DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=15,19)/
- + .09850, .02015, .00652, .00031, .00014,
- + .00008, .00031, .00064,
- + .09338, .01901, .00594, .00028, .00013,
- + .00008, .00028, .00060,
- + .08872, .01798, .00545, .00026, .00012,
- + .00007, .00026, .00056,
- + .08446, .01704, .00502, .00025, .00011,
- + .00007, .00025, .00052,
- + .08057, .01619, .00465, .00024, .00011,
- + .00006, .00024, .00049 /
- DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=1,7)/
- + .31534, .07072, .08731, .00103, .00009,
- + -.00003, .00084, .00244,
- + .26356, .05780, .05498, .00083, .00013,
- + -.00001, .00070, .00190,
- + .22668, .04884, .03774, .00070, .00014,
- + -.00002, .00060, .00153,
- + .19891, .04225, .02760, .00059, .00013,
- + -.00001, .00052, .00130,
- + .17696, .03713, .02109, .00054, .00012,
- + .00001, .00044, .00111,
- + .15925, .03305, .01666, .00047, .00012,
- + .00002, .00039, .00097,
- + .14455, .02971, .01354, .00042, .00011,
- + .00003, .00035, .00086 /
- DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=8,14)/
- + .13219, .02694, .01125, .00038, .00010,
- + .00003, .00031, .00075,
- + .12165, .02460, .00953, .00036, .00010,
- + .00003, .00028, .00067,
- + .11257, .02260, .00820, .00032, .00009,
- + .00003, .00026, .00061,
- + .10466, .02087, .00715, .00029, .00008,
- + .00003, .00024, .00055,
- + .09772, .01937, .00630, .00026, .00008,
- + .00003, .00022, .00051,
- + .09158, .01805, .00561, .00023, .00007,
- + .00003, .00020, .00048,
- + .08608, .01688, .00504, .00023, .00007,
- + .00003, .00018, .00043 /
- DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=15,19)/
- + .08116, .01584, .00456, .00022, .00006,
- + .00003, .00017, .00040,
- + .07674, .01491, .00415, .00020, .00006,
- + .00003, .00016, .00037,
- + .07273, .01406, .00380, .00019, .00006,
- + .00003, .00014, .00035,
- + .06907, .01330, .00350, .00018, .00006,
- + .00003, .00013, .00033,
- + .06574, .01261, .00324, .00017, .00005,
- + .00002, .00013, .00031 /
- DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=1,7)/
- + .27543, .05845, .06477, .00059, .00010,
- + .00003, .00059, .00156,
- + .22769, .04730, .03998, .00050, .00010,
- + .00003, .00047, .00122,
- + .19413, .03965, .02708, .00042, .00010,
- + .00002, .00038, .00099,
- + .16908, .03404, .01959, .00036, .00009,
- + .00003, .00033, .00083,
- + .14947, .02974, .01485, .00031, .00008,
- + .00003, .00028, .00071,
- + .13371, .02634, .01167, .00027, .00007,
- + .00002, .00025, .00060,
- + .12076, .02356, .00944, .00024, .00007,
- + .00003, .00022, .00053 /
- DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=8,14)/
- + .10990, .02127, .00782, .00024, .00007,
- + .00003, .00019, .00047,
- + .10070, .01934, .00660, .00021, .00006,
- + .00003, .00017, .00042,
- + .09282, .01770, .00566, .00018, .00006,
- + .00003, .00016, .00037,
- + .08598, .01629, .00493, .00017, .00005,
- + .00002, .00015, .00033,
- + .07998, .01506, .00434, .00016, .00005,
- + .00003, .00013, .00030,
- + .07469, .01399, .00386, .00015, .00005,
- + .00002, .00012, .00028,
- + .07001, .01305, .00346, .00013, .00004,
- + .00002, .00011, .00026 /
- DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=15,19)/
- + .06580, .01220, .00313, .00013, .00004,
- + .00002, .00010, .00024,
- + .06203, .01145, .00284, .00012, .00004,
- + .00002, .00009, .00022,
- + .05863, .01078, .00260, .00012, .00003,
- + .00002, .00009, .00021,
- + .05556, .01017, .00239, .00010, .00004,
- + .00002, .00009, .00019,
- + .05276, .00962, .00221, .00010, .00003,
- + .00002, .00008, .00018 /
- DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=1,7)/
- + .23735, .04768, .04709, .00034, .00008,
- + .00004, .00039, .00098,
- + .19415, .03819, .02850, .00027, .00008,
- + .00004, .00031, .00075,
- + .16402, .03174, .01904, .00024, .00007,
- + .00002, .00026, .00061,
- + .14179, .02706, .01365, .00019, .00006,
- + .00002, .00021, .00051,
- + .12451, .02349, .01027, .00018, .00006,
- + .00003, .00018, .00042,
- + .11074, .02068, .00802, .00016, .00005,
- + .00002, .00016, .00036,
- + .09945, .01840, .00647, .00014, .00005,
- + .00003, .00014, .00032 /
- DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=8,14)/
- + .09009, .01653, .00534, .00011, .00005,
- + .00002, .00012, .00028,
- + .08217, .01496, .00450, .00011, .00004,
- + .00002, .00011, .00025,
- + .07541, .01364, .00385, .00010, .00004,
- + .00002, .00009, .00023,
- + .06959, .01251, .00334, .00009, .00003,
- + .00002, .00009, .00021,
- + .06451, .01153, .00294, .00008, .00003,
- + .00002, .00008, .00018,
- + .06004, .01067, .00261, .00008, .00003,
- + .00002, .00008, .00016,
- + .05608, .00992, .00234, .00008, .00003,
- + .00002, .00007, .00015 /
- DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=15,19)/
- + .05256, .00925, .00211, .00007, .00003,
- + .00002, .00006, .00014,
- + .04941, .00866, .00192, .00007, .00003,
- + .00001, .00006, .00013,
- + .04656, .00813, .00175, .00007, .00002,
- + .00001, .00006, .00012,
- + .04400, .00765, .00161, .00006, .00002,
- + .00001, .00005, .00010,
- + .04168, .00722, .00149, .00005, .00002,
- + .00001, .00005, .00009 /
- DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=1,7)/
- + .20188, .03842, .03353, .00024, .00003,
- + .00001, .00022, .00062,
- + .16328, .03045, .01994, .00019, .00003,
- + .00001, .00017, .00047,
- + .13671, .02510, .01316, .00017, .00003,
- + .00001, .00014, .00037,
- + .11730, .02124, .00936, .00013, .00003,
- + .00000, .00012, .00030,
- + .10235, .01832, .00700, .00011, .00002,
- + .00001, .00010, .00025,
- + .09047, .01603, .00545, .00010, .00003,
- + .00001, .00009, .00023,
- + .08083, .01419, .00438, .00008, .00002,
- + .00001, .00007, .00019 /
- DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=8,14)/
- + .07285, .01269, .00360, .00008, .00002,
- + .00000, .00006, .00016,
- + .06614, .01144, .00303, .00008, .00001,
- + .00001, .00005, .00015,
- + .06046, .01039, .00259, .00007, .00002,
- + .00001, .00005, .00013,
- + .05557, .00949, .00225, .00007, .00002,
- + .00001, .00005, .00012,
- + .05132, .00872, .00197, .00007, .00001,
- + .00001, .00004, .00011,
- + .04760, .00804, .00175, .00006, .00001,
- + .00000, .00003, .00009,
- + .04433, .00746, .00157, .00006, .00001,
- + .00000, .00003, .00008 /
- DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=15,19)/
- + .04142, .00693, .00141, .00005, .00001,
- + .00000, .00003, .00008,
- + .03883, .00647, .00128, .00005, .00001,
- + .00001, .00003, .00007,
- + .03652, .00606, .00117, .00004, .00001,
- + .00000, .00003, .00007,
- + .03441, .00569, .00108, .00004, .00001,
- + .00001, .00002, .00006,
- + .03250, .00535, .00099, .00004, .00001,
- + .00001, .00002, .00006 /
- DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=1,7)/
- + .16881, .03032, .02320, .00009, .00004,
- + .00004, .00014, .00037,
- + .13497, .02378, .01355, .00008, .00003,
- + .00003, .00011, .00027,
- + .11197, .01942, .00885, .00007, .00003,
- + .00002, .00009, .00021,
- + .09528, .01632, .00624, .00007, .00003,
- + .00002, .00007, .00016,
- + .08255, .01398, .00465, .00005, .00002,
- + .00002, .00006, .00015,
- + .07252, .01216, .00360, .00006, .00002,
- + .00002, .00006, .00010,
- + .06443, .01071, .00289, .00004, .00002,
- + .00001, .00004, .00010 /
- DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=8,14)/
- + .05777, .00953, .00237, .00003, .00002,
- + .00001, .00004, .00009,
- + .05221, .00855, .00199, .00004, .00001,
- + .00001, .00004, .00008,
- + .04752, .00773, .00170, .00003, .00001,
- + .00001, .00003, .00007,
- + .04349, .00703, .00147, .00003, .00001,
- + .00001, .00003, .00006,
- + .04002, .00643, .00129, .00002, .00001,
- + .00001, .00003, .00006,
- + .03701, .00592, .00114, .00001, .00001,
- + .00001, .00002, .00005,
- + .03432, .00546, .00102, .00003, .00001,
- + .00001, .00002, .00005 /
- DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=15,19)/
- + .03197, .00507, .00092, .00002, .00001,
- + .00001, .00002, .00004,
- + .02988, .00471, .00084, .00002, .00001,
- + .00001, .00002, .00004,
- + .02800, .00440, .00076, .00002, .00001,
- + .00001, .00002, .00003,
- + .02632, .00412, .00070, .00002, .00001,
- + .00001, .00002, .00003,
- + .02480, .00387, .00064, .00002, .00001,
- + .00001, .00002, .00003 /
- DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=1,7)/
- + .11210, .01794, .01023, .00004, .00001,
- + .00000, .00004, .00011,
- + .08751, .01374, .00580, .00003, .00001,
- + .00000, .00003, .00008,
- + .07118, .01102, .00371, .00002, .00000,
- + .00000, .00003, .00006,
- + .05958, .00910, .00259, .00001, .00000,
- + .00000, .00002, .00005,
- + .05085, .00769, .00192, .00002, .00001,
- + .00000, .00002, .00004,
- + .04410, .00661, .00148, .00001, .00000,
- + .00000, .00001, .00003,
- + .03872, .00575, .00118, .00001, .00001,
- + .00000, .00001, .00002 /
- DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=8,14)/
- + .03434, .00506, .00097, .00001, .00001,
- + .00000, .00001, .00002,
- + .03074, .00450, .00081, .00001, .00000,
- + .00000, .00001, .00002,
- + .02771, .00403, .00069, .00001, .00000,
- + .00000, .00001, .00002,
- + .02516, .00364, .00060, .00000, .00000,
- + .00000, .00001, .00002,
- + .02296, .00330, .00052, .00000, .00000,
- + .00000, .00001, .00002,
- + .02106, .00302, .00046, .00001, .00000,
- + .00000, .00001, .00001,
- + .01940, .00277, .00041, .00001, .00000,
- + .00000, .00001, .00001 /
- DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=15,19)/
- + .01795, .00255, .00037, .00001, .00000,
- + .00000, .00001, .00001,
- + .01667, .00236, .00034, .00000, .00000,
- + .00000, .00001, .00001,
- + .01554, .00219, .00031, .00000, .00000,
- + .00000, .00001, .00001,
- + .01452, .00203, .00028, .00000, .00000,
- + .00000, .00001, .00001,
- + .01360, .00190, .00026, .00000, .00000,
- + .00000, .00001, .00001 /
- DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=1,7)/
- + .06818, .00965, .00390, .00001, .00000,
- + .00000, .00001, .00003,
- + .05187, .00721, .00217, .00000, .00000,
- + -.00001, .00001, .00003,
- + .04129, .00566, .00137, .00001, .00000,
- + -.00001, .00000, .00002,
- + .03395, .00459, .00096, .00000, .00000,
- + .00000, .00000, .00001,
- + .02853, .00382, .00071, .00001, .00000,
- + .00000, .00000, .00001,
- + .02439, .00324, .00055, .00001, .00000,
- + .00000, .00000, .00000,
- + .02114, .00279, .00044, .00000, .00000,
- + .00000, .00000, .00001 /
- DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=8,14)/
- + .01853, .00242, .00036, .00000, .00000,
- + .00000, .00000, .00001,
- + .01641, .00213, .00030, .00000, .00000,
- + .00000, .00000, .00000,
- + .01465, .00189, .00025, .00000, .00000,
- + .00000, .00000, .00000,
- + .01317, .00169, .00022, .00000, .00000,
- + .00000, .00000, .00000,
- + .01192, .00152, .00019, .00000, .00000,
- + .00000, .00000, .00000,
- + .01085, .00138, .00017, .00000, .00000,
- + .00000, .00000, .00000,
- + .00992, .00126, .00015, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=15,19)/
- + .00911, .00115, .00014, .00000, .00000,
- + .00000, .00000, .00000,
- + .00840, .00106, .00012, .00000, .00000,
- + .00000, .00000, .00000,
- + .00778, .00097, .00011, .00000, .00000,
- + .00000, .00000, .00000,
- + .00722, .00090, .00010, .00000, .00000,
- + .00000, .00000, .00000,
- + .00673, .00084, .00009, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=1,7)/
- + .03695, .00456, .00123, .00000, .00000,
- + .00000, .00000, .00001,
- + .02730, .00331, .00068, .00001, .00000,
- + .00000, .00000, .00000,
- + .02123, .00254, .00043, .00000, .00000,
- + .00000, .00000, .00000,
- + .01711, .00203, .00030, .00000, .00000,
- + .00000, .00000, .00000,
- + .01412, .00166, .00022, .00000, .00000,
- + .00000, .00000, .00000,
- + .01188, .00138, .00017, .00000, .00000,
- + .00000, .00000, .00000,
- + .01015, .00117, .00014, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=8,14)/
- + .00879, .00101, .00011, .00000, .00000,
- + .00000, .00000, .00000,
- + .00768, .00088, .00010, .00000, .00000,
- + .00000, .00000, .00000,
- + .00678, .00077, .00008, .00000, .00000,
- + .00000, .00000, .00000,
- + .00604, .00068, .00007, .00000, .00000,
- + .00000, .00000, .00000,
- + .00541, .00061, .00006, .00000, .00000,
- + .00000, .00000, .00000,
- + .00488, .00054, .00005, .00000, .00000,
- + .00000, .00000, .00000,
- + .00442, .00049, .00005, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=15,19)/
- + .00403, .00045, .00004, .00000, .00000,
- + .00000, .00000, .00000,
- + .00369, .00041, .00004, .00000, .00000,
- + .00000, .00000, .00000,
- + .00339, .00037, .00004, .00000, .00000,
- + .00000, .00000, .00000,
- + .00312, .00034, .00003, .00000, .00000,
- + .00000, .00000, .00000,
- + .00289, .00032, .00003, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=1,7)/
- + .01691, .00179, .00029, .00000, .00000,
- + .00000, .00000, .00000,
- + .01209, .00126, .00017, .00000, .00000,
- + .00000, .00000, .00000,
- + .00914, .00094, .00011, .00000, .00000,
- + .00000, .00000, .00000,
- + .00720, .00073, .00008, .00000, .00000,
- + .00000, .00000, .00000,
- + .00582, .00059, .00006, .00000, .00000,
- + .00000, .00000, .00000,
- + .00481, .00048, .00005, .00000, .00000,
- + .00000, .00000, .00000,
- + .00404, .00040, .00004, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=8,14)/
- + .00344, .00034, .00003, .00000, .00000,
- + .00000, .00000, .00000,
- + .00297, .00029, .00003, .00000, .00000,
- + .00000, .00000, .00000,
- + .00259, .00025, .00002, .00000, .00000,
- + .00000, .00000, .00000,
- + .00227, .00022, .00002, .00000, .00000,
- + .00000, .00000, .00000,
- + .00202, .00019, .00002, .00000, .00000,
- + .00000, .00000, .00000,
- + .00180, .00017, .00001, .00000, .00000,
- + .00000, .00000, .00000,
- + .00161, .00015, .00001, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=15,19)/
- + .00146, .00014, .00001, .00000, .00000,
- + .00000, .00000, .00000,
- + .00132, .00013, .00001, .00000, .00000,
- + .00000, .00000, .00000,
- + .00120, .00011, .00001, .00000, .00000,
- + .00000, .00000, .00000,
- + .00110, .00010, .00001, .00000, .00000,
- + .00000, .00000, .00000,
- + .00101, .00010, .00001, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=1,7)/
- + .00134, .00009, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00087, .00006, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00061, .00004, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00045, .00003, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00034, .00002, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00027, .00002, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00021, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=8,14)/
- + .00017, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00014, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00012, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00010, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00009, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00008, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00006, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=15,19)/
- + .00006, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00005, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00004, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00004, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000,
- + .00003, .00001, .00000, .00000, .00000,
- + .00000, .00000, .00000 /
- DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5,
- . 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,8.D-3,
- . 1.D-2,2.D-2,4.D-2,6.D-2,8.D-2,
- . .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0,
- . .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0,
- . .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0,
- . .8D0,.9D0,1.D0/
- DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/
- DATA N0/2,5,5,9,0,0,9,9/
- DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
- DATA INIT/0/
-C
- xsave=x
-C
- IF(INIT.NE.0) GOTO 10
- INIT=1
- DO 20 N=1,NX-1
- DO 20 M=1,19
-C READ(80,50)F(1,N,M),F(2,N,M),F(3,N,M),F(4,N,M),F(5,N,M),F(7,N,M),
-C . F(6,N,M),F(8,N,M)
-C 1=UV 2=DV 3=GLUE 4=UBAR 5=CBAR 7=BBAR 6=SBAR 8=DBAR
- DO 25 I=1,8
- 25 F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
- 20 CONTINUE
- DO 31 J=1,NTENTH-1
- XX(J)= LOG10(XX(J))+ONEDO
- DO 31 I=1,8
- IF(I.EQ.7) GO TO 31
- DO 30 K=1,19
- 30 F(I,J,K)= LOG(F(I,J,K))*F(I,NTENTH,K)/ LOG(F(I,NTENTH,K))
- 31 CONTINUE
- 50 FORMAT(8F10.5)
- DO 40 I=1,8
- DO 40 M=1,19
- 40 F(I,nx,M)=ZEROD
- 10 CONTINUE
- IF(X.LT.XMIN) X=XMIN
- IF(X.GT.XMAX) X=XMAX
- QSQ=SCALE**2
- IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
- IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
- XXX=X
- IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
- N=0
- 70 N=N+1
- IF(XXX.GT.XX(N+1)) GOTO 70
- A=(XXX-XX(N))/(XX(N+1)-XX(N))
- RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
- B=RM-AINT(RM)
- M=1+ INT(RM)
- DO 60 I=1,8
- G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
- . + A*(ONED-B)*F(I,N+1,M) + A*B*F(I,N+1,M+1)
- IF(N.GE.NTENTH) GOTO 65
- IF(I.EQ.7) GOTO 65
- FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
- G(I)=FAC**(G(I)/FAC)
- 65 CONTINUE
- G(I)=G(I)*(ONED-X)**N0(I)
- 60 CONTINUE
- UPV=G(1)
- DNV=G(2)
- USEA=G(4)
- DSEA=G(8)
- STR=G(6)
- CHM=G(5)
- GLU=G(3)
- BOT=G(7)
-C
- x=xsave
-C
- RETURN
- END