* * $Id$ * * $Log$ * Revision 1.1.1.2 1996/10/30 08:30:18 cernlib * Version 7.04 * * Revision 1.1.1.1 1996/04/12 15:29:42 plothow * Version 7.01 * * #include "pdf/pilot.h" SUBROUTINE SFMSBD0(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU) C THIS IS THE NEW B0-TYPE FIT "D0'" WITH UBAR < DBAR (230 MEV) #include "pdf/impdp.inc" 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)/ + 0.00820, 0.00305, 4.30034, 0.45159, 0.04557, + 0.00000, 0.25246, 0.45682, + 0.00874, 0.00321, 11.00467, 0.62975, 0.22381, + 0.00000, 0.43083, 0.63503, + 0.00924, 0.00337, 19.93318, 0.86387, 0.45800, + 0.00000, 0.66515, 0.86919, + 0.00970, 0.00352, 30.63055, 1.14801, 0.74220, + 0.00000, 0.94947, 1.15338, + 0.01012, 0.00367, 43.07445, 1.47932, 1.07358, + 0.07132, 1.28095, 1.48474, + 0.01052, 0.00380, 57.04886, 1.85438, 1.44870, + 0.40646, 1.65617, 1.85983, + 0.01090, 0.00394, 72.39754, 2.27129, 1.86567, + 0.83916, 2.07324, 2.27679 / DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=8,14)/ + 0.01126, 0.00407, 88.96280, 2.72696, 2.32140, + 1.30378, 2.52905, 2.73249, + 0.01161, 0.00420, 106.60825, 3.21829, 2.81279, + 1.80435, 3.02052, 3.22386, + 0.01194, 0.00433, 125.23030, 3.74290, 3.33746, + 2.33731, 3.54527, 3.74851, + 0.01226, 0.00445, 144.75316, 4.29899, 3.89361, + 2.90128, 4.10149, 4.30463, + 0.01257, 0.00457, 165.02708, 4.88328, 4.47796, + 3.49297, 4.68590, 4.88897, + 0.01287, 0.00468, 185.74925, 5.48867, 5.08341, + 4.10534, 5.29142, 5.49439, + 0.01316, 0.00480, 207.19238, 6.12070, 5.71550, + 4.74396, 5.92357, 6.12646 / DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=15,19)/ + 0.01345, 0.00491, 229.19391, 6.77573, 6.37060, + 5.40525, 6.57872, 6.78154, + 0.01372, 0.00502, 251.37769, 7.44504, 7.03997, + 6.08051, 7.24814, 7.45088, + 0.01399, 0.00513, 274.24219, 8.13973, 7.73473, + 6.78087, 7.94296, 8.14562, + 0.01425, 0.00523, 297.05859, 8.84242, 8.43748, + 7.48899, 8.64576, 8.84840, + 0.01450, 0.00534, 320.44653, 9.56751, 9.16264, + 8.21925, 9.37096, 9.57351 / DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=1,7)/ + 0.01112, 0.00413, 4.16478, 0.44450, 0.04167, + 0.00000, 0.24582, 0.44874, + 0.01184, 0.00438, 10.00315, 0.60301, 0.20054, + 0.00000, 0.40463, 0.60732, + 0.01250, 0.00461, 17.46046, 0.80490, 0.40275, + 0.00000, 0.60679, 0.80927, + 0.01310, 0.00483, 26.12637, 1.04382, 0.64197, + 0.00000, 0.84596, 1.04825, + 0.01366, 0.00504, 35.96332, 1.31660, 0.91503, + 0.05844, 1.11897, 1.32107, + 0.01419, 0.00524, 46.78426, 1.61989, 1.21858, + 0.32996, 1.42249, 1.62442, + 0.01469, 0.00544, 58.45796, 1.95180, 1.55074, + 0.67577, 1.75460, 1.95637 / DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=8,14)/ + 0.01517, 0.00563, 70.85809, 2.30957, 1.90874, + 1.04175, 2.11257, 2.31418, + 0.01563, 0.00581, 83.87959, 2.69056, 2.28996, + 1.43112, 2.49375, 2.69523, + 0.01607, 0.00599, 97.44550, 3.09280, 2.69241, + 1.84095, 2.89616, 3.09750, + 0.01649, 0.00616, 111.50073, 3.51478, 3.11461, + 2.27012, 3.31833, 3.51952, + 0.01689, 0.00633, 125.93799, 3.95397, 3.55401, + 2.71604, 3.75769, 3.95876, + 0.01729, 0.00649, 140.54076, 4.40504, 4.00527, + 3.17347, 4.20891, 4.40987, + 0.01767, 0.00665, 155.51311, 4.87211, 4.47255, + 3.64656, 4.67615, 4.87699 / DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=15,19)/ + 0.01804, 0.00681, 170.74074, 5.35252, 4.95314, + 4.13266, 5.15671, 5.35743, + 0.01840, 0.00696, 185.96053, 5.83980, 5.44061, + 4.62538, 5.64414, 5.84475, + 0.01874, 0.00711, 201.53259, 6.34221, 5.94321, + 5.13296, 6.14670, 6.34720, + 0.01908, 0.00726, 216.94594, 6.84709, 6.44827, + 5.64278, 6.65172, 6.85212, + 0.01941, 0.00740, 232.64294, 7.36496, 6.96631, + 6.16538, 7.16973, 7.37004 / DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=1,7)/ + 0.01507, 0.00561, 4.03320, 0.43694, 0.03787, + 0.00000, 0.23922, 0.44054, + 0.01603, 0.00597, 9.09126, 0.57700, 0.17859, + 0.00000, 0.37969, 0.58069, + 0.01690, 0.00631, 15.29068, 0.74990, 0.35210, + 0.00000, 0.55297, 0.75367, + 0.01770, 0.00663, 22.27757, 0.94947, 0.55222, + 0.00000, 0.75288, 0.95332, + 0.01844, 0.00694, 30.01537, 1.17262, 0.77587, + 0.04761, 0.97634, 1.17654, + 0.01914, 0.00723, 38.35127, 1.41634, 1.02008, + 0.26639, 1.22036, 1.42033, + 0.01980, 0.00751, 47.18178, 1.67895, 1.28314, + 0.54128, 1.48325, 1.68301 / DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=8,14)/ + 0.02043, 0.00777, 56.41171, 1.95814, 1.56275, + 0.82802, 1.76270, 1.96225, + 0.02103, 0.00803, 65.96436, 2.25180, 1.85682, + 1.12931, 2.05661, 2.25597, + 0.02161, 0.00828, 75.78619, 2.55834, 2.16375, + 1.44280, 2.36339, 2.56256, + 0.02216, 0.00853, 85.84114, 2.87664, 2.48243, + 1.76766, 2.68192, 2.88091, + 0.02269, 0.00876, 96.05449, 3.20477, 2.81093, + 2.10195, 3.01028, 3.20910, + 0.02321, 0.00899, 106.27458, 3.53881, 3.14532, + 2.44181, 3.34454, 3.54320, + 0.02371, 0.00922, 116.65524, 3.88188, 3.48873, + 2.79038, 3.68781, 3.88631 / DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=15,19)/ + 0.02419, 0.00943, 127.11835, 4.23204, 3.83923, + 3.14577, 4.03818, 4.23652, + 0.02466, 0.00965, 137.48166, 4.58461, 4.19212, + 3.50332, 4.39095, 4.58914, + 0.02511, 0.00986, 148.00665, 4.94570, 4.55352, + 3.86915, 4.75223, 4.95028, + 0.02555, 0.01006, 158.33673, 5.30615, 4.91428, + 4.23413, 5.11286, 5.31077, + 0.02598, 0.01026, 168.78696, 5.67369, 5.28212, + 4.60601, 5.48059, 5.67836 / DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=1,7)/ + 0.01800, 0.00671, 3.95792, 0.43222, 0.03569, + 0.00000, 0.23537, 0.43564, + 0.01913, 0.00716, 8.59567, 0.56200, 0.16634, + 0.00000, 0.36564, 0.56553, + 0.02016, 0.00759, 14.14575, 0.71932, 0.32444, + 0.00000, 0.52341, 0.72296, + 0.02110, 0.00799, 20.28943, 0.89830, 0.50413, + 0.00000, 0.70280, 0.90203, + 0.02198, 0.00837, 26.99515, 1.09601, 0.70250, + 0.04210, 0.90088, 1.09983, + 0.02280, 0.00872, 34.13046, 1.30974, 0.91685, + 0.23435, 1.11496, 1.31364, + 0.02358, 0.00907, 41.60805, 1.53796, 1.14564, + 0.47401, 1.34351, 1.54193 / DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=8,14)/ + 0.02431, 0.00940, 49.34917, 1.77864, 1.38687, + 0.72190, 1.58450, 1.78269, + 0.02502, 0.00971, 57.29214, 2.02996, 1.63872, + 0.98047, 1.83612, 2.03408, + 0.02569, 0.01002, 65.39511, 2.29060, 1.89986, + 1.24772, 2.09704, 2.29478, + 0.02634, 0.01032, 73.63124, 2.55959, 2.16934, + 1.52295, 2.36631, 2.56384, + 0.02697, 0.01061, 81.94168, 2.83535, 2.44557, + 1.80457, 2.64234, 2.83966, + 0.02757, 0.01089, 90.20387, 3.11462, 2.72529, + 2.08939, 2.92186, 3.11899, + 0.02815, 0.01116, 98.54913, 3.40008, 3.01117, + 2.38008, 3.20756, 3.40450 / DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=15,19)/ + 0.02871, 0.01142, 106.91562, 3.69011, 3.30163, + 2.67509, 3.49783, 3.69459, + 0.02926, 0.01168, 115.15706, 3.98087, 3.59280, + 2.97059, 3.78882, 3.98540, + 0.02979, 0.01193, 123.49013, 4.27749, 3.88981, + 3.27173, 4.08566, 4.28207, + 0.03030, 0.01218, 131.62666, 4.57241, 4.18512, + 3.57098, 4.38081, 4.57705, + 0.03080, 0.01242, 139.82591, 4.87209, 4.48517, + 3.87479, 4.68069, 4.87678 / DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=1,7)/ + 0.02042, 0.00762, 3.90519, 0.42868, 0.03416, + 0.00000, 0.23262, 0.43208, + 0.02169, 0.00816, 8.25971, 0.55139, 0.15789, + 0.00000, 0.35589, 0.55492, + 0.02285, 0.00865, 13.38381, 0.69824, 0.30565, + 0.00000, 0.50324, 0.70189, + 0.02391, 0.00912, 18.98395, 0.86361, 0.47185, + 0.00000, 0.66906, 0.86736, + 0.02489, 0.00956, 25.03314, 1.04473, 0.65374, + 0.03852, 0.85060, 1.04858, + 0.02581, 0.00997, 31.41321, 1.23909, 0.84882, + 0.21366, 1.04536, 1.24304, + 0.02668, 0.01037, 38.04781, 1.44531, 1.05572, + 0.43078, 1.25195, 1.44935 / DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=8,14)/ + 0.02751, 0.01075, 44.86905, 1.66156, 1.27261, + 0.65401, 1.46855, 1.66568, + 0.02830, 0.01112, 51.82478, 1.88621, 1.49788, + 0.88566, 1.69355, 1.89041, + 0.02905, 0.01147, 58.88084, 2.11810, 1.73035, + 1.12394, 1.92576, 2.12238, + 0.02978, 0.01182, 66.01596, 2.35640, 1.96922, + 1.36828, 2.16436, 2.36075, + 0.03047, 0.01215, 73.18097, 2.59973, 2.21309, + 1.61728, 2.40799, 2.60415, + 0.03115, 0.01247, 80.27115, 2.84525, 2.45913, + 1.86815, 2.65379, 2.84973, + 0.03179, 0.01278, 87.40392, 3.09533, 2.70972, + 2.12331, 2.90415, 3.09988 / DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=15,19)/ + 0.03242, 0.01309, 94.52690, 3.34863, 2.96349, + 2.38141, 3.15771, 3.35324, + 0.03303, 0.01338, 101.51570, 3.60176, 3.21710, + 2.63914, 3.41110, 3.60643, + 0.03362, 0.01367, 108.55965, 3.85927, 3.47507, + 2.90102, 3.66887, 3.86400, + 0.03419, 0.01395, 115.41191, 4.11458, 3.73083, + 3.16052, 3.92442, 4.11937, + 0.03475, 0.01423, 122.29738, 4.37336, 3.99004, + 3.42330, 4.18343, 4.37820 / DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=1,7)/ + 0.02252, 0.00842, 3.86466, 0.42582, 0.03299, + 0.00000, 0.23047, 0.42926, + 0.02391, 0.00902, 8.00759, 0.54317, 0.15148, + 0.00000, 0.34844, 0.54676, + 0.02518, 0.00958, 12.81977, 0.68221, 0.29154, + 0.00000, 0.48803, 0.68593, + 0.02634, 0.01011, 18.02698, 0.83755, 0.44781, + 0.00000, 0.64387, 0.84139, + 0.02741, 0.01060, 23.60628, 1.00657, 0.61769, + 0.03593, 0.81335, 1.01052, + 0.02841, 0.01107, 29.45024, 1.18693, 0.79885, + 0.19869, 0.99415, 1.19098, + 0.02936, 0.01151, 35.49059, 1.37734, 0.99003, + 0.39962, 1.18497, 1.38150 / DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=8,14)/ + 0.03027, 0.01194, 41.66748, 1.57614, 1.18954, + 0.60524, 1.38415, 1.58039, + 0.03113, 0.01235, 47.93552, 1.78184, 1.39593, + 0.81775, 1.59023, 1.78618, + 0.03195, 0.01274, 54.26602, 1.99340, 1.60814, + 1.03554, 1.80213, 1.99782, + 0.03274, 0.01313, 60.64156, 2.21008, 1.82546, + 1.25811, 2.01916, 2.21459, + 0.03350, 0.01350, 67.01950, 2.43066, 2.04664, + 1.48421, 2.24006, 2.43524, + 0.03423, 0.01386, 73.30774, 2.65258, 2.26913, + 1.71136, 2.46229, 2.65723, + 0.03494, 0.01420, 79.61375, 2.87803, 2.49514, + 1.94175, 2.68803, 2.88275 / DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=15,19)/ + 0.03562, 0.01454, 85.89183, 3.10579, 2.72344, + 2.17421, 2.91609, 3.11058, + 0.03629, 0.01487, 92.03229, 3.33285, 2.95103, + 2.40575, 3.14343, 3.33770, + 0.03693, 0.01519, 98.20593, 3.56334, 3.18203, + 2.64051, 3.37419, 3.56826, + 0.03755, 0.01550, 104.19360, 3.79136, 3.41055, + 2.87262, 3.60248, 3.79634, + 0.03816, 0.01581, 110.19688, 4.02202, 3.64168, + 3.10719, 3.83339, 4.02706 / DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=1,7)/ + 0.03052, 0.01150, 3.74033, 0.41605, 0.02941, + 0.00000, 0.22366, 0.42006, + 0.03236, 0.01238, 7.26782, 0.51741, 0.13232, + 0.00000, 0.32584, 0.52162, + 0.03403, 0.01319, 11.20423, 0.63383, 0.25014, + 0.00000, 0.44300, 0.63823, + 0.03556, 0.01395, 15.33313, 0.76078, 0.37836, + 0.00000, 0.57062, 0.76534, + 0.03697, 0.01465, 19.64542, 0.89612, 0.51488, + 0.02874, 0.70658, 0.90084, + 0.03829, 0.01532, 24.06464, 1.03805, 0.65790, + 0.15761, 0.84908, 1.04290, + 0.03954, 0.01595, 28.54543, 1.18561, 0.80649, + 0.31460, 0.99718, 1.19060 / DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=8,14)/ + 0.04072, 0.01655, 33.04964, 1.33757, 0.95943, + 0.47294, 1.14966, 1.34268, + 0.04185, 0.01713, 37.54993, 1.49288, 1.11566, + 0.63456, 1.30545, 1.49811, + 0.04292, 0.01769, 42.03134, 1.65080, 1.27447, + 0.79829, 1.46383, 1.65614, + 0.04395, 0.01823, 46.48680, 1.81087, 1.43539, + 0.96383, 1.62435, 1.81632, + 0.04495, 0.01874, 50.89040, 1.97225, 1.59758, + 1.13036, 1.78615, 1.97780, + 0.04590, 0.01924, 55.18082, 2.13315, 1.75926, + 1.29613, 1.94746, 2.13879, + 0.04682, 0.01973, 59.43996, 2.29525, 1.92211, + 1.46283, 2.10995, 2.30098 / DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=15,19)/ + 0.04770, 0.02020, 63.63884, 2.45772, 2.08531, + 1.62969, 2.27280, 2.46354, + 0.04856, 0.02065, 67.70392, 2.61845, 2.24674, + 1.79460, 2.43390, 2.62436, + 0.04939, 0.02110, 71.75874, 2.78050, 2.40946, + 1.96064, 2.59630, 2.78649, + 0.05019, 0.02153, 75.65318, 2.93968, 2.56931, + 2.12364, 2.75582, 2.94575, + 0.05098, 0.02195, 79.53020, 3.09973, 2.72999, + 2.28734, 2.91620, 3.10586 / DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=1,7)/ + 0.04133, 0.01583, 3.61733, 0.40444, 0.02592, + 0.00000, 0.21638, 0.40975, + 0.04377, 0.01711, 6.58533, 0.49074, 0.11428, + 0.00000, 0.30378, 0.49633, + 0.04596, 0.01828, 9.76781, 0.58684, 0.21222, + 0.00000, 0.40086, 0.59267, + 0.04797, 0.01935, 13.00129, 0.68913, 0.31619, + 0.00000, 0.50403, 0.69517, + 0.04983, 0.02036, 16.29041, 0.79600, 0.42460, + 0.02273, 0.61171, 0.80224, + 0.05156, 0.02130, 19.58540, 0.90613, 0.53616, + 0.12364, 0.72260, 0.91255, + 0.05319, 0.02220, 22.86000, 1.01888, 0.65026, + 0.24494, 0.83606, 1.02547 / DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=8,14)/ + 0.05473, 0.02305, 26.09285, 1.13340, 0.76606, + 0.36551, 0.95125, 1.14015, + 0.05620, 0.02386, 29.27072, 1.24898, 0.88285, + 0.48701, 1.06746, 1.25587, + 0.05760, 0.02464, 32.38834, 1.36516, 1.00018, + 0.60866, 1.18425, 1.37219, + 0.05894, 0.02539, 35.44592, 1.48168, 1.11780, + 0.73033, 1.30134, 1.48884, + 0.06022, 0.02611, 38.42929, 1.59799, 1.23517, + 0.85150, 1.41821, 1.60528, + 0.06146, 0.02680, 41.29901, 1.71288, 1.35106, + 0.97098, 1.53362, 1.72028, + 0.06264, 0.02747, 44.11739, 1.82763, 1.46679, + 1.09008, 1.64888, 1.83515 / DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=15,19)/ + 0.06379, 0.02812, 46.86678, 1.94172, 1.58181, + 1.20831, 1.76346, 1.94935, + 0.06489, 0.02875, 49.49901, 2.05369, 1.69469, + 1.32423, 1.87590, 2.06142, + 0.06596, 0.02936, 52.10284, 2.16578, 1.80766, + 1.44009, 1.98845, 2.17362, + 0.06699, 0.02994, 54.57664, 2.27508, 1.91780, + 1.55300, 2.09819, 2.28301, + 0.06800, 0.03052, 57.02118, 2.38429, 2.02783, + 1.66567, 2.20782, 2.39231 / DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=1,7)/ + 0.04933, 0.01921, 3.54508, 0.39642, 0.02392, + 0.00000, 0.21172, 0.40286, + 0.05219, 0.02079, 6.20753, 0.47433, 0.10423, + 0.00000, 0.29091, 0.48109, + 0.05477, 0.02223, 8.99580, 0.55951, 0.19156, + 0.00000, 0.37724, 0.56654, + 0.05712, 0.02356, 11.77479, 0.64890, 0.28290, + 0.00000, 0.46766, 0.65618, + 0.05930, 0.02479, 14.55657, 0.74118, 0.37698, + 0.01969, 0.56089, 0.74868, + 0.06132, 0.02595, 17.30482, 0.83530, 0.47276, + 0.10656, 0.65589, 0.84300, + 0.06322, 0.02704, 20.00250, 0.93077, 0.56980, + 0.21017, 0.75220, 0.93867 / DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=8,14)/ + 0.06502, 0.02807, 22.63635, 1.02695, 0.66745, + 0.31224, 0.84916, 1.03502, + 0.06673, 0.02906, 25.19928, 1.12329, 0.76519, + 0.41433, 0.94623, 1.13152, + 0.06836, 0.03001, 27.69032, 1.21946, 0.86269, + 0.51582, 1.04310, 1.22785, + 0.06991, 0.03091, 30.11273, 1.31529, 0.95979, + 0.61666, 1.13960, 1.32382, + 0.07140, 0.03178, 32.45729, 1.41039, 1.05610, + 0.71647, 1.23533, 1.41905, + 0.07283, 0.03261, 34.69431, 1.50377, 1.15065, + 0.81433, 1.32933, 1.51257, + 0.07420, 0.03342, 36.87650, 1.59657, 1.24456, + 0.91137, 1.42271, 1.60549 / DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=15,19)/ + 0.07552, 0.03420, 38.99127, 1.68838, 1.33744, + 1.00721, 1.51508, 1.69741, + 0.07680, 0.03495, 41.00131, 1.77803, 1.42813, + 1.10071, 1.60528, 1.78718, + 0.07803, 0.03567, 42.97942, 1.86741, 1.51851, + 1.19376, 1.69518, 1.87667, + 0.07922, 0.03638, 44.84538, 1.95416, 1.60623, + 1.28403, 1.78243, 1.96352, + 0.08038, 0.03706, 46.68073, 2.04050, 1.69351, + 1.37374, 1.86926, 2.04995 / DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=1,7)/ + 0.05590, 0.02213, 3.49319, 0.38999, 0.02253, + 0.00000, 0.20811, 0.39739, + 0.05911, 0.02397, 5.94688, 0.46213, 0.09734, + 0.00000, 0.28168, 0.46987, + 0.06200, 0.02565, 8.47302, 0.53997, 0.17757, + 0.00000, 0.36080, 0.54801, + 0.06463, 0.02718, 10.95557, 0.62082, 0.26058, + 0.00000, 0.44280, 0.62913, + 0.06705, 0.02860, 13.41141, 0.70357, 0.34532, + 0.01771, 0.52661, 0.71211, + 0.06931, 0.02993, 15.81283, 0.78734, 0.43093, + 0.09553, 0.61136, 0.79610, + 0.07143, 0.03118, 18.14856, 0.87175, 0.51707, + 0.18781, 0.69668, 0.88071 / DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=8,14)/ + 0.07343, 0.03237, 20.41023, 0.95627, 0.60322, + 0.27815, 0.78207, 0.96541, + 0.07533, 0.03350, 22.59435, 1.04046, 0.68895, + 0.36799, 0.86707, 1.04978, + 0.07714, 0.03458, 24.70258, 1.12407, 0.77403, + 0.45684, 0.95146, 1.13356, + 0.07886, 0.03561, 26.73956, 1.20701, 0.85836, + 0.54470, 1.03513, 1.21664, + 0.08051, 0.03660, 28.69916, 1.28894, 0.94163, + 0.63128, 1.11777, 1.29872, + 0.08209, 0.03755, 30.55730, 1.36906, 1.02303, + 0.71580, 1.19856, 1.37898, + 0.08361, 0.03846, 32.36076, 1.44837, 1.10357, + 0.79929, 1.27852, 1.45842 / DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=15,19)/ + 0.08508, 0.03934, 34.09976, 1.52655, 1.18293, + 0.88144, 1.35732, 1.53672, + 0.08649, 0.04019, 35.74342, 1.60261, 1.26014, + 0.96130, 1.43398, 1.61290, + 0.08785, 0.04101, 37.35477, 1.67821, 1.33683, + 1.04051, 1.51016, 1.68861, + 0.08916, 0.04181, 38.86623, 1.75132, 1.41101, + 1.11709, 1.58383, 1.76183, + 0.09044, 0.04258, 40.34767, 1.82390, 1.48461, + 1.19299, 1.65694, 1.83450 / DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=1,7)/ + 0.06152, 0.02491, 3.45185, 0.38434, 0.02147, + 0.00000, 0.20490, 0.39244, + 0.06502, 0.02698, 5.74432, 0.45211, 0.09215, + 0.00000, 0.27423, 0.46057, + 0.06817, 0.02885, 8.07149, 0.52448, 0.16712, + 0.00000, 0.34798, 0.53325, + 0.07104, 0.03056, 10.33184, 0.59900, 0.24400, + 0.00000, 0.42375, 0.60805, + 0.07368, 0.03214, 12.54625, 0.67474, 0.32189, + 0.01627, 0.50064, 0.68405, + 0.07613, 0.03362, 14.69372, 0.75093, 0.40008, + 0.08749, 0.57788, 0.76046, + 0.07843, 0.03501, 16.76697, 0.82728, 0.47830, + 0.17154, 0.65522, 0.83702 / DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=8,14)/ + 0.08060, 0.03633, 18.76009, 0.90333, 0.55611, + 0.25335, 0.73220, 0.91326, + 0.08266, 0.03758, 20.67302, 0.97873, 0.63318, + 0.33435, 0.80849, 0.98885, + 0.08461, 0.03877, 22.50847, 1.05332, 0.70935, + 0.41412, 0.88390, 1.06360, + 0.08648, 0.03990, 24.27223, 1.12699, 0.78454, + 0.49268, 0.95837, 1.13744, + 0.08827, 0.04099, 25.96126, 1.19952, 0.85850, + 0.56981, 1.03166, 1.21011, + 0.08998, 0.04203, 27.55463, 1.27019, 0.93056, + 0.64485, 1.10305, 1.28093, + 0.09162, 0.04304, 29.09367, 1.33993, 1.00162, + 0.71872, 1.17349, 1.35080 / DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=15,19)/ + 0.09319, 0.04400, 30.56998, 1.40846, 1.07142, + 0.79119, 1.24268, 1.41946, + 0.09471, 0.04493, 31.96104, 1.47493, 1.13911, + 0.86142, 1.30979, 1.48605, + 0.09618, 0.04583, 33.32074, 1.54083, 1.20619, + 0.93090, 1.37631, 1.55206, + 0.09759, 0.04670, 34.58902, 1.60437, 1.27087, + 0.99788, 1.44044, 1.61571, + 0.09896, 0.04754, 35.82820, 1.66730, 1.33490, + 1.06411, 1.50395, 1.67875 / DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=1,7)/ + 0.08280, 0.03636, 3.31902, 0.36375, 0.01828, + 0.00000, 0.19371, 0.37454, + 0.08739, 0.03929, 5.13839, 0.41854, 0.07679, + 0.00000, 0.25049, 0.42974, + 0.09150, 0.04192, 6.90384, 0.47511, 0.13666, + 0.00000, 0.30881, 0.48667, + 0.09523, 0.04430, 8.55537, 0.53179, 0.19633, + 0.00000, 0.36707, 0.54365, + 0.09864, 0.04648, 10.12249, 0.58808, 0.25535, + 0.01230, 0.42480, 0.60022, + 0.10180, 0.04851, 11.60013, 0.64358, 0.31336, + 0.06555, 0.48162, 0.65597, + 0.10475, 0.05040, 12.99109, 0.69819, 0.37032, + 0.12743, 0.53747, 0.71081 / DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=8,14)/ + 0.10753, 0.05217, 14.29765, 0.75170, 0.42603, + 0.18663, 0.59213, 0.76452, + 0.11015, 0.05385, 15.52510, 0.80396, 0.48037, + 0.24436, 0.64549, 0.81697, + 0.11264, 0.05544, 16.67973, 0.85494, 0.53332, + 0.30042, 0.69749, 0.86813, + 0.11500, 0.05695, 17.76906, 0.90466, 0.58491, + 0.35492, 0.74819, 0.91802, + 0.11726, 0.05839, 18.79407, 0.95301, 0.63504, + 0.40779, 0.79748, 0.96652, + 0.11940, 0.05976, 19.74326, 0.99957, 0.68330, + 0.45862, 0.84492, 1.01322, + 0.12146, 0.06107, 20.64661, 1.04504, 0.73039, + 0.50814, 0.89123, 1.05882 / DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=15,19)/ + 0.12343, 0.06232, 21.50026, 1.08927, 0.77618, + 0.55624, 0.93628, 1.10318, + 0.12532, 0.06352, 22.29103, 1.13173, 0.82013, + 0.60238, 0.97951, 1.14575, + 0.12715, 0.06469, 23.05534, 1.17347, 0.86332, + 0.64763, 1.02200, 1.18761, + 0.12890, 0.06580, 23.75552, 1.21332, 0.90455, + 0.69085, 1.06257, 1.22756, + 0.13060, 0.06687, 24.43269, 1.25249, 0.94506, + 0.73325, 1.10244, 1.26682 / DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=1,7)/ + 0.11155, 0.05435, 3.17302, 0.33669, 0.01523, + 0.00001, 0.17948, 0.35085, + 0.11754, 0.05837, 4.55432, 0.37941, 0.06258, + 0.00001, 0.22464, 0.39399, + 0.12287, 0.06193, 5.82961, 0.42194, 0.10920, + 0.00002, 0.26932, 0.43688, + 0.12766, 0.06512, 6.97356, 0.46326, 0.15419, + 0.00002, 0.31256, 0.47851, + 0.13202, 0.06801, 8.01993, 0.50326, 0.19753, + 0.00905, 0.35431, 0.51878, + 0.13603, 0.07067, 8.97472, 0.54182, 0.23914, + 0.04767, 0.39445, 0.55757, + 0.13976, 0.07313, 9.84731, 0.57898, 0.27915, + 0.09180, 0.43310, 0.59494 / DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=8,14)/ + 0.14325, 0.07542, 10.64545, 0.61473, 0.31756, + 0.13323, 0.47023, 0.63088, + 0.14654, 0.07756, 11.37539, 0.64904, 0.35438, + 0.17295, 0.50584, 0.66536, + 0.14963, 0.07957, 12.04496, 0.68197, 0.38966, + 0.21090, 0.53999, 0.69844, + 0.15255, 0.08148, 12.66244, 0.71360, 0.42352, + 0.24727, 0.57277, 0.73022, + 0.15532, 0.08327, 13.23087, 0.74395, 0.45598, + 0.28207, 0.60421, 0.76069, + 0.15796, 0.08497, 13.74389, 0.77277, 0.48682, + 0.31511, 0.63407, 0.78963, + 0.16048, 0.08658, 14.22304, 0.80057, 0.51655, + 0.34692, 0.66286, 0.81754 / DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=15,19)/ + 0.16288, 0.08812, 14.66714, 0.82729, 0.54510, + 0.37744, 0.69052, 0.84436, + 0.16516, 0.08958, 15.06887, 0.85260, 0.57218, + 0.40639, 0.71674, 0.86976, + 0.16736, 0.09099, 15.45178, 0.87726, 0.59853, + 0.43451, 0.74227, 0.89451, + 0.16946, 0.09232, 15.79320, 0.90051, 0.62341, + 0.46108, 0.76635, 0.91783, + 0.17150, 0.09361, 16.11903, 0.92318, 0.64764, + 0.48692, 0.78982, 0.94057 / DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=1,7)/ + 0.13310, 0.06923, 3.07660, 0.31734, 0.01350, + 0.00001, 0.16953, 0.33378, + 0.14006, 0.07396, 4.21919, 0.35343, 0.05474, + 0.00001, 0.20830, 0.37026, + 0.14622, 0.07810, 5.24090, 0.38853, 0.09438, + 0.00003, 0.24577, 0.40569, + 0.15172, 0.08178, 6.13208, 0.42195, 0.13186, + 0.00002, 0.28130, 0.43939, + 0.15672, 0.08508, 6.92730, 0.45377, 0.16735, + 0.00742, 0.31502, 0.47144, + 0.16127, 0.08810, 7.63787, 0.48399, 0.20093, + 0.03885, 0.34697, 0.50185, + 0.16551, 0.09087, 8.27315, 0.51271, 0.23277, + 0.07440, 0.37730, 0.53075 / DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=8,14)/ + 0.16945, 0.09343, 8.84254, 0.53999, 0.26295, + 0.10733, 0.40607, 0.55817, + 0.17314, 0.09581, 9.35405, 0.56586, 0.29155, + 0.13857, 0.43334, 0.58419, + 0.17659, 0.09805, 9.81489, 0.59044, 0.31869, + 0.16814, 0.45924, 0.60889, + 0.17985, 0.10015, 10.23244, 0.61384, 0.34450, + 0.19623, 0.48387, 0.63238, + 0.18292, 0.10212, 10.61008, 0.63603, 0.36899, + 0.22285, 0.50724, 0.65467, + 0.18584, 0.10396, 10.94457, 0.65690, 0.39204, + 0.24791, 0.52922, 0.67563, + 0.18861, 0.10570, 11.25268, 0.67687, 0.41409, + 0.27184, 0.55025, 0.69569 / DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=15,19)/ + 0.19125, 0.10736, 11.53408, 0.69591, 0.43511, + 0.29464, 0.57031, 0.71481, + 0.19375, 0.10894, 11.78216, 0.71378, 0.45487, + 0.31608, 0.58912, 0.73273, + 0.19615, 0.11044, 12.01576, 0.73107, 0.47397, + 0.33678, 0.60733, 0.75007, + 0.19843, 0.11186, 12.21901, 0.74721, 0.49186, + 0.35620, 0.62435, 0.76626, + 0.20064, 0.11322, 12.41085, 0.76285, 0.50918, + 0.37498, 0.64085, 0.78195 / DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=1,7)/ + 0.15116, 0.08235, 3.00073, 0.30180, 0.01230, + 0.00001, 0.16158, 0.31998, + 0.15887, 0.08757, 3.98180, 0.33339, 0.04938, + 0.00001, 0.19602, 0.35191, + 0.16566, 0.09210, 4.83776, 0.36357, 0.08439, + 0.00003, 0.22870, 0.38238, + 0.17169, 0.09609, 5.56809, 0.39185, 0.11697, + 0.00001, 0.25920, 0.41089, + 0.17715, 0.09965, 6.20721, 0.41843, 0.14744, + 0.00638, 0.28777, 0.43767, + 0.18210, 0.10288, 6.76805, 0.44339, 0.17594, + 0.03327, 0.31454, 0.46276, + 0.18669, 0.10584, 7.26082, 0.46685, 0.20268, + 0.06342, 0.33968, 0.48636 / DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=8,14)/ + 0.19094, 0.10855, 7.69514, 0.48890, 0.22779, + 0.09110, 0.36329, 0.50852, + 0.19490, 0.11105, 8.07902, 0.50962, 0.25136, + 0.11714, 0.38546, 0.52934, + 0.19860, 0.11339, 8.41936, 0.52913, 0.27356, + 0.14160, 0.40634, 0.54893, + 0.20207, 0.11558, 8.72300, 0.54755, 0.29451, + 0.16467, 0.42605, 0.56741, + 0.20535, 0.11763, 8.99337, 0.56488, 0.31424, + 0.18638, 0.44460, 0.58481, + 0.20844, 0.11952, 9.22818, 0.58105, 0.33268, + 0.20669, 0.46192, 0.60104, + 0.21137, 0.12132, 9.44151, 0.59641, 0.35021, + 0.22596, 0.47838, 0.61645 / DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=15,19)/ + 0.21415, 0.12302, 9.63339, 0.61096, 0.36682, + 0.24422, 0.49397, 0.63105, + 0.21677, 0.12462, 9.79865, 0.62450, 0.38232, + 0.26129, 0.50849, 0.64461, + 0.21928, 0.12615, 9.95258, 0.63754, 0.39724, + 0.27769, 0.52246, 0.65766, + 0.22166, 0.12757, 10.08275, 0.64960, 0.41111, + 0.29299, 0.53544, 0.66975, + 0.22396, 0.12895, 10.20421, 0.66124, 0.42449, + 0.30771, 0.54795, 0.68141 / DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=1,7)/ + 0.16706, 0.09424, 2.93643, 0.28874, 0.01140, + 0.00003, 0.15495, 0.30829, + 0.17537, 0.09979, 3.79703, 0.31697, 0.04535, + 0.00003, 0.18611, 0.33681, + 0.18265, 0.10459, 4.53271, 0.34354, 0.07694, + 0.00004, 0.21526, 0.36361, + 0.18911, 0.10878, 5.14857, 0.36811, 0.10598, + 0.00004, 0.24212, 0.38834, + 0.19491, 0.11250, 5.67919, 0.39094, 0.13284, + 0.00566, 0.26701, 0.41131, + 0.20017, 0.11585, 6.13669, 0.41216, 0.15772, + 0.02932, 0.29008, 0.43265, + 0.20502, 0.11888, 6.53273, 0.43192, 0.18089, + 0.05568, 0.31158, 0.45252 / DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=8,14)/ + 0.20948, 0.12167, 6.87682, 0.45036, 0.20247, + 0.07969, 0.33161, 0.47103, + 0.21363, 0.12424, 7.17569, 0.46753, 0.22259, + 0.10213, 0.35027, 0.48826, + 0.21751, 0.12661, 7.43658, 0.48357, 0.24139, + 0.12307, 0.36771, 0.50434, + 0.22114, 0.12881, 7.66622, 0.49860, 0.25903, + 0.14270, 0.38406, 0.51940, + 0.22453, 0.13088, 7.86790, 0.51265, 0.27553, + 0.16107, 0.39934, 0.53347, + 0.22772, 0.13278, 8.03932, 0.52562, 0.29083, + 0.17811, 0.41347, 0.54646, + 0.23074, 0.13457, 8.19258, 0.53789, 0.30531, + 0.19424, 0.42685, 0.55874 / DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=15,19)/ + 0.23360, 0.13626, 8.32788, 0.54946, 0.31899, + 0.20947, 0.43948, 0.57031, + 0.23631, 0.13783, 8.44142, 0.56011, 0.33166, + 0.22362, 0.45115, 0.58098, + 0.23890, 0.13933, 8.54592, 0.57032, 0.34382, + 0.23717, 0.46234, 0.59121, + 0.24132, 0.14073, 8.63130, 0.57974, 0.35508, + 0.24976, 0.47268, 0.60061, + 0.24366, 0.14207, 8.71006, 0.58878, 0.36589, + 0.26184, 0.48260, 0.60964 / DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=1,7)/ + 0.23037, 0.14238, 2.68956, 0.24290, 0.00859, + 0.00000, 0.13163, 0.26645, + 0.24048, 0.14841, 3.20585, 0.26142, 0.03334, + 0.00002, 0.15326, 0.28495, + 0.24919, 0.15344, 3.61381, 0.27788, 0.05525, + 0.00001, 0.17244, 0.30138, + 0.25672, 0.15772, 3.92986, 0.29236, 0.07452, + 0.00002, 0.18930, 0.31579, + 0.26337, 0.16140, 4.18309, 0.30525, 0.09172, + 0.00368, 0.20435, 0.32859, + 0.26927, 0.16464, 4.38658, 0.31677, 0.10712, + 0.01877, 0.21777, 0.33999, + 0.27461, 0.16752, 4.55016, 0.32709, 0.12103, + 0.03524, 0.22986, 0.35021 / DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=8,14)/ + 0.27949, 0.17008, 4.68128, 0.33637, 0.13364, + 0.04985, 0.24078, 0.35939, + 0.28394, 0.17235, 4.78554, 0.34471, 0.14507, + 0.06317, 0.25065, 0.36762, + 0.28802, 0.17440, 4.86872, 0.35224, 0.15549, + 0.07531, 0.25960, 0.37504, + 0.29179, 0.17628, 4.93511, 0.35907, 0.16503, + 0.08646, 0.26776, 0.38175, + 0.29524, 0.17801, 4.98624, 0.36527, 0.17378, + 0.09671, 0.27519, 0.38781, + 0.29844, 0.17954, 5.02253, 0.37079, 0.18171, + 0.10605, 0.28189, 0.39321, + 0.30145, 0.18095, 5.05074, 0.37586, 0.18906, + 0.11473, 0.28807, 0.39816 / DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=15,19)/ + 0.30427, 0.18226, 5.07113, 0.38046, 0.19584, + 0.12275, 0.29373, 0.40266, + 0.30688, 0.18342, 5.08129, 0.38455, 0.20200, + 0.13009, 0.29884, 0.40664, + 0.30937, 0.18452, 5.08812, 0.38839, 0.20784, + 0.13703, 0.30366, 0.41038, + 0.31163, 0.18552, 5.08587, 0.39177, 0.21309, + 0.14335, 0.30795, 0.41364, + 0.31379, 0.18647, 5.08184, 0.39495, 0.21807, + 0.14933, 0.31200, 0.41670 / DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=1,7)/ + 0.32353, 0.20822, 2.33149, 0.19143, 0.00582, + -0.00011, 0.10494, 0.21682, + 0.33420, 0.21261, 2.55776, 0.20135, 0.02213, + -0.00010, 0.11792, 0.22624, + 0.34293, 0.21602, 2.71158, 0.20948, 0.03571, + -0.00012, 0.12865, 0.23386, + 0.35019, 0.21864, 2.81105, 0.21602, 0.04711, + -0.00012, 0.13749, 0.23993, + 0.35636, 0.22072, 2.87604, 0.22139, 0.05681, + 0.00200, 0.14494, 0.24491, + 0.36167, 0.22240, 2.91558, 0.22584, 0.06514, + 0.01061, 0.15124, 0.24893, + 0.36627, 0.22371, 2.93654, 0.22952, 0.07237, + 0.01974, 0.15659, 0.25222 / DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=8,14)/ + 0.37031, 0.22474, 2.94294, 0.23252, 0.07869, + 0.02757, 0.16118, 0.25489, + 0.37381, 0.22559, 2.93888, 0.23499, 0.08421, + 0.03452, 0.16508, 0.25704, + 0.37691, 0.22625, 2.92715, 0.23702, 0.08908, + 0.04070, 0.16845, 0.25875, + 0.37968, 0.22675, 2.90980, 0.23869, 0.09342, + 0.04623, 0.17138, 0.26009, + 0.38212, 0.22713, 2.88783, 0.24007, 0.09726, + 0.05118, 0.17391, 0.26112, + 0.38427, 0.22736, 2.86153, 0.24107, 0.10060, + 0.05557, 0.17599, 0.26184, + 0.38621, 0.22751, 2.83369, 0.24186, 0.10359, + 0.05956, 0.17781, 0.26239 / DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=15,19)/ + 0.38797, 0.22758, 2.80427, 0.24243, 0.10626, + 0.06316, 0.17939, 0.26276, + 0.38950, 0.22757, 2.77247, 0.24278, 0.10860, + 0.06634, 0.18069, 0.26285, + 0.39091, 0.22753, 2.74123, 0.24305, 0.11076, + 0.06931, 0.18185, 0.26288, + 0.39211, 0.22740, 2.70816, 0.24311, 0.11264, + 0.07194, 0.18275, 0.26270, + 0.39322, 0.22726, 2.67594, 0.24312, 0.11439, + 0.07440, 0.18356, 0.26248 / DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=1,7)/ + 0.39633, 0.25075, 2.04614, 0.16000, 0.00439, + 0.00000, 0.08830, 0.18444, + 0.40534, 0.25230, 2.13651, 0.16546, 0.01621, + 0.00003, 0.09675, 0.18908, + 0.41228, 0.25314, 2.18071, 0.16952, 0.02570, + 0.00003, 0.10333, 0.19236, + 0.41768, 0.25345, 2.19287, 0.17235, 0.03336, + 0.00001, 0.10840, 0.19445, + 0.42198, 0.25339, 2.18715, 0.17442, 0.03969, + 0.00144, 0.11245, 0.19586, + 0.42547, 0.25308, 2.16903, 0.17585, 0.04495, + 0.00715, 0.11565, 0.19678, + 0.42830, 0.25248, 2.14268, 0.17678, 0.04940, + 0.01304, 0.11818, 0.19717 / DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=8,14)/ + 0.43055, 0.25177, 2.11091, 0.17729, 0.05314, + 0.01797, 0.12021, 0.19727, + 0.43231, 0.25095, 2.07567, 0.17753, 0.05635, + 0.02232, 0.12181, 0.19704, + 0.43373, 0.25001, 2.03849, 0.17752, 0.05911, + 0.02612, 0.12309, 0.19659, + 0.43486, 0.24902, 2.00049, 0.17732, 0.06148, + 0.02944, 0.12410, 0.19601, + 0.43565, 0.24803, 1.96204, 0.17701, 0.06348, + 0.03238, 0.12484, 0.19529, + 0.43619, 0.24699, 1.92301, 0.17647, 0.06518, + 0.03486, 0.12532, 0.19434, + 0.43659, 0.24591, 1.88496, 0.17585, 0.06669, + 0.03710, 0.12567, 0.19338 / DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=15,19)/ + 0.43685, 0.24479, 1.84771, 0.17514, 0.06801, + 0.03911, 0.12590, 0.19241, + 0.43693, 0.24362, 1.81057, 0.17431, 0.06909, + 0.04088, 0.12596, 0.19131, + 0.43694, 0.24248, 1.77513, 0.17348, 0.07006, + 0.04249, 0.12597, 0.19022, + 0.43676, 0.24131, 1.73997, 0.17257, 0.07083, + 0.04387, 0.12585, 0.18903, + 0.43655, 0.24016, 1.70644, 0.17166, 0.07154, + 0.04514, 0.12570, 0.18786 / DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=1,7)/ + 0.45572, 0.27815, 1.80115, 0.13715, 0.00346, + 0.00007, 0.07584, 0.15922, + 0.46175, 0.27667, 1.81457, 0.13970, 0.01240, + 0.00005, 0.08134, 0.16081, + 0.46591, 0.27483, 1.80085, 0.14121, 0.01938, + 0.00009, 0.08537, 0.16140, + 0.46863, 0.27269, 1.76984, 0.14191, 0.02481, + 0.00009, 0.08825, 0.16134, + 0.47042, 0.27046, 1.73120, 0.14208, 0.02917, + 0.00111, 0.09033, 0.16082, + 0.47154, 0.26814, 1.68831, 0.14186, 0.03273, + 0.00512, 0.09185, 0.15999, + 0.47201, 0.26584, 1.64338, 0.14135, 0.03562, + 0.00923, 0.09294, 0.15896 / DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=8,14)/ + 0.47205, 0.26350, 1.59761, 0.14064, 0.03799, + 0.01261, 0.09364, 0.15773, + 0.47176, 0.26114, 1.55215, 0.13976, 0.03998, + 0.01550, 0.09408, 0.15637, + 0.47119, 0.25881, 1.50778, 0.13876, 0.04165, + 0.01799, 0.09432, 0.15493, + 0.47040, 0.25655, 1.46494, 0.13770, 0.04305, + 0.02015, 0.09439, 0.15343, + 0.46939, 0.25435, 1.42360, 0.13663, 0.04420, + 0.02203, 0.09432, 0.15191, + 0.46820, 0.25210, 1.38349, 0.13547, 0.04515, + 0.02361, 0.09407, 0.15034, + 0.46694, 0.24991, 1.34542, 0.13426, 0.04595, + 0.02500, 0.09377, 0.14880 / DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=15,19)/ + 0.46561, 0.24778, 1.30910, 0.13300, 0.04662, + 0.02623, 0.09342, 0.14726, + 0.46415, 0.24565, 1.27398, 0.13175, 0.04712, + 0.02725, 0.09298, 0.14572, + 0.46270, 0.24360, 1.24091, 0.13053, 0.04755, + 0.02817, 0.09253, 0.14423, + 0.46109, 0.24160, 1.20892, 0.12926, 0.04790, + 0.02897, 0.09199, 0.14269, + 0.45950, 0.23967, 1.17876, 0.12803, 0.04820, + 0.02969, 0.09145, 0.14121 / DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=1,7)/ + 0.50431, 0.29450, 1.58593, 0.11854, 0.00275, + 0.00007, 0.06551, 0.13798, + 0.50642, 0.29013, 1.55280, 0.11917, 0.00962, + 0.00007, 0.06901, 0.13748, + 0.50722, 0.28567, 1.50636, 0.11900, 0.01480, + 0.00007, 0.07131, 0.13656, + 0.50683, 0.28131, 1.45307, 0.11838, 0.01881, + 0.00004, 0.07279, 0.13504, + 0.50567, 0.27721, 1.39881, 0.11745, 0.02196, + 0.00078, 0.07369, 0.13330, + 0.50397, 0.27319, 1.34532, 0.11636, 0.02442, + 0.00373, 0.07418, 0.13153, + 0.50198, 0.26930, 1.29339, 0.11510, 0.02639, + 0.00669, 0.07441, 0.12964 / DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=8,14)/ + 0.49974, 0.26551, 1.24366, 0.11366, 0.02794, + 0.00905, 0.07436, 0.12784, + 0.49727, 0.26181, 1.19639, 0.11217, 0.02920, + 0.01110, 0.07416, 0.12599, + 0.49461, 0.25831, 1.15171, 0.11072, 0.03026, + 0.01284, 0.07385, 0.12403, + 0.49184, 0.25499, 1.10970, 0.10930, 0.03114, + 0.01429, 0.07344, 0.12208, + 0.48906, 0.25174, 1.07018, 0.10782, 0.03180, + 0.01545, 0.07294, 0.12028, + 0.48611, 0.24857, 1.03270, 0.10638, 0.03233, + 0.01654, 0.07239, 0.11843, + 0.48319, 0.24555, 0.99767, 0.10495, 0.03276, + 0.01747, 0.07181, 0.11666 / DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=15,19)/ + 0.48029, 0.24264, 0.96477, 0.10352, 0.03307, + 0.01825, 0.07119, 0.11496, + 0.47738, 0.23977, 0.93347, 0.10208, 0.03333, + 0.01888, 0.07055, 0.11328, + 0.47454, 0.23703, 0.90427, 0.10069, 0.03354, + 0.01945, 0.06992, 0.11167, + 0.47158, 0.23436, 0.87657, 0.09934, 0.03366, + 0.01995, 0.06923, 0.11007, + 0.46869, 0.23181, 0.85065, 0.09804, 0.03375, + 0.02039, 0.06857, 0.10854 / DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=1,7)/ + 0.55124, 0.30335, 1.35102, 0.09895, 0.00206, + 0.00008, 0.05452, 0.11495, + 0.54815, 0.29549, 1.28468, 0.09788, 0.00714, + 0.00004, 0.05628, 0.11298, + 0.54417, 0.28824, 1.21704, 0.09653, 0.01092, + 0.00011, 0.05729, 0.11060, + 0.53949, 0.28150, 1.15112, 0.09487, 0.01368, + 0.00006, 0.05762, 0.10818, + 0.53448, 0.27534, 1.08961, 0.09323, 0.01575, + 0.00058, 0.05764, 0.10575, + 0.52942, 0.26949, 1.03265, 0.09143, 0.01735, + 0.00260, 0.05744, 0.10346, + 0.52423, 0.26400, 0.97995, 0.08966, 0.01863, + 0.00464, 0.05709, 0.10115 / DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=8,14)/ + 0.51911, 0.25873, 0.93124, 0.08786, 0.01962, + 0.00629, 0.05655, 0.09897, + 0.51390, 0.25385, 0.88635, 0.08613, 0.02037, + 0.00760, 0.05596, 0.09679, + 0.50877, 0.24919, 0.84504, 0.08445, 0.02095, + 0.00869, 0.05533, 0.09468, + 0.50378, 0.24472, 0.80701, 0.08279, 0.02142, + 0.00964, 0.05466, 0.09271, + 0.49879, 0.24057, 0.77191, 0.08120, 0.02179, + 0.01041, 0.05394, 0.09082, + 0.49386, 0.23653, 0.73924, 0.07963, 0.02204, + 0.01105, 0.05320, 0.08894, + 0.48903, 0.23273, 0.70913, 0.07815, 0.02221, + 0.01161, 0.05248, 0.08717 / DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=15,19)/ + 0.48427, 0.22915, 0.68125, 0.07673, 0.02229, + 0.01208, 0.05177, 0.08549, + 0.47962, 0.22563, 0.65519, 0.07537, 0.02236, + 0.01247, 0.05107, 0.08380, + 0.47516, 0.22228, 0.63109, 0.07408, 0.02242, + 0.01282, 0.05039, 0.08219, + 0.47072, 0.21904, 0.60840, 0.07277, 0.02241, + 0.01310, 0.04967, 0.08068, + 0.46645, 0.21596, 0.58734, 0.07153, 0.02239, + 0.01334, 0.04899, 0.07926 / DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=1,7)/ + 0.58452, 0.30236, 1.14794, 0.08190, 0.00165, + 0.00017, 0.04510, 0.09494, + 0.57578, 0.29170, 1.06488, 0.07997, 0.00536, + 0.00012, 0.04573, 0.09210, + 0.56701, 0.28211, 0.98862, 0.07786, 0.00808, + 0.00014, 0.04589, 0.08919, + 0.55798, 0.27357, 0.91938, 0.07590, 0.01001, + 0.00015, 0.04560, 0.08629, + 0.54933, 0.26572, 0.85763, 0.07380, 0.01149, + 0.00049, 0.04517, 0.08362, + 0.54098, 0.25846, 0.80251, 0.07176, 0.01255, + 0.00196, 0.04457, 0.08121, + 0.53282, 0.25179, 0.75290, 0.06986, 0.01334, + 0.00333, 0.04390, 0.07880 / DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=8,14)/ + 0.52483, 0.24559, 0.70830, 0.06806, 0.01396, + 0.00443, 0.04319, 0.07647, + 0.51717, 0.23977, 0.66795, 0.06627, 0.01442, + 0.00533, 0.04245, 0.07433, + 0.50976, 0.23433, 0.63143, 0.06456, 0.01476, + 0.00606, 0.04173, 0.07227, + 0.50259, 0.22924, 0.59837, 0.06296, 0.01502, + 0.00667, 0.04101, 0.07032, + 0.49575, 0.22435, 0.56832, 0.06139, 0.01519, + 0.00713, 0.04022, 0.06860, + 0.48896, 0.21981, 0.54066, 0.06000, 0.01527, + 0.00752, 0.03950, 0.06682, + 0.48253, 0.21549, 0.51545, 0.05863, 0.01535, + 0.00789, 0.03878, 0.06515 / DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=15,19)/ + 0.47642, 0.21133, 0.49238, 0.05727, 0.01541, + 0.00827, 0.03808, 0.06358, + 0.47033, 0.20743, 0.47115, 0.05598, 0.01539, + 0.00852, 0.03737, 0.06215, + 0.46448, 0.20376, 0.45164, 0.05477, 0.01534, + 0.00873, 0.03670, 0.06080, + 0.45873, 0.20025, 0.43326, 0.05363, 0.01529, + 0.00884, 0.03603, 0.05945, + 0.45324, 0.19690, 0.41633, 0.05256, 0.01524, + 0.00896, 0.03539, 0.05817 / DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=1,7)/ + 0.60533, 0.29434, 0.97191, 0.06716, 0.00123, + 0.00006, 0.03677, 0.07749, + 0.59099, 0.28144, 0.88223, 0.06474, 0.00403, + 0.00007, 0.03678, 0.07424, + 0.57737, 0.27024, 0.80448, 0.06248, 0.00606, + 0.00006, 0.03644, 0.07103, + 0.56459, 0.26006, 0.73694, 0.06016, 0.00742, + -0.00001, 0.03587, 0.06824, + 0.55242, 0.25110, 0.67862, 0.05805, 0.00843, + 0.00028, 0.03524, 0.06553, + 0.54096, 0.24291, 0.62775, 0.05601, 0.00916, + 0.00137, 0.03455, 0.06310, + 0.53020, 0.23536, 0.58301, 0.05412, 0.00974, + 0.00235, 0.03374, 0.06083 / DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=8,14)/ + 0.51990, 0.22841, 0.54340, 0.05233, 0.01011, + 0.00310, 0.03293, 0.05881, + 0.51001, 0.22199, 0.50822, 0.05065, 0.01037, + 0.00377, 0.03222, 0.05684, + 0.50057, 0.21606, 0.47688, 0.04911, 0.01058, + 0.00431, 0.03148, 0.05497, + 0.49158, 0.21056, 0.44881, 0.04770, 0.01073, + 0.00473, 0.03070, 0.05324, + 0.48302, 0.20545, 0.42348, 0.04634, 0.01077, + 0.00507, 0.03000, 0.05163, + 0.47493, 0.20045, 0.40045, 0.04493, 0.01080, + 0.00541, 0.02932, 0.05020, + 0.46717, 0.19580, 0.37966, 0.04368, 0.01081, + 0.00565, 0.02865, 0.04881 / DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=15,19)/ + 0.45968, 0.19146, 0.36079, 0.04260, 0.01081, + 0.00577, 0.02799, 0.04741, + 0.45240, 0.18737, 0.34354, 0.04150, 0.01077, + 0.00589, 0.02739, 0.04613, + 0.44549, 0.18352, 0.32781, 0.04047, 0.01072, + 0.00601, 0.02682, 0.04493, + 0.43885, 0.17980, 0.31332, 0.03947, 0.01068, + 0.00608, 0.02623, 0.04379, + 0.43253, 0.17627, 0.29997, 0.03852, 0.01062, + 0.00614, 0.02568, 0.04272 / DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=1,7)/ + 0.61483, 0.28119, 0.81970, 0.05440, 0.00090, + 0.00002, 0.02965, 0.06228, + 0.59524, 0.26673, 0.72974, 0.05190, 0.00303, + 0.00000, 0.02924, 0.05897, + 0.57749, 0.25410, 0.65482, 0.04945, 0.00445, + -0.00005, 0.02868, 0.05605, + 0.56094, 0.24314, 0.59176, 0.04724, 0.00543, + 0.00004, 0.02796, 0.05337, + 0.54571, 0.23341, 0.53851, 0.04525, 0.00613, + 0.00034, 0.02721, 0.05091, + 0.53170, 0.22454, 0.49304, 0.04344, 0.00665, + 0.00104, 0.02639, 0.04871, + 0.51848, 0.21660, 0.45365, 0.04176, 0.00698, + 0.00176, 0.02562, 0.04668 / DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=8,14)/ + 0.50612, 0.20925, 0.41933, 0.04012, 0.00729, + 0.00232, 0.02488, 0.04481, + 0.49446, 0.20255, 0.38928, 0.03860, 0.00742, + 0.00274, 0.02419, 0.04314, + 0.48347, 0.19639, 0.36282, 0.03722, 0.00751, + 0.00301, 0.02352, 0.04153, + 0.47311, 0.19067, 0.33936, 0.03595, 0.00762, + 0.00324, 0.02287, 0.03998, + 0.46325, 0.18533, 0.31839, 0.03477, 0.00767, + 0.00352, 0.02227, 0.03858, + 0.45389, 0.18035, 0.29952, 0.03367, 0.00766, + 0.00366, 0.02163, 0.03731, + 0.44502, 0.17567, 0.28259, 0.03266, 0.00763, + 0.00378, 0.02102, 0.03613 / DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=15,19)/ + 0.43655, 0.17127, 0.26732, 0.03175, 0.00758, + 0.00391, 0.02046, 0.03502, + 0.42844, 0.16717, 0.25344, 0.03085, 0.00754, + 0.00403, 0.01995, 0.03388, + 0.42079, 0.16332, 0.24083, 0.03000, 0.00750, + 0.00413, 0.01949, 0.03282, + 0.41349, 0.15957, 0.22926, 0.02911, 0.00745, + 0.00417, 0.01905, 0.03191, + 0.40656, 0.15605, 0.21867, 0.02830, 0.00739, + 0.00421, 0.01861, 0.03106 / DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=1,7)/ + 0.61442, 0.26435, 0.68826, 0.04337, 0.00063, + 0.00001, 0.02354, 0.04950, + 0.59020, 0.24878, 0.60187, 0.04090, 0.00221, + 0.00009, 0.02292, 0.04645, + 0.56847, 0.23558, 0.53213, 0.03879, 0.00333, + 0.00004, 0.02233, 0.04345, + 0.54880, 0.22403, 0.47499, 0.03673, 0.00402, + 0.00007, 0.02159, 0.04113, + 0.53118, 0.21369, 0.42763, 0.03485, 0.00454, + 0.00023, 0.02076, 0.03913, + 0.51491, 0.20461, 0.38774, 0.03323, 0.00496, + 0.00074, 0.02007, 0.03707, + 0.49960, 0.19667, 0.35371, 0.03178, 0.00513, + 0.00121, 0.01939, 0.03530 / DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=8,14)/ + 0.48565, 0.18918, 0.32449, 0.03037, 0.00525, + 0.00165, 0.01867, 0.03384, + 0.47258, 0.18240, 0.29914, 0.02914, 0.00533, + 0.00195, 0.01808, 0.03234, + 0.46039, 0.17616, 0.27697, 0.02797, 0.00538, + 0.00215, 0.01750, 0.03098, + 0.44899, 0.17039, 0.25749, 0.02687, 0.00541, + 0.00231, 0.01690, 0.02980, + 0.43806, 0.16520, 0.24029, 0.02595, 0.00540, + 0.00246, 0.01638, 0.02865, + 0.42794, 0.16009, 0.22504, 0.02497, 0.00542, + 0.00265, 0.01586, 0.02766, + 0.41840, 0.15543, 0.21133, 0.02410, 0.00541, + 0.00274, 0.01535, 0.02670 / DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=15,19)/ + 0.40935, 0.15121, 0.19889, 0.02334, 0.00534, + 0.00272, 0.01487, 0.02575, + 0.40061, 0.14723, 0.18788, 0.02260, 0.00531, + 0.00276, 0.01446, 0.02485, + 0.39239, 0.14348, 0.17796, 0.02192, 0.00527, + 0.00280, 0.01408, 0.02401, + 0.38462, 0.13986, 0.16883, 0.02126, 0.00519, + 0.00280, 0.01371, 0.02324, + 0.37727, 0.13646, 0.16054, 0.02064, 0.00511, + 0.00281, 0.01337, 0.02253 / DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=1,7)/ + 0.60512, 0.24522, 0.57498, 0.03420, 0.00045, + 0.00000, 0.01849, 0.03850, + 0.57695, 0.22895, 0.49443, 0.03189, 0.00170, + 0.00015, 0.01779, 0.03579, + 0.55200, 0.21537, 0.43117, 0.02992, 0.00239, + -0.00003, 0.01718, 0.03346, + 0.52992, 0.20351, 0.38020, 0.02800, 0.00299, + 0.00014, 0.01646, 0.03145, + 0.51011, 0.19317, 0.33882, 0.02641, 0.00337, + 0.00017, 0.01574, 0.02963, + 0.49198, 0.18418, 0.30443, 0.02511, 0.00360, + 0.00053, 0.01508, 0.02797, + 0.47542, 0.17606, 0.27543, 0.02380, 0.00372, + 0.00090, 0.01451, 0.02661 / DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=8,14)/ + 0.46024, 0.16869, 0.25084, 0.02266, 0.00387, + 0.00122, 0.01391, 0.02528, + 0.44596, 0.16220, 0.22975, 0.02173, 0.00395, + 0.00146, 0.01340, 0.02390, + 0.43277, 0.15619, 0.21147, 0.02080, 0.00397, + 0.00158, 0.01292, 0.02277, + 0.42063, 0.15054, 0.19548, 0.01988, 0.00395, + 0.00166, 0.01244, 0.02189, + 0.40924, 0.14536, 0.18137, 0.01905, 0.00390, + 0.00181, 0.01198, 0.02102, + 0.39838, 0.14066, 0.16919, 0.01842, 0.00386, + 0.00187, 0.01156, 0.02012, + 0.38825, 0.13628, 0.15832, 0.01779, 0.00383, + 0.00190, 0.01116, 0.01931 / DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=15,19)/ + 0.37878, 0.13217, 0.14851, 0.01712, 0.00379, + 0.00190, 0.01078, 0.01861, + 0.37003, 0.12822, 0.13974, 0.01640, 0.00372, + 0.00192, 0.01046, 0.01798, + 0.36180, 0.12454, 0.13186, 0.01576, 0.00364, + 0.00194, 0.01016, 0.01739, + 0.35354, 0.12122, 0.12476, 0.01535, 0.00361, + 0.00202, 0.00982, 0.01674, + 0.34582, 0.11807, 0.11829, 0.01493, 0.00358, + 0.00206, 0.00952, 0.01616 / DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=1,7)/ + 0.58881, 0.22418, 0.47773, 0.02622, 0.00031, + 0.00017, 0.01429, 0.02978, + 0.55701, 0.20797, 0.40443, 0.02428, 0.00134, + 0.00008, 0.01365, 0.02731, + 0.52957, 0.19433, 0.34790, 0.02253, 0.00189, + -0.00001, 0.01308, 0.02532, + 0.50518, 0.18286, 0.30341, 0.02118, 0.00226, + 0.00005, 0.01234, 0.02361, + 0.48373, 0.17275, 0.26767, 0.01987, 0.00249, + 0.00015, 0.01173, 0.02215, + 0.46435, 0.16398, 0.23843, 0.01877, 0.00266, + 0.00045, 0.01119, 0.02077, + 0.44678, 0.15612, 0.21412, 0.01769, 0.00273, + 0.00070, 0.01068, 0.01970 / DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=8,14)/ + 0.43066, 0.14906, 0.19373, 0.01678, 0.00278, + 0.00087, 0.01024, 0.01861, + 0.41577, 0.14277, 0.17633, 0.01601, 0.00280, + 0.00102, 0.00980, 0.01759, + 0.40213, 0.13695, 0.16141, 0.01529, 0.00280, + 0.00114, 0.00937, 0.01673, + 0.38960, 0.13156, 0.14855, 0.01458, 0.00279, + 0.00122, 0.00898, 0.01597, + 0.37797, 0.12666, 0.13733, 0.01390, 0.00280, + 0.00122, 0.00867, 0.01519, + 0.36694, 0.12216, 0.12739, 0.01333, 0.00279, + 0.00130, 0.00836, 0.01448, + 0.35667, 0.11799, 0.11868, 0.01279, 0.00274, + 0.00135, 0.00805, 0.01388 / DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=15,19)/ + 0.34708, 0.11408, 0.11101, 0.01228, 0.00267, + 0.00135, 0.00774, 0.01339, + 0.33807, 0.11047, 0.10409, 0.01166, 0.00264, + 0.00138, 0.00750, 0.01302, + 0.32962, 0.10713, 0.09788, 0.01109, 0.00261, + 0.00140, 0.00728, 0.01266, + 0.32149, 0.10400, 0.09234, 0.01070, 0.00255, + 0.00137, 0.00701, 0.01217, + 0.31383, 0.10105, 0.08731, 0.01036, 0.00249, + 0.00135, 0.00677, 0.01173 / DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=1,7)/ + 0.56553, 0.20303, 0.39443, 0.01997, 0.00038, + 0.00015, 0.01084, 0.02238, + 0.53116, 0.18700, 0.32888, 0.01835, 0.00099, + 0.00003, 0.01030, 0.02044, + 0.50162, 0.17386, 0.27941, 0.01704, 0.00140, + 0.00000, 0.00977, 0.01873, + 0.47614, 0.16239, 0.24109, 0.01567, 0.00166, + 0.00003, 0.00928, 0.01746, + 0.45346, 0.15282, 0.21062, 0.01472, 0.00187, + 0.00010, 0.00880, 0.01613, + 0.43342, 0.14430, 0.18611, 0.01379, 0.00190, + 0.00035, 0.00833, 0.01520, + 0.41528, 0.13680, 0.16583, 0.01291, 0.00201, + 0.00053, 0.00785, 0.01434 / DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=8,14)/ + 0.39870, 0.13012, 0.14919, 0.01217, 0.00205, + 0.00068, 0.00744, 0.01358, + 0.38355, 0.12413, 0.13513, 0.01155, 0.00208, + 0.00073, 0.00713, 0.01274, + 0.36974, 0.11868, 0.12301, 0.01097, 0.00206, + 0.00081, 0.00682, 0.01203, + 0.35710, 0.11371, 0.11254, 0.01039, 0.00201, + 0.00091, 0.00650, 0.01145, + 0.34537, 0.10920, 0.10354, 0.00987, 0.00203, + 0.00090, 0.00622, 0.01081, + 0.33426, 0.10500, 0.09569, 0.00940, 0.00196, + 0.00092, 0.00600, 0.01039, + 0.32396, 0.10114, 0.08880, 0.00898, 0.00192, + 0.00095, 0.00579, 0.00996 / DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=15,19)/ + 0.31438, 0.09757, 0.08270, 0.00861, 0.00192, + 0.00099, 0.00558, 0.00950, + 0.30542, 0.09421, 0.07732, 0.00822, 0.00189, + 0.00101, 0.00536, 0.00919, + 0.29705, 0.09109, 0.07252, 0.00785, 0.00186, + 0.00102, 0.00516, 0.00891, + 0.28901, 0.08820, 0.06823, 0.00759, 0.00183, + 0.00102, 0.00499, 0.00855, + 0.28151, 0.08552, 0.06433, 0.00733, 0.00180, + 0.00102, 0.00482, 0.00821 / DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=1,7)/ + 0.53721, 0.18207, 0.32396, 0.01520, 0.00016, + -0.00009, 0.00795, 0.01659, + 0.50117, 0.16632, 0.26604, 0.01368, 0.00064, + -0.00008, 0.00748, 0.01525, + 0.47035, 0.15375, 0.22326, 0.01260, 0.00095, + -0.00011, 0.00705, 0.01390, + 0.44374, 0.14311, 0.19074, 0.01167, 0.00116, + -0.00006, 0.00667, 0.01272, + 0.42073, 0.13388, 0.16526, 0.01081, 0.00127, + 0.00001, 0.00634, 0.01175, + 0.40023, 0.12588, 0.14509, 0.01005, 0.00136, + 0.00017, 0.00596, 0.01103, + 0.38200, 0.11890, 0.12854, 0.00928, 0.00140, + 0.00031, 0.00567, 0.01035 / DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=8,14)/ + 0.36539, 0.11266, 0.11472, 0.00877, 0.00141, + 0.00039, 0.00532, 0.00974, + 0.35025, 0.10709, 0.10330, 0.00835, 0.00144, + 0.00049, 0.00507, 0.00913, + 0.33647, 0.10205, 0.09359, 0.00786, 0.00145, + 0.00051, 0.00484, 0.00861, + 0.32383, 0.09747, 0.08524, 0.00739, 0.00142, + 0.00051, 0.00459, 0.00822, + 0.31207, 0.09333, 0.07809, 0.00712, 0.00137, + 0.00061, 0.00438, 0.00790, + 0.30139, 0.08950, 0.07190, 0.00676, 0.00136, + 0.00064, 0.00418, 0.00739, + 0.29142, 0.08600, 0.06650, 0.00645, 0.00133, + 0.00065, 0.00400, 0.00700 / DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=15,19)/ + 0.28204, 0.08279, 0.06174, 0.00619, 0.00129, + 0.00067, 0.00383, 0.00675, + 0.27341, 0.07974, 0.05754, 0.00589, 0.00128, + 0.00066, 0.00368, 0.00644, + 0.26538, 0.07692, 0.05381, 0.00560, 0.00127, + 0.00066, 0.00355, 0.00614, + 0.25761, 0.07435, 0.05045, 0.00537, 0.00124, + 0.00066, 0.00342, 0.00591, + 0.25035, 0.07194, 0.04744, 0.00517, 0.00121, + 0.00066, 0.00330, 0.00568 / DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=1,7)/ + 0.50481, 0.16081, 0.26316, 0.01088, 0.00025, + 0.00016, 0.00600, 0.01214, + 0.46737, 0.14623, 0.21340, 0.00990, 0.00057, + 0.00012, 0.00557, 0.01096, + 0.43606, 0.13426, 0.17721, 0.00900, 0.00081, + 0.00013, 0.00523, 0.00994, + 0.40927, 0.12432, 0.14992, 0.00819, 0.00095, + 0.00006, 0.00484, 0.00918, + 0.38622, 0.11579, 0.12888, 0.00749, 0.00099, + 0.00012, 0.00456, 0.00850, + 0.36585, 0.10844, 0.11212, 0.00696, 0.00102, + 0.00022, 0.00435, 0.00786, + 0.34751, 0.10201, 0.09864, 0.00659, 0.00110, + 0.00028, 0.00410, 0.00723 / DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=8,14)/ + 0.33121, 0.09630, 0.08757, 0.00601, 0.00105, + 0.00039, 0.00381, 0.00696, + 0.31628, 0.09123, 0.07841, 0.00569, 0.00108, + 0.00041, 0.00359, 0.00654, + 0.30278, 0.08664, 0.07069, 0.00540, 0.00107, + 0.00041, 0.00341, 0.00613, + 0.29056, 0.08254, 0.06412, 0.00510, 0.00100, + 0.00043, 0.00325, 0.00578, + 0.27919, 0.07896, 0.05854, 0.00499, 0.00098, + 0.00044, 0.00306, 0.00532, + 0.26884, 0.07545, 0.05369, 0.00470, 0.00097, + 0.00043, 0.00292, 0.00508, + 0.25929, 0.07224, 0.04947, 0.00439, 0.00094, + 0.00042, 0.00277, 0.00488 / DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=15,19)/ + 0.25042, 0.06933, 0.04578, 0.00409, 0.00090, + 0.00041, 0.00262, 0.00471, + 0.24200, 0.06664, 0.04254, 0.00399, 0.00087, + 0.00047, 0.00254, 0.00451, + 0.23416, 0.06416, 0.03967, 0.00392, 0.00085, + 0.00053, 0.00248, 0.00431, + 0.22666, 0.06187, 0.03712, 0.00384, 0.00085, + 0.00049, 0.00238, 0.00409, + 0.21975, 0.05975, 0.03484, 0.00373, 0.00084, + 0.00046, 0.00228, 0.00389 / DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=1,7)/ + 0.46931, 0.14113, 0.21305, 0.00797, 0.00013, + -0.00002, 0.00425, 0.00869, + 0.43155, 0.12744, 0.17039, 0.00718, 0.00039, + -0.00001, 0.00394, 0.00779, + 0.40020, 0.11635, 0.13987, 0.00646, 0.00058, + -0.00004, 0.00367, 0.00707, + 0.37377, 0.10712, 0.11712, 0.00579, 0.00060, + -0.00002, 0.00341, 0.00655, + 0.35087, 0.09932, 0.09981, 0.00533, 0.00069, + 0.00003, 0.00321, 0.00604, + 0.33079, 0.09271, 0.08628, 0.00500, 0.00071, + 0.00012, 0.00295, 0.00560, + 0.31297, 0.08686, 0.07548, 0.00464, 0.00066, + 0.00011, 0.00277, 0.00519 / DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=8,14)/ + 0.29707, 0.08180, 0.06658, 0.00441, 0.00073, + 0.00020, 0.00260, 0.00477, + 0.28293, 0.07723, 0.05928, 0.00409, 0.00069, + 0.00022, 0.00243, 0.00444, + 0.27009, 0.07309, 0.05321, 0.00380, 0.00068, + 0.00023, 0.00228, 0.00414, + 0.25832, 0.06936, 0.04808, 0.00359, 0.00072, + 0.00025, 0.00215, 0.00391, + 0.24754, 0.06595, 0.04369, 0.00340, 0.00063, + 0.00025, 0.00203, 0.00385, + 0.23758, 0.06297, 0.03997, 0.00331, 0.00060, + 0.00027, 0.00197, 0.00354, + 0.22843, 0.06022, 0.03674, 0.00317, 0.00058, + 0.00028, 0.00189, 0.00331 / DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=15,19)/ + 0.21998, 0.05764, 0.03392, 0.00296, 0.00058, + 0.00027, 0.00177, 0.00321, + 0.21208, 0.05529, 0.03140, 0.00287, 0.00058, + 0.00028, 0.00170, 0.00302, + 0.20480, 0.05314, 0.02917, 0.00277, 0.00057, + 0.00030, 0.00164, 0.00284, + 0.19822, 0.05109, 0.02723, 0.00252, 0.00054, + 0.00030, 0.00155, 0.00274, + 0.19201, 0.04921, 0.02550, 0.00235, 0.00052, + 0.00030, 0.00148, 0.00263 / DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=1,7)/ + 0.43142, 0.12230, 0.17056, 0.00552, 0.00014, + 0.00008, 0.00301, 0.00621, + 0.39442, 0.10961, 0.13469, 0.00480, 0.00031, + 0.00005, 0.00279, 0.00554, + 0.36316, 0.09960, 0.10935, 0.00453, 0.00046, + 0.00003, 0.00262, 0.00495, + 0.33732, 0.09124, 0.09074, 0.00394, 0.00046, + 0.00001, 0.00238, 0.00456, + 0.31510, 0.08421, 0.07678, 0.00371, 0.00050, + 0.00002, 0.00222, 0.00418, + 0.29593, 0.07831, 0.06584, 0.00340, 0.00049, + 0.00010, 0.00208, 0.00389, + 0.27891, 0.07307, 0.05720, 0.00323, 0.00048, + 0.00013, 0.00196, 0.00347 / DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=8,14)/ + 0.26376, 0.06847, 0.05025, 0.00302, 0.00047, + 0.00014, 0.00179, 0.00324, + 0.25027, 0.06443, 0.04449, 0.00280, 0.00046, + 0.00018, 0.00169, 0.00304, + 0.23804, 0.06084, 0.03975, 0.00264, 0.00046, + 0.00022, 0.00160, 0.00282, + 0.22692, 0.05761, 0.03580, 0.00252, 0.00046, + 0.00023, 0.00150, 0.00262, + 0.21691, 0.05470, 0.03241, 0.00236, 0.00041, + 0.00023, 0.00139, 0.00250, + 0.20775, 0.05203, 0.02952, 0.00215, 0.00040, + 0.00020, 0.00131, 0.00237, + 0.19927, 0.04960, 0.02703, 0.00204, 0.00041, + 0.00020, 0.00126, 0.00222 / DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=15,19)/ + 0.19136, 0.04737, 0.02488, 0.00204, 0.00041, + 0.00024, 0.00124, 0.00205, + 0.18412, 0.04534, 0.02301, 0.00197, 0.00043, + 0.00023, 0.00118, 0.00192, + 0.17744, 0.04348, 0.02136, 0.00190, 0.00043, + 0.00021, 0.00111, 0.00180, + 0.17113, 0.04171, 0.01987, 0.00180, 0.00041, + 0.00020, 0.00104, 0.00176, + 0.16530, 0.04010, 0.01855, 0.00170, 0.00038, + 0.00019, 0.00098, 0.00171 / DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=1,7)/ + 0.39292, 0.10473, 0.13558, 0.00368, 0.00011, + 0.00004, 0.00209, 0.00431, + 0.35631, 0.09346, 0.10575, 0.00339, 0.00018, + 0.00004, 0.00194, 0.00384, + 0.32636, 0.08442, 0.08497, 0.00313, 0.00028, + 0.00007, 0.00166, 0.00358, + 0.30153, 0.07698, 0.06994, 0.00280, 0.00024, + 0.00003, 0.00156, 0.00321, + 0.28047, 0.07080, 0.05870, 0.00256, 0.00028, + 0.00004, 0.00145, 0.00291, + 0.26221, 0.06546, 0.04999, 0.00235, 0.00032, + 0.00006, 0.00136, 0.00269, + 0.24609, 0.06090, 0.04314, 0.00227, 0.00031, + 0.00009, 0.00125, 0.00232 / DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=8,14)/ + 0.23191, 0.05686, 0.03767, 0.00209, 0.00029, + 0.00010, 0.00114, 0.00222, + 0.21935, 0.05334, 0.03322, 0.00192, 0.00029, + 0.00008, 0.00108, 0.00203, + 0.20799, 0.05021, 0.02956, 0.00180, 0.00030, + 0.00007, 0.00102, 0.00185, + 0.19769, 0.04741, 0.02651, 0.00170, 0.00029, + 0.00008, 0.00096, 0.00176, + 0.18841, 0.04491, 0.02390, 0.00160, 0.00028, + 0.00010, 0.00090, 0.00163, + 0.17975, 0.04262, 0.02171, 0.00162, 0.00027, + 0.00012, 0.00083, 0.00149, + 0.17190, 0.04053, 0.01983, 0.00159, 0.00026, + 0.00011, 0.00078, 0.00138 / DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=15,19)/ + 0.16478, 0.03863, 0.01820, 0.00150, 0.00026, + 0.00009, 0.00074, 0.00129, + 0.15824, 0.03689, 0.01678, 0.00138, 0.00024, + 0.00010, 0.00072, 0.00125, + 0.15223, 0.03530, 0.01554, 0.00127, 0.00021, + 0.00011, 0.00069, 0.00121, + 0.14661, 0.03382, 0.01445, 0.00118, 0.00020, + 0.00010, 0.00065, 0.00113, + 0.14137, 0.03245, 0.01347, 0.00112, 0.00020, + 0.00010, 0.00061, 0.00106 / DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=1,7)/ + 0.35342, 0.08888, 0.10666, 0.00257, 0.00010, + 0.00006, 0.00143, 0.00299, + 0.31843, 0.07865, 0.08197, 0.00221, 0.00015, + 0.00002, 0.00131, 0.00267, + 0.28982, 0.07058, 0.06514, 0.00200, 0.00016, + -0.00002, 0.00119, 0.00246, + 0.26638, 0.06403, 0.05305, 0.00186, 0.00025, + -0.00001, 0.00110, 0.00209, + 0.24653, 0.05861, 0.04410, 0.00173, 0.00027, + 0.00004, 0.00100, 0.00181, + 0.22940, 0.05395, 0.03733, 0.00158, 0.00027, + 0.00002, 0.00094, 0.00169, + 0.21463, 0.05002, 0.03204, 0.00141, 0.00023, + 0.00004, 0.00089, 0.00152 / DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=8,14)/ + 0.20153, 0.04651, 0.02782, 0.00133, 0.00026, + 0.00007, 0.00082, 0.00135, + 0.18978, 0.04347, 0.02440, 0.00126, 0.00023, + 0.00007, 0.00073, 0.00124, + 0.17925, 0.04079, 0.02161, 0.00122, 0.00020, + 0.00007, 0.00067, 0.00115, + 0.16985, 0.03837, 0.01929, 0.00118, 0.00021, + 0.00006, 0.00065, 0.00107, + 0.16148, 0.03617, 0.01733, 0.00102, 0.00020, + 0.00004, 0.00059, 0.00098, + 0.15365, 0.03426, 0.01569, 0.00104, 0.00021, + 0.00007, 0.00060, 0.00090, + 0.14662, 0.03252, 0.01429, 0.00097, 0.00021, + 0.00010, 0.00058, 0.00088 / DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=15,19)/ + 0.14031, 0.03090, 0.01307, 0.00080, 0.00020, + 0.00011, 0.00054, 0.00091, + 0.13439, 0.02943, 0.01202, 0.00077, 0.00019, + 0.00010, 0.00050, 0.00083, + 0.12895, 0.02809, 0.01111, 0.00075, 0.00019, + 0.00008, 0.00046, 0.00074, + 0.12394, 0.02685, 0.01031, 0.00065, 0.00018, + 0.00008, 0.00044, 0.00070, + 0.11929, 0.02571, 0.00960, 0.00058, 0.00018, + 0.00009, 0.00043, 0.00066 / DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=1,7)/ + 0.31454, 0.07454, 0.08307, 0.00176, -0.00001, + -0.00007, 0.00091, 0.00204, + 0.28150, 0.06557, 0.06310, 0.00148, 0.00005, + -0.00003, 0.00082, 0.00176, + 0.25488, 0.05849, 0.04952, 0.00133, 0.00009, + -0.00007, 0.00076, 0.00163, + 0.23292, 0.05285, 0.03998, 0.00126, 0.00012, + -0.00002, 0.00071, 0.00134, + 0.21451, 0.04809, 0.03302, 0.00111, 0.00013, + -0.00002, 0.00063, 0.00125, + 0.19881, 0.04410, 0.02776, 0.00104, 0.00014, + -0.00001, 0.00059, 0.00112, + 0.18529, 0.04070, 0.02371, 0.00098, 0.00015, + 0.00003, 0.00057, 0.00099 / DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=8,14)/ + 0.17320, 0.03779, 0.02047, 0.00097, 0.00014, + 0.00002, 0.00049, 0.00087, + 0.16256, 0.03519, 0.01788, 0.00091, 0.00014, + 0.00001, 0.00044, 0.00077, + 0.15321, 0.03288, 0.01577, 0.00078, 0.00014, + 0.00002, 0.00042, 0.00074, + 0.14484, 0.03085, 0.01402, 0.00068, 0.00014, + 0.00005, 0.00040, 0.00075, + 0.13716, 0.02903, 0.01256, 0.00069, 0.00013, + 0.00005, 0.00039, 0.00068, + 0.13011, 0.02742, 0.01134, 0.00070, 0.00014, + 0.00003, 0.00037, 0.00061, + 0.12388, 0.02595, 0.01029, 0.00063, 0.00015, + 0.00003, 0.00035, 0.00057 / DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=15,19)/ + 0.11840, 0.02459, 0.00940, 0.00049, 0.00014, + 0.00005, 0.00033, 0.00055, + 0.11305, 0.02338, 0.00863, 0.00049, 0.00014, + 0.00004, 0.00030, 0.00050, + 0.10812, 0.02228, 0.00795, 0.00051, 0.00013, + 0.00003, 0.00028, 0.00045, + 0.10370, 0.02123, 0.00736, 0.00043, 0.00012, + 0.00003, 0.00026, 0.00045, + 0.09961, 0.02027, 0.00683, 0.00037, 0.00011, + 0.00003, 0.00025, 0.00044 / DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=1,7)/ + 0.27666, 0.06165, 0.06381, 0.00102, -0.00004, + -0.00001, 0.00056, 0.00138, + 0.24572, 0.05389, 0.04786, 0.00103, 0.00004, + -0.00005, 0.00051, 0.00107, + 0.22130, 0.04782, 0.03721, 0.00089, -0.00001, + -0.00007, 0.00044, 0.00102, + 0.20116, 0.04293, 0.02978, 0.00082, 0.00007, + -0.00002, 0.00044, 0.00090, + 0.18426, 0.03892, 0.02442, 0.00084, 0.00006, + -0.00002, 0.00039, 0.00080, + 0.17016, 0.03556, 0.02040, 0.00075, 0.00007, + -0.00002, 0.00037, 0.00065, + 0.15773, 0.03269, 0.01729, 0.00072, 0.00006, + -0.00001, 0.00033, 0.00062 / DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=8,14)/ + 0.14710, 0.03021, 0.01486, 0.00065, 0.00006, + 0.00001, 0.00031, 0.00054, + 0.13760, 0.02802, 0.01291, 0.00064, 0.00008, + 0.00001, 0.00028, 0.00046, + 0.12914, 0.02611, 0.01134, 0.00060, 0.00009, + 0.00001, 0.00026, 0.00043, + 0.12168, 0.02444, 0.01006, 0.00052, 0.00010, + 0.00003, 0.00025, 0.00043, + 0.11503, 0.02295, 0.00898, 0.00047, 0.00009, + 0.00003, 0.00024, 0.00043, + 0.10897, 0.02160, 0.00808, 0.00038, 0.00009, + 0.00004, 0.00023, 0.00041, + 0.10350, 0.02038, 0.00732, 0.00031, 0.00009, + 0.00004, 0.00022, 0.00038 / DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=15,19)/ + 0.09853, 0.01928, 0.00666, 0.00027, 0.00010, + 0.00003, 0.00022, 0.00034, + 0.09385, 0.01828, 0.00610, 0.00028, 0.00009, + 0.00003, 0.00021, 0.00032, + 0.08957, 0.01738, 0.00561, 0.00030, 0.00008, + 0.00004, 0.00020, 0.00031, + 0.08566, 0.01653, 0.00518, 0.00027, 0.00008, + 0.00003, 0.00018, 0.00029, + 0.08207, 0.01576, 0.00481, 0.00024, 0.00008, + 0.00002, 0.00017, 0.00028 / DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=1,7)/ + 0.24039, 0.05039, 0.04845, 0.00069, -0.00006, + -0.00009, 0.00030, 0.00082, + 0.21212, 0.04368, 0.03586, 0.00064, -0.00004, + -0.00005, 0.00030, 0.00072, + 0.18958, 0.03860, 0.02751, 0.00074, 0.00002, + -0.00005, 0.00027, 0.00048, + 0.17136, 0.03440, 0.02185, 0.00061, 0.00005, + -0.00004, 0.00024, 0.00053, + 0.15652, 0.03101, 0.01775, 0.00049, 0.00004, + -0.00006, 0.00024, 0.00043, + 0.14378, 0.02821, 0.01472, 0.00037, 0.00004, + -0.00006, 0.00021, 0.00044, + 0.13279, 0.02581, 0.01241, 0.00040, 0.00006, + -0.00004, 0.00021, 0.00040 / DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=8,14)/ + 0.12324, 0.02377, 0.01061, 0.00039, 0.00007, + 0.00001, 0.00020, 0.00034, + 0.11500, 0.02198, 0.00917, 0.00031, 0.00009, + 0.00003, 0.00019, 0.00030, + 0.10758, 0.02042, 0.00802, 0.00027, 0.00008, + 0.00003, 0.00018, 0.00030, + 0.10090, 0.01905, 0.00708, 0.00028, 0.00006, + 0.00002, 0.00017, 0.00029, + 0.09513, 0.01781, 0.00630, 0.00026, 0.00008, + 0.00003, 0.00017, 0.00025, + 0.08982, 0.01672, 0.00566, 0.00023, 0.00008, + 0.00004, 0.00017, 0.00023, + 0.08503, 0.01574, 0.00511, 0.00020, 0.00008, + 0.00004, 0.00016, 0.00023 / DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=15,19)/ + 0.08069, 0.01485, 0.00464, 0.00016, 0.00006, + 0.00003, 0.00013, 0.00025, + 0.07674, 0.01405, 0.00424, 0.00014, 0.00005, + 0.00003, 0.00013, 0.00023, + 0.07312, 0.01332, 0.00389, 0.00013, 0.00005, + 0.00003, 0.00013, 0.00021, + 0.06974, 0.01264, 0.00359, 0.00015, 0.00006, + 0.00003, 0.00012, 0.00017, + 0.06665, 0.01202, 0.00332, 0.00015, 0.00006, + 0.00003, 0.00012, 0.00015 / DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=1,7)/ + 0.20605, 0.04044, 0.03616, 0.00038, 0.00000, + -0.00001, 0.00021, 0.00057, + 0.18017, 0.03485, 0.02638, 0.00050, 0.00000, + -0.00007, 0.00017, 0.00041, + 0.16046, 0.03051, 0.02003, 0.00027, 0.00000, + -0.00004, 0.00017, 0.00037, + 0.14426, 0.02711, 0.01573, 0.00027, 0.00004, + -0.00005, 0.00016, 0.00029, + 0.13100, 0.02431, 0.01268, 0.00018, 0.00005, + -0.00002, 0.00017, 0.00029, + 0.11959, 0.02202, 0.01044, 0.00023, 0.00005, + 0.00000, 0.00018, 0.00030, + 0.11008, 0.02006, 0.00875, 0.00018, 0.00007, + 0.00000, 0.00016, 0.00026 / DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=8,14)/ + 0.10181, 0.01839, 0.00744, 0.00015, 0.00006, + 0.00001, 0.00013, 0.00023, + 0.09456, 0.01695, 0.00641, 0.00012, 0.00007, + 0.00001, 0.00012, 0.00022, + 0.08820, 0.01569, 0.00558, 0.00010, 0.00007, + 0.00002, 0.00012, 0.00020, + 0.08254, 0.01458, 0.00490, 0.00011, 0.00006, + 0.00003, 0.00012, 0.00017, + 0.07741, 0.01360, 0.00436, 0.00014, 0.00007, + 0.00003, 0.00010, 0.00016, + 0.07295, 0.01271, 0.00390, 0.00008, 0.00006, + 0.00002, 0.00010, 0.00013, + 0.06890, 0.01193, 0.00351, 0.00005, 0.00005, + 0.00002, 0.00011, 0.00011 / DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=15,19)/ + 0.06518, 0.01124, 0.00318, 0.00007, 0.00005, + 0.00002, 0.00010, 0.00009, + 0.06177, 0.01060, 0.00290, 0.00007, 0.00006, + 0.00003, 0.00009, 0.00009, + 0.05868, 0.01003, 0.00266, 0.00007, 0.00006, + 0.00003, 0.00008, 0.00009, + 0.05590, 0.00950, 0.00244, 0.00003, 0.00005, + 0.00002, 0.00007, 0.00009, + 0.05333, 0.00902, 0.00226, 0.00002, 0.00005, + 0.00002, 0.00006, 0.00009 / DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=1,7)/ + 0.17410, 0.03211, 0.02669, 0.00040, -0.00007, + -0.00011, 0.00007, 0.00030, + 0.15158, 0.02746, 0.01920, 0.00026, -0.00004, + -0.00008, 0.00009, 0.00025, + 0.13383, 0.02392, 0.01443, 0.00025, -0.00002, + -0.00005, 0.00006, 0.00023, + 0.11977, 0.02111, 0.01124, 0.00018, 0.00002, + -0.00005, 0.00007, 0.00021, + 0.10815, 0.01885, 0.00900, 0.00015, 0.00003, + -0.00004, 0.00008, 0.00017, + 0.09841, 0.01700, 0.00737, 0.00017, 0.00003, + -0.00003, 0.00008, 0.00014, + 0.09013, 0.01541, 0.00615, 0.00016, 0.00002, + -0.00003, 0.00007, 0.00010 / DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=8,14)/ + 0.08294, 0.01410, 0.00520, 0.00013, 0.00004, + -0.00001, 0.00007, 0.00011, + 0.07677, 0.01294, 0.00446, 0.00013, 0.00003, + 0.00000, 0.00007, 0.00011, + 0.07139, 0.01193, 0.00387, 0.00010, 0.00002, + 0.00000, 0.00007, 0.00010, + 0.06663, 0.01106, 0.00340, 0.00005, 0.00002, + 0.00000, 0.00007, 0.00010, + 0.06238, 0.01029, 0.00301, 0.00003, 0.00004, + 0.00001, 0.00008, 0.00010, + 0.05855, 0.00960, 0.00268, 0.00004, 0.00003, + 0.00001, 0.00006, 0.00010, + 0.05511, 0.00898, 0.00241, 0.00005, 0.00003, + 0.00001, 0.00005, 0.00009 / DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=15,19)/ + 0.05200, 0.00844, 0.00218, 0.00004, 0.00002, + 0.00001, 0.00005, 0.00008, + 0.04917, 0.00794, 0.00198, 0.00004, 0.00002, + 0.00000, 0.00005, 0.00008, + 0.04660, 0.00749, 0.00181, 0.00005, 0.00003, + 0.00000, 0.00005, 0.00007, + 0.04422, 0.00708, 0.00167, 0.00008, 0.00003, + 0.00001, 0.00005, 0.00006, + 0.04206, 0.00671, 0.00154, 0.00009, 0.00003, + 0.00002, 0.00005, 0.00005 / DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=1,7)/ + 0.14469, 0.02489, 0.01921, 0.00016, -0.00001, + -0.00003, 0.00007, 0.00020, + 0.12499, 0.02117, 0.01370, 0.00019, -0.00002, + -0.00004, 0.00005, 0.00015, + 0.10991, 0.01833, 0.01022, 0.00010, 0.00000, + -0.00005, 0.00002, 0.00010, + 0.09765, 0.01612, 0.00790, 0.00015, 0.00000, + -0.00002, 0.00004, 0.00010, + 0.08775, 0.01434, 0.00627, 0.00015, 0.00000, + -0.00002, 0.00004, 0.00005, + 0.07952, 0.01287, 0.00510, 0.00014, 0.00000, + -0.00001, 0.00003, 0.00007, + 0.07260, 0.01163, 0.00423, 0.00010, 0.00002, + -0.00002, 0.00003, 0.00005 / DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=8,14)/ + 0.06659, 0.01059, 0.00357, 0.00009, 0.00002, + 0.00000, 0.00004, 0.00007, + 0.06144, 0.00969, 0.00305, 0.00005, 0.00002, + 0.00000, 0.00004, 0.00008, + 0.05690, 0.00892, 0.00264, 0.00004, 0.00001, + -0.00001, 0.00003, 0.00007, + 0.05286, 0.00825, 0.00231, 0.00006, 0.00000, + -0.00001, 0.00002, 0.00006, + 0.04934, 0.00765, 0.00204, 0.00005, 0.00000, + -0.00001, 0.00001, 0.00005, + 0.04620, 0.00712, 0.00181, 0.00004, 0.00000, + 0.00000, 0.00001, 0.00006, + 0.04337, 0.00665, 0.00162, 0.00004, 0.00001, + 0.00000, 0.00002, 0.00007 / DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=15,19)/ + 0.04081, 0.00623, 0.00147, 0.00006, 0.00001, + 0.00001, 0.00002, 0.00005, + 0.03851, 0.00584, 0.00133, 0.00004, 0.00000, + 0.00000, 0.00001, 0.00005, + 0.03643, 0.00550, 0.00122, 0.00003, 0.00000, + -0.00001, 0.00000, 0.00005, + 0.03453, 0.00519, 0.00111, 0.00002, 0.00000, + -0.00001, 0.00001, 0.00004, + 0.03280, 0.00491, 0.00103, 0.00002, 0.00000, + -0.00001, 0.00001, 0.00004 / DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=1,7)/ + 0.09485, 0.01410, 0.00935, 0.00006, -0.00001, + 0.00000, 0.00001, 0.00002, + 0.08057, 0.01182, 0.00647, 0.00009, 0.00000, + -0.00002, 0.00000, 0.00002, + 0.06975, 0.01009, 0.00471, 0.00008, 0.00000, + -0.00001, 0.00003, 0.00001, + 0.06131, 0.00876, 0.00357, 0.00003, 0.00000, + -0.00001, 0.00002, 0.00002, + 0.05450, 0.00770, 0.00279, 0.00002, 0.00000, + -0.00001, 0.00001, 0.00002, + 0.04890, 0.00684, 0.00224, 0.00001, 0.00001, + 0.00000, 0.00002, 0.00001, + 0.04418, 0.00613, 0.00184, 0.00002, 0.00002, + 0.00000, 0.00002, 0.00001 / DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=8,14)/ + 0.04017, 0.00553, 0.00153, 0.00001, 0.00001, + 0.00000, 0.00002, 0.00001, + 0.03673, 0.00502, 0.00130, 0.00000, 0.00000, + 0.00000, 0.00001, 0.00003, + 0.03375, 0.00458, 0.00111, 0.00001, 0.00000, + 0.00000, 0.00001, 0.00003, + 0.03115, 0.00420, 0.00097, 0.00002, 0.00001, + 0.00000, 0.00001, 0.00001, + 0.02889, 0.00387, 0.00085, 0.00001, 0.00001, + 0.00000, 0.00002, 0.00001, + 0.02684, 0.00358, 0.00075, 0.00002, 0.00001, + 0.00000, 0.00001, 0.00000, + 0.02503, 0.00333, 0.00067, 0.00002, 0.00001, + 0.00000, 0.00001, 0.00000 / DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=15,19)/ + 0.02344, 0.00310, 0.00060, 0.00001, 0.00001, + 0.00000, 0.00001, 0.00000, + 0.02200, 0.00289, 0.00054, 0.00001, 0.00001, + 0.00000, 0.00000, 0.00000, + 0.02070, 0.00271, 0.00049, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01950, 0.00254, 0.00045, 0.00001, 0.00000, + 0.00000, 0.00001, 0.00000, + 0.01841, 0.00239, 0.00041, 0.00001, 0.00001, + 0.00001, 0.00001, 0.00001 / DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=1,7)/ + 0.05704, 0.00726, 0.00410, 0.00004, -0.00001, + -0.00002, -0.00001, -0.00001, + 0.04773, 0.00598, 0.00275, 0.00002, 0.00000, + 0.00000, 0.00001, 0.00000, + 0.04067, 0.00503, 0.00196, 0.00002, 0.00000, + -0.00001, 0.00001, 0.00000, + 0.03528, 0.00431, 0.00145, -0.00001, 0.00000, + -0.00001, 0.00001, 0.00002, + 0.03095, 0.00375, 0.00112, 0.00001, 0.00000, + 0.00000, 0.00000, 0.00001, + 0.02748, 0.00329, 0.00088, -0.00001, 0.00000, + -0.00001, 0.00000, 0.00000, + 0.02457, 0.00292, 0.00072, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=8,14)/ + 0.02212, 0.00261, 0.00059, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00001, + 0.02006, 0.00235, 0.00050, -0.00001, 0.00000, + 0.00000, 0.00000, 0.00001, + 0.01828, 0.00213, 0.00042, -0.00001, 0.00000, + 0.00000, 0.00000, 0.00001, + 0.01673, 0.00194, 0.00036, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00001, + 0.01539, 0.00177, 0.00032, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01421, 0.00163, 0.00028, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01317, 0.00150, 0.00025, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),F(8,43,K),K=15,19)/ + 0.01225, 0.00139, 0.00022, -0.00001, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01143, 0.00129, 0.00020, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01069, 0.00120, 0.00018, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01001, 0.00112, 0.00017, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00940, 0.00105, 0.00015, 0.00001, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=1,7)/ + 0.03047, 0.00325, 0.00154, 0.00001, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.02501, 0.00263, 0.00100, 0.00000, 0.00000, + -0.00001, -0.00001, 0.00000, + 0.02101, 0.00218, 0.00070, -0.00001, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01793, 0.00184, 0.00051, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01552, 0.00158, 0.00038, 0.00001, 0.00000, + 0.00000, 0.00000, 0.00001, + 0.01360, 0.00137, 0.00030, 0.00001, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01203, 0.00120, 0.00024, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=8,14)/ + 0.01073, 0.00106, 0.00020, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00963, 0.00095, 0.00016, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00869, 0.00085, 0.00014, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00789, 0.00077, 0.00012, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00719, 0.00070, 0.00010, 0.00001, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00660, 0.00064, 0.00009, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00608, 0.00058, 0.00008, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),F(8,44,K),K=15,19)/ + 0.00561, 0.00054, 0.00007, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00520, 0.00049, 0.00006, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00483, 0.00046, 0.00006, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00449, 0.00042, 0.00005, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00420, 0.00039, 0.00005, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=1,7)/ + 0.01382, 0.00120, 0.00046, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.01108, 0.00095, 0.00029, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00911, 0.00077, 0.00020, 0.00001, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00765, 0.00064, 0.00014, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00652, 0.00054, 0.00010, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00563, 0.00046, 0.00008, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00491, 0.00040, 0.00006, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=8,14)/ + 0.00432, 0.00035, 0.00005, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00383, 0.00031, 0.00004, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00342, 0.00027, 0.00004, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00308, 0.00024, 0.00003, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00278, 0.00022, 0.00003, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00252, 0.00020, 0.00002, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00230, 0.00018, 0.00002, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),F(8,45,K),K=15,19)/ + 0.00211, 0.00016, 0.00002, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00194, 0.00015, 0.00002, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00179, 0.00014, 0.00002, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00165, 0.00013, 0.00001, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00153, 0.00012, 0.00001, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=1,7)/ + 0.00105, 0.00005, 0.00001, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00079, 0.00004, 0.00001, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00062, 0.00003, 0.00001, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00049, 0.00002, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00040, 0.00002, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00033, 0.00002, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00028, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=8,14)/ + 0.00024, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00021, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00018, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00016, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00014, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00012, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00011, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000 / DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),F(8,46,K),K=15,19)/ + 0.00010, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00009, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00008, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00007, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.00000, + 0.00006, 0.00001, 0.00000, 0.00000, 0.00000, + 0.00000, 0.00000, 0.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,10,0,0,10,10/ DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/ DATA INIT/0/ XSAVE=X IF(INIT.NE.0) GOTO 10 INIT=1 DO 20 N=1,NX-1 DO 20 M=1,19 C READ(83,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) X=XSAVE RETURN END