spdf/smrsp33.F

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.2  1996/10/30 08:30:52  cernlib
   6 * Version 7.04
   7 *
   8 * Revision 1.1.1.1  1996/04/12 15:29:47  plothow
   9 * Version 7.01
  10 *
  11 *
  12 #include "pdf/pilot.h"
  13 C
  14 C
  15       SUBROUTINE SMRSP33(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GLU)
  16 C
  17 C ::::::::::::  PION STRUCTURE FUNCTION :: 20% SEA :::::::::::::::::
  18 C
  19 #include "pdf/impdp.inc"
  20       PARAMETER(NX=50)
  21       PARAMETER(NQ=19)
  22       PARAMETER(NTENTH=21)
  23       DIMENSION F(7,NX,NQ),G(7),XX(NX),N0(7)
  24       DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),K=1,19)/
  25      +0.00073,  0.00073,  1.66123,  0.23785,  0.01467,  0.000,  0.23785,
  26      +0.00089,  0.00089,  6.40189,  0.30465,  0.07117,  0.000,  0.30465,
  27      +0.00105,  0.00105, 14.97676,  0.38939,  0.14670,  0.000,  0.38939,
  28      +0.00121,  0.00121, 27.90529,  0.49312,  0.24206,  0.000,  0.49312,
  29      +0.00137,  0.00137, 44.87845,  0.61728,  0.35858,  0.000,  0.61728,
  30      +0.00153,  0.00153, 66.11195,  0.76244,  0.49668,  0.000,  0.76244,
  31      +0.00169,  0.00169, 91.55411,  0.92921,  0.65689,  0.000,  0.92921,
  32      +0.00186,  0.00186,121.11298,  1.11797,  0.83951,  0.000,  1.11797,
  33      +0.00202,  0.00202,154.70744,  1.32898,  1.04476,  0.000,  1.32898,
  34      +0.00218,  0.00218,191.69145,  1.56152,  1.27187,  0.000,  1.56152,
  35      +0.00235,  0.00235,232.42030,  1.81590,  1.52109,  0.000,  1.81590,
  36      +0.00251,  0.00251,276.89560,  2.09225,  1.79254,  0.000,  2.09225,
  37      +0.00268,  0.00268,324.88199,  2.39028,  2.08588,  0.000,  2.39028,
  38      +0.00284,  0.00284,375.47061,  2.70749,  2.39863,  0.000,  2.70749,
  39      +0.00301,  0.00301,429.74271,  3.04645,  2.73329,  0.000,  3.04645,
  40      +0.00317,  0.00317,486.63776,  3.40429,  3.08701,  0.000,  3.40429,
  41      +0.00334,  0.00334,546.39929,  3.78121,  3.45997,  0.000,  3.78121,
  42      +0.00350,  0.00350,609.11194,  4.17769,  3.85260,  0.000,  4.17769,
  43      +0.00367,  0.00367,673.96960,  4.59037,  4.26159,  0.000,  4.59037/
  44       DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),K=1,19)/
  45      +0.00113,  0.00113,  1.59510,  0.23632,  0.01372,  0.000,  0.23632,
  46      +0.00136,  0.00136,  5.60677,  0.29736,  0.06555,  0.000,  0.29736,
  47      +0.00159,  0.00159, 12.38822,  0.37313,  0.13313,  0.000,  0.37313,
  48      +0.00181,  0.00181, 22.13688,  0.46396,  0.21656,  0.000,  0.46396,
  49      +0.00204,  0.00204, 34.47487,  0.57057,  0.31644,  0.000,  0.57057,
  50      +0.00226,  0.00226, 49.45894,  0.69296,  0.43265,  0.000,  0.69296,
  51      +0.00249,  0.00249, 66.96782,  0.83122,  0.56519,  0.000,  0.83122,
  52      +0.00271,  0.00271, 86.87107,  0.98529,  0.71393,  0.000,  0.98529,
  53      +0.00293,  0.00293,109.06017,  1.15505,  0.87869,  0.000,  1.15505,
  54      +0.00316,  0.00316,133.06537,  1.33960,  1.05855,  0.000,  1.33960,
  55      +0.00338,  0.00338,159.09331,  1.53896,  1.25348,  0.000,  1.53896,
  56      +0.00360,  0.00360,187.11481,  1.75302,  1.46333,  0.000,  1.75302,
  57      +0.00382,  0.00382,216.95308,  1.98134,  1.68765,  0.000,  1.98134,
  58      +0.00403,  0.00403,248.01726,  2.22184,  1.92434,  0.000,  2.22184,
  59      +0.00425,  0.00425,280.97537,  2.47635,  2.17520,  0.000,  2.47635,
  60      +0.00447,  0.00447,315.15277,  2.74257,  2.43792,  0.000,  2.74257,
  61      +0.00468,  0.00468,350.69443,  3.02056,  2.71255,  0.000,  3.02056,
  62      +0.00490,  0.00490,387.64322,  3.31057,  2.99932,  0.000,  3.31057,
  63      +0.00511,  0.00511,425.50595,  3.61007,  3.29570,  0.000,  3.61007/
  64       DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),K=1,19)/
  65      +0.00176,  0.00176,  1.53159,  0.23460,  0.01276,  0.000,  0.23460,
  66      +0.00208,  0.00208,  4.91031,  0.29002,  0.06007,  0.000,  0.29002,
  67      +0.00240,  0.00240, 10.24688,  0.35732,  0.12021,  0.000,  0.35732,
  68      +0.00272,  0.00272, 17.56050,  0.43634,  0.19279,  0.000,  0.43634,
  69      +0.00304,  0.00304, 26.48240,  0.52728,  0.27791,  0.000,  0.52728,
  70      +0.00335,  0.00335, 36.99974,  0.62980,  0.37511,  0.000,  0.62980,
  71      +0.00366,  0.00366, 48.98272,  0.74368,  0.48408,  0.000,  0.74368,
  72      +0.00396,  0.00396, 62.30855,  0.86860,  0.60446,  0.000,  0.86860,
  73      +0.00426,  0.00426, 76.87907,  1.00426,  0.73587,  0.000,  1.00426,
  74      +0.00456,  0.00456, 92.36638,  1.14975,  0.87739,  0.000,  1.14975,
  75      +0.00486,  0.00486,108.89706,  1.30495,  1.02885,  0.000,  1.30495,
  76      +0.00515,  0.00515,126.44055,  1.46964,  1.19001,  0.000,  1.46964,
  77      +0.00544,  0.00544,144.87434,  1.64338,  1.36039,  0.000,  1.64338,
  78      +0.00573,  0.00573,163.82210,  1.82447,  1.53830,  0.000,  1.82447,
  79      +0.00601,  0.00601,183.70142,  2.01427,  1.72506,  0.000,  2.01427,
  80      +0.00630,  0.00630,204.08971,  2.21096,  1.91884,  0.000,  2.21096,
  81      +0.00658,  0.00658,225.07739,  2.41456,  2.11966,  0.000,  2.41456,
  82      +0.00686,  0.00686,246.68988,  2.62523,  2.32765,  0.000,  2.62523,
  83      +0.00713,  0.00713,268.62991,  2.84106,  2.54091,  0.000,  2.84106/
  84       DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),K=1,19)/
  85      +0.00227,  0.00227,  1.49559,  0.23348,  0.01220,  0.000,  0.23348,
  86      +0.00267,  0.00267,  4.54366,  0.28567,  0.05693,  0.000,  0.28567,
  87      +0.00307,  0.00307,  9.17008,  0.34825,  0.11294,  0.000,  0.34825,
  88      +0.00345,  0.00345, 15.33534,  0.42083,  0.17965,  0.000,  0.42083,
  89      +0.00384,  0.00384, 22.69571,  0.50340,  0.25693,  0.000,  0.50340,
  90      +0.00421,  0.00421, 31.22177,  0.59550,  0.34420,  0.000,  0.59550,
  91      +0.00458,  0.00458, 40.79263,  0.69680,  0.44106,  0.000,  0.69680,
  92      +0.00494,  0.00494, 51.29930,  0.80690,  0.54707,  0.000,  0.80690,
  93      +0.00530,  0.00530, 62.65648,  0.92546,  0.66181,  0.000,  0.92546,
  94      +0.00566,  0.00566, 74.60306,  1.05159,  0.78438,  0.000,  1.05159,
  95      +0.00600,  0.00600, 87.23674,  1.18516,  0.91460,  0.000,  1.18516,
  96      +0.00635,  0.00635,100.53127,  1.32592,  1.05221,  0.000,  1.32592,
  97      +0.00669,  0.00669,114.39108,  1.47346,  1.19676,  0.000,  1.47346,
  98      +0.00703,  0.00703,128.52966,  1.62629,  1.34676,  0.000,  1.62629,
  99      +0.00736,  0.00736,143.26573,  1.78556,  1.50333,  0.000,  1.78556,
 100      +0.00769,  0.00769,158.28004,  1.94972,  1.66492,  0.000,  1.94972,
 101      +0.00802,  0.00802,173.64276,  2.11878,  1.83152,  0.000,  2.11878,
 102      +0.00834,  0.00834,189.37436,  2.29286,  2.00324,  0.000,  2.29286,
 103      +0.00867,  0.00867,205.25529,  2.47038,  2.17849,  0.000,  2.47038/
 104       DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),K=1,19)/
 105      +0.00273,  0.00273,  1.47054,  0.23263,  0.01180,  0.000,  0.23263,
 106      +0.00319,  0.00319,  4.30020,  0.28256,  0.05473,  0.000,  0.28256,
 107      +0.00365,  0.00365,  8.47533,  0.34188,  0.10792,  0.000,  0.34188,
 108      +0.00409,  0.00409, 13.92958,  0.41009,  0.17065,  0.000,  0.41009,
 109      +0.00453,  0.00453, 20.34189,  0.48705,  0.24269,  0.000,  0.48705,
 110      +0.00495,  0.00495, 27.67776,  0.57226,  0.32342,  0.000,  0.57226,
 111      +0.00537,  0.00537, 35.82585,  0.66531,  0.41237,  0.000,  0.66531,
 112      +0.00579,  0.00579, 44.68855,  0.76580,  0.50907,  0.000,  0.76580,
 113      +0.00619,  0.00619, 54.19072,  0.87334,  0.61310,  0.000,  0.87334,
 114      +0.00659,  0.00659, 64.11164,  0.98712,  0.72361,  0.000,  0.98712,
 115      +0.00698,  0.00698, 74.53390,  1.10697,  0.84038,  0.000,  1.10697,
 116      +0.00737,  0.00737, 85.43520,  1.23266,  0.96318,  0.000,  1.23266,
 117      +0.00775,  0.00775, 96.73615,  1.36379,  1.09157,  0.000,  1.36379,
 118      +0.00813,  0.00813,108.20181,  1.49903,  1.22423,  0.000,  1.49903,
 119      +0.00850,  0.00850,120.09572,  1.63941,  1.36215,  0.000,  1.63941,
 120      +0.00887,  0.00887,132.15727,  1.78353,  1.50393,  0.000,  1.78353,
 121      +0.00923,  0.00923,144.44543,  1.93141,  1.64957,  0.000,  1.93141,
 122      +0.00959,  0.00959,156.97807,  2.08316,  1.79918,  0.000,  2.08316,
 123      +0.00995,  0.00995,169.57884,  2.23739,  1.95135,  0.000,  2.23739/
 124       DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),K=1,19)/
 125      +0.00314,  0.00314,  1.45140,  0.23193,  0.01150,  0.000,  0.23193,
 126      +0.00366,  0.00366,  4.12035,  0.28012,  0.05305,  0.000,  0.28012,
 127      +0.00417,  0.00417,  7.97282,  0.33697,  0.10409,  0.000,  0.33697,
 128      +0.00466,  0.00466, 12.92842,  0.40190,  0.16384,  0.000,  0.40190,
 129      +0.00515,  0.00515, 18.68538,  0.47470,  0.23201,  0.000,  0.47470,
 130      +0.00562,  0.00562, 25.20800,  0.55482,  0.30793,  0.000,  0.55482,
 131      +0.00608,  0.00608, 32.39333,  0.64184,  0.39110,  0.000,  0.64184,
 132      +0.00654,  0.00654, 40.15287,  0.73534,  0.48106,  0.000,  0.73534,
 133      +0.00698,  0.00698, 48.41951,  0.83495,  0.57738,  0.000,  0.83495,
 134      +0.00742,  0.00742, 57.00030,  0.93986,  0.67924,  0.000,  0.93986,
 135      +0.00785,  0.00785, 65.96819,  1.04991,  0.78643,  0.000,  1.04991,
 136      +0.00827,  0.00827, 75.30411,  1.16490,  0.89872,  0.000,  1.16490,
 137      +0.00869,  0.00869, 84.93983,  1.28443,  1.01572,  0.000,  1.28443,
 138      +0.00910,  0.00910, 94.67431,  1.40729,  1.13618,  0.000,  1.40729,
 139      +0.00950,  0.00950,104.73546,  1.53442,  1.26103,  0.000,  1.53442,
 140      +0.00990,  0.00990,114.90069,  1.66454,  1.38898,  0.000,  1.66454,
 141      +0.01030,  0.01030,125.22188,  1.79768,  1.52005,  0.000,  1.79768,
 142      +0.01069,  0.01069,135.71541,  1.93394,  1.65433,  0.000,  1.93394,
 143      +0.01107,  0.01107,146.23267,  2.07206,  1.79056,  0.000,  2.07206/
 144       DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),K=1,19)/
 145      +0.00487,  0.00487,  1.39340,  0.22952,  0.01054,  0.000,  0.22952,
 146      +0.00561,  0.00561,  3.60798,  0.27238,  0.04789,  0.000,  0.27238,
 147      +0.00632,  0.00632,  6.59361,  0.32184,  0.09258,  0.000,  0.32184,
 148      +0.00701,  0.00701, 10.25390,  0.37715,  0.14368,  0.000,  0.37715,
 149      +0.00767,  0.00767, 14.35074,  0.43796,  0.20075,  0.000,  0.43796,
 150      +0.00831,  0.00831, 18.85406,  0.50367,  0.26309,  0.000,  0.50367,
 151      +0.00894,  0.00894, 23.68863,  0.57384,  0.33019,  0.000,  0.57384,
 152      +0.00955,  0.00955, 28.79337,  0.64806,  0.40161,  0.000,  0.64806,
 153      +0.01014,  0.01014, 34.12415,  0.72597,  0.47694,  0.000,  0.72597,
 154      +0.01072,  0.01072, 39.55686,  0.80691,  0.55549,  0.000,  0.80691,
 155      +0.01128,  0.01128, 45.14307,  0.89075,  0.63711,  0.000,  0.89075,
 156      +0.01184,  0.01184, 50.87281,  0.97732,  0.72159,  0.000,  0.97732,
 157      +0.01238,  0.01238, 56.70524,  1.06631,  0.80863,  0.000,  1.06631,
 158      +0.01291,  0.01291, 62.51816,  1.15680,  0.89729,  0.000,  1.15680,
 159      +0.01344,  0.01344, 68.45716,  1.24953,  0.98829,  0.000,  1.24953,
 160      +0.01395,  0.01395, 74.38765,  1.34355,  1.08066,  0.000,  1.34355,
 161      +0.01446,  0.01446, 80.34506,  1.43890,  1.17445,  0.000,  1.43890,
 162      +0.01495,  0.01495, 86.34202,  1.53567,  1.26974,  0.000,  1.53567,
 163      +0.01544,  0.01544, 92.29215,  1.63297,  1.36562,  0.000,  1.63297/
 164       DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),K=1,19)/
 165      +0.00755,  0.00755,  1.33748,  0.22665,  0.00958,  0.000,  0.22665,
 166      +0.00859,  0.00859,  3.15874,  0.26428,  0.04287,  0.000,  0.26428,
 167      +0.00958,  0.00958,  5.45189,  0.30676,  0.08163,  0.000,  0.30676,
 168      +0.01053,  0.01053,  8.13087,  0.35328,  0.12490,  0.000,  0.35328,
 169      +0.01143,  0.01143, 11.01904,  0.40342,  0.17219,  0.000,  0.40342,
 170      +0.01230,  0.01230, 14.09815,  0.45662,  0.22283,  0.000,  0.45662,
 171      +0.01313,  0.01313, 17.31847,  0.51246,  0.27639,  0.000,  0.51246,
 172      +0.01394,  0.01394, 20.64180,  0.57060,  0.33245,  0.000,  0.57060,
 173      +0.01473,  0.01473, 24.04236,  0.63074,  0.39069,  0.000,  0.63074,
 174      +0.01549,  0.01549, 27.44328,  0.69236,  0.45058,  0.000,  0.69236,
 175      +0.01622,  0.01622, 30.88253,  0.75537,  0.51199,  0.000,  0.75537,
 176      +0.01694,  0.01694, 34.35690,  0.81966,  0.57479,  0.000,  0.81966,
 177      +0.01764,  0.01764, 37.84361,  0.88502,  0.63876,  0.000,  0.88502,
 178      +0.01833,  0.01833, 41.26999,  0.95076,  0.70321,  0.000,  0.95076,
 179      +0.01900,  0.01900, 44.72956,  1.01747,  0.76870,  0.000,  1.01747,
 180      +0.01965,  0.01965, 48.14228,  1.08446,  0.83456,  0.000,  1.08446,
 181      +0.02029,  0.02029, 51.53264,  1.15179,  0.90081,  0.000,  1.15179,
 182      +0.02091,  0.02091, 54.91068,  1.21956,  0.96756,  0.000,  1.21956,
 183      +0.02153,  0.02153, 58.22705,  1.28713,  1.03417,  0.000,  1.28713/
 184       DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),K=1,19)/
 185      +0.00977,  0.00977,  1.30563,  0.22468,  0.00902,  0.000,  0.22468,
 186      +0.01103,  0.01103,  2.92190,  0.25931,  0.03999,  0.000,  0.25931,
 187      +0.01222,  0.01222,  4.87718,  0.29788,  0.07546,  0.000,  0.29788,
 188      +0.01335,  0.01335,  7.09775,  0.33961,  0.11452,  0.000,  0.33961,
 189      +0.01443,  0.01443,  9.43942,  0.38407,  0.15664,  0.000,  0.38407,
 190      +0.01546,  0.01546, 11.89116,  0.43072,  0.20123,  0.000,  0.43072,
 191      +0.01645,  0.01645, 14.41587,  0.47921,  0.24788,  0.000,  0.47921,
 192      +0.01740,  0.01740, 16.98611,  0.52923,  0.29624,  0.000,  0.52923,
 193      +0.01832,  0.01832, 19.58434,  0.58052,  0.34603,  0.000,  0.58052,
 194      +0.01920,  0.01920, 22.15357,  0.63264,  0.39679,  0.000,  0.63264,
 195      +0.02006,  0.02006, 24.72598,  0.68555,  0.44845,  0.000,  0.68555,
 196      +0.02089,  0.02089, 27.30105,  0.73915,  0.50090,  0.000,  0.73915,
 197      +0.02170,  0.02170, 29.86323,  0.79327,  0.55396,  0.000,  0.79327,
 198      +0.02249,  0.02249, 32.35952,  0.84737,  0.60707,  0.000,  0.84737,
 199      +0.02325,  0.02325, 34.86224,  0.90195,  0.66073,  0.000,  0.90195,
 200      +0.02400,  0.02400, 37.31274,  0.95645,  0.71437,  0.000,  0.95645,
 201      +0.02473,  0.02473, 39.73085,  1.01094,  0.76805,  0.000,  1.01094,
 202      +0.02545,  0.02545, 42.12524,  1.06550,  0.82186,  0.000,  1.06550,
 203      +0.02614,  0.02614, 44.46061,  1.11964,  0.87529,  0.000,  1.11964/
 204       DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),K=1,19)/
 205      +0.01172,  0.01172,  1.28335,  0.22313,  0.00862,  0.000,  0.22313,
 206      +0.01317,  0.01317,  2.76440,  0.25563,  0.03797,  0.000,  0.25563,
 207      +0.01452,  0.01452,  4.50602,  0.29152,  0.07120,  0.000,  0.29152,
 208      +0.01581,  0.01581,  6.44455,  0.32999,  0.10740,  0.000,  0.32999,
 209      +0.01702,  0.01702,  8.45683,  0.37064,  0.14609,  0.000,  0.37064,
 210      +0.01818,  0.01818, 10.53661,  0.41298,  0.18671,  0.000,  0.41298,
 211      +0.01929,  0.01929, 12.65459,  0.45667,  0.22887,  0.000,  0.45667,
 212      +0.02036,  0.02036, 14.78975,  0.50143,  0.27228,  0.000,  0.50143,
 213      +0.02138,  0.02138, 16.92937,  0.54706,  0.31668,  0.000,  0.54706,
 214      +0.02236,  0.02236, 19.02782,  0.59315,  0.36167,  0.000,  0.59315,
 215      +0.02331,  0.02331, 21.11372,  0.63969,  0.40721,  0.000,  0.63969,
 216      +0.02424,  0.02424, 23.18807,  0.68660,  0.45320,  0.000,  0.68660,
 217      +0.02513,  0.02513, 25.23925,  0.73374,  0.49950,  0.000,  0.73374,
 218      +0.02600,  0.02600, 27.22513,  0.78065,  0.54564,  0.000,  0.78065,
 219      +0.02684,  0.02684, 29.20597,  0.82777,  0.59205,  0.000,  0.82777,
 220      +0.02766,  0.02766, 31.13490,  0.87464,  0.63826,  0.000,  0.87464,
 221      +0.02846,  0.02846, 33.02897,  0.92132,  0.68432,  0.000,  0.92132,
 222      +0.02924,  0.02924, 34.89596,  0.96790,  0.73032,  0.000,  0.96790,
 223      +0.03000,  0.03000, 36.70819,  1.01395,  0.77585,  0.000,  1.01395/
 224       DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),K=1,19)/
 225      +0.01349,  0.01349,  1.26623,  0.22181,  0.00831,  0.000,  0.22181,
 226      +0.01510,  0.01510,  2.64788,  0.25269,  0.03642,  0.000,  0.25269,
 227      +0.01660,  0.01660,  4.23730,  0.28652,  0.06795,  0.000,  0.28652,
 228      +0.01802,  0.01802,  5.97899,  0.32256,  0.10203,  0.000,  0.32256,
 229      +0.01935,  0.01935,  7.76485,  0.36038,  0.13818,  0.000,  0.36038,
 230      +0.02062,  0.02062,  9.59205,  0.39954,  0.17588,  0.000,  0.39954,
 231      +0.02183,  0.02183, 11.43667,  0.43973,  0.21479,  0.000,  0.43973,
 232      +0.02299,  0.02299, 13.28202,  0.48069,  0.25462,  0.000,  0.48069,
 233      +0.02410,  0.02410, 15.11854,  0.52224,  0.29517,  0.000,  0.52224,
 234      +0.02517,  0.02517, 16.90808,  0.56403,  0.33606,  0.000,  0.56403,
 235      +0.02620,  0.02620, 18.67683,  0.60604,  0.37725,  0.000,  0.60604,
 236      +0.02719,  0.02719, 20.42662,  0.64822,  0.41870,  0.000,  0.64822,
 237      +0.02816,  0.02816, 22.14841,  0.69046,  0.46027,  0.000,  0.69046,
 238      +0.02909,  0.02909, 23.80702,  0.73232,  0.50153,  0.000,  0.73232,
 239      +0.03000,  0.03000, 25.45474,  0.77426,  0.54291,  0.000,  0.77426,
 240      +0.03088,  0.03088, 27.05230,  0.81583,  0.58396,  0.000,  0.81583,
 241      +0.03173,  0.03173, 28.61486,  0.85711,  0.62477,  0.000,  0.85711,
 242      +0.03257,  0.03257, 30.14953,  0.89819,  0.66541,  0.000,  0.89819,
 243      +0.03338,  0.03338, 31.63343,  0.93869,  0.70551,  0.000,  0.93869/
 244       DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),K=1,19)/
 245      +0.02091,  0.02091,  1.21367,  0.21697,  0.00735,  0.000,  0.21697,
 246      +0.02311,  0.02311,  2.31471,  0.24282,  0.03168,  0.000,  0.24282,
 247      +0.02514,  0.02514,  3.49787,  0.27052,  0.05818,  0.000,  0.27052,
 248      +0.02704,  0.02704,  4.73269,  0.29940,  0.08609,  0.000,  0.29940,
 249      +0.02880,  0.02880,  5.95085,  0.32910,  0.11502,  0.000,  0.32910,
 250      +0.03046,  0.03046,  7.15802,  0.35928,  0.14457,  0.000,  0.35928,
 251      +0.03204,  0.03204,  8.34344,  0.38972,  0.17449,  0.000,  0.38972,
 252      +0.03353,  0.03353,  9.50062,  0.42024,  0.20459,  0.000,  0.42024,
 253      +0.03495,  0.03495, 10.62717,  0.45074,  0.23474,  0.000,  0.45074,
 254      +0.03631,  0.03631, 11.70209,  0.48097,  0.26469,  0.000,  0.48097,
 255      +0.03761,  0.03761, 12.74515,  0.51096,  0.29446,  0.000,  0.51096,
 256      +0.03886,  0.03886, 13.75982,  0.54071,  0.32402,  0.000,  0.54071,
 257      +0.04006,  0.04006, 14.74244,  0.57016,  0.35331,  0.000,  0.57016,
 258      +0.04122,  0.04122, 15.67339,  0.59901,  0.38205,  0.000,  0.59901,
 259      +0.04233,  0.04233, 16.58623,  0.62761,  0.41057,  0.000,  0.62761,
 260      +0.04341,  0.04341, 17.45856,  0.65568,  0.43858,  0.000,  0.65568,
 261      +0.04446,  0.04446, 18.30080,  0.68329,  0.46615,  0.000,  0.68329,
 262      +0.04547,  0.04547, 19.11826,  0.71053,  0.49336,  0.000,  0.71053,
 263      +0.04646,  0.04646, 19.89841,  0.73715,  0.51997,  0.000,  0.73715/
 264       DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),K=1,19)/
 265      +0.03237,  0.03237,  1.16120,  0.21054,  0.00638,  0.000,  0.21054,
 266      +0.03533,  0.03533,  2.01965,  0.23144,  0.02704,  0.000,  0.23144,
 267      +0.03803,  0.03803,  2.88157,  0.25332,  0.04886,  0.000,  0.25332,
 268      +0.04051,  0.04051,  3.73789,  0.27564,  0.07123,  0.000,  0.27564,
 269      +0.04280,  0.04280,  4.54980,  0.29813,  0.09386,  0.000,  0.29813,
 270      +0.04494,  0.04494,  5.32816,  0.32054,  0.11647,  0.000,  0.32054,
 271      +0.04694,  0.04694,  6.07063,  0.34275,  0.13892,  0.000,  0.34275,
 272      +0.04882,  0.04882,  6.77683,  0.36465,  0.16110,  0.000,  0.36465,
 273      +0.05061,  0.05061,  7.44837,  0.38619,  0.18294,  0.000,  0.38619,
 274      +0.05229,  0.05229,  8.07461,  0.40723,  0.20430,  0.000,  0.40723,
 275      +0.05389,  0.05389,  8.67028,  0.42782,  0.22523,  0.000,  0.42782,
 276      +0.05542,  0.05542,  9.23921,  0.44798,  0.24574,  0.000,  0.44798,
 277      +0.05688,  0.05688,  9.78057,  0.46769,  0.26581,  0.000,  0.46769,
 278      +0.05828,  0.05828, 10.28380,  0.48678,  0.28525,  0.000,  0.48678,
 279      +0.05963,  0.05963, 10.77027,  0.50550,  0.30434,  0.000,  0.50550,
 280      +0.06092,  0.06092, 11.22747,  0.52368,  0.32288,  0.000,  0.52368,
 281      +0.06216,  0.06216, 11.66241,  0.54139,  0.34095,  0.000,  0.54139,
 282      +0.06336,  0.06336, 12.07892,  0.55869,  0.35862,  0.000,  0.55869,
 283      +0.06452,  0.06452, 12.47029,  0.57543,  0.37573,  0.000,  0.57543/
 284       DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),K=1,19)/
 285      +0.04175,  0.04175,  1.12987,  0.20573,  0.00581,  0.000,  0.20573,
 286      +0.04525,  0.04525,  1.86188,  0.22375,  0.02438,  0.000,  0.22375,
 287      +0.04839,  0.04839,  2.56833,  0.24237,  0.04361,  0.000,  0.24237,
 288      +0.05127,  0.05127,  3.24996,  0.26111,  0.06300,  0.000,  0.26111,
 289      +0.05390,  0.05390,  3.88091,  0.27976,  0.08233,  0.000,  0.27976,
 290      +0.05634,  0.05634,  4.47364,  0.29814,  0.10139,  0.000,  0.29814,
 291      +0.05861,  0.05861,  5.02897,  0.31614,  0.12008,  0.000,  0.31614,
 292      +0.06074,  0.06074,  5.54866,  0.33373,  0.13835,  0.000,  0.33373,
 293      +0.06274,  0.06274,  6.03555,  0.35086,  0.15616,  0.000,  0.35086,
 294      +0.06462,  0.06462,  6.48290,  0.36744,  0.17340,  0.000,  0.36744,
 295      +0.06641,  0.06641,  6.90295,  0.38352,  0.19015,  0.000,  0.38352,
 296      +0.06810,  0.06810,  7.29942,  0.39915,  0.20643,  0.000,  0.39915,
 297      +0.06972,  0.06972,  7.67236,  0.41432,  0.22223,  0.000,  0.41432,
 298      +0.07126,  0.07126,  8.01454,  0.42889,  0.23743,  0.000,  0.42889,
 299      +0.07273,  0.07273,  8.34228,  0.44310,  0.25226,  0.000,  0.44310,
 300      +0.07414,  0.07414,  8.64677,  0.45680,  0.26656,  0.000,  0.45680,
 301      +0.07549,  0.07549,  8.93352,  0.47006,  0.28041,  0.000,  0.47006,
 302      +0.07679,  0.07679,  9.20561,  0.48295,  0.29387,  0.000,  0.48295,
 303      +0.07804,  0.07804,  9.45843,  0.49534,  0.30683,  0.000,  0.49534/
 304       DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),K=1,19)/
 305      +0.04999,  0.04999,  1.10698,  0.20169,  0.00541,  0.000,  0.20169,
 306      +0.05388,  0.05388,  1.75554,  0.21768,  0.02251,  0.000,  0.21768,
 307      +0.05737,  0.05737,  2.36412,  0.23404,  0.03997,  0.000,  0.23404,
 308      +0.06054,  0.06054,  2.93908,  0.25036,  0.05737,  0.000,  0.25036,
 309      +0.06342,  0.06342,  3.46204,  0.26645,  0.07451,  0.000,  0.26645,
 310      +0.06608,  0.06608,  3.94599,  0.28216,  0.09125,  0.000,  0.28216,
 311      +0.06855,  0.06855,  4.39336,  0.29745,  0.10753,  0.000,  0.29745,
 312      +0.07085,  0.07085,  4.80691,  0.31226,  0.12331,  0.000,  0.31226,
 313      +0.07301,  0.07301,  5.19000,  0.32659,  0.13858,  0.000,  0.32659,
 314      +0.07503,  0.07503,  5.53794,  0.34036,  0.15326,  0.000,  0.34036,
 315      +0.07693,  0.07693,  5.86141,  0.35364,  0.16742,  0.000,  0.35364,
 316      +0.07874,  0.07874,  6.16391,  0.36646,  0.18110,  0.000,  0.36646,
 317      +0.08046,  0.08046,  6.44589,  0.37885,  0.19432,  0.000,  0.37885,
 318      +0.08208,  0.08208,  6.70189,  0.39067,  0.20695,  0.000,  0.39067,
 319      +0.08364,  0.08364,  6.94532,  0.40214,  0.21921,  0.000,  0.40214,
 320      +0.08512,  0.08512,  7.16934,  0.41315,  0.23098,  0.000,  0.41315,
 321      +0.08654,  0.08654,  7.37857,  0.42375,  0.24232,  0.000,  0.42375,
 322      +0.08790,  0.08790,  7.57561,  0.43400,  0.25330,  0.000,  0.43400,
 323      +0.08921,  0.08921,  7.75697,  0.44382,  0.26382,  0.000,  0.44382/
 324       DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),K=1,19)/
 325      +0.05745,  0.05745,  1.08866,  0.19812,  0.00510,  0.000,  0.19812,
 326      +0.06167,  0.06167,  1.67582,  0.21255,  0.02107,  0.000,  0.21255,
 327      +0.06542,  0.06542,  2.21492,  0.22719,  0.03719,  0.000,  0.22719,
 328      +0.06882,  0.06882,  2.71585,  0.24169,  0.05311,  0.000,  0.24169,
 329      +0.07190,  0.07190,  3.16511,  0.25588,  0.06865,  0.000,  0.25588,
 330      +0.07473,  0.07473,  3.57586,  0.26965,  0.08371,  0.000,  0.26965,
 331      +0.07735,  0.07735,  3.95142,  0.28295,  0.09824,  0.000,  0.28295,
 332      +0.07978,  0.07978,  4.29511,  0.29577,  0.11224,  0.000,  0.29577,
 333      +0.08205,  0.08205,  4.61052,  0.30810,  0.12571,  0.000,  0.30810,
 334      +0.08417,  0.08417,  4.89421,  0.31988,  0.13858,  0.000,  0.31988,
 335      +0.08616,  0.08616,  5.15574,  0.33118,  0.15094,  0.000,  0.33118,
 336      +0.08805,  0.08805,  5.39840,  0.34205,  0.16282,  0.000,  0.34205,
 337      +0.08984,  0.08984,  5.62287,  0.35250,  0.17424,  0.000,  0.35250,
 338      +0.09152,  0.09152,  5.82475,  0.36242,  0.18511,  0.000,  0.36242,
 339      +0.09313,  0.09313,  6.01554,  0.37201,  0.19561,  0.000,  0.37201,
 340      +0.09466,  0.09466,  6.18964,  0.38117,  0.20566,  0.000,  0.38117,
 341      +0.09613,  0.09613,  6.35104,  0.38996,  0.21530,  0.000,  0.38996,
 342      +0.09753,  0.09753,  6.50204,  0.39843,  0.22461,  0.000,  0.39843,
 343      +0.09886,  0.09886,  6.63979,  0.40650,  0.23349,  0.000,  0.40650/
 344       DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),K=1,19)/
 345      +0.08813,  0.08813,  1.02649,  0.18386,  0.00411,  0.000,  0.18386,
 346      +0.09335,  0.09335,  1.44003,  0.19349,  0.01667,  0.000,  0.19349,
 347      +0.09791,  0.09791,  1.79464,  0.20302,  0.02885,  0.000,  0.20302,
 348      +0.10196,  0.10196,  2.10680,  0.21223,  0.04048,  0.000,  0.21223,
 349      +0.10559,  0.10559,  2.37372,  0.22101,  0.05152,  0.000,  0.22101,
 350      +0.10887,  0.10887,  2.60773,  0.22935,  0.06193,  0.000,  0.22935,
 351      +0.11186,  0.11186,  2.81355,  0.23722,  0.07175,  0.000,  0.23722,
 352      +0.11460,  0.11460,  2.99513,  0.24465,  0.08100,  0.000,  0.24465,
 353      +0.11714,  0.11714,  3.15608,  0.25166,  0.08973,  0.000,  0.25166,
 354      +0.11947,  0.11947,  3.29546,  0.25822,  0.09791,  0.000,  0.25822,
 355      +0.12164,  0.12164,  3.41981,  0.26439,  0.10562,  0.000,  0.26439,
 356      +0.12367,  0.12367,  3.53169,  0.27023,  0.11293,  0.000,  0.27023,
 357      +0.12558,  0.12558,  3.63197,  0.27575,  0.11984,  0.000,  0.27575,
 358      +0.12736,  0.12736,  3.71854,  0.28088,  0.12631,  0.000,  0.28088,
 359      +0.12905,  0.12905,  3.79831,  0.28579,  0.13248,  0.000,  0.28579,
 360      +0.13063,  0.13063,  3.86833,  0.29039,  0.13830,  0.000,  0.29039,
 361      +0.13213,  0.13213,  3.93107,  0.29473,  0.14382,  0.000,  0.29473,
 362      +0.13356,  0.13356,  3.98797,  0.29886,  0.14908,  0.000,  0.29886,
 363      +0.13490,  0.13490,  4.03761,  0.30273,  0.15403,  0.000,  0.30273/
 364       DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),K=1,19)/
 365      +0.13362,  0.13362,  0.94987,  0.16274,  0.00313,  0.000,  0.16274,
 366      +0.13951,  0.13951,  1.21337,  0.16778,  0.01238,  0.000,  0.16778,
 367      +0.14452,  0.14452,  1.42343,  0.17263,  0.02095,  0.000,  0.17263,
 368      +0.14889,  0.14889,  1.59704,  0.17717,  0.02883,  0.000,  0.17717,
 369      +0.15269,  0.15269,  1.73665,  0.18135,  0.03604,  0.000,  0.18135,
 370      +0.15606,  0.15606,  1.85229,  0.18519,  0.04264,  0.000,  0.18519,
 371      +0.15907,  0.15907,  1.94848,  0.18870,  0.04870,  0.000,  0.18870,
 372      +0.16178,  0.16178,  2.02872,  0.19191,  0.05426,  0.000,  0.19191,
 373      +0.16424,  0.16424,  2.09596,  0.19484,  0.05939,  0.000,  0.19484,
 374      +0.16645,  0.16645,  2.15029,  0.19749,  0.06408,  0.000,  0.19749,
 375      +0.16847,  0.16847,  2.19588,  0.19990,  0.06841,  0.000,  0.19990,
 376      +0.17034,  0.17034,  2.23447,  0.20211,  0.07244,  0.000,  0.20211,
 377      +0.17206,  0.17206,  2.26677,  0.20414,  0.07617,  0.000,  0.20414,
 378      +0.17362,  0.17362,  2.29184,  0.20595,  0.07960,  0.000,  0.20595,
 379      +0.17509,  0.17509,  2.31353,  0.20764,  0.08282,  0.000,  0.20764,
 380      +0.17644,  0.17644,  2.33039,  0.20915,  0.08580,  0.000,  0.20915,
 381      +0.17770,  0.17770,  2.34379,  0.21054,  0.08858,  0.000,  0.21054,
 382      +0.17888,  0.17888,  2.35456,  0.21182,  0.09119,  0.000,  0.21182,
 383      +0.17997,  0.17997,  2.36198,  0.21296,  0.09361,  0.000,  0.21296/
 384       DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),K=1,19)/
 385      +0.16875,  0.16875,  0.89321,  0.14580,  0.00256,  0.000,  0.14580,
 386      +0.17455,  0.17455,  1.07935,  0.14839,  0.00996,  0.000,  0.14839,
 387      +0.17938,  0.17938,  1.22043,  0.15081,  0.01660,  0.000,  0.15081,
 388      +0.18348,  0.18348,  1.33146,  0.15300,  0.02254,  0.000,  0.15300,
 389      +0.18698,  0.18698,  1.41606,  0.15494,  0.02783,  0.000,  0.15494,
 390      +0.19001,  0.19001,  1.48247,  0.15664,  0.03259,  0.000,  0.15664,
 391      +0.19266,  0.19266,  1.53461,  0.15814,  0.03686,  0.000,  0.15814,
 392      +0.19499,  0.19499,  1.57542,  0.15943,  0.04071,  0.000,  0.15943,
 393      +0.19707,  0.19707,  1.60727,  0.16056,  0.04420,  0.000,  0.16056,
 394      +0.19888,  0.19888,  1.63045,  0.16150,  0.04734,  0.000,  0.16150,
 395      +0.20051,  0.20051,  1.64797,  0.16231,  0.05020,  0.000,  0.16231,
 396      +0.20198,  0.20198,  1.66112,  0.16300,  0.05281,  0.000,  0.16300,
 397      +0.20331,  0.20331,  1.67044,  0.16359,  0.05520,  0.000,  0.16359,
 398      +0.20448,  0.20448,  1.67533,  0.16405,  0.05736,  0.000,  0.16405,
 399      +0.20556,  0.20556,  1.67841,  0.16445,  0.05937,  0.000,  0.16445,
 400      +0.20652,  0.20652,  1.67871,  0.16476,  0.06120,  0.000,  0.16476,
 401      +0.20740,  0.20740,  1.67716,  0.16499,  0.06288,  0.000,  0.16499,
 402      +0.20820,  0.20820,  1.67429,  0.16518,  0.06444,  0.000,  0.16518,
 403      +0.20892,  0.20892,  1.66964,  0.16529,  0.06587,  0.000,  0.16529/
 404       DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),K=1,19)/
 405      +0.19769,  0.19769,  0.84506,  0.13114,  0.00216,  0.000,  0.13114,
 406      +0.20301,  0.20301,  0.98118,  0.13217,  0.00831,  0.000,  0.13217,
 407      +0.20730,  0.20730,  1.07967,  0.13308,  0.01367,  0.000,  0.13308,
 408      +0.21087,  0.21087,  1.15344,  0.13386,  0.01836,  0.000,  0.13386,
 409      +0.21381,  0.21381,  1.20628,  0.13446,  0.02246,  0.000,  0.13446,
 410      +0.21629,  0.21629,  1.24504,  0.13493,  0.02607,  0.000,  0.13493,
 411      +0.21840,  0.21840,  1.27308,  0.13526,  0.02926,  0.000,  0.13526,
 412      +0.22020,  0.22020,  1.29284,  0.13548,  0.03210,  0.000,  0.13548,
 413      +0.22175,  0.22175,  1.30624,  0.13560,  0.03463,  0.000,  0.13560,
 414      +0.22305,  0.22305,  1.31360,  0.13562,  0.03687,  0.000,  0.13562,
 415      +0.22417,  0.22417,  1.31720,  0.13556,  0.03888,  0.000,  0.13556,
 416      +0.22515,  0.22515,  1.31802,  0.13545,  0.04070,  0.000,  0.13545,
 417      +0.22600,  0.22600,  1.31645,  0.13528,  0.04234,  0.000,  0.13528,
 418      +0.22670,  0.22670,  1.31207,  0.13505,  0.04380,  0.000,  0.13505,
 419      +0.22732,  0.22732,  1.30677,  0.13479,  0.04515,  0.000,  0.13479,
 420      +0.22785,  0.22785,  1.29985,  0.13448,  0.04635,  0.000,  0.13448,
 421      +0.22829,  0.22829,  1.29196,  0.13415,  0.04745,  0.000,  0.13415,
 422      +0.22867,  0.22867,  1.28347,  0.13379,  0.04845,  0.000,  0.13379,
 423      +0.22897,  0.22897,  1.27402,  0.13340,  0.04936,  0.000,  0.13340/
 424       DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),K=1,19)/
 425      +0.22220,  0.22220,  0.80186,  0.11802,  0.00186,  0.000,  0.11802,
 426      +0.22677,  0.22677,  0.90221,  0.11800,  0.00708,  0.000,  0.11800,
 427      +0.23033,  0.23033,  0.97123,  0.11792,  0.01151,  0.000,  0.11792,
 428      +0.23317,  0.23317,  1.01994,  0.11777,  0.01532,  0.000,  0.11777,
 429      +0.23542,  0.23542,  1.05194,  0.11753,  0.01859,  0.000,  0.11753,
 430      +0.23722,  0.23722,  1.07300,  0.11722,  0.02142,  0.000,  0.11722,
 431      +0.23868,  0.23868,  1.08596,  0.11684,  0.02388,  0.000,  0.11684,
 432      +0.23985,  0.23985,  1.09285,  0.11640,  0.02604,  0.000,  0.11640,
 433      +0.24079,  0.24079,  1.09522,  0.11593,  0.02794,  0.000,  0.11593,
 434      +0.24151,  0.24151,  1.09336,  0.11539,  0.02960,  0.000,  0.11539,
 435      +0.24207,  0.24207,  1.08904,  0.11483,  0.03107,  0.000,  0.11483,
 436      +0.24251,  0.24251,  1.08301,  0.11426,  0.03238,  0.000,  0.11426,
 437      +0.24284,  0.24284,  1.07554,  0.11367,  0.03355,  0.000,  0.11367,
 438      +0.24304,  0.24304,  1.06632,  0.11304,  0.03457,  0.000,  0.11304,
 439      +0.24318,  0.24318,  1.05676,  0.11242,  0.03551,  0.000,  0.11242,
 440      +0.24323,  0.24323,  1.04631,  0.11179,  0.03633,  0.000,  0.11179,
 441      +0.24322,  0.24322,  1.03543,  0.11114,  0.03707,  0.000,  0.11114,
 442      +0.24317,  0.24317,  1.02439,  0.11050,  0.03774,  0.000,  0.11050,
 443      +0.24304,  0.24304,  1.01291,  0.10985,  0.03833,  0.000,  0.10985/
 444       DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),K=1,19)/
 445      +0.24801,  0.24801,  0.75284,  0.10129,  0.00158,  0.000,  0.10129,
 446      +0.25131,  0.25131,  0.82075,  0.10057,  0.00592,  0.000,  0.10057,
 447      +0.25367,  0.25367,  0.86303,  0.09985,  0.00954,  0.000,  0.09985,
 448      +0.25538,  0.25538,  0.88939,  0.09912,  0.01258,  0.000,  0.09912,
 449      +0.25656,  0.25656,  0.90315,  0.09835,  0.01515,  0.000,  0.09835,
 450      +0.25735,  0.25735,  0.90907,  0.09757,  0.01733,  0.000,  0.09757,
 451      +0.25785,  0.25785,  0.90941,  0.09677,  0.01920,  0.000,  0.09677,
 452      +0.25812,  0.25812,  0.90579,  0.09596,  0.02081,  0.000,  0.09596,
 453      +0.25820,  0.25820,  0.89937,  0.09515,  0.02221,  0.000,  0.09515,
 454      +0.25810,  0.25810,  0.89037,  0.09433,  0.02342,  0.000,  0.09433,
 455      +0.25788,  0.25788,  0.88010,  0.09350,  0.02447,  0.000,  0.09350,
 456      +0.25758,  0.25758,  0.86905,  0.09269,  0.02539,  0.000,  0.09269,
 457      +0.25720,  0.25720,  0.85743,  0.09189,  0.02620,  0.000,  0.09189,
 458      +0.25672,  0.25672,  0.84495,  0.09108,  0.02690,  0.000,  0.09108,
 459      +0.25621,  0.25621,  0.83262,  0.09029,  0.02753,  0.000,  0.09029,
 460      +0.25563,  0.25563,  0.82001,  0.08951,  0.02808,  0.000,  0.08951,
 461      +0.25502,  0.25502,  0.80743,  0.08874,  0.02856,  0.000,  0.08874,
 462      +0.25439,  0.25439,  0.79505,  0.08798,  0.02898,  0.000,  0.08798,
 463      +0.25372,  0.25372,  0.78263,  0.08723,  0.02935,  0.000,  0.08723/
 464       DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),K=1,19)/
 465      +0.26951,  0.26951,  0.70727,  0.08710,  0.00135,  0.000,  0.08710,
 466      +0.27138,  0.27138,  0.75098,  0.08595,  0.00503,  0.000,  0.08595,
 467      +0.27242,  0.27242,  0.77407,  0.08484,  0.00803,  0.000,  0.08484,
 468      +0.27291,  0.27291,  0.78491,  0.08377,  0.01051,  0.000,  0.08377,
 469      +0.27295,  0.27295,  0.78643,  0.08270,  0.01255,  0.000,  0.08270,
 470      +0.27268,  0.27268,  0.78248,  0.08166,  0.01427,  0.000,  0.08166,
 471      +0.27220,  0.27220,  0.77489,  0.08063,  0.01572,  0.000,  0.08063,
 472      +0.27154,  0.27154,  0.76487,  0.07963,  0.01695,  0.000,  0.07963,
 473      +0.27075,  0.27075,  0.75331,  0.07865,  0.01800,  0.000,  0.07865,
 474      +0.26983,  0.26983,  0.74032,  0.07768,  0.01889,  0.000,  0.07768,
 475      +0.26884,  0.26884,  0.72687,  0.07673,  0.01965,  0.000,  0.07673,
 476      +0.26780,  0.26780,  0.71331,  0.07581,  0.02031,  0.000,  0.07581,
 477      +0.26673,  0.26673,  0.69972,  0.07492,  0.02089,  0.000,  0.07492,
 478      +0.26558,  0.26558,  0.68587,  0.07404,  0.02137,  0.000,  0.07404,
 479      +0.26445,  0.26445,  0.67249,  0.07319,  0.02180,  0.000,  0.07319,
 480      +0.26328,  0.26328,  0.65921,  0.07236,  0.02216,  0.000,  0.07236,
 481      +0.26210,  0.26210,  0.64624,  0.07155,  0.02247,  0.000,  0.07155,
 482      +0.26092,  0.26092,  0.63368,  0.07077,  0.02275,  0.000,  0.07077,
 483      +0.25972,  0.25972,  0.62134,  0.07000,  0.02298,  0.000,  0.07000/
 484       DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),K=1,19)/
 485      +0.28743,  0.28743,  0.66438,  0.07495,  0.00117,  0.000,  0.07495,
 486      +0.28777,  0.28777,  0.68946,  0.07354,  0.00432,  0.000,  0.07354,
 487      +0.28741,  0.28741,  0.69830,  0.07221,  0.00683,  0.000,  0.07221,
 488      +0.28664,  0.28664,  0.69802,  0.07094,  0.00887,  0.000,  0.07094,
 489      +0.28551,  0.28551,  0.69105,  0.06971,  0.01052,  0.000,  0.06971,
 490      +0.28417,  0.28417,  0.68051,  0.06853,  0.01188,  0.000,  0.06853,
 491      +0.28269,  0.28269,  0.66780,  0.06739,  0.01302,  0.000,  0.06739,
 492      +0.28111,  0.28111,  0.65383,  0.06629,  0.01396,  0.000,  0.06629,
 493      +0.27947,  0.27947,  0.63925,  0.06524,  0.01476,  0.000,  0.06524,
 494      +0.27774,  0.27774,  0.62408,  0.06421,  0.01542,  0.000,  0.06421,
 495      +0.27600,  0.27600,  0.60902,  0.06322,  0.01598,  0.000,  0.06322,
 496      +0.27426,  0.27426,  0.59431,  0.06228,  0.01645,  0.000,  0.06228,
 497      +0.27252,  0.27252,  0.57995,  0.06136,  0.01686,  0.000,  0.06136,
 498      +0.27075,  0.27075,  0.56574,  0.06047,  0.01719,  0.000,  0.06047,
 499      +0.26902,  0.26902,  0.55218,  0.05962,  0.01748,  0.000,  0.05962,
 500      +0.26729,  0.26729,  0.53899,  0.05879,  0.01772,  0.000,  0.05879,
 501      +0.26558,  0.26558,  0.52628,  0.05799,  0.01792,  0.000,  0.05799,
 502      +0.26389,  0.26389,  0.51410,  0.05722,  0.01809,  0.000,  0.05722,
 503      +0.26221,  0.26221,  0.50230,  0.05647,  0.01822,  0.000,  0.05647/
 504       DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),K=1,19)/
 505      +0.30227,  0.30227,  0.62370,  0.06441,  0.00102,  0.000,  0.06441,
 506      +0.30100,  0.30100,  0.63418,  0.06286,  0.00373,  0.000,  0.06286,
 507      +0.29922,  0.29922,  0.63226,  0.06141,  0.00584,  0.000,  0.06141,
 508      +0.29715,  0.29715,  0.62384,  0.06005,  0.00753,  0.000,  0.06005,
 509      +0.29485,  0.29485,  0.61090,  0.05875,  0.00888,  0.000,  0.05875,
 510      +0.29245,  0.29245,  0.59590,  0.05752,  0.00997,  0.000,  0.05752,
 511      +0.28999,  0.28999,  0.57989,  0.05634,  0.01086,  0.000,  0.05634,
 512      +0.28751,  0.28751,  0.56353,  0.05522,  0.01159,  0.000,  0.05522,
 513      +0.28503,  0.28503,  0.54724,  0.05416,  0.01220,  0.000,  0.05416,
 514      +0.28254,  0.28254,  0.53099,  0.05313,  0.01269,  0.000,  0.05313,
 515      +0.28007,  0.28007,  0.51527,  0.05215,  0.01309,  0.000,  0.05215,
 516      +0.27766,  0.27766,  0.50020,  0.05122,  0.01343,  0.000,  0.05122,
 517      +0.27529,  0.27529,  0.48577,  0.05033,  0.01372,  0.000,  0.05033,
 518      +0.27293,  0.27293,  0.47174,  0.04946,  0.01394,  0.000,  0.04946,
 519      +0.27065,  0.27065,  0.45851,  0.04864,  0.01413,  0.000,  0.04864,
 520      +0.26839,  0.26839,  0.44579,  0.04785,  0.01428,  0.000,  0.04785,
 521      +0.26618,  0.26618,  0.43367,  0.04709,  0.01440,  0.000,  0.04709,
 522      +0.26403,  0.26403,  0.42215,  0.04636,  0.01450,  0.000,  0.04636,
 523      +0.26191,  0.26191,  0.41110,  0.04565,  0.01457,  0.000,  0.04565/
 524       DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),K=1,19)/
 525      +0.31438,  0.31438,  0.58494,  0.05519,  0.00089,  0.000,  0.05519,
 526      +0.31147,  0.31147,  0.58388,  0.05360,  0.00323,  0.000,  0.05360,
 527      +0.30824,  0.30824,  0.57373,  0.05212,  0.00502,  0.000,  0.05212,
 528      +0.30488,  0.30488,  0.55933,  0.05073,  0.00643,  0.000,  0.05073,
 529      +0.30143,  0.30143,  0.54219,  0.04943,  0.00752,  0.000,  0.04943,
 530      +0.29797,  0.29797,  0.52421,  0.04820,  0.00840,  0.000,  0.04820,
 531      +0.29456,  0.29456,  0.50614,  0.04704,  0.00910,  0.000,  0.04704,
 532      +0.29121,  0.29121,  0.48841,  0.04594,  0.00967,  0.000,  0.04594,
 533      +0.28793,  0.28793,  0.47128,  0.04491,  0.01013,  0.000,  0.04491,
 534      +0.28470,  0.28470,  0.45465,  0.04392,  0.01049,  0.000,  0.04392,
 535      +0.28155,  0.28155,  0.43885,  0.04298,  0.01078,  0.000,  0.04298,
 536      +0.27851,  0.27851,  0.42393,  0.04209,  0.01103,  0.000,  0.04209,
 537      +0.27555,  0.27555,  0.40982,  0.04124,  0.01122,  0.000,  0.04124,
 538      +0.27264,  0.27264,  0.39631,  0.04043,  0.01137,  0.000,  0.04043,
 539      +0.26984,  0.26984,  0.38366,  0.03966,  0.01149,  0.000,  0.03966,
 540      +0.26711,  0.26711,  0.37164,  0.03892,  0.01157,  0.000,  0.03892,
 541      +0.26445,  0.26445,  0.36027,  0.03822,  0.01164,  0.000,  0.03822,
 542      +0.26187,  0.26187,  0.34955,  0.03754,  0.01169,  0.000,  0.03754,
 543      +0.25935,  0.25935,  0.33934,  0.03689,  0.01172,  0.000,  0.03689/
 544       DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),K=1,19)/
 545      +0.32405,  0.32405,  0.54796,  0.04709,  0.00078,  0.000,  0.04709,
 546      +0.31947,  0.31947,  0.53787,  0.04556,  0.00280,  0.000,  0.04556,
 547      +0.31477,  0.31477,  0.52148,  0.04413,  0.00432,  0.000,  0.04413,
 548      +0.31013,  0.31013,  0.50268,  0.04281,  0.00550,  0.000,  0.04281,
 549      +0.30553,  0.30553,  0.48261,  0.04156,  0.00640,  0.000,  0.04156,
 550      +0.30105,  0.30105,  0.46269,  0.04039,  0.00711,  0.000,  0.04039,
 551      +0.29671,  0.29671,  0.44340,  0.03930,  0.00767,  0.000,  0.03930,
 552      +0.29252,  0.29252,  0.42498,  0.03827,  0.00811,  0.000,  0.03827,
 553      +0.28847,  0.28847,  0.40757,  0.03731,  0.00847,  0.000,  0.03731,
 554      +0.28454,  0.28454,  0.39100,  0.03639,  0.00874,  0.000,  0.03639,
 555      +0.28075,  0.28075,  0.37549,  0.03552,  0.00895,  0.000,  0.03552,
 556      +0.27710,  0.27710,  0.36100,  0.03470,  0.00913,  0.000,  0.03470,
 557      +0.27360,  0.27360,  0.34744,  0.03393,  0.00926,  0.000,  0.03393,
 558      +0.27018,  0.27018,  0.33461,  0.03319,  0.00935,  0.000,  0.03319,
 559      +0.26690,  0.26690,  0.32268,  0.03249,  0.00943,  0.000,  0.03249,
 560      +0.26372,  0.26372,  0.31144,  0.03182,  0.00948,  0.000,  0.03182,
 561      +0.26065,  0.26065,  0.30089,  0.03118,  0.00951,  0.000,  0.03118,
 562      +0.25769,  0.25769,  0.29099,  0.03057,  0.00953,  0.000,  0.03057,
 563      +0.25480,  0.25480,  0.28164,  0.02999,  0.00953,  0.000,  0.02999/
 564       DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),K=1,19)/
 565      +0.33149,  0.33149,  0.51257,  0.03996,  0.00068,  0.000,  0.03996,
 566      +0.32523,  0.32523,  0.49539,  0.03854,  0.00242,  0.000,  0.03854,
 567      +0.31909,  0.31909,  0.47426,  0.03722,  0.00372,  0.000,  0.03722,
 568      +0.31318,  0.31318,  0.45230,  0.03600,  0.00471,  0.000,  0.03600,
 569      +0.30746,  0.30746,  0.43026,  0.03485,  0.00545,  0.000,  0.03485,
 570      +0.30199,  0.30199,  0.40916,  0.03379,  0.00603,  0.000,  0.03379,
 571      +0.29676,  0.29676,  0.38927,  0.03279,  0.00648,  0.000,  0.03279,
 572      +0.29177,  0.29177,  0.37068,  0.03185,  0.00683,  0.000,  0.03185,
 573      +0.28700,  0.28700,  0.35339,  0.03098,  0.00710,  0.000,  0.03098,
 574      +0.28241,  0.28241,  0.33720,  0.03015,  0.00731,  0.000,  0.03015,
 575      +0.27801,  0.27801,  0.32220,  0.02937,  0.00747,  0.000,  0.02937,
 576      +0.27382,  0.27382,  0.30834,  0.02863,  0.00759,  0.000,  0.02863,
 577      +0.26981,  0.26981,  0.29548,  0.02794,  0.00768,  0.000,  0.02794,
 578      +0.26592,  0.26592,  0.28344,  0.02728,  0.00774,  0.000,  0.02728,
 579      +0.26221,  0.26221,  0.27231,  0.02666,  0.00779,  0.000,  0.02666,
 580      +0.25863,  0.25863,  0.26189,  0.02606,  0.00781,  0.000,  0.02606,
 581      +0.25518,  0.25518,  0.25218,  0.02550,  0.00782,  0.000,  0.02550,
 582      +0.25187,  0.25187,  0.24312,  0.02496,  0.00782,  0.000,  0.02496,
 583      +0.24866,  0.24866,  0.23461,  0.02445,  0.00781,  0.000,  0.02445/
 584       DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),K=1,19)/
 585      +0.33688,  0.33688,  0.47859,  0.03367,  0.00059,  0.000,  0.03367,
 586      +0.32897,  0.32897,  0.45578,  0.03238,  0.00210,  0.000,  0.03238,
 587      +0.32141,  0.32141,  0.43109,  0.03118,  0.00320,  0.000,  0.03118,
 588      +0.31429,  0.31429,  0.40693,  0.03007,  0.00403,  0.000,  0.03007,
 589      +0.30750,  0.30750,  0.38368,  0.02904,  0.00464,  0.000,  0.02904,
 590      +0.30109,  0.30109,  0.36202,  0.02807,  0.00511,  0.000,  0.02807,
 591      +0.29502,  0.29502,  0.34202,  0.02717,  0.00547,  0.000,  0.02717,
 592      +0.28928,  0.28928,  0.32364,  0.02634,  0.00574,  0.000,  0.02634,
 593      +0.28384,  0.28384,  0.30678,  0.02555,  0.00595,  0.000,  0.02555,
 594      +0.27864,  0.27864,  0.29119,  0.02481,  0.00611,  0.000,  0.02481,
 595      +0.27370,  0.27370,  0.27690,  0.02412,  0.00622,  0.000,  0.02412,
 596      +0.26901,  0.26901,  0.26380,  0.02347,  0.00630,  0.000,  0.02347,
 597      +0.26454,  0.26454,  0.25175,  0.02286,  0.00636,  0.000,  0.02286,
 598      +0.26023,  0.26023,  0.24055,  0.02228,  0.00640,  0.000,  0.02228,
 599      +0.25614,  0.25614,  0.23027,  0.02173,  0.00642,  0.000,  0.02173,
 600      +0.25221,  0.25221,  0.22071,  0.02121,  0.00642,  0.000,  0.02121,
 601      +0.24843,  0.24843,  0.21184,  0.02072,  0.00642,  0.000,  0.02072,
 602      +0.24482,  0.24482,  0.20361,  0.02025,  0.00641,  0.000,  0.02025,
 603      +0.24133,  0.24133,  0.19592,  0.01980,  0.00638,  0.000,  0.01980/
 604       DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),K=1,19)/
 605      +0.34037,  0.34037,  0.44594,  0.02813,  0.00051,  0.000,  0.02813,
 606      +0.33085,  0.33085,  0.41872,  0.02698,  0.00181,  0.000,  0.02698,
 607      +0.32193,  0.32193,  0.39145,  0.02591,  0.00275,  0.000,  0.02591,
 608      +0.31363,  0.31363,  0.36585,  0.02492,  0.00344,  0.000,  0.02492,
 609      +0.30583,  0.30583,  0.34199,  0.02400,  0.00394,  0.000,  0.02400,
 610      +0.29853,  0.29853,  0.32024,  0.02314,  0.00432,  0.000,  0.02314,
 611      +0.29169,  0.29169,  0.30049,  0.02235,  0.00461,  0.000,  0.02235,
 612      +0.28526,  0.28526,  0.28259,  0.02160,  0.00482,  0.000,  0.02160,
 613      +0.27921,  0.27921,  0.26637,  0.02091,  0.00498,  0.000,  0.02091,
 614      +0.27345,  0.27345,  0.25155,  0.02027,  0.00509,  0.000,  0.02027,
 615      +0.26802,  0.26802,  0.23808,  0.01966,  0.00517,  0.000,  0.01966,
 616      +0.26288,  0.26288,  0.22583,  0.01909,  0.00522,  0.000,  0.01909,
 617      +0.25800,  0.25800,  0.21463,  0.01856,  0.00526,  0.000,  0.01856,
 618      +0.25332,  0.25332,  0.20432,  0.01805,  0.00527,  0.000,  0.01805,
 619      +0.24890,  0.24890,  0.19489,  0.01758,  0.00528,  0.000,  0.01758,
 620      +0.24466,  0.24466,  0.18618,  0.01713,  0.00527,  0.000,  0.01713,
 621      +0.24060,  0.24060,  0.17814,  0.01670,  0.00525,  0.000,  0.01670,
 622      +0.23673,  0.23673,  0.17072,  0.01630,  0.00523,  0.000,  0.01630,
 623      +0.23301,  0.23301,  0.16381,  0.01591,  0.00520,  0.000,  0.01591/
 624       DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),K=1,19)/
 625      +0.34210,  0.34210,  0.41457,  0.02327,  0.00045,  0.000,  0.02327,
 626      +0.33100,  0.33100,  0.38398,  0.02227,  0.00156,  0.000,  0.02227,
 627      +0.32077,  0.32077,  0.35494,  0.02133,  0.00235,  0.000,  0.02133,
 628      +0.31136,  0.31136,  0.32852,  0.02046,  0.00293,  0.000,  0.02046,
 629      +0.30261,  0.30261,  0.30451,  0.01965,  0.00334,  0.000,  0.01965,
 630      +0.29449,  0.29449,  0.28303,  0.01890,  0.00364,  0.000,  0.01890,
 631      +0.28693,  0.28693,  0.26380,  0.01821,  0.00387,  0.000,  0.01821,
 632      +0.27987,  0.27987,  0.24659,  0.01756,  0.00403,  0.000,  0.01756,
 633      +0.27326,  0.27326,  0.23116,  0.01696,  0.00415,  0.000,  0.01696,
 634      +0.26701,  0.26701,  0.21720,  0.01640,  0.00422,  0.000,  0.01640,
 635      +0.26113,  0.26113,  0.20462,  0.01587,  0.00427,  0.000,  0.01587,
 636      +0.25560,  0.25560,  0.19326,  0.01538,  0.00431,  0.000,  0.01538,
 637      +0.25037,  0.25037,  0.18294,  0.01492,  0.00432,  0.000,  0.01492,
 638      +0.24537,  0.24537,  0.17351,  0.01449,  0.00432,  0.000,  0.01449,
 639      +0.24066,  0.24066,  0.16492,  0.01408,  0.00432,  0.000,  0.01408,
 640      +0.23616,  0.23616,  0.15704,  0.01370,  0.00430,  0.000,  0.01370,
 641      +0.23187,  0.23187,  0.14980,  0.01334,  0.00428,  0.000,  0.01334,
 642      +0.22778,  0.22778,  0.14314,  0.01299,  0.00425,  0.000,  0.01299,
 643      +0.22386,  0.22386,  0.13698,  0.01267,  0.00422,  0.000,  0.01267/
 644       DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),K=1,19)/
 645      +0.34216,  0.34216,  0.38444,  0.01904,  0.00039,  0.000,  0.01904,
 646      +0.32956,  0.32956,  0.35137,  0.01818,  0.00135,  0.000,  0.01818,
 647      +0.31808,  0.31808,  0.32121,  0.01737,  0.00201,  0.000,  0.01737,
 648      +0.30763,  0.30763,  0.29448,  0.01662,  0.00249,  0.000,  0.01662,
 649      +0.29799,  0.29799,  0.27071,  0.01592,  0.00282,  0.000,  0.01592,
 650      +0.28911,  0.28911,  0.24976,  0.01528,  0.00306,  0.000,  0.01528,
 651      +0.28089,  0.28089,  0.23126,  0.01468,  0.00323,  0.000,  0.01468,
 652      +0.27326,  0.27326,  0.21489,  0.01412,  0.00335,  0.000,  0.01412,
 653      +0.26615,  0.26615,  0.20034,  0.01361,  0.00344,  0.000,  0.01361,
 654      +0.25947,  0.25947,  0.18731,  0.01313,  0.00349,  0.000,  0.01313,
 655      +0.25320,  0.25320,  0.17565,  0.01268,  0.00352,  0.000,  0.01268,
 656      +0.24733,  0.24733,  0.16519,  0.01227,  0.00354,  0.000,  0.01227,
 657      +0.24180,  0.24180,  0.15576,  0.01188,  0.00354,  0.000,  0.01188,
 658      +0.23653,  0.23653,  0.14719,  0.01151,  0.00353,  0.000,  0.01151,
 659      +0.23158,  0.23158,  0.13942,  0.01117,  0.00351,  0.000,  0.01117,
 660      +0.22686,  0.22686,  0.13233,  0.01084,  0.00349,  0.000,  0.01084,
 661      +0.22237,  0.22237,  0.12585,  0.01054,  0.00347,  0.000,  0.01054,
 662      +0.21812,  0.21812,  0.11991,  0.01025,  0.00344,  0.000,  0.01025,
 663      +0.21404,  0.21404,  0.11444,  0.00998,  0.00340,  0.000,  0.00998/
 664       DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),K=1,19)/
 665      +0.34067,  0.34067,  0.35551,  0.01538,  0.00033,  0.000,  0.01538,
 666      +0.32662,  0.32662,  0.32073,  0.01466,  0.00115,  0.000,  0.01466,
 667      +0.31396,  0.31396,  0.29002,  0.01397,  0.00171,  0.000,  0.01397,
 668      +0.30253,  0.30253,  0.26339,  0.01334,  0.00210,  0.000,  0.01334,
 669      +0.29208,  0.29208,  0.24015,  0.01275,  0.00237,  0.000,  0.01275,
 670      +0.28251,  0.28251,  0.21995,  0.01220,  0.00256,  0.000,  0.01220,
 671      +0.27370,  0.27370,  0.20233,  0.01169,  0.00269,  0.000,  0.01169,
 672      +0.26557,  0.26557,  0.18688,  0.01123,  0.00278,  0.000,  0.01123,
 673      +0.25802,  0.25802,  0.17329,  0.01079,  0.00284,  0.000,  0.01079,
 674      +0.25096,  0.25096,  0.16122,  0.01039,  0.00287,  0.000,  0.01039,
 675      +0.24437,  0.24437,  0.15050,  0.01001,  0.00288,  0.000,  0.01001,
 676      +0.23820,  0.23820,  0.14094,  0.00966,  0.00289,  0.000,  0.00966,
 677      +0.23242,  0.23242,  0.13237,  0.00934,  0.00288,  0.000,  0.00934,
 678      +0.22693,  0.22693,  0.12462,  0.00903,  0.00286,  0.000,  0.00903,
 679      +0.22178,  0.22178,  0.11765,  0.00875,  0.00284,  0.000,  0.00875,
 680      +0.21689,  0.21689,  0.11131,  0.00848,  0.00282,  0.000,  0.00848,
 681      +0.21226,  0.21226,  0.10554,  0.00823,  0.00279,  0.000,  0.00823,
 682      +0.20787,  0.20787,  0.10027,  0.00799,  0.00276,  0.000,  0.00799,
 683      +0.20367,  0.20367,  0.09544,  0.00776,  0.00273,  0.000,  0.00776/
 684       DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),K=1,19)/
 685      +0.33769,  0.33769,  0.32780,  0.01266,  0.00029,  0.000,  0.01266,
 686      +0.32227,  0.32227,  0.29201,  0.01205,  0.00099,  0.000,  0.01205,
 687      +0.30851,  0.30851,  0.26124,  0.01146,  0.00146,  0.000,  0.01146,
 688      +0.29619,  0.29619,  0.23506,  0.01092,  0.00178,  0.000,  0.01092,
 689      +0.28499,  0.28499,  0.21257,  0.01041,  0.00200,  0.000,  0.01041,
 690      +0.27480,  0.27480,  0.19327,  0.00993,  0.00215,  0.000,  0.00993,
 691      +0.26547,  0.26547,  0.17663,  0.00950,  0.00225,  0.000,  0.00950,
 692      +0.25689,  0.25689,  0.16218,  0.00910,  0.00232,  0.000,  0.00910,
 693      +0.24897,  0.24897,  0.14956,  0.00873,  0.00236,  0.000,  0.00873,
 694      +0.24159,  0.24159,  0.13845,  0.00839,  0.00238,  0.000,  0.00839,
 695      +0.23472,  0.23472,  0.12864,  0.00807,  0.00238,  0.000,  0.00807,
 696      +0.22832,  0.22832,  0.11996,  0.00777,  0.00238,  0.000,  0.00777,
 697      +0.22233,  0.22233,  0.11221,  0.00750,  0.00237,  0.000,  0.00750,
 698      +0.21667,  0.21667,  0.10526,  0.00724,  0.00235,  0.000,  0.00724,
 699      +0.21137,  0.21137,  0.09902,  0.00700,  0.00233,  0.000,  0.00700,
 700      +0.20635,  0.20635,  0.09338,  0.00677,  0.00230,  0.000,  0.00677,
 701      +0.20161,  0.20161,  0.08826,  0.00656,  0.00227,  0.000,  0.00656,
 702      +0.19712,  0.19712,  0.08362,  0.00636,  0.00224,  0.000,  0.00636,
 703      +0.19285,  0.19285,  0.07937,  0.00617,  0.00221,  0.000,  0.00617/
 704       DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),K=1,19)/
 705      +0.33330,  0.33330,  0.30123,  0.01046,  0.00025,  0.000,  0.01046,
 706      +0.31661,  0.31661,  0.26502,  0.00993,  0.00085,  0.000,  0.00993,
 707      +0.30183,  0.30183,  0.23458,  0.00943,  0.00124,  0.000,  0.00943,
 708      +0.28869,  0.28869,  0.20913,  0.00896,  0.00151,  0.000,  0.00896,
 709      +0.27683,  0.27683,  0.18757,  0.00852,  0.00169,  0.000,  0.00852,
 710      +0.26609,  0.26609,  0.16930,  0.00811,  0.00180,  0.000,  0.00811,
 711      +0.25631,  0.25631,  0.15370,  0.00774,  0.00188,  0.000,  0.00774,
 712      +0.24736,  0.24736,  0.14028,  0.00740,  0.00193,  0.000,  0.00740,
 713      +0.23913,  0.23913,  0.12866,  0.00708,  0.00196,  0.000,  0.00708,
 714      +0.23148,  0.23148,  0.11850,  0.00679,  0.00197,  0.000,  0.00679,
 715      +0.22440,  0.22440,  0.10960,  0.00652,  0.00197,  0.000,  0.00652,
 716      +0.21781,  0.21781,  0.10176,  0.00627,  0.00196,  0.000,  0.00627,
 717      +0.21167,  0.21167,  0.09480,  0.00604,  0.00194,  0.000,  0.00604,
 718      +0.20588,  0.20588,  0.08860,  0.00582,  0.00192,  0.000,  0.00582,
 719      +0.20048,  0.20048,  0.08305,  0.00562,  0.00190,  0.000,  0.00562,
 720      +0.19538,  0.19538,  0.07806,  0.00543,  0.00188,  0.000,  0.00543,
 721      +0.19056,  0.19056,  0.07356,  0.00525,  0.00185,  0.000,  0.00525,
 722      +0.18602,  0.18602,  0.06949,  0.00508,  0.00182,  0.000,  0.00508,
 723      +0.18170,  0.18170,  0.06578,  0.00492,  0.00180,  0.000,  0.00492/
 724       DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),K=1,19)/
 725      +0.32759,  0.32759,  0.27579,  0.00849,  0.00021,  0.000,  0.00849,
 726      +0.30970,  0.30970,  0.23961,  0.00805,  0.00072,  0.000,  0.00805,
 727      +0.29401,  0.29401,  0.20983,  0.00763,  0.00104,  0.000,  0.00763,
 728      +0.28014,  0.28014,  0.18533,  0.00723,  0.00126,  0.000,  0.00723,
 729      +0.26769,  0.26769,  0.16487,  0.00686,  0.00141,  0.000,  0.00686,
 730      +0.25649,  0.25649,  0.14771,  0.00652,  0.00150,  0.000,  0.00652,
 731      +0.24633,  0.24633,  0.13321,  0.00621,  0.00156,  0.000,  0.00621,
 732      +0.23708,  0.23708,  0.12085,  0.00593,  0.00159,  0.000,  0.00593,
 733      +0.22860,  0.22860,  0.11022,  0.00566,  0.00161,  0.000,  0.00566,
 734      +0.22075,  0.22075,  0.10100,  0.00542,  0.00161,  0.000,  0.00542,
 735      +0.21350,  0.21350,  0.09298,  0.00519,  0.00161,  0.000,  0.00519,
 736      +0.20679,  0.20679,  0.08596,  0.00498,  0.00160,  0.000,  0.00498,
 737      +0.20055,  0.20055,  0.07976,  0.00479,  0.00158,  0.000,  0.00479,
 738      +0.19468,  0.19468,  0.07426,  0.00461,  0.00156,  0.000,  0.00461,
 739      +0.18922,  0.18922,  0.06937,  0.00444,  0.00154,  0.000,  0.00444,
 740      +0.18407,  0.18407,  0.06498,  0.00428,  0.00152,  0.000,  0.00428,
 741      +0.17923,  0.17923,  0.06105,  0.00414,  0.00149,  0.000,  0.00414,
 742      +0.17467,  0.17467,  0.05750,  0.00400,  0.00147,  0.000,  0.00400,
 743      +0.17035,  0.17035,  0.05428,  0.00387,  0.00144,  0.000,  0.00387/
 744       DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),K=1,19)/
 745      +0.32060,  0.32060,  0.25146,  0.00676,  0.00018,  0.000,  0.00676,
 746      +0.30163,  0.30163,  0.21574,  0.00640,  0.00060,  0.000,  0.00640,
 747      +0.28512,  0.28512,  0.18689,  0.00606,  0.00087,  0.000,  0.00606,
 748      +0.27061,  0.27061,  0.16352,  0.00573,  0.00105,  0.000,  0.00573,
 749      +0.25767,  0.25767,  0.14425,  0.00543,  0.00116,  0.000,  0.00543,
 750      +0.24608,  0.24608,  0.12828,  0.00515,  0.00123,  0.000,  0.00515,
 751      +0.23563,  0.23563,  0.11491,  0.00489,  0.00127,  0.000,  0.00489,
 752      +0.22613,  0.22613,  0.10361,  0.00466,  0.00130,  0.000,  0.00466,
 753      +0.21747,  0.21747,  0.09397,  0.00444,  0.00131,  0.000,  0.00444,
 754      +0.20949,  0.20949,  0.08567,  0.00424,  0.00131,  0.000,  0.00424,
 755      +0.20214,  0.20214,  0.07849,  0.00406,  0.00130,  0.000,  0.00406,
 756      +0.19535,  0.19535,  0.07224,  0.00389,  0.00129,  0.000,  0.00389,
 757      +0.18906,  0.18906,  0.06676,  0.00373,  0.00127,  0.000,  0.00373,
 758      +0.18316,  0.18316,  0.06192,  0.00358,  0.00125,  0.000,  0.00358,
 759      +0.17768,  0.17768,  0.05764,  0.00345,  0.00123,  0.000,  0.00345,
 760      +0.17253,  0.17253,  0.05382,  0.00332,  0.00121,  0.000,  0.00332,
 761      +0.16770,  0.16770,  0.05041,  0.00320,  0.00119,  0.000,  0.00320,
 762      +0.16316,  0.16316,  0.04734,  0.00309,  0.00116,  0.000,  0.00309,
 763      +0.15886,  0.15886,  0.04457,  0.00298,  0.00114,  0.000,  0.00298/
 764       DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),K=1,19)/
 765      +0.31240,  0.31240,  0.22824,  0.00525,  0.00015,  0.000,  0.00525,
 766      +0.29246,  0.29246,  0.19333,  0.00498,  0.00050,  0.000,  0.00498,
 767      +0.27523,  0.27523,  0.16565,  0.00470,  0.00072,  0.000,  0.00470,
 768      +0.26018,  0.26018,  0.14355,  0.00445,  0.00086,  0.000,  0.00445,
 769      +0.24684,  0.24684,  0.12556,  0.00420,  0.00095,  0.000,  0.00420,
 770      +0.23496,  0.23496,  0.11081,  0.00398,  0.00100,  0.000,  0.00398,
 771      +0.22428,  0.22428,  0.09859,  0.00377,  0.00103,  0.000,  0.00377,
 772      +0.21462,  0.21462,  0.08834,  0.00359,  0.00104,  0.000,  0.00359,
 773      +0.20584,  0.20584,  0.07966,  0.00341,  0.00105,  0.000,  0.00341,
 774      +0.19779,  0.19779,  0.07225,  0.00325,  0.00104,  0.000,  0.00325,
 775      +0.19039,  0.19039,  0.06588,  0.00310,  0.00103,  0.000,  0.00310,
 776      +0.18358,  0.18358,  0.06037,  0.00297,  0.00102,  0.000,  0.00297,
 777      +0.17728,  0.17728,  0.05556,  0.00284,  0.00101,  0.000,  0.00284,
 778      +0.17140,  0.17140,  0.05133,  0.00273,  0.00099,  0.000,  0.00273,
 779      +0.16595,  0.16595,  0.04761,  0.00262,  0.00097,  0.000,  0.00262,
 780      +0.16084,  0.16084,  0.04431,  0.00252,  0.00095,  0.000,  0.00252,
 781      +0.15605,  0.15605,  0.04137,  0.00242,  0.00093,  0.000,  0.00242,
 782      +0.15157,  0.15157,  0.03873,  0.00234,  0.00091,  0.000,  0.00234,
 783      +0.14733,  0.14733,  0.03637,  0.00225,  0.00089,  0.000,  0.00225/
 784       DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),K=1,19)/
 785      +0.30304,  0.30304,  0.20611,  0.00395,  0.00012,  0.000,  0.00395,
 786      +0.28226,  0.28226,  0.17233,  0.00376,  0.00041,  0.000,  0.00376,
 787      +0.26441,  0.26441,  0.14602,  0.00355,  0.00059,  0.000,  0.00355,
 788      +0.24894,  0.24894,  0.12530,  0.00335,  0.00070,  0.000,  0.00335,
 789      +0.23529,  0.23529,  0.10865,  0.00317,  0.00076,  0.000,  0.00317,
 790      +0.22319,  0.22319,  0.09514,  0.00299,  0.00080,  0.000,  0.00299,
 791      +0.21236,  0.21236,  0.08405,  0.00283,  0.00082,  0.000,  0.00283,
 792      +0.20262,  0.20262,  0.07484,  0.00269,  0.00083,  0.000,  0.00269,
 793      +0.19379,  0.19379,  0.06710,  0.00255,  0.00083,  0.000,  0.00255,
 794      +0.18572,  0.18572,  0.06053,  0.00243,  0.00082,  0.000,  0.00243,
 795      +0.17833,  0.17833,  0.05492,  0.00231,  0.00081,  0.000,  0.00231,
 796      +0.17155,  0.17155,  0.05010,  0.00221,  0.00080,  0.000,  0.00221,
 797      +0.16530,  0.16530,  0.04591,  0.00211,  0.00078,  0.000,  0.00211,
 798      +0.15948,  0.15948,  0.04226,  0.00202,  0.00077,  0.000,  0.00202,
 799      +0.15410,  0.15410,  0.03905,  0.00194,  0.00075,  0.000,  0.00194,
 800      +0.14906,  0.14906,  0.03622,  0.00186,  0.00073,  0.000,  0.00186,
 801      +0.14436,  0.14436,  0.03371,  0.00179,  0.00072,  0.000,  0.00179,
 802      +0.13996,  0.13996,  0.03147,  0.00172,  0.00070,  0.000,  0.00172,
 803      +0.13582,  0.13582,  0.02947,  0.00166,  0.00068,  0.000,  0.00166/
 804       DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),K=1,19)/
 805      +0.29258,  0.29258,  0.18508,  0.00286,  0.00010,  0.000,  0.00286,
 806      +0.27107,  0.27107,  0.15270,  0.00273,  0.00033,  0.000,  0.00273,
 807      +0.25274,  0.25274,  0.12791,  0.00259,  0.00047,  0.000,  0.00259,
 808      +0.23694,  0.23694,  0.10866,  0.00245,  0.00055,  0.000,  0.00245,
 809      +0.22309,  0.22309,  0.09339,  0.00231,  0.00060,  0.000,  0.00231,
 810      +0.21086,  0.21086,  0.08113,  0.00218,  0.00063,  0.000,  0.00218,
 811      +0.19997,  0.19997,  0.07116,  0.00206,  0.00064,  0.000,  0.00206,
 812      +0.19021,  0.19021,  0.06294,  0.00195,  0.00065,  0.000,  0.00195,
 813      +0.18140,  0.18140,  0.05609,  0.00185,  0.00064,  0.000,  0.00185,
 814      +0.17337,  0.17337,  0.05033,  0.00176,  0.00064,  0.000,  0.00176,
 815      +0.16605,  0.16605,  0.04544,  0.00167,  0.00062,  0.000,  0.00167,
 816      +0.15936,  0.15936,  0.04125,  0.00159,  0.00061,  0.000,  0.00159,
 817      +0.15319,  0.15319,  0.03764,  0.00152,  0.00060,  0.000,  0.00152,
 818      +0.14748,  0.14748,  0.03451,  0.00145,  0.00059,  0.000,  0.00145,
 819      +0.14220,  0.14220,  0.03177,  0.00139,  0.00057,  0.000,  0.00139,
 820      +0.13728,  0.13728,  0.02937,  0.00133,  0.00056,  0.000,  0.00133,
 821      +0.13270,  0.13270,  0.02724,  0.00128,  0.00054,  0.000,  0.00128,
 822      +0.12842,  0.12842,  0.02536,  0.00123,  0.00053,  0.000,  0.00123,
 823      +0.12440,  0.12440,  0.02367,  0.00118,  0.00052,  0.000,  0.00118/
 824       DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),K=1,19)/
 825      +0.28106,  0.28106,  0.16514,  0.00209,  0.00008,  0.000,  0.00209,
 826      +0.25898,  0.25898,  0.13441,  0.00200,  0.00027,  0.000,  0.00200,
 827      +0.24029,  0.24029,  0.11128,  0.00190,  0.00038,  0.000,  0.00190,
 828      +0.22427,  0.22427,  0.09355,  0.00179,  0.00044,  0.000,  0.00179,
 829      +0.21030,  0.21030,  0.07966,  0.00169,  0.00048,  0.000,  0.00169,
 830      +0.19804,  0.19804,  0.06864,  0.00159,  0.00050,  0.000,  0.00159,
 831      +0.18717,  0.18717,  0.05975,  0.00150,  0.00050,  0.000,  0.00150,
 832      +0.17747,  0.17747,  0.05249,  0.00142,  0.00050,  0.000,  0.00142,
 833      +0.16874,  0.16874,  0.04649,  0.00135,  0.00050,  0.000,  0.00135,
 834      +0.16082,  0.16082,  0.04148,  0.00128,  0.00049,  0.000,  0.00128,
 835      +0.15362,  0.15362,  0.03725,  0.00121,  0.00048,  0.000,  0.00121,
 836      +0.14706,  0.14706,  0.03366,  0.00115,  0.00047,  0.000,  0.00115,
 837      +0.14103,  0.14103,  0.03058,  0.00110,  0.00046,  0.000,  0.00110,
 838      +0.13546,  0.13546,  0.02791,  0.00105,  0.00045,  0.000,  0.00105,
 839      +0.13033,  0.13033,  0.02560,  0.00100,  0.00043,  0.000,  0.00100,
 840      +0.12556,  0.12556,  0.02358,  0.00096,  0.00042,  0.000,  0.00096,
 841      +0.12113,  0.12113,  0.02180,  0.00092,  0.00041,  0.000,  0.00092,
 842      +0.11700,  0.11700,  0.02022,  0.00088,  0.00040,  0.000,  0.00088,
 843      +0.11313,  0.11313,  0.01883,  0.00085,  0.00039,  0.000,  0.00085/
 844       DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),K=1,19)/
 845      +0.25505,  0.25505,  0.12855,  0.00125,  0.00005,  0.000,  0.00125,
 846      +0.23227,  0.23227,  0.10169,  0.00120,  0.00017,  0.000,  0.00120,
 847      +0.21326,  0.21326,  0.08213,  0.00113,  0.00024,  0.000,  0.00113,
 848      +0.19717,  0.19717,  0.06753,  0.00106,  0.00028,  0.000,  0.00106,
 849      +0.18330,  0.18330,  0.05640,  0.00100,  0.00030,  0.000,  0.00100,
 850      +0.17125,  0.17125,  0.04775,  0.00093,  0.00031,  0.000,  0.00093,
 851      +0.16066,  0.16066,  0.04091,  0.00088,  0.00031,  0.000,  0.00088,
 852      +0.15129,  0.15129,  0.03542,  0.00082,  0.00031,  0.000,  0.00082,
 853      +0.14293,  0.14293,  0.03096,  0.00078,  0.00030,  0.000,  0.00078,
 854      +0.13540,  0.13540,  0.02729,  0.00073,  0.00029,  0.000,  0.00073,
 855      +0.12861,  0.12861,  0.02423,  0.00069,  0.00029,  0.000,  0.00069,
 856      +0.12245,  0.12245,  0.02167,  0.00065,  0.00028,  0.000,  0.00065,
 857      +0.11684,  0.11684,  0.01950,  0.00062,  0.00027,  0.000,  0.00062,
 858      +0.11167,  0.11167,  0.01764,  0.00059,  0.00026,  0.000,  0.00059,
 859      +0.10694,  0.10694,  0.01605,  0.00056,  0.00025,  0.000,  0.00056,
 860      +0.10257,  0.10257,  0.01466,  0.00053,  0.00024,  0.000,  0.00053,
 861      +0.09853,  0.09853,  0.01346,  0.00051,  0.00024,  0.000,  0.00051,
 862      +0.09478,  0.09478,  0.01240,  0.00049,  0.00023,  0.000,  0.00049,
 863      +0.09128,  0.09128,  0.01147,  0.00047,  0.00022,  0.000,  0.00047/
 864       DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),K=1,19)/
 865      +0.22539,  0.22539,  0.09632,  0.00064,  0.00003,  0.000,  0.00064,
 866      +0.20257,  0.20257,  0.07383,  0.00061,  0.00010,  0.000,  0.00061,
 867      +0.18383,  0.18383,  0.05802,  0.00058,  0.00014,  0.000,  0.00058,
 868      +0.16817,  0.16817,  0.04656,  0.00054,  0.00016,  0.000,  0.00054,
 869      +0.15484,  0.15484,  0.03806,  0.00050,  0.00017,  0.000,  0.00050,
 870      +0.14338,  0.14338,  0.03161,  0.00047,  0.00017,  0.000,  0.00047,
 871      +0.13342,  0.13342,  0.02661,  0.00044,  0.00017,  0.000,  0.00044,
 872      +0.12468,  0.12468,  0.02267,  0.00041,  0.00017,  0.000,  0.00041,
 873      +0.11695,  0.11695,  0.01954,  0.00039,  0.00016,  0.000,  0.00039,
 874      +0.11005,  0.11005,  0.01699,  0.00036,  0.00016,  0.000,  0.00036,
 875      +0.10386,  0.10386,  0.01491,  0.00034,  0.00015,  0.000,  0.00034,
 876      +0.09830,  0.09830,  0.01319,  0.00032,  0.00015,  0.000,  0.00032,
 877      +0.09326,  0.09326,  0.01174,  0.00030,  0.00014,  0.000,  0.00030,
 878      +0.08865,  0.08865,  0.01053,  0.00029,  0.00014,  0.000,  0.00029,
 879      +0.08446,  0.08446,  0.00949,  0.00027,  0.00013,  0.000,  0.00027,
 880      +0.08061,  0.08061,  0.00860,  0.00026,  0.00013,  0.000,  0.00026,
 881      +0.07706,  0.07706,  0.00784,  0.00024,  0.00012,  0.000,  0.00024,
 882      +0.07379,  0.07379,  0.00717,  0.00023,  0.00012,  0.000,  0.00023,
 883      +0.07076,  0.07076,  0.00659,  0.00022,  0.00011,  0.000,  0.00022/
 884       DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),K=1,19)/
 885      +0.19244,  0.19244,  0.06849,  0.00023,  0.00002,  0.000,  0.00023,
 886      +0.17036,  0.17036,  0.05066,  0.00023,  0.00005,  0.000,  0.00023,
 887      +0.15253,  0.15253,  0.03859,  0.00022,  0.00007,  0.000,  0.00022,
 888      +0.13786,  0.13786,  0.03013,  0.00020,  0.00008,  0.000,  0.00020,
 889      +0.12553,  0.12553,  0.02404,  0.00019,  0.00008,  0.000,  0.00019,
 890      +0.11506,  0.11506,  0.01953,  0.00018,  0.00008,  0.000,  0.00018,
 891      +0.10606,  0.10606,  0.01612,  0.00017,  0.00008,  0.000,  0.00017,
 892      +0.09825,  0.09825,  0.01349,  0.00016,  0.00008,  0.000,  0.00016,
 893      +0.09141,  0.09141,  0.01144,  0.00014,  0.00007,  0.000,  0.00014,
 894      +0.08535,  0.08535,  0.00981,  0.00014,  0.00007,  0.000,  0.00014,
 895      +0.07997,  0.07997,  0.00849,  0.00013,  0.00007,  0.000,  0.00013,
 896      +0.07516,  0.07516,  0.00741,  0.00012,  0.00006,  0.000,  0.00012,
 897      +0.07084,  0.07084,  0.00653,  0.00011,  0.00006,  0.000,  0.00011,
 898      +0.06693,  0.06693,  0.00579,  0.00010,  0.00006,  0.000,  0.00010,
 899      +0.06338,  0.06338,  0.00517,  0.00010,  0.00006,  0.000,  0.00010,
 900      +0.06015,  0.06015,  0.00465,  0.00009,  0.00005,  0.000,  0.00009,
 901      +0.05719,  0.05719,  0.00420,  0.00009,  0.00005,  0.000,  0.00009,
 902      +0.05448,  0.05448,  0.00381,  0.00008,  0.00005,  0.000,  0.00008,
 903      +0.05198,  0.05198,  0.00348,  0.00008,  0.00005,  0.000,  0.00008/
 904       DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),K=1,19)/
 905      +0.15661,  0.15661,  0.04516,  0.00009,  0.00001,  0.000,  0.00009,
 906      +0.13618,  0.13618,  0.03203,  0.00009,  0.00002,  0.000,  0.00009,
 907      +0.11998,  0.11998,  0.02351,  0.00009,  0.00003,  0.000,  0.00009,
 908      +0.10688,  0.10688,  0.01778,  0.00008,  0.00003,  0.000,  0.00008,
 909      +0.09605,  0.09605,  0.01377,  0.00008,  0.00004,  0.000,  0.00008,
 910      +0.08698,  0.08698,  0.01089,  0.00007,  0.00003,  0.000,  0.00007,
 911      +0.07928,  0.07928,  0.00879,  0.00006,  0.00003,  0.000,  0.00006,
 912      +0.07267,  0.07267,  0.00720,  0.00006,  0.00003,  0.000,  0.00006,
 913      +0.06695,  0.06695,  0.00599,  0.00006,  0.00003,  0.000,  0.00006,
 914      +0.06195,  0.06195,  0.00504,  0.00005,  0.00003,  0.000,  0.00005,
 915      +0.05754,  0.05754,  0.00430,  0.00005,  0.00003,  0.000,  0.00005,
 916      +0.05364,  0.05364,  0.00370,  0.00004,  0.00003,  0.000,  0.00004,
 917      +0.05016,  0.05016,  0.00321,  0.00004,  0.00002,  0.000,  0.00004,
 918      +0.04704,  0.04704,  0.00281,  0.00004,  0.00002,  0.000,  0.00004,
 919      +0.04424,  0.04424,  0.00248,  0.00004,  0.00002,  0.000,  0.00004,
 920      +0.04170,  0.04170,  0.00221,  0.00003,  0.00002,  0.000,  0.00003,
 921      +0.03939,  0.03939,  0.00198,  0.00003,  0.00002,  0.000,  0.00003,
 922      +0.03729,  0.03729,  0.00178,  0.00003,  0.00002,  0.000,  0.00003,
 923      +0.03536,  0.03536,  0.00161,  0.00003,  0.00002,  0.000,  0.00003/
 924       DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),K=1,19)/
 925      +0.11838,  0.11838,  0.02641,  0.00003,  0.000,  0.000,  0.00003,
 926      +0.10062,  0.10062,  0.01777,  0.00003,  0.00001,  0.000,  0.00003,
 927      +0.08688,  0.08688,  0.01245,  0.00003,  0.00001,  0.000,  0.00003,
 928      +0.07599,  0.07599,  0.00905,  0.00003,  0.00001,  0.000,  0.00003,
 929      +0.06717,  0.06717,  0.00676,  0.00002,  0.00001,  0.000,  0.00002,
 930      +0.05990,  0.05990,  0.00518,  0.00002,  0.00001,  0.000,  0.00002,
 931      +0.05383,  0.05383,  0.00406,  0.00002,  0.00001,  0.000,  0.00002,
 932      +0.04870,  0.04870,  0.00324,  0.00002,  0.00001,  0.000,  0.00002,
 933      +0.04432,  0.04432,  0.00263,  0.00002,  0.00001,  0.000,  0.00002,
 934      +0.04053,  0.04053,  0.00217,  0.00001,  0.00001,  0.000,  0.00001,
 935      +0.03724,  0.03724,  0.00181,  0.00001,  0.00001,  0.000,  0.00001,
 936      +0.03436,  0.03436,  0.00154,  0.00001,  0.00001,  0.000,  0.00001,
 937      +0.03182,  0.03182,  0.00131,  0.00001,  0.00001,  0.000,  0.00001,
 938      +0.02957,  0.02957,  0.00113,  0.00001,  0.00001,  0.000,  0.00001,
 939      +0.02756,  0.02756,  0.00099,  0.00001,  0.00001,  0.000,  0.00001,
 940      +0.02575,  0.02575,  0.00087,  0.00001,  0.00001,  0.000,  0.00001,
 941      +0.02413,  0.02413,  0.00077,  0.00001,  0.00001,  0.000,  0.00001,
 942      +0.02267,  0.02267,  0.00068,  0.00001,  0.00001,  0.000,  0.00001,
 943      +0.02134,  0.02134,  0.00061,  0.00001,  0.000,  0.000,  0.00001/
 944       DATA ((F(I,47,K),I=1,5),F(7,47,K),F(6,47,K),K=1,19)/
 945      +0.07838,  0.07838,  0.01240,  0.000,  0.000,  0.000,  0.000,
 946      +0.06456,  0.06456,  0.00776,  0.000,  0.000,  0.000,  0.000,
 947      +0.05420,  0.05420,  0.00512,  0.000,  0.000,  0.000,  0.000,
 948      +0.04623,  0.04623,  0.00352,  0.000,  0.000,  0.000,  0.000,
 949      +0.03993,  0.03993,  0.00250,  0.000,  0.000,  0.000,  0.000,
 950      +0.03487,  0.03487,  0.00184,  0.000,  0.000,  0.000,  0.000,
 951      +0.03073,  0.03073,  0.00139,  0.000,  0.000,  0.000,  0.000,
 952      +0.02731,  0.02731,  0.00107,  0.000,  0.000,  0.000,  0.000,
 953      +0.02443,  0.02443,  0.00084,  0.000,  0.000,  0.000,  0.000,
 954      +0.02199,  0.02199,  0.00068,  0.000,  0.000,  0.000,  0.000,
 955      +0.01991,  0.01991,  0.00055,  0.000,  0.000,  0.000,  0.000,
 956      +0.01811,  0.01811,  0.00046,  0.000,  0.000,  0.000,  0.000,
 957      +0.01655,  0.01655,  0.00038,  0.000,  0.000,  0.000,  0.000,
 958      +0.01518,  0.01518,  0.00032,  0.000,  0.000,  0.000,  0.000,
 959      +0.01397,  0.01397,  0.00028,  0.000,  0.000,  0.000,  0.000,
 960      +0.01291,  0.01291,  0.00024,  0.000,  0.000,  0.000,  0.000,
 961      +0.01196,  0.01196,  0.00021,  0.000,  0.000,  0.000,  0.000,
 962      +0.01111,  0.01111,  0.00019,  0.000,  0.000,  0.000,  0.000,
 963      +0.01035,  0.01035,  0.00016,  0.000,  0.000,  0.000,  0.000/
 964       DATA ((F(I,48,K),I=1,5),F(7,48,K),F(6,48,K),K=1,19)/
 965      +0.03767,  0.03767,  0.00340,  0.000,  0.000,  0.000,  0.000,
 966      +0.02943,  0.02943,  0.00189,  0.000,  0.000,  0.000,  0.000,
 967      +0.02358,  0.02358,  0.00113,  0.000,  0.000,  0.000,  0.000,
 968      +0.01928,  0.01928,  0.00071,  0.000,  0.000,  0.000,  0.000,
 969      +0.01602,  0.01602,  0.00047,  0.000,  0.000,  0.000,  0.000,
 970      +0.01351,  0.01351,  0.00032,  0.000,  0.000,  0.000,  0.000,
 971      +0.01152,  0.01152,  0.00023,  0.000,  0.000,  0.000,  0.000,
 972      +0.00993,  0.00993,  0.00016,  0.000,  0.000,  0.000,  0.000,
 973      +0.00864,  0.00864,  0.00012,  0.000,  0.000,  0.000,  0.000,
 974      +0.00757,  0.00757,  0.00010,  0.000,  0.000,  0.000,  0.000,
 975      +0.00668,  0.00668,  0.00007,  0.000,  0.000,  0.000,  0.000,
 976      +0.00594,  0.00594,  0.00006,  0.000,  0.000,  0.000,  0.000,
 977      +0.00530,  0.00530,  0.00005,  0.000,  0.000,  0.000,  0.000,
 978      +0.00476,  0.00476,  0.00004,  0.000,  0.000,  0.000,  0.000,
 979      +0.00430,  0.00430,  0.00003,  0.000,  0.000,  0.000,  0.000,
 980      +0.00389,  0.00389,  0.00003,  0.000,  0.000,  0.000,  0.000,
 981      +0.00354,  0.00354,  0.00002,  0.000,  0.000,  0.000,  0.000,
 982      +0.00323,  0.00323,  0.00002,  0.000,  0.000,  0.000,  0.000,
 983      +0.00296,  0.00296,  0.00002,  0.000,  0.000,  0.000,  0.000/
 984       DATA ((F(I,49,K),I=1,5),F(7,49,K),F(6,49,K),K=1,19)/
 985      +0.01778,  0.01778,  0.00094,  0.000,  0.000,  0.000,  0.000,
 986      +0.01319,  0.01319,  0.00046,  0.000,  0.000,  0.000,  0.000,
 987      +0.01008,  0.01008,  0.00025,  0.000,  0.000,  0.000,  0.000,
 988      +0.00791,  0.00791,  0.00014,  0.000,  0.000,  0.000,  0.000,
 989      +0.00633,  0.00633,  0.00009,  0.000,  0.000,  0.000,  0.000,
 990      +0.00515,  0.00515,  0.00006,  0.000,  0.000,  0.000,  0.000,
 991      +0.00426,  0.00426,  0.00004,  0.000,  0.000,  0.000,  0.000,
 992      +0.00356,  0.00356,  0.00003,  0.000,  0.000,  0.000,  0.000,
 993      +0.00301,  0.00301,  0.00002,  0.000,  0.000,  0.000,  0.000,
 994      +0.00257,  0.00257,  0.00001,  0.000,  0.000,  0.000,  0.000,
 995      +0.00221,  0.00221,  0.00001,  0.000,  0.000,  0.000,  0.000,
 996      +0.00192,  0.00192,  0.00001,  0.000,  0.000,  0.000,  0.000,
 997      +0.00168,  0.00168,  0.00001,  0.000,  0.000,  0.000,  0.000,
 998      +0.00148,  0.00148,  0.00001,  0.000,  0.000,  0.000,  0.000,
 999      +0.00130,  0.00130,  0.000,  0.000,  0.000,  0.000,  0.000,
1000      +0.00116,  0.00116,  0.000,  0.000,  0.000,  0.000,  0.000,
1001      +0.00104,  0.00104,  0.000,  0.000,  0.000,  0.000,  0.000,
1002      +0.00093,  0.00093,  0.000,  0.000,  0.000,  0.000,  0.000,
1003      +0.00084,  0.00084,  0.000,  0.000,  0.000,  0.000,  0.000/
1004       DATA ((F(I,50,K),I=1,5),F(7,50,K),F(6,50,K),K=1,19)/
1005      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1006      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1007      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1008      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1009      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1010      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1011      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1012      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1013      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1014      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1015      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1016      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1017      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1018      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1019      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1020      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1021      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1022      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1023      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000/
1024       DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5,
1025      .        1.D-4,2.D-4,4.D-4,6.D-4,8.D-4,
1026      .        1.D-3,2.D-3,4.D-3,6.D-3,8.D-3,
1027      .        1.D-2,2.D-2,4.D-2,6.D-2,8.D-2,
1028      .     .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0,
1029      .     .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0,
1030      .     .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0,
1031      .     .8D0,.85D0,.9D0,.95D0,.975D0,1.D0/
1032       DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/
1033       DATA N0/0,0,3,5,0,5,0/
1034       DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
1035       DATA INIT/0/
1036       XSAVE=X
1037       IF(INIT.NE.0) GOTO 10
1038       INIT=1
1039       DO 20 N=1,NX-1
1040       DO 20 M=1,NQ
1041 C     READ(103,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),
1042 C    .          F(6,N,M)
1043 C 1=UV 2=DV 3=GLUE 4=(UBAR+DBAR)/2 5=CBAR 7=BBAR 6=SBAR
1044          DO 25 I=1,7
1045   25     F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
1046   20  CONTINUE
1047       DO 30 J=1,NTENTH-1
1048       XX(J)= LOG10(XX(J))+ONEDO
1049       DO 30 I=2,6
1050       DO 30 K=1,NQ
1051   30  F(I,J,K)= LOG(F(I,J,K))*F(I,NTENTH,K)/ LOG(F(I,NTENTH,K))
1052   50  FORMAT(7F10.5)
1053       DO 40 I=1,7
1054       DO 40 M=1,NQ
1055   40  F(I,NX,M)=ZEROD
1056   10  CONTINUE
1057       IF(X.LT.XMIN) X=XMIN
1058       IF(X.GT.XMAX) X=XMAX
1059       QSQ=SCALE**2
1060       IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
1061       IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
1062       XXX=X
1063       IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
1064       N=0
1065   70  N=N+1
1066       IF(XXX.GT.XX(N+1)) GOTO 70
1067       A=(XXX-XX(N))/(XX(N+1)-XX(N))
1068       RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
1069       B=RM-AINT(RM)
1070       M=1+  INT(RM)
1071       DO 60 I=1,7
1072       G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
1073      .    + A*(ONED-B)*F(I,N+1,M)  + A*B*F(I,N+1,M+1)
1074       IF(N.GE.NTENTH) GOTO 65
1075       IF(I.EQ.7.OR.I.EQ.1) GOTO 65
1076           FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
1077           G(I)=FAC**(G(I)/FAC)
1078   65  CONTINUE
1079       G(I)=G(I)*(ONED-X)**N0(I)
1080   60  CONTINUE
1081 C UPBAR DISTRIBUTION = D DISTRIBUTION
1082       UPV=G(2)
1083       DNV=G(2)
1084 C THIS SEA IS (UBAR+DBAR)/2
1085       SEA=G(4)
1086       STR=G(6)
1087       CHM=G(5)
1088       GLU=G(3)
1089       BOT=G(7)
1090       X=XSAVE
1091       RETURN
1092       END