]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - PDF/spdf/sfmsbs0.F
This commit was generated by cvs2svn to compensate for changes in r2,
[u/mrichter/AliRoot.git] / PDF / spdf / sfmsbs0.F
diff --git a/PDF/spdf/sfmsbs0.F b/PDF/spdf/sfmsbs0.F
new file mode 100644 (file)
index 0000000..c280f39
--- /dev/null
@@ -0,0 +1,1981 @@
+*
+* $Id$
+*
+* $Log$
+* Revision 1.1.1.2  1996/10/30 08:30:25  cernlib
+* Version 7.04
+*
+* Revision 1.1.1.1  1996/04/12 15:29:44  plothow
+* Version 7.01
+*
+*
+#include "pdf/pilot.h"
+      SUBROUTINE SFMSBS0(X,SCALE,UPV,DNV,USEA,DSEA,STR,CHM,BOT,GLU)
+
+C     THIS IS THE NEW  FIT "S0'" 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.01617,   0.00043,   4.29007,   0.44145,   0.04538,
+     +    0.00000,   0.24629,   0.44523,
+     +    0.01671,   0.00055,  10.96969,   0.61931,   0.22312,
+     +    0.00000,   0.42415,   0.62282,
+     +    0.01720,   0.00066,  19.87027,   0.85311,   0.45682,
+     +    0.00000,   0.65797,   0.85638,
+     +    0.01765,   0.00076,  30.53786,   1.13684,   0.74046,
+     +    0.00000,   0.94171,   1.13989,
+     +    0.01807,   0.00087,  42.94975,   1.46773,   1.07126,
+     +    0.07130,   1.27262,   1.47058,
+     +    0.01847,   0.00097,  56.89287,   1.84230,   1.44576,
+     +    0.40611,   1.64721,   1.84497,
+     +    0.01884,   0.00107,  72.20888,   2.25870,   1.86210,
+     +    0.83810,   2.06364,   2.26120 /
+        DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=8,14)/
+     +    0.01919,   0.00117,  88.74004,   2.71380,   2.31713,
+     +    1.30203,   2.51876,   2.71614,
+     +    0.01953,   0.00126, 106.35173,   3.20452,   2.80781,
+     +    1.80186,   3.00951,   3.20672,
+     +    0.01986,   0.00136, 124.94041,   3.72853,   3.33177,
+     +    2.33410,   3.53354,   3.73058,
+     +    0.02017,   0.00145, 144.43050,   4.28397,   3.88717,
+     +    2.89732,   4.08902,   4.28589,
+     +    0.02047,   0.00154, 164.67508,   4.86751,   4.47068,
+     +    3.48814,   4.67259,   4.86931,
+     +    0.02076,   0.00164, 185.36879,   5.47220,   5.07534,
+     +    4.09972,   5.27732,   5.47389,
+     +    0.02105,   0.00173, 206.77844,   6.10353,   5.70665,
+     +    4.73755,   5.90868,   6.10511 /
+        DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),F(8,1,K),K=15,19)/
+     +    0.02132,   0.00181, 228.74190,   6.75789,   6.36099,
+     +    5.39807,   6.56308,   6.75937,
+     +    0.02158,   0.00190, 250.89102,   7.42630,   7.02939,
+     +    6.07236,   7.23153,   7.42768,
+     +    0.02184,   0.00199, 273.72388,   8.12013,   7.72321,
+     +    6.77177,   7.92540,   8.12142,
+     +    0.02209,   0.00207, 296.51294,   8.82216,   8.42522,
+     +    7.47914,   8.62746,   8.82341,
+     +    0.02234,   0.00216, 319.87012,   9.54651,   9.14956,
+     +    8.20858,   9.35184,   9.54765 /
+        DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=1,7)/
+     +    0.02044,   0.00076,   4.15525,   0.43499,   0.04152,
+     +    0.00000,   0.24004,   0.43721,
+     +    0.02116,   0.00094,   9.97353,   0.59330,   0.20000,
+     +    0.00000,   0.39847,   0.59531,
+     +    0.02180,   0.00111,  17.40932,   0.79496,   0.40181,
+     +    0.00000,   0.60024,   0.79679,
+     +    0.02239,   0.00128,  26.05307,   1.03357,   0.64057,
+     +    0.00000,   0.83895,   1.03523,
+     +    0.02294,   0.00145,  35.86687,   1.30602,   0.91315,
+     +    0.05842,   1.11150,   1.30754,
+     +    0.02346,   0.00160,  46.66591,   1.60894,   1.21621,
+     +    0.32968,   1.41453,   1.61033,
+     +    0.02394,   0.00176,  58.31686,   1.94046,   1.54786,
+     +    0.67492,   1.74614,   1.94172 /
+        DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=8,14)/
+     +    0.02440,   0.00191,  70.69380,   2.29779,   1.90531,
+     +    1.04033,   2.10357,   2.29894,
+     +    0.02484,   0.00206,  83.69286,   2.67834,   2.28598,
+     +    1.42913,   2.48420,   2.67938,
+     +    0.02527,   0.00220,  97.23682,   3.08012,   2.68789,
+     +    1.83841,   2.88608,   3.08106,
+     +    0.02567,   0.00235, 111.27097,   3.50165,   3.10953,
+     +    2.26700,   3.30770,   3.50249,
+     +    0.02606,   0.00249, 125.68950,   3.94030,   3.54830,
+     +    2.71229,   3.74644,   3.94106,
+     +    0.02643,   0.00262, 140.27441,   4.39086,   3.99898,
+     +    3.16911,   4.19709,   4.39155,
+     +    0.02680,   0.00276, 155.22566,   4.85745,   4.46568,
+     +    3.64162,   4.66376,   4.85805 /
+        DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),F(8,2,K),K=15,19)/
+     +    0.02715,   0.00289, 170.42952,   5.33739,   4.94573,
+     +    4.12717,   5.14378,   5.33791,
+     +    0.02749,   0.00302, 185.62794,   5.82406,   5.43251,
+     +    4.61919,   5.63053,   5.82452,
+     +    0.02782,   0.00315, 201.18080,   6.32589,   5.93445,
+     +    5.12611,   6.13245,   6.32628,
+     +    0.02814,   0.00328, 216.57881,   6.83031,   6.43898,
+     +    5.63539,   6.63695,   6.83065,
+     +    0.02845,   0.00340, 232.25766,   7.34768,   6.95646,
+     +    6.15741,   7.15440,   7.34797 /
+        DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=1,7)/
+     +    0.02575,   0.00132,   4.02437,   0.42807,   0.03775,
+     +    0.00000,   0.23383,   0.42912,
+     +    0.02668,   0.00161,   9.06631,   0.56800,   0.17817,
+     +    0.00000,   0.37402,   0.56893,
+     +    0.02752,   0.00189,  15.24934,   0.74075,   0.35135,
+     +    0.00000,   0.54700,   0.74156,
+     +    0.02830,   0.00216,  22.21999,   0.94009,   0.55110,
+     +    0.00000,   0.74656,   0.94081,
+     +    0.02901,   0.00241,  29.94127,   1.16300,   0.77438,
+     +    0.04760,   0.96967,   1.16363,
+     +    0.02967,   0.00266,  38.26198,   1.40646,   1.01820,
+     +    0.26617,   1.21333,   1.40701,
+     +    0.03030,   0.00290,  47.07710,   1.66879,   1.28086,
+     +    0.54061,   1.47584,   1.66926 /
+        DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=8,14)/
+     +    0.03089,   0.00313,  56.29138,   1.94768,   1.56006,
+     +    0.82692,   1.75490,   1.94808,
+     +    0.03146,   0.00335,  65.82938,   2.24101,   1.85370,
+     +    1.12776,   2.04840,   2.24135,
+     +    0.03200,   0.00358,  75.63731,   2.54724,   2.16023,
+     +    1.44084,   2.35479,   2.54752,
+     +    0.03252,   0.00379,  85.67871,   2.86522,   2.47850,
+     +    1.76527,   2.67293,   2.86545,
+     +    0.03302,   0.00400,  95.88033,   3.19300,   2.80655,
+     +    2.09910,   3.00086,   3.19316,
+     +    0.03350,   0.00421, 106.08917,   3.52670,   3.14052,
+     +    2.43852,   3.33471,   3.52682,
+     +    0.03396,   0.00441, 116.45706,   3.86944,   3.48352,
+     +    2.78668,   3.67759,   3.86952 /
+        DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),F(8,3,K),K=15,19)/
+     +    0.03441,   0.00461, 126.90576,   4.21930,   3.83364,
+     +    3.14167,   4.02759,   4.21934,
+     +    0.03484,   0.00480, 137.25620,   4.57147,   4.18605,
+     +    3.49873,   4.37990,   4.57146,
+     +    0.03526,   0.00500, 147.76971,   4.93218,   4.54701,
+     +    3.86410,   4.74075,   4.93214,
+     +    0.03567,   0.00518, 158.09094,   5.29236,   4.90742,
+     +    4.22873,   5.10105,   5.29228,
+     +    0.03606,   0.00537, 168.53088,   5.65957,   5.27486,
+     +    4.60020,   5.46839,   5.65946 /
+        DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=1,7)/
+     +    0.02941,   0.00183,   3.94949,   0.42374,   0.03559,
+     +    0.00000,   0.23020,   0.42431,
+     +    0.03050,   0.00221,   8.57318,   0.55344,   0.16597,
+     +    0.00000,   0.36025,   0.55393,
+     +    0.03148,   0.00258,  14.10938,   0.71066,   0.32380,
+     +    0.00000,   0.51778,   0.71107,
+     +    0.03237,   0.00292,  20.23964,   0.88946,   0.50316,
+     +    0.00000,   0.69687,   0.88981,
+     +    0.03320,   0.00325,  26.93188,   1.08699,   0.70121,
+     +    0.04209,   0.89467,   1.08729,
+     +    0.03396,   0.00357,  34.05507,   1.30051,   0.91522,
+     +    0.23417,   1.10844,   1.30076,
+     +    0.03469,   0.00388,  41.52043,   1.52850,   1.14368,
+     +    0.47344,   1.33668,   1.52870 /
+        DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=8,14)/
+     +    0.03538,   0.00417,  49.24931,   1.76894,   1.38456,
+     +    0.72097,   1.57735,   1.76910,
+     +    0.03603,   0.00446,  57.18089,   2.02001,   1.63606,
+     +    0.97916,   1.82864,   2.02014,
+     +    0.03665,   0.00474,  65.27330,   2.28041,   1.89686,
+     +    1.24606,   2.08925,   2.28050,
+     +    0.03725,   0.00502,  73.49934,   2.54917,   2.16600,
+     +    1.52094,   2.35820,   2.54922,
+     +    0.03783,   0.00529,  81.80083,   2.82466,   2.44187,
+     +    1.80219,   2.63389,   2.82468,
+     +    0.03838,   0.00555,  90.05473,   3.10367,   2.72124,
+     +    2.08664,   2.91309,   3.10366,
+     +    0.03891,   0.00580,  98.39052,   3.38887,   3.00679,
+     +    2.37699,   3.19847,   3.38883 /
+        DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),F(8,4,K),K=15,19)/
+     +    0.03942,   0.00605, 106.74629,   3.67867,   3.29694,
+     +    2.67168,   3.48845,   3.67861,
+     +    0.03992,   0.00630, 114.97829,   3.96912,   3.58773,
+     +    2.96679,   3.77908,   3.96905,
+     +    0.04040,   0.00654, 123.30289,   4.26547,   3.88439,
+     +    3.26757,   4.07559,   4.26536,
+     +    0.04087,   0.00677, 131.43361,   4.56018,   4.17942,
+     +    3.56652,   4.37047,   4.56006,
+     +    0.04132,   0.00700, 139.62538,   4.85961,   4.47916,
+     +    3.87001,   4.67006,   4.85947 /
+        DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=1,7)/
+     +    0.03229,   0.00231,   3.89704,   0.42051,   0.03407,
+     +    0.00000,   0.22762,   0.42084,
+     +    0.03350,   0.00277,   8.23885,   0.54318,   0.15756,
+     +    0.00000,   0.35070,   0.54345,
+     +    0.03458,   0.00321,  13.35069,   0.68995,   0.30507,
+     +    0.00000,   0.49784,   0.69017,
+     +    0.03557,   0.00362,  18.93910,   0.85517,   0.47098,
+     +    0.00000,   0.66341,   0.85536,
+     +    0.03649,   0.00402,  24.97672,   1.03614,   0.65258,
+     +    0.03852,   0.84470,   1.03629,
+     +    0.03734,   0.00440,  31.34653,   1.23034,   0.84737,
+     +    0.21350,   1.03920,   1.23046,
+     +    0.03814,   0.00477,  37.97078,   1.43638,   1.05396,
+     +    0.43028,   1.24552,   1.43647 /
+        DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=8,14)/
+     +    0.03890,   0.00512,  44.78175,   1.65243,   1.27055,
+     +    0.65319,   1.46184,   1.65250,
+     +    0.03962,   0.00546,  51.72809,   1.87688,   1.49551,
+     +    0.88451,   1.68655,   1.87693,
+     +    0.04031,   0.00580,  58.77548,   2.10858,   1.72769,
+     +    1.12249,   1.91850,   2.10861,
+     +    0.04097,   0.00612,  65.90230,   2.34669,   1.96627,
+     +    1.36652,   2.15685,   2.34670,
+     +    0.04160,   0.00644,  73.05998,   2.58980,   2.20983,
+     +    1.61519,   2.40019,   2.58980,
+     +    0.04221,   0.00675,  80.14357,   2.83511,   2.45557,
+     +    1.86575,   2.64571,   2.83509,
+     +    0.04280,   0.00705,  87.26857,   3.08500,   2.70588,
+     +    2.12062,   2.89582,   3.08496 /
+        DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),F(8,5,K),K=15,19)/
+     +    0.04336,   0.00734,  94.38304,   3.33811,   2.95939,
+     +    2.37844,   3.14913,   3.33805,
+     +    0.04391,   0.00763, 101.36421,   3.59099,   3.21267,
+     +    2.63584,   3.40222,   3.59093,
+     +    0.04444,   0.00791, 108.40167,   3.84828,   3.47035,
+     +    2.89741,   3.65971,   3.84821,
+     +    0.04496,   0.00819, 115.24945,   4.10343,   3.72587,
+     +    3.15667,   3.91505,   4.10335,
+     +    0.04545,   0.00846, 122.12920,   4.36202,   3.98482,
+     +    3.41918,   4.17382,   4.36193 /
+        DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=1,7)/
+     +    0.03470,   0.00276,   3.85671,   0.41791,   0.03290,
+     +    0.00000,   0.22560,   0.41809,
+     +    0.03600,   0.00330,   7.98792,   0.53524,   0.15118,
+     +    0.00000,   0.34340,   0.53539,
+     +    0.03717,   0.00381,  12.78898,   0.67423,   0.29101,
+     +    0.00000,   0.48281,   0.67435,
+     +    0.03824,   0.00428,  17.98566,   0.82945,   0.44701,
+     +    0.00000,   0.63843,   0.82955,
+     +    0.03923,   0.00474,  23.55469,   0.99835,   0.61663,
+     +    0.03592,   0.80769,   0.99843,
+     +    0.04015,   0.00517,  29.38963,   1.17857,   0.79752,
+     +    0.19855,   0.98825,   1.17864,
+     +    0.04102,   0.00559,  35.42102,   1.36884,   0.98842,
+     +    0.39916,   1.17884,   1.36889 /
+        DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=8,14)/
+     +    0.04184,   0.00600,  41.58891,   1.56747,   1.18766,
+     +    0.60449,   1.37778,   1.56752,
+     +    0.04262,   0.00639,  47.84892,   1.77301,   1.39377,
+     +    0.81671,   1.58360,   1.77304,
+     +    0.04336,   0.00677,  54.17197,   1.98441,   1.60572,
+     +    1.03422,   1.79528,   1.98444,
+     +    0.04407,   0.00714,  60.54033,   2.20094,   1.82278,
+     +    1.25652,   2.01208,   2.20096,
+     +    0.04475,   0.00750,  66.91216,   2.42134,   2.04369,
+     +    1.48234,   2.23273,   2.42135,
+     +    0.04541,   0.00785,  73.19493,   2.64308,   2.26592,
+     +    1.70920,   2.45472,   2.64309,
+     +    0.04604,   0.00819,  79.49432,   2.86836,   2.49168,
+     +    1.93933,   2.68024,   2.86836 /
+        DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),F(8,6,K),K=15,19)/
+     +    0.04665,   0.00853,  85.76529,   3.09598,   2.71975,
+     +    2.17155,   2.90809,   3.09597,
+     +    0.04724,   0.00885,  91.89941,   3.32285,   2.94706,
+     +    2.40281,   3.13518,   3.32284,
+     +    0.04781,   0.00917,  98.06761,   3.55316,   3.17780,
+     +    2.63730,   3.36571,   3.55315,
+     +    0.04837,   0.00948, 104.05170,   3.78104,   3.40611,
+     +    2.86919,   3.59381,   3.78103,
+     +    0.04890,   0.00978, 110.05058,   4.01155,   3.63702,
+     +    3.10353,   3.82452,   4.01153 /
+        DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=1,7)/
+     +    0.04319,   0.00481,   3.73301,   0.40917,   0.02934,
+     +    0.00000,   0.21920,   0.40913,
+     +    0.04484,   0.00566,   7.25156,   0.51059,   0.13209,
+     +    0.00000,   0.32129,   0.51057,
+     +    0.04632,   0.00645,  11.17987,   0.62704,   0.24974,
+     +    0.00000,   0.43834,   0.62704,
+     +    0.04768,   0.00719,  15.30139,   0.75396,   0.37776,
+     +    0.00000,   0.56582,   0.75399,
+     +    0.04893,   0.00789,  19.60672,   0.88928,   0.51408,
+     +    0.02874,   0.70164,   0.88933,
+     +    0.05009,   0.00855,  24.02007,   1.03116,   0.65691,
+     +    0.15752,   0.84400,   1.03124,
+     +    0.05118,   0.00919,  28.49510,   1.17867,   0.80531,
+     +    0.31428,   0.99195,   1.17877 /
+        DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=8,14)/
+     +    0.05222,   0.00980,  32.99355,   1.33058,   0.95805,
+     +    0.47242,   1.14428,   1.33069,
+     +    0.05320,   0.01039,  37.48895,   1.48582,   1.11409,
+     +    0.63383,   1.29992,   1.48595,
+     +    0.05414,   0.01096,  41.96594,   1.64368,   1.27273,
+     +    0.79737,   1.45817,   1.64384,
+     +    0.05503,   0.01151,  46.41725,   1.80370,   1.43348,
+     +    0.96273,   1.61855,   1.80387,
+     +    0.05589,   0.01204,  50.81726,   1.96501,   1.59549,
+     +    1.12906,   1.78021,   1.96520,
+     +    0.05672,   0.01256,  55.10451,   2.12584,   1.75699,
+     +    1.29465,   1.94138,   2.12604,
+     +    0.05751,   0.01306,  59.35997,   2.28787,   1.91967,
+     +    1.46118,   2.10373,   2.28808 /
+        DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),F(8,7,K),K=15,19)/
+     +    0.05827,   0.01355,  63.55490,   2.45029,   2.08273,
+     +    1.62788,   2.26647,   2.45052,
+     +    0.05901,   0.01402,  67.61636,   2.61094,   2.24398,
+     +    1.79261,   2.42742,   2.61118,
+     +    0.05973,   0.01448,  71.66826,   2.77291,   2.40654,
+     +    1.95847,   2.58969,   2.77317,
+     +    0.06042,   0.01493,  75.56110,   2.93205,   2.56626,
+     +    2.12134,   2.74912,   2.93233,
+     +    0.06109,   0.01537,  79.43605,   3.09204,   2.72681,
+     +    2.28489,   2.90938,   3.09233 /
+        DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=1,7)/
+     +    0.05340,   0.00837,   3.61060,   0.39906,   0.02587,
+     +    0.00000,   0.21238,   0.39904,
+     +    0.05547,   0.00969,   6.57201,   0.48553,   0.11411,
+     +    0.00000,   0.29975,   0.48556,
+     +    0.05733,   0.01091,   9.74883,   0.58177,   0.21193,
+     +    0.00000,   0.39679,   0.58183,
+     +    0.05903,   0.01204,  12.97729,   0.68414,   0.31575,
+     +    0.00000,   0.49989,   0.68424,
+     +    0.06059,   0.01310,  16.26187,   0.79108,   0.42403,
+     +    0.02274,   0.60751,   0.79122,
+     +    0.06204,   0.01410,  19.55322,   0.90127,   0.53546,
+     +    0.12360,   0.71833,   0.90145,
+     +    0.06341,   0.01505,  22.82423,   1.01407,   0.64944,
+     +    0.24474,   0.83172,   1.01428 /
+        DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=8,14)/
+     +    0.06471,   0.01596,  26.05367,   1.12863,   0.76511,
+     +    0.36517,   0.94684,   1.12887,
+     +    0.06594,   0.01684,  29.22864,   1.24424,   0.88177,
+     +    0.48654,   1.06298,   1.24451,
+     +    0.06711,   0.01767,  32.34377,   1.36046,   0.99899,
+     +    0.60806,   1.17970,   1.36075,
+     +    0.06823,   0.01848,  35.39905,   1.47701,   1.11651,
+     +    0.72962,   1.29674,   1.47733,
+     +    0.06931,   0.01926,  38.38046,   1.59335,   1.23376,
+     +    0.85067,   1.41354,   1.59369,
+     +    0.07034,   0.02001,  41.24855,   1.70825,   1.34955,
+     +    0.97003,   1.52888,   1.70862,
+     +    0.07133,   0.02074,  44.06503,   1.82302,   1.46517,
+     +    1.08903,   1.64408,   1.82341 /
+        DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),F(8,8,K),K=15,19)/
+     +    0.07228,   0.02144,  46.81233,   1.93714,   1.58011,
+     +    1.20716,   1.75861,   1.93755,
+     +    0.07321,   0.02212,  49.44273,   2.04911,   1.69288,
+     +    1.32297,   1.87097,   2.04954,
+     +    0.07410,   0.02279,  52.04507,   2.16122,   1.80575,
+     +    1.43873,   1.98347,   2.16166,
+     +    0.07496,   0.02343,  54.51849,   2.27055,   1.91582,
+     +    1.55156,   2.09316,   2.27101,
+     +    0.07580,   0.02406,  56.96199,   2.37977,   2.02577,
+     +    1.66414,   2.20275,   2.38025 /
+        DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=1,7)/
+     +    0.06029,   0.01156,   3.53868,   0.39225,   0.02388,
+     +    0.00000,   0.20803,   0.39226,
+     +    0.06264,   0.01325,   6.19576,   0.47040,   0.10409,
+     +    0.00000,   0.28723,   0.47045,
+     +    0.06476,   0.01481,   8.97954,   0.55578,   0.19132,
+     +    0.00000,   0.37355,   0.55587,
+     +    0.06670,   0.01625,  11.75466,   0.64532,   0.28255,
+     +    0.00000,   0.46394,   0.64544,
+     +    0.06848,   0.01759,  14.53299,   0.73774,   0.37652,
+     +    0.01969,   0.55715,   0.73789,
+     +    0.07014,   0.01885,  17.27850,   0.83198,   0.47220,
+     +    0.10654,   0.65212,   0.83216,
+     +    0.07170,   0.02005,  19.97362,   0.92757,   0.56915,
+     +    0.21002,   0.74839,   0.92777 /
+        DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=8,14)/
+     +    0.07317,   0.02119,  22.60497,   1.02384,   0.66671,
+     +    0.31199,   0.84531,   1.02407,
+     +    0.07457,   0.02227,  25.16585,   1.12027,   0.76435,
+     +    0.41398,   0.94235,   1.12051,
+     +    0.07591,   0.02331,  27.65526,   1.21653,   0.86177,
+     +    0.51538,   1.03919,   1.21679,
+     +    0.07718,   0.02432,  30.07607,   1.31244,   0.95879,
+     +    0.61614,   1.13567,   1.31273,
+     +    0.07841,   0.02528,  32.41937,   1.40761,   1.05502,
+     +    0.71586,   1.23136,   1.40791,
+     +    0.07958,   0.02620,  34.65535,   1.50106,   1.14949,
+     +    0.81364,   1.32533,   1.50138,
+     +    0.08071,   0.02710,  36.83626,   1.59392,   1.24333,
+     +    0.91060,   1.41868,   1.59426 /
+        DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),F(8,9,K),K=15,19)/
+     +    0.08179,   0.02796,  38.94960,   1.68579,   1.33615,
+     +    1.00637,   1.51103,   1.68615,
+     +    0.08284,   0.02879,  40.95848,   1.77549,   1.42676,
+     +    1.09978,   1.60119,   1.77586,
+     +    0.08385,   0.02961,  42.93570,   1.86493,   1.51708,
+     +    1.19277,   1.69106,   1.86531,
+     +    0.08484,   0.03039,  44.80157,   1.95174,   1.60474,
+     +    1.28298,   1.77830,   1.95214,
+     +    0.08579,   0.03115,  46.63640,   2.03814,   1.69197,
+     +    1.37264,   1.86512,   2.03855 /
+        DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=1,7)/
+     +    0.06567,   0.01451,   3.48702,   0.38686,   0.02249,
+     +    0.00000,   0.20468,   0.38687,
+     +    0.06825,   0.01653,   5.93614,   0.45929,   0.09721,
+     +    0.00000,   0.27827,   0.45933,
+     +    0.07057,   0.01838,   8.45852,   0.53738,   0.17736,
+     +    0.00000,   0.35741,   0.53744,
+     +    0.07270,   0.02007,  10.93790,   0.61843,   0.26028,
+     +    0.00000,   0.43941,   0.61851,
+     +    0.07466,   0.02165,  13.39093,   0.70136,   0.34494,
+     +    0.01772,   0.52321,   0.70147,
+     +    0.07648,   0.02313,  15.79024,   0.78529,   0.43046,
+     +    0.09552,   0.60795,   0.78541,
+     +    0.07819,   0.02452,  18.12395,   0.86985,   0.51653,
+     +    0.18770,   0.69327,   0.86999 /
+        DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=8,14)/
+     +    0.07981,   0.02585,  20.38364,   0.95450,   0.60260,
+     +    0.27795,   0.77864,   0.95465,
+     +    0.08135,   0.02712,  22.56622,   1.03882,   0.68826,
+     +    0.36771,   0.86363,   1.03898,
+     +    0.08281,   0.02832,  24.67316,   1.12256,   0.77328,
+     +    0.45649,   0.94802,   1.12274,
+     +    0.08421,   0.02948,  26.70900,   1.20561,   0.85755,
+     +    0.54429,   1.03168,   1.20580,
+     +    0.08555,   0.03059,  28.66769,   1.28764,   0.94075,
+     +    0.63080,   1.11430,   1.28784,
+     +    0.08684,   0.03166,  30.52516,   1.36785,   1.02209,
+     +    0.71525,   1.19508,   1.36806,
+     +    0.08808,   0.03269,  32.32776,   1.44725,   1.10257,
+     +    0.79868,   1.27502,   1.44748 /
+        DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),F(8,10,K),K=15,19)/
+     +    0.08927,   0.03368,  34.06572,   1.52553,   1.18189,
+     +    0.88078,   1.35382,   1.52576,
+     +    0.09042,   0.03463,  35.70857,   1.60166,   1.25903,
+     +    0.96057,   1.43046,   1.60191,
+     +    0.09153,   0.03556,  37.31926,   1.67734,   1.33567,
+     +    1.03973,   1.50663,   1.67759,
+     +    0.09260,   0.03646,  38.83084,   1.75054,   1.40982,
+     +    1.11628,   1.58030,   1.75081,
+     +    0.09364,   0.03733,  40.31206,   1.82320,   1.48338,
+     +    1.19213,   1.65341,   1.82346 /
+        DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=1,7)/
+     +    0.07032,   0.01730,   3.44586,   0.38199,   0.02144,
+     +    0.00000,   0.20172,   0.38205,
+     +    0.07312,   0.01960,   5.73444,   0.45009,   0.09204,
+     +    0.00000,   0.27109,   0.45018,
+     +    0.07564,   0.02169,   8.05824,   0.52273,   0.16693,
+     +    0.00000,   0.34487,   0.52285,
+     +    0.07794,   0.02361,  10.31600,   0.59748,   0.24373,
+     +    0.00000,   0.42065,   0.59763,
+     +    0.08005,   0.02539,  12.52815,   0.67342,   0.32154,
+     +    0.01627,   0.49754,   0.67359,
+     +    0.08203,   0.02705,  14.67377,   0.74980,   0.39967,
+     +    0.08748,   0.57480,   0.75000,
+     +    0.08388,   0.02861,  16.74510,   0.82631,   0.47781,
+     +    0.17143,   0.65214,   0.82653 /
+        DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=8,14)/
+     +    0.08563,   0.03010,  18.73683,   0.90252,   0.55556,
+     +    0.25319,   0.72912,   0.90275,
+     +    0.08729,   0.03151,  20.64867,   0.97808,   0.63259,
+     +    0.33414,   0.80542,   0.97834,
+     +    0.08887,   0.03286,  22.48331,   1.05281,   0.70871,
+     +    0.41384,   0.88085,   1.05308,
+     +    0.09038,   0.03415,  24.24609,   1.12661,   0.78384,
+     +    0.49234,   0.95532,   1.12689,
+     +    0.09182,   0.03538,  25.93327,   1.19926,   0.85776,
+     +    0.56942,   1.02861,   1.19956,
+     +    0.09321,   0.03656,  27.52582,   1.27003,   0.92975,
+     +    0.64439,   1.09999,   1.27035,
+     +    0.09455,   0.03770,  29.06483,   1.33986,   1.00075,
+     +    0.71820,   1.17041,   1.34019 /
+        DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),F(8,11,K),K=15,19)/
+     +    0.09583,   0.03879,  30.54247,   1.40849,   1.07050,
+     +    0.79061,   1.23960,   1.40882,
+     +    0.09707,   0.03985,  31.93173,   1.47504,   1.13814,
+     +    0.86079,   1.30670,   1.47539,
+     +    0.09826,   0.04087,  33.28932,   1.54104,   1.20518,
+     +    0.93022,   1.37322,   1.54139,
+     +    0.09942,   0.04185,  34.55812,   1.60469,   1.26984,
+     +    0.99719,   1.43738,   1.60505,
+     +    0.10054,   0.04281,  35.79784,   1.66771,   1.33385,
+     +    1.06338,   1.50089,   1.66809 /
+        DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=1,7)/
+     +    0.08681,   0.02970,   3.31354,   0.36454,   0.01825,
+     +    0.00000,   0.19141,   0.36456,
+     +    0.09043,   0.03307,   5.13062,   0.41974,   0.07671,
+     +    0.00000,   0.24826,   0.41979,
+     +    0.09368,   0.03610,   6.89413,   0.47667,   0.13654,
+     +    0.00000,   0.30666,   0.47673,
+     +    0.09664,   0.03884,   8.54430,   0.53365,   0.19615,
+     +    0.00000,   0.36496,   0.53374,
+     +    0.09936,   0.04136,  10.11025,   0.59021,   0.25511,
+     +    0.01230,   0.42274,   0.59031,
+     +    0.10190,   0.04369,  11.58706,   0.64595,   0.31308,
+     +    0.06555,   0.47961,   0.64607,
+     +    0.10427,   0.04587,  12.97707,   0.70078,   0.37000,
+     +    0.12737,   0.53549,   0.70092 /
+        DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=8,14)/
+     +    0.10651,   0.04792,  14.28305,   0.75450,   0.42568,
+     +    0.18654,   0.59019,   0.75465,
+     +    0.10863,   0.04986,  15.51007,   0.80696,   0.48000,
+     +    0.24425,   0.64359,   0.80713,
+     +    0.11065,   0.05169,  16.66443,   0.85812,   0.53292,
+     +    0.30027,   0.69564,   0.85830,
+     +    0.11258,   0.05343,  17.75340,   0.90800,   0.58447,
+     +    0.35474,   0.74636,   0.90819,
+     +    0.11441,   0.05509,  18.77751,   0.95651,   0.63458,
+     +    0.40758,   0.79567,   0.95671,
+     +    0.11617,   0.05667,  19.72649,   1.00321,   0.68281,
+     +    0.45838,   0.84314,   1.00341,
+     +    0.11786,   0.05818,  20.63014,   1.04880,   0.72987,
+     +    0.50786,   0.88947,   1.04901 /
+        DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),F(8,12,K),K=15,19)/
+     +    0.11948,   0.05963,  21.48483,   1.09316,   0.77563,
+     +    0.55592,   0.93453,   1.09338,
+     +    0.12104,   0.06101,  22.27466,   1.13573,   0.81956,
+     +    0.60203,   0.97778,   1.13596,
+     +    0.12255,   0.06235,  23.03784,   1.17759,   0.86272,
+     +    0.64727,   1.02030,   1.17782,
+     +    0.12400,   0.06363,  23.73854,   1.21756,   0.90395,
+     +    0.69048,   1.06090,   1.21780,
+     +    0.12541,   0.06487,  24.41621,   1.25684,   0.94445,
+     +    0.73287,   1.10079,   1.25709 /
+        DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=1,7)/
+     +    0.10805,   0.05037,   3.16801,   0.34141,   0.01521,
+     +    0.00002,   0.17832,   0.34146,
+     +    0.11285,   0.05507,   4.54812,   0.38458,   0.06251,
+     +    0.00002,   0.22358,   0.38466,
+     +    0.11716,   0.05923,   5.82263,   0.42748,   0.10910,
+     +    0.00001,   0.26834,   0.42759,
+     +    0.12106,   0.06295,   6.96601,   0.46912,   0.15405,
+     +    0.00002,   0.31165,   0.46926,
+     +    0.12464,   0.06632,   8.01228,   0.50941,   0.19736,
+     +    0.00905,   0.35346,   0.50957,
+     +    0.12794,   0.06940,   8.96691,   0.54822,   0.23895,
+     +    0.04768,   0.39367,   0.54840,
+     +    0.13103,   0.07226,   9.83846,   0.58560,   0.27893,
+     +    0.09177,   0.43236,   0.58579 /
+        DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=8,14)/
+     +    0.13394,   0.07492,  10.63628,   0.62156,   0.31732,
+     +    0.13317,   0.46954,   0.62176,
+     +    0.13668,   0.07741,  11.36589,   0.65607,   0.35412,
+     +    0.17288,   0.50520,   0.65628,
+     +    0.13927,   0.07974,  12.03519,   0.68919,   0.38941,
+     +    0.21083,   0.53940,   0.68940,
+     +    0.14173,   0.08194,  12.65259,   0.72099,   0.42327,
+     +    0.24719,   0.57224,   0.72121,
+     +    0.14407,   0.08403,  13.22074,   0.75146,   0.45568,
+     +    0.28195,   0.60369,   0.75168,
+     +    0.14631,   0.08598,  13.73528,   0.78040,   0.48649,
+     +    0.31496,   0.63357,   0.78063,
+     +    0.14845,   0.08784,  14.21533,   0.80833,   0.51621,
+     +    0.34675,   0.66240,   0.80858 /
+        DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),F(8,13,K),K=15,19)/
+     +    0.15050,   0.08962,  14.65937,   0.83520,   0.54478,
+     +    0.37729,   0.69012,   0.83546,
+     +    0.15246,   0.09131,  15.06073,   0.86062,   0.57184,
+     +    0.40621,   0.71636,   0.86087,
+     +    0.15434,   0.09293,  15.44333,   0.88537,   0.59817,
+     +    0.43431,   0.74190,   0.88562,
+     +    0.15616,   0.09447,  15.78525,   0.90874,   0.62305,
+     +    0.46089,   0.76603,   0.90899,
+     +    0.15791,   0.09595,  16.11134,   0.93149,   0.64728,
+     +    0.48672,   0.78952,   0.93175 /
+        DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=1,7)/
+     +    0.12366,   0.06804,   3.07186,   0.32476,   0.01349,
+     +    0.00001,   0.16913,   0.32477,
+     +    0.12941,   0.07356,   4.21376,   0.36128,   0.05469,
+     +    0.00003,   0.20801,   0.36133,
+     +    0.13453,   0.07840,   5.23497,   0.39672,   0.09429,
+     +    0.00001,   0.24554,   0.39680,
+     +    0.13915,   0.08267,   6.12600,   0.43046,   0.13175,
+     +    0.00003,   0.28116,   0.43054,
+     +    0.14335,   0.08652,   6.92145,   0.46254,   0.16722,
+     +    0.00743,   0.31495,   0.46264,
+     +    0.14724,   0.09001,   7.63109,   0.49297,   0.20077,
+     +    0.03887,   0.34695,   0.49309,
+     +    0.15085,   0.09321,   8.26689,   0.52189,   0.23258,
+     +    0.07437,   0.37732,   0.52202 /
+        DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=8,14)/
+     +    0.15423,   0.09619,   8.83561,   0.54935,   0.26275,
+     +    0.10729,   0.40614,   0.54948,
+     +    0.15741,   0.09894,   9.34709,   0.57539,   0.29134,
+     +    0.13852,   0.43346,   0.57553,
+     +    0.16041,   0.10151,   9.80844,   0.60012,   0.31848,
+     +    0.16808,   0.45940,   0.60026,
+     +    0.16325,   0.10393,  10.22624,   0.62365,   0.34428,
+     +    0.19616,   0.48407,   0.62379,
+     +    0.16593,   0.10619,  10.60383,   0.64597,   0.36877,
+     +    0.22278,   0.50748,   0.64614,
+     +    0.16848,   0.10831,  10.93835,   0.66693,   0.39178,
+     +    0.24780,   0.52947,   0.66710,
+     +    0.17092,   0.11031,  11.24630,   0.68700,   0.41381,
+     +    0.27170,   0.55051,   0.68716 /
+        DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),F(8,14,K),K=15,19)/
+     +    0.17324,   0.11221,  11.52735,   0.70614,   0.43483,
+     +    0.29450,   0.57060,   0.70631,
+     +    0.17546,   0.11400,  11.77610,   0.72410,   0.45459,
+     +    0.31595,   0.58945,   0.72428,
+     +    0.17760,   0.11572,  12.01053,   0.74148,   0.47370,
+     +    0.33667,   0.60770,   0.74167,
+     +    0.17963,   0.11734,  12.21411,   0.75770,   0.49159,
+     +    0.35608,   0.62475,   0.75789,
+     +    0.18160,   0.11890,  12.40637,   0.77341,   0.50890,
+     +    0.37485,   0.64127,   0.77360 /
+        DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=1,7)/
+     +    0.13690,   0.08377,   2.99614,   0.31124,   0.01229,
+     +    0.00001,   0.16177,   0.31128,
+     +    0.14344,   0.08982,   3.97682,   0.34321,   0.04934,
+     +    0.00002,   0.19630,   0.34329,
+     +    0.14924,   0.09509,   4.83251,   0.37369,   0.08430,
+     +    0.00001,   0.22904,   0.37380,
+     +    0.15445,   0.09970,   5.56287,   0.40225,   0.11688,
+     +    0.00003,   0.25962,   0.40237,
+     +    0.15918,   0.10382,   6.20227,   0.42906,   0.14732,
+     +    0.00640,   0.28826,   0.42919,
+     +    0.16352,   0.10753,   6.76239,   0.45419,   0.17580,
+     +    0.03328,   0.31506,   0.45433,
+     +    0.16755,   0.11092,   7.25574,   0.47780,   0.20251,
+     +    0.06340,   0.34023,   0.47796 /
+        DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=8,14)/
+     +    0.17129,   0.11404,   7.68960,   0.50000,   0.22761,
+     +    0.09107,   0.36388,   0.50015,
+     +    0.17481,   0.11692,   8.07348,   0.52085,   0.25118,
+     +    0.11709,   0.38610,   0.52101,
+     +    0.17812,   0.11959,   8.41432,   0.54048,   0.27337,
+     +    0.14155,   0.40701,   0.54064,
+     +    0.18124,   0.12208,   8.71826,   0.55900,   0.29431,
+     +    0.16461,   0.42675,   0.55916,
+     +    0.18417,   0.12441,   8.98860,   0.57644,   0.31405,
+     +    0.18633,   0.44534,   0.57661,
+     +    0.18696,   0.12657,   9.22349,   0.59267,   0.33246,
+     +    0.20660,   0.46266,   0.59284,
+     +    0.18961,   0.12861,   9.43674,   0.60809,   0.34997,
+     +    0.22585,   0.47913,   0.60827 /
+        DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),F(8,15,K),K=15,19)/
+     +    0.19213,   0.13054,   9.62837,   0.62272,   0.36658,
+     +    0.24411,   0.49474,   0.62289,
+     +    0.19453,   0.13234,   9.79422,   0.63631,   0.38208,
+     +    0.26118,   0.50929,   0.63650,
+     +    0.19684,   0.13406,   9.94882,   0.64941,   0.39701,
+     +    0.27759,   0.52330,   0.64961,
+     +    0.19903,   0.13568,  10.07921,   0.66153,   0.41088,
+     +    0.29288,   0.53629,   0.66172,
+     +    0.20114,   0.13723,  10.20098,   0.67321,   0.42425,
+     +    0.30760,   0.54882,   0.67339 /
+        DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=1,7)/
+     +    0.14876,   0.09806,   2.93193,   0.29978,   0.01138,
+     +    0.00003,   0.15559,   0.29985,
+     +    0.15599,   0.10446,   3.79241,   0.32833,   0.04530,
+     +    0.00003,   0.18685,   0.32841,
+     +    0.16239,   0.10998,   4.52823,   0.35515,   0.07686,
+     +    0.00004,   0.21605,   0.35528,
+     +    0.16808,   0.11479,   5.14390,   0.37995,   0.10588,
+     +    0.00004,   0.24296,   0.38006,
+     +    0.17325,   0.11904,   5.67441,   0.40296,   0.13273,
+     +    0.00567,   0.26790,   0.40308,
+     +    0.17798,   0.12287,   6.13175,   0.42431,   0.15760,
+     +    0.02933,   0.29102,   0.42446,
+     +    0.18233,   0.12635,   6.52844,   0.44421,   0.18075,
+     +    0.05567,   0.31255,   0.44437 /
+        DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=8,14)/
+     +    0.18638,   0.12951,   6.87192,   0.46275,   0.20232,
+     +    0.07967,   0.33261,   0.46292,
+     +    0.19018,   0.13241,   7.17072,   0.48001,   0.22242,
+     +    0.10209,   0.35130,   0.48019,
+     +    0.19372,   0.13509,   7.43224,   0.49612,   0.24121,
+     +    0.12301,   0.36876,   0.49630,
+     +    0.19704,   0.13759,   7.66248,   0.51122,   0.25883,
+     +    0.14262,   0.38511,   0.51138,
+     +    0.20015,   0.13992,   7.86430,   0.52533,   0.27533,
+     +    0.16099,   0.40042,   0.52548,
+     +    0.20312,   0.14205,   8.03505,   0.53837,   0.29064,
+     +    0.17804,   0.41459,   0.53853,
+     +    0.20594,   0.14407,   8.18813,   0.55068,   0.30512,
+     +    0.19417,   0.42799,   0.55085 /
+        DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),F(8,16,K),K=15,19)/
+     +    0.20860,   0.14596,   8.32394,   0.56228,   0.31878,
+     +    0.20939,   0.44062,   0.56243,
+     +    0.21113,   0.14773,   8.43829,   0.57299,   0.33146,
+     +    0.22355,   0.45231,   0.57314,
+     +    0.21356,   0.14941,   8.54348,   0.58325,   0.34362,
+     +    0.23710,   0.46352,   0.58342,
+     +    0.21585,   0.15097,   8.62821,   0.59264,   0.35484,
+     +    0.24965,   0.47383,   0.59281,
+     +    0.21807,   0.15247,   8.70650,   0.60166,   0.36562,
+     +    0.26169,   0.48374,   0.60184 /
+        DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=1,7)/
+     +    0.19893,   0.15544,   2.68535,   0.25861,   0.00859,
+     +    0.00002,   0.13359,   0.25863,
+     +    0.20861,   0.16209,   3.20192,   0.27716,   0.03331,
+     +    0.00003,   0.15523,   0.27716,
+     +    0.21699,   0.16764,   3.61007,   0.29363,   0.05519,
+     +    0.00001,   0.17443,   0.29364,
+     +    0.22435,   0.17227,   3.92668,   0.30805,   0.07445,
+     +    0.00002,   0.19128,   0.30810,
+     +    0.23088,   0.17629,   4.17998,   0.32090,   0.09162,
+     +    0.00369,   0.20630,   0.32096,
+     +    0.23673,   0.17977,   4.38400,   0.33235,   0.10703,
+     +    0.01878,   0.21974,   0.33243,
+     +    0.24204,   0.18286,   4.54719,   0.34262,   0.12093,
+     +    0.03523,   0.23183,   0.34268 /
+        DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=8,14)/
+     +    0.24689,   0.18560,   4.67801,   0.35183,   0.13351,
+     +    0.04982,   0.24271,   0.35188,
+     +    0.25137,   0.18801,   4.78318,   0.36010,   0.14494,
+     +    0.06313,   0.25257,   0.36016,
+     +    0.25550,   0.19019,   4.86669,   0.36756,   0.15535,
+     +    0.07527,   0.26150,   0.36762,
+     +    0.25932,   0.19218,   4.93266,   0.37431,   0.16489,
+     +    0.08641,   0.26964,   0.37437,
+     +    0.26290,   0.19396,   4.98391,   0.38041,   0.17363,
+     +    0.09666,   0.27706,   0.38049,
+     +    0.26618,   0.19558,   5.02071,   0.38586,   0.18156,
+     +    0.10599,   0.28376,   0.38591,
+     +    0.26927,   0.19706,   5.04895,   0.39085,   0.18891,
+     +    0.11467,   0.28994,   0.39090 /
+        DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),F(8,17,K),K=15,19)/
+     +    0.27218,   0.19841,   5.06879,   0.39539,   0.19570,
+     +    0.12271,   0.29561,   0.39546,
+     +    0.27488,   0.19962,   5.07871,   0.39941,   0.20186,
+     +    0.13004,   0.30069,   0.39948,
+     +    0.27745,   0.20075,   5.08545,   0.40317,   0.20767,
+     +    0.13697,   0.30548,   0.40326,
+     +    0.27982,   0.20178,   5.08372,   0.40647,   0.21292,
+     +    0.14326,   0.30974,   0.40652,
+     +    0.28208,   0.20275,   5.08013,   0.40956,   0.21789,
+     +    0.14923,   0.31377,   0.40960 /
+        DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=1,7)/
+     +    0.28323,   0.23020,   2.32789,   0.20943,   0.00581,
+     +   -0.00013,   0.10753,   0.20930,
+     +    0.29472,   0.23441,   2.55412,   0.21891,   0.02210,
+     +   -0.00012,   0.12043,   0.21882,
+     +    0.30420,   0.23765,   2.70850,   0.22665,   0.03571,
+     +   -0.00009,   0.13109,   0.22649,
+     +    0.31224,   0.24004,   2.80796,   0.23279,   0.04705,
+     +   -0.00010,   0.13985,   0.23267,
+     +    0.31916,   0.24185,   2.87312,   0.23779,   0.05674,
+     +    0.00201,   0.14722,   0.23771,
+     +    0.32512,   0.24330,   2.91302,   0.24193,   0.06507,
+     +    0.01059,   0.15344,   0.24177,
+     +    0.33036,   0.24438,   2.93383,   0.24526,   0.07228,
+     +    0.01972,   0.15873,   0.24517 /
+        DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=8,14)/
+     +    0.33496,   0.24519,   2.94055,   0.24804,   0.07859,
+     +    0.02757,   0.16325,   0.24790,
+     +    0.33911,   0.24576,   2.93646,   0.25022,   0.08412,
+     +    0.03451,   0.16712,   0.25012,
+     +    0.34279,   0.24618,   2.92475,   0.25198,   0.08898,
+     +    0.04067,   0.17044,   0.25191,
+     +    0.34604,   0.24648,   2.90766,   0.25343,   0.09330,
+     +    0.04619,   0.17331,   0.25333,
+     +    0.34903,   0.24662,   2.88592,   0.25452,   0.09714,
+     +    0.05113,   0.17579,   0.25445,
+     +    0.35168,   0.24661,   2.85969,   0.25531,   0.10048,
+     +    0.05553,   0.17785,   0.25521,
+     +    0.35408,   0.24656,   2.83185,   0.25591,   0.10349,
+     +    0.05950,   0.17965,   0.25578 /
+        DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),F(8,18,K),K=15,19)/
+     +    0.35624,   0.24647,   2.80239,   0.25632,   0.10618,
+     +    0.06307,   0.18119,   0.25617,
+     +    0.35819,   0.24625,   2.77069,   0.25649,   0.10854,
+     +    0.06630,   0.18244,   0.25634,
+     +    0.36002,   0.24601,   2.73959,   0.25659,   0.11071,
+     +    0.06931,   0.18357,   0.25645,
+     +    0.36162,   0.24569,   2.70671,   0.25645,   0.11255,
+     +    0.07194,   0.18445,   0.25638,
+     +    0.36312,   0.24537,   2.67463,   0.25629,   0.11427,
+     +    0.07440,   0.18524,   0.25623 /
+        DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=1,7)/
+     +    0.35669,   0.27477,   2.04288,   0.17706,   0.00442,
+     +    0.00001,   0.09068,   0.17695,
+     +    0.36735,   0.27551,   2.13345,   0.18179,   0.01625,
+     +    0.00003,   0.09901,   0.18171,
+     +    0.37578,   0.27561,   2.17803,   0.18518,   0.02567,
+     +    0.00000,   0.10545,   0.18523,
+     +    0.38250,   0.27525,   2.19021,   0.18747,   0.03337,
+     +   -0.00004,   0.11042,   0.18742,
+     +    0.38800,   0.27452,   2.18454,   0.18905,   0.03966,
+     +    0.00144,   0.11436,   0.18900,
+     +    0.39246,   0.27367,   2.16673,   0.19004,   0.04487,
+     +    0.00708,   0.11746,   0.19000,
+     +    0.39623,   0.27261,   2.14048,   0.19057,   0.04933,
+     +    0.01303,   0.11996,   0.19056 /
+        DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=8,14)/
+     +    0.39935,   0.27143,   2.10900,   0.19077,   0.05311,
+     +    0.01800,   0.12191,   0.19066,
+     +    0.40194,   0.27015,   2.07380,   0.19067,   0.05630,
+     +    0.02231,   0.12346,   0.19050,
+     +    0.40416,   0.26877,   2.03669,   0.19031,   0.05903,
+     +    0.02610,   0.12467,   0.19022,
+     +    0.40606,   0.26733,   1.99883,   0.18977,   0.06140,
+     +    0.02944,   0.12558,   0.18978,
+     +    0.40757,   0.26593,   1.96039,   0.18914,   0.06343,
+     +    0.03230,   0.12628,   0.18907,
+     +    0.40879,   0.26450,   1.92139,   0.18833,   0.06513,
+     +    0.03484,   0.12673,   0.18830,
+     +    0.40980,   0.26306,   1.88338,   0.18746,   0.06662,
+     +    0.03711,   0.12705,   0.18746 /
+        DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),F(8,19,K),K=15,19)/
+     +    0.41063,   0.26161,   1.84621,   0.18653,   0.06792,
+     +    0.03912,   0.12725,   0.18654,
+     +    0.41121,   0.26015,   1.80925,   0.18550,   0.06901,
+     +    0.04085,   0.12728,   0.18547,
+     +    0.41170,   0.25874,   1.77396,   0.18447,   0.07000,
+     +    0.04244,   0.12726,   0.18441,
+     +    0.41195,   0.25734,   1.73879,   0.18336,   0.07079,
+     +    0.04384,   0.12710,   0.18328,
+     +    0.41216,   0.25597,   1.70527,   0.18228,   0.07151,
+     +    0.04513,   0.12691,   0.18218 /
+        DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=1,7)/
+     +    0.42071,   0.30069,   1.79822,   0.15205,   0.00343,
+     +    0.00006,   0.07779,   0.15205,
+     +    0.42871,   0.29807,   1.81193,   0.15379,   0.01240,
+     +    0.00005,   0.08313,   0.15382,
+     +    0.43466,   0.29519,   1.79822,   0.15460,   0.01937,
+     +    0.00006,   0.08703,   0.15457,
+     +    0.43881,   0.29222,   1.76751,   0.15469,   0.02475,
+     +    0.00004,   0.08979,   0.15472,
+     +    0.44194,   0.28918,   1.72906,   0.15436,   0.02912,
+     +    0.00108,   0.09177,   0.15438,
+     +    0.44420,   0.28618,   1.68630,   0.15366,   0.03262,
+     +    0.00510,   0.09320,   0.15375,
+     +    0.44577,   0.28321,   1.64136,   0.15272,   0.03556,
+     +    0.00923,   0.09421,   0.15279 /
+        DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=8,14)/
+     +    0.44677,   0.28028,   1.59578,   0.15163,   0.03799,
+     +    0.01259,   0.09486,   0.15169,
+     +    0.44736,   0.27739,   1.55051,   0.15043,   0.03997,
+     +    0.01548,   0.09524,   0.15049,
+     +    0.44761,   0.27455,   1.50624,   0.14912,   0.04161,
+     +    0.01797,   0.09542,   0.14916,
+     +    0.44759,   0.27180,   1.46346,   0.14774,   0.04299,
+     +    0.02013,   0.09543,   0.14776,
+     +    0.44729,   0.26910,   1.42223,   0.14635,   0.04414,
+     +    0.02199,   0.09529,   0.14642,
+     +    0.44679,   0.26646,   1.38219,   0.14489,   0.04510,
+     +    0.02358,   0.09504,   0.14494,
+     +    0.44614,   0.26392,   1.34416,   0.14343,   0.04591,
+     +    0.02497,   0.09473,   0.14346 /
+        DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),F(8,20,K),K=15,19)/
+     +    0.44533,   0.26148,   1.30786,   0.14196,   0.04659,
+     +    0.02618,   0.09434,   0.14198,
+     +    0.44434,   0.25908,   1.27284,   0.14052,   0.04710,
+     +    0.02724,   0.09386,   0.14050,
+     +    0.44333,   0.25678,   1.23987,   0.13913,   0.04754,
+     +    0.02820,   0.09336,   0.13908,
+     +    0.44225,   0.25444,   1.20796,   0.13763,   0.04788,
+     +    0.02900,   0.09280,   0.13764,
+     +    0.44116,   0.25219,   1.17785,   0.13619,   0.04816,
+     +    0.02972,   0.09224,   0.13625 /
+        DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=1,7)/
+     +    0.47517,   0.31408,   1.58334,   0.13110,   0.00271,
+     +    0.00007,   0.06694,   0.13115,
+     +    0.47940,   0.30840,   1.55044,   0.13095,   0.00959,
+     +    0.00007,   0.07028,   0.13090,
+     +    0.48192,   0.30286,   1.50408,   0.13010,   0.01480,
+     +    0.00006,   0.07253,   0.13009,
+     +    0.48294,   0.29756,   1.45096,   0.12889,   0.01881,
+     +    0.00006,   0.07385,   0.12884,
+     +    0.48314,   0.29253,   1.39691,   0.12737,   0.02190,
+     +    0.00082,   0.07470,   0.12744,
+     +    0.48262,   0.28783,   1.34365,   0.12583,   0.02434,
+     +    0.00375,   0.07510,   0.12585,
+     +    0.48164,   0.28328,   1.29186,   0.12413,   0.02636,
+     +    0.00671,   0.07523,   0.12413 /
+        DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=8,14)/
+     +    0.48024,   0.27894,   1.24220,   0.12240,   0.02793,
+     +    0.00908,   0.07518,   0.12232,
+     +    0.47858,   0.27479,   1.19502,   0.12060,   0.02921,
+     +    0.01106,   0.07493,   0.12060,
+     +    0.47669,   0.27080,   1.15044,   0.11882,   0.03024,
+     +    0.01277,   0.07455,   0.11887,
+     +    0.47462,   0.26698,   1.10852,   0.11709,   0.03108,
+     +    0.01427,   0.07410,   0.11711,
+     +    0.47246,   0.26327,   1.06908,   0.11535,   0.03180,
+     +    0.01552,   0.07359,   0.11538,
+     +    0.47014,   0.25974,   1.03167,   0.11364,   0.03232,
+     +    0.01651,   0.07302,   0.11363,
+     +    0.46779,   0.25635,   0.99670,   0.11199,   0.03273,
+     +    0.01740,   0.07242,   0.11196 /
+        DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),F(8,21,K),K=15,19)/
+     +    0.46542,   0.25309,   0.96384,   0.11036,   0.03305,
+     +    0.01822,   0.07178,   0.11039,
+     +    0.46299,   0.24991,   0.93268,   0.10873,   0.03329,
+     +    0.01887,   0.07109,   0.10880,
+     +    0.46059,   0.24689,   0.90360,   0.10718,   0.03350,
+     +    0.01945,   0.07041,   0.10727,
+     +    0.45793,   0.24403,   0.87593,   0.10571,   0.03359,
+     +    0.01993,   0.06970,   0.10575,
+     +    0.45538,   0.24128,   0.85001,   0.10429,   0.03367,
+     +    0.02036,   0.06901,   0.10428 /
+        DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=1,7)/
+     +    0.52950,   0.31854,   1.34867,   0.10871,   0.00208,
+     +    0.00009,   0.05543,   0.10865,
+     +    0.52837,   0.30934,   1.28265,   0.10692,   0.00713,
+     +    0.00009,   0.05710,   0.10695,
+     +    0.52591,   0.30108,   1.21518,   0.10494,   0.01088,
+     +    0.00010,   0.05793,   0.10492,
+     +    0.52253,   0.29348,   1.14948,   0.10275,   0.01365,
+     +    0.00010,   0.05824,   0.10279,
+     +    0.51867,   0.28657,   1.08813,   0.10064,   0.01577,
+     +    0.00058,   0.05818,   0.10052,
+     +    0.51467,   0.27997,   1.03129,   0.09837,   0.01739,
+     +    0.00263,   0.05795,   0.09843,
+     +    0.51034,   0.27392,   0.97867,   0.09626,   0.01862,
+     +    0.00464,   0.05752,   0.09636 /
+        DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=8,14)/
+     +    0.50593,   0.26819,   0.93011,   0.09419,   0.01960,
+     +    0.00627,   0.05695,   0.09433,
+     +    0.50138,   0.26284,   0.88531,   0.09220,   0.02037,
+     +    0.00759,   0.05633,   0.09229,
+     +    0.49682,   0.25780,   0.84407,   0.09029,   0.02096,
+     +    0.00869,   0.05568,   0.09030,
+     +    0.49234,   0.25302,   0.80612,   0.08841,   0.02142,
+     +    0.00965,   0.05498,   0.08843,
+     +    0.48793,   0.24846,   0.77108,   0.08654,   0.02177,
+     +    0.01044,   0.05424,   0.08670,
+     +    0.48341,   0.24415,   0.73850,   0.08483,   0.02203,
+     +    0.01111,   0.05350,   0.08488,
+     +    0.47900,   0.24008,   0.70846,   0.08319,   0.02223,
+     +    0.01166,   0.05276,   0.08318 /
+        DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),F(8,22,K),K=15,19)/
+     +    0.47468,   0.23620,   0.68065,   0.08158,   0.02235,
+     +    0.01210,   0.05200,   0.08162,
+     +    0.47040,   0.23245,   0.65463,   0.08004,   0.02241,
+     +    0.01248,   0.05131,   0.08000,
+     +    0.46627,   0.22889,   0.63058,   0.07859,   0.02244,
+     +    0.01282,   0.05066,   0.07846,
+     +    0.46208,   0.22546,   0.60800,   0.07720,   0.02243,
+     +    0.01308,   0.04995,   0.07700,
+     +    0.45806,   0.22219,   0.58700,   0.07585,   0.02241,
+     +    0.01331,   0.04925,   0.07565 /
+        DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=1,7)/
+     +    0.56945,   0.31316,   1.14602,   0.08933,   0.00163,
+     +    0.00013,   0.04557,   0.08933,
+     +    0.56238,   0.30136,   1.06317,   0.08666,   0.00534,
+     +    0.00014,   0.04615,   0.08689,
+     +    0.55469,   0.29100,   0.98714,   0.08407,   0.00805,
+     +    0.00019,   0.04615,   0.08434,
+     +    0.54676,   0.28176,   0.91811,   0.08163,   0.00998,
+     +    0.00012,   0.04587,   0.08168,
+     +    0.53902,   0.27326,   0.85648,   0.07919,   0.01145,
+     +    0.00049,   0.04538,   0.07925,
+     +    0.53141,   0.26552,   0.80148,   0.07684,   0.01257,
+     +    0.00194,   0.04478,   0.07691,
+     +    0.52383,   0.25847,   0.75199,   0.07470,   0.01335,
+     +    0.00333,   0.04406,   0.07471 /
+        DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=8,14)/
+     +    0.51645,   0.25186,   0.70743,   0.07256,   0.01397,
+     +    0.00445,   0.04329,   0.07264,
+     +    0.50929,   0.24570,   0.66719,   0.07053,   0.01444,
+     +    0.00535,   0.04256,   0.07060,
+     +    0.50231,   0.23998,   0.63080,   0.06865,   0.01478,
+     +    0.00607,   0.04179,   0.06870,
+     +    0.49551,   0.23463,   0.59783,   0.06690,   0.01501,
+     +    0.00666,   0.04102,   0.06692,
+     +    0.48895,   0.22958,   0.56777,   0.06526,   0.01519,
+     +    0.00719,   0.04032,   0.06510,
+     +    0.48257,   0.22473,   0.54020,   0.06362,   0.01528,
+     +    0.00758,   0.03955,   0.06353,
+     +    0.47647,   0.22015,   0.51506,   0.06207,   0.01534,
+     +    0.00793,   0.03881,   0.06204 /
+        DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),F(8,23,K),K=15,19)/
+     +    0.47062,   0.21582,   0.49201,   0.06060,   0.01537,
+     +    0.00828,   0.03808,   0.06060,
+     +    0.46477,   0.21177,   0.47070,   0.05919,   0.01536,
+     +    0.00850,   0.03736,   0.05926,
+     +    0.45915,   0.20796,   0.45114,   0.05786,   0.01533,
+     +    0.00868,   0.03668,   0.05798,
+     +    0.45355,   0.20433,   0.43296,   0.05668,   0.01530,
+     +    0.00883,   0.03604,   0.05660,
+     +    0.44825,   0.20086,   0.41617,   0.05554,   0.01524,
+     +    0.00896,   0.03543,   0.05535 /
+        DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=1,7)/
+     +    0.59554,   0.30156,   0.97029,   0.07265,   0.00121,
+     +    0.00001,   0.03693,   0.07262,
+     +    0.58250,   0.28772,   0.88081,   0.06966,   0.00404,
+     +    0.00005,   0.03691,   0.06975,
+     +    0.56974,   0.27593,   0.80328,   0.06703,   0.00602,
+     +    0.00007,   0.03650,   0.06687,
+     +    0.55766,   0.26530,   0.73595,   0.06429,   0.00745,
+     +    0.00005,   0.03595,   0.06432,
+     +    0.54624,   0.25579,   0.67774,   0.06183,   0.00845,
+     +    0.00026,   0.03521,   0.06195,
+     +    0.53531,   0.24725,   0.62694,   0.05960,   0.00917,
+     +    0.00128,   0.03447,   0.05969,
+     +    0.52499,   0.23944,   0.58226,   0.05742,   0.00973,
+     +    0.00237,   0.03380,   0.05752 /
+        DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=8,14)/
+     +    0.51499,   0.23228,   0.54281,   0.05545,   0.01009,
+     +    0.00318,   0.03303,   0.05558,
+     +    0.50536,   0.22571,   0.50770,   0.05369,   0.01038,
+     +    0.00385,   0.03223,   0.05372,
+     +    0.49625,   0.21958,   0.47636,   0.05200,   0.01058,
+     +    0.00435,   0.03144,   0.05200,
+     +    0.48763,   0.21382,   0.44831,   0.05037,   0.01071,
+     +    0.00472,   0.03069,   0.05044,
+     +    0.47939,   0.20842,   0.42303,   0.04881,   0.01084,
+     +    0.00507,   0.03001,   0.04892,
+     +    0.47151,   0.20326,   0.40022,   0.04736,   0.01082,
+     +    0.00537,   0.02929,   0.04760,
+     +    0.46390,   0.19852,   0.37952,   0.04606,   0.01081,
+     +    0.00561,   0.02862,   0.04627 /
+        DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),F(8,24,K),K=15,19)/
+     +    0.45649,   0.19419,   0.36061,   0.04488,   0.01084,
+     +    0.00582,   0.02798,   0.04491,
+     +    0.44941,   0.18999,   0.34345,   0.04371,   0.01085,
+     +    0.00594,   0.02734,   0.04366,
+     +    0.44270,   0.18602,   0.32779,   0.04260,   0.01084,
+     +    0.00603,   0.02672,   0.04251,
+     +    0.43626,   0.18213,   0.31326,   0.04144,   0.01070,
+     +    0.00607,   0.02616,   0.04157,
+     +    0.43009,   0.17850,   0.29989,   0.04038,   0.01059,
+     +    0.00612,   0.02563,   0.04062 /
+        DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=1,7)/
+     +    0.60920,   0.28546,   0.81835,   0.05833,   0.00093,
+     +    0.00002,   0.02962,   0.05824,
+     +    0.59047,   0.27037,   0.72857,   0.05539,   0.00304,
+     +    0.00000,   0.02920,   0.05531,
+     +    0.57325,   0.25744,   0.65389,   0.05255,   0.00446,
+     +   -0.00009,   0.02856,   0.05273,
+     +    0.55714,   0.24614,   0.59091,   0.05022,   0.00541,
+     +    0.00013,   0.02794,   0.05010,
+     +    0.54233,   0.23616,   0.53783,   0.04791,   0.00613,
+     +    0.00032,   0.02711,   0.04796,
+     +    0.52858,   0.22721,   0.49241,   0.04588,   0.00667,
+     +    0.00103,   0.02636,   0.04583,
+     +    0.51565,   0.21909,   0.45331,   0.04408,   0.00698,
+     +    0.00177,   0.02554,   0.04397 /
+        DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=8,14)/
+     +    0.50354,   0.21156,   0.41904,   0.04226,   0.00723,
+     +    0.00224,   0.02483,   0.04230,
+     +    0.49217,   0.20464,   0.38898,   0.04064,   0.00743,
+     +    0.00264,   0.02412,   0.04066,
+     +    0.48136,   0.19835,   0.36246,   0.03917,   0.00758,
+     +    0.00299,   0.02342,   0.03912,
+     +    0.47113,   0.19253,   0.33901,   0.03776,   0.00768,
+     +    0.00329,   0.02275,   0.03776,
+     +    0.46155,   0.18701,   0.31826,   0.03641,   0.00768,
+     +    0.00356,   0.02209,   0.03657,
+     +    0.45228,   0.18197,   0.29932,   0.03527,   0.00763,
+     +    0.00372,   0.02151,   0.03533,
+     +    0.44350,   0.17725,   0.28233,   0.03420,   0.00762,
+     +    0.00383,   0.02094,   0.03417 /
+        DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),F(8,25,K),K=15,19)/
+     +    0.43515,   0.17282,   0.26705,   0.03317,   0.00763,
+     +    0.00390,   0.02039,   0.03308,
+     +    0.42715,   0.16864,   0.25327,   0.03215,   0.00756,
+     +    0.00400,   0.01985,   0.03215,
+     +    0.41958,   0.16472,   0.24075,   0.03120,   0.00747,
+     +    0.00410,   0.01936,   0.03129,
+     +    0.41225,   0.16098,   0.22923,   0.03038,   0.00739,
+     +    0.00416,   0.01887,   0.03040,
+     +    0.40532,   0.15745,   0.21872,   0.02957,   0.00732,
+     +    0.00422,   0.01842,   0.02957 /
+        DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=1,7)/
+     +    0.61167,   0.26658,   0.68716,   0.04622,   0.00066,
+     +    0.00008,   0.02335,   0.04610,
+     +    0.58779,   0.25079,   0.60099,   0.04349,   0.00220,
+     +    0.00007,   0.02286,   0.04325,
+     +    0.56655,   0.23720,   0.53134,   0.04095,   0.00333,
+     +    0.00006,   0.02218,   0.04079,
+     +    0.54719,   0.22554,   0.47441,   0.03869,   0.00406,
+     +    0.00010,   0.02137,   0.03864,
+     +    0.52968,   0.21515,   0.42700,   0.03674,   0.00448,
+     +    0.00024,   0.02067,   0.03671,
+     +    0.51350,   0.20607,   0.38731,   0.03492,   0.00485,
+     +    0.00076,   0.01993,   0.03495,
+     +    0.49843,   0.19801,   0.35331,   0.03334,   0.00515,
+     +    0.00126,   0.01917,   0.03325 /
+        DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=8,14)/
+     +    0.48448,   0.19053,   0.32420,   0.03189,   0.00528,
+     +    0.00162,   0.01854,   0.03177,
+     +    0.47156,   0.18363,   0.29893,   0.03052,   0.00533,
+     +    0.00191,   0.01794,   0.03044,
+     +    0.45949,   0.17731,   0.27680,   0.02925,   0.00536,
+     +    0.00217,   0.01737,   0.02923,
+     +    0.44815,   0.17151,   0.25732,   0.02808,   0.00540,
+     +    0.00238,   0.01681,   0.02809,
+     +    0.43744,   0.16620,   0.24006,   0.02709,   0.00545,
+     +    0.00248,   0.01628,   0.02692,
+     +    0.42738,   0.16112,   0.22481,   0.02604,   0.00541,
+     +    0.00257,   0.01576,   0.02604,
+     +    0.41785,   0.15646,   0.21120,   0.02509,   0.00536,
+     +    0.00267,   0.01527,   0.02519 /
+        DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),F(8,26,K),K=15,19)/
+     +    0.40877,   0.15219,   0.19898,   0.02426,   0.00533,
+     +    0.00278,   0.01481,   0.02432,
+     +    0.40007,   0.14817,   0.18792,   0.02353,   0.00528,
+     +    0.00281,   0.01442,   0.02344,
+     +    0.39188,   0.14442,   0.17792,   0.02284,   0.00523,
+     +    0.00283,   0.01404,   0.02262,
+     +    0.38407,   0.14082,   0.16877,   0.02215,   0.00519,
+     +    0.00285,   0.01360,   0.02195,
+     +    0.37669,   0.13742,   0.16047,   0.02149,   0.00513,
+     +    0.00286,   0.01321,   0.02132 /
+        DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=1,7)/
+     +    0.60437,   0.24598,   0.57404,   0.03602,   0.00047,
+     +    0.00006,   0.01827,   0.03595,
+     +    0.57622,   0.22978,   0.49400,   0.03352,   0.00168,
+     +    0.00021,   0.01762,   0.03348,
+     +    0.55148,   0.21607,   0.43060,   0.03138,   0.00248,
+     +    0.00010,   0.01701,   0.03121,
+     +    0.52933,   0.20437,   0.37984,   0.02946,   0.00305,
+     +    0.00012,   0.01624,   0.02933,
+     +    0.50961,   0.19397,   0.33841,   0.02772,   0.00334,
+     +    0.00022,   0.01559,   0.02773,
+     +    0.49165,   0.18491,   0.30410,   0.02614,   0.00365,
+     +    0.00055,   0.01500,   0.02622,
+     +    0.47520,   0.17678,   0.27527,   0.02485,   0.00377,
+     +    0.00094,   0.01439,   0.02488 /
+        DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=8,14)/
+     +    0.45973,   0.16965,   0.25076,   0.02376,   0.00384,
+     +    0.00121,   0.01382,   0.02359,
+     +    0.44568,   0.16293,   0.22973,   0.02259,   0.00391,
+     +    0.00137,   0.01326,   0.02257,
+     +    0.43260,   0.15684,   0.21139,   0.02159,   0.00394,
+     +    0.00151,   0.01277,   0.02154,
+     +    0.42028,   0.15137,   0.19537,   0.02079,   0.00393,
+     +    0.00165,   0.01234,   0.02051,
+     +    0.40880,   0.14629,   0.18153,   0.02000,   0.00391,
+     +    0.00176,   0.01186,   0.01965,
+     +    0.39823,   0.14145,   0.16924,   0.01909,   0.00390,
+     +    0.00184,   0.01148,   0.01888,
+     +    0.38824,   0.13701,   0.15830,   0.01830,   0.00386,
+     +    0.00189,   0.01111,   0.01818 /
+        DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),F(8,27,K),K=15,19)/
+     +    0.37870,   0.13294,   0.14850,   0.01765,   0.00378,
+     +    0.00194,   0.01075,   0.01755,
+     +    0.36977,   0.12903,   0.13980,   0.01700,   0.00371,
+     +    0.00198,   0.01037,   0.01698,
+     +    0.36140,   0.12539,   0.13197,   0.01639,   0.00364,
+     +    0.00200,   0.01002,   0.01643,
+     +    0.35338,   0.12205,   0.12477,   0.01583,   0.00366,
+     +    0.00203,   0.00973,   0.01578,
+     +    0.34583,   0.11889,   0.11828,   0.01530,   0.00364,
+     +    0.00203,   0.00945,   0.01522 /
+        DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=1,7)/
+     +    0.58899,   0.22440,   0.47688,   0.02749,   0.00040,
+     +    0.00013,   0.01407,   0.02766,
+     +    0.55698,   0.20846,   0.40379,   0.02554,   0.00133,
+     +    0.00008,   0.01345,   0.02533,
+     +    0.52950,   0.19492,   0.34743,   0.02371,   0.00189,
+     +    0.00008,   0.01281,   0.02354,
+     +    0.50537,   0.18323,   0.30312,   0.02203,   0.00230,
+     +    0.00012,   0.01224,   0.02202,
+     +    0.48371,   0.17333,   0.26746,   0.02073,   0.00247,
+     +    0.00016,   0.01163,   0.02066,
+     +    0.46439,   0.16456,   0.23836,   0.01950,   0.00259,
+     +    0.00039,   0.01109,   0.01950,
+     +    0.44692,   0.15664,   0.21392,   0.01832,   0.00271,
+     +    0.00063,   0.01060,   0.01845 /
+        DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),F(8,28,K),K=8,14)/
+     +    0.43082,   0.14964,   0.19344,   0.01743,   0.00280,
+     +    0.00091,   0.01009,   0.01741,
+     +    0.41597,   0.14328,   0.17634,   0.01662,   0.00277,
+     +    0.00103,   0.00963,   0.01655,
+     +    0.40227,   0.13753,   0.16150,   0.01580,   0.00276,
+     +    0.00113,   0.00925,   0.01578,
+     +    0.38967,   0.13230,   0.14849,   0.01498,   0.00279,
+     +    0.00124,   0.00890,   0.01504,
+     +    0.37807,   0.12747,   0.13729,   0.01420,   0.00281,
+     +    0.00129,   0.00851,   0.01439,
+     +    0.36708,   0.12298,   0.12747,   0.01363,   0.00274,
+     +    0.00129,   0.00824,   0.01369,
+     +    0.35678,   0.11882,   0.11877,   0.01310,   0.00267,
+     +    0.00130,   0.00797,   0.01310 /
+        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.11496,   0.11101,   0.01258,   0.00263,
+     +    0.00133,   0.00767,   0.01262,
+     +    0.33799,   0.11134,   0.10414,   0.01204,   0.00260,
+     +    0.00135,   0.00741,   0.01220,
+     +    0.32949,   0.10797,   0.09798,   0.01154,   0.00258,
+     +    0.00137,   0.00718,   0.01180,
+     +    0.32144,   0.10477,   0.09236,   0.01111,   0.00255,
+     +    0.00139,   0.00695,   0.01142,
+     +    0.31382,   0.10179,   0.08729,   0.01072,   0.00250,
+     +    0.00140,   0.00674,   0.01105 /
+        DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=1,7)/
+     +    0.56632,   0.20293,   0.39385,   0.02075,   0.00035,
+     +    0.00006,   0.01057,   0.02092,
+     +    0.53164,   0.18722,   0.32842,   0.01911,   0.00109,
+     +    0.00012,   0.01008,   0.01893,
+     +    0.50194,   0.17419,   0.27907,   0.01775,   0.00137,
+     +    0.00012,   0.00958,   0.01750,
+     +    0.47640,   0.16288,   0.24084,   0.01626,   0.00166,
+     +    0.00007,   0.00910,   0.01632,
+     +    0.45368,   0.15336,   0.21043,   0.01525,   0.00180,
+     +    0.00014,   0.00861,   0.01517,
+     +    0.43359,   0.14494,   0.18599,   0.01426,   0.00194,
+     +    0.00038,   0.00818,   0.01419,
+     +    0.41541,   0.13749,   0.16600,   0.01332,   0.00202,
+     +    0.00058,   0.00774,   0.01342 /
+        DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=8,14)/
+     +    0.39878,   0.13085,   0.14919,   0.01258,   0.00208,
+     +    0.00066,   0.00734,   0.01267,
+     +    0.38375,   0.12480,   0.13494,   0.01188,   0.00208,
+     +    0.00073,   0.00702,   0.01197,
+     +    0.36983,   0.11940,   0.12287,   0.01128,   0.00203,
+     +    0.00081,   0.00671,   0.01133,
+     +    0.35690,   0.11454,   0.11257,   0.01079,   0.00197,
+     +    0.00090,   0.00641,   0.01075,
+     +    0.34512,   0.11004,   0.10363,   0.01028,   0.00196,
+     +    0.00098,   0.00617,   0.01020,
+     +    0.33422,   0.10587,   0.09572,   0.00965,   0.00200,
+     +    0.00096,   0.00595,   0.00976,
+     +    0.32407,   0.10201,   0.08882,   0.00911,   0.00201,
+     +    0.00095,   0.00572,   0.00936 /
+        DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),F(8,29,K),K=15,19)/
+     +    0.31455,   0.09842,   0.08278,   0.00867,   0.00196,
+     +    0.00098,   0.00549,   0.00900,
+     +    0.30538,   0.09510,   0.07738,   0.00837,   0.00191,
+     +    0.00100,   0.00526,   0.00871,
+     +    0.29682,   0.09202,   0.07256,   0.00810,   0.00185,
+     +    0.00101,   0.00506,   0.00844,
+     +    0.28886,   0.08916,   0.06829,   0.00780,   0.00180,
+     +    0.00102,   0.00489,   0.00807,
+     +    0.28141,   0.08648,   0.06442,   0.00753,   0.00177,
+     +    0.00102,   0.00474,   0.00773 /
+        DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=1,7)/
+     +    0.53789,   0.18214,   0.32346,   0.01569,   0.00017,
+     +   -0.00010,   0.00778,   0.01548,
+     +    0.50142,   0.16693,   0.26569,   0.01427,   0.00069,
+     +   -0.00009,   0.00742,   0.01394,
+     +    0.47064,   0.15429,   0.22306,   0.01300,   0.00097,
+     +   -0.00017,   0.00692,   0.01296,
+     +    0.44403,   0.14371,   0.19049,   0.01200,   0.00118,
+     +   -0.00014,   0.00653,   0.01189,
+     +    0.42095,   0.13454,   0.16520,   0.01108,   0.00124,
+     +   -0.00002,   0.00614,   0.01115,
+     +    0.40023,   0.12676,   0.14495,   0.01042,   0.00132,
+     +    0.00013,   0.00581,   0.01034,
+     +    0.38194,   0.11985,   0.12843,   0.00963,   0.00139,
+     +    0.00028,   0.00557,   0.00963 /
+        DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=8,14)/
+     +    0.36547,   0.11362,   0.11473,   0.00887,   0.00139,
+     +    0.00037,   0.00523,   0.00917,
+     +    0.35019,   0.10811,   0.10325,   0.00855,   0.00142,
+     +    0.00050,   0.00497,   0.00858,
+     +    0.33628,   0.10309,   0.09356,   0.00817,   0.00142,
+     +    0.00056,   0.00478,   0.00810,
+     +    0.32373,   0.09847,   0.08530,   0.00761,   0.00138,
+     +    0.00056,   0.00458,   0.00774,
+     +    0.31230,   0.09433,   0.07814,   0.00713,   0.00137,
+     +    0.00057,   0.00437,   0.00728,
+     +    0.30132,   0.09049,   0.07194,   0.00684,   0.00137,
+     +    0.00063,   0.00417,   0.00698,
+     +    0.29120,   0.08701,   0.06656,   0.00658,   0.00134,
+     +    0.00067,   0.00399,   0.00666 /
+        DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),F(8,30,K),K=15,19)/
+     +    0.28188,   0.08383,   0.06186,   0.00633,   0.00131,
+     +    0.00070,   0.00380,   0.00628,
+     +    0.27316,   0.08082,   0.05765,   0.00603,   0.00128,
+     +    0.00067,   0.00365,   0.00600,
+     +    0.26503,   0.07803,   0.05389,   0.00575,   0.00124,
+     +    0.00065,   0.00350,   0.00577,
+     +    0.25727,   0.07548,   0.05056,   0.00552,   0.00121,
+     +    0.00063,   0.00336,   0.00557,
+     +    0.25004,   0.07307,   0.04758,   0.00530,   0.00119,
+     +    0.00064,   0.00324,   0.00539 /
+        DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=1,7)/
+     +    0.50513,   0.16144,   0.26302,   0.01121,   0.00030,
+     +    0.00008,   0.00589,   0.01120,
+     +    0.46769,   0.14689,   0.21310,   0.01006,   0.00061,
+     +    0.00013,   0.00538,   0.01031,
+     +    0.43619,   0.13509,   0.17698,   0.00926,   0.00081,
+     +    0.00008,   0.00507,   0.00930,
+     +    0.40930,   0.12530,   0.14977,   0.00843,   0.00097,
+     +    0.00008,   0.00480,   0.00845,
+     +    0.38606,   0.11683,   0.12868,   0.00774,   0.00103,
+     +    0.00014,   0.00448,   0.00787,
+     +    0.36537,   0.10962,   0.11215,   0.00723,   0.00106,
+     +    0.00022,   0.00418,   0.00743,
+     +    0.34724,   0.10320,   0.09863,   0.00665,   0.00110,
+     +    0.00029,   0.00399,   0.00692 /
+        DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=8,14)/
+     +    0.33099,   0.09753,   0.08756,   0.00610,   0.00105,
+     +    0.00037,   0.00375,   0.00656,
+     +    0.31623,   0.09248,   0.07838,   0.00577,   0.00103,
+     +    0.00042,   0.00357,   0.00612,
+     +    0.30269,   0.08797,   0.07072,   0.00553,   0.00102,
+     +    0.00043,   0.00338,   0.00566,
+     +    0.29028,   0.08388,   0.06423,   0.00526,   0.00100,
+     +    0.00042,   0.00317,   0.00531,
+     +    0.27898,   0.08006,   0.05858,   0.00492,   0.00099,
+     +    0.00042,   0.00303,   0.00512,
+     +    0.26863,   0.07663,   0.05375,   0.00472,   0.00099,
+     +    0.00045,   0.00289,   0.00476,
+     +    0.25898,   0.07352,   0.04955,   0.00454,   0.00097,
+     +    0.00047,   0.00276,   0.00448 /
+        DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),F(8,31,K),K=15,19)/
+     +    0.24988,   0.07068,   0.04587,   0.00439,   0.00092,
+     +    0.00047,   0.00265,   0.00430,
+     +    0.24148,   0.06793,   0.04264,   0.00423,   0.00090,
+     +    0.00046,   0.00252,   0.00415,
+     +    0.23369,   0.06539,   0.03977,   0.00407,   0.00089,
+     +    0.00045,   0.00241,   0.00401,
+     +    0.22635,   0.06315,   0.03721,   0.00391,   0.00087,
+     +    0.00044,   0.00232,   0.00378,
+     +    0.21954,   0.06103,   0.03491,   0.00374,   0.00084,
+     +    0.00044,   0.00223,   0.00359 /
+        DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=1,7)/
+     +    0.46916,   0.14230,   0.21254,   0.00824,   0.00008,
+     +   -0.00004,   0.00410,   0.00810,
+     +    0.43129,   0.12874,   0.17031,   0.00742,   0.00041,
+     +    0.00000,   0.00383,   0.00719,
+     +    0.40002,   0.11768,   0.13974,   0.00655,   0.00058,
+     +    0.00001,   0.00360,   0.00660,
+     +    0.37363,   0.10856,   0.11714,   0.00590,   0.00066,
+     +    0.00000,   0.00336,   0.00599,
+     +    0.35070,   0.10077,   0.09976,   0.00545,   0.00070,
+     +    0.00004,   0.00316,   0.00556,
+     +    0.33052,   0.09410,   0.08621,   0.00500,   0.00074,
+     +    0.00016,   0.00293,   0.00527,
+     +    0.31264,   0.08830,   0.07547,   0.00461,   0.00068,
+     +    0.00017,   0.00270,   0.00498 /
+        DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=8,14)/
+     +    0.29664,   0.08324,   0.06664,   0.00448,   0.00069,
+     +    0.00024,   0.00258,   0.00449,
+     +    0.28236,   0.07866,   0.05933,   0.00422,   0.00071,
+     +    0.00023,   0.00242,   0.00410,
+     +    0.26944,   0.07454,   0.05323,   0.00395,   0.00071,
+     +    0.00023,   0.00227,   0.00386,
+     +    0.25768,   0.07085,   0.04809,   0.00374,   0.00069,
+     +    0.00027,   0.00213,   0.00367,
+     +    0.24699,   0.06753,   0.04373,   0.00353,   0.00066,
+     +    0.00029,   0.00202,   0.00347,
+     +    0.23718,   0.06444,   0.04002,   0.00329,   0.00064,
+     +    0.00028,   0.00194,   0.00331,
+     +    0.22810,   0.06164,   0.03680,   0.00308,   0.00062,
+     +    0.00028,   0.00185,   0.00318 /
+        DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),F(8,32,K),K=15,19)/
+     +    0.21962,   0.05910,   0.03399,   0.00291,   0.00058,
+     +    0.00027,   0.00173,   0.00306,
+     +    0.21169,   0.05670,   0.03150,   0.00286,   0.00059,
+     +    0.00027,   0.00166,   0.00284,
+     +    0.20437,   0.05449,   0.02929,   0.00281,   0.00060,
+     +    0.00028,   0.00160,   0.00263,
+     +    0.19761,   0.05247,   0.02736,   0.00267,   0.00059,
+     +    0.00031,   0.00155,   0.00254,
+     +    0.19130,   0.05059,   0.02563,   0.00254,   0.00057,
+     +    0.00034,   0.00150,   0.00245 /
+        DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=1,7)/
+     +    0.43105,   0.12387,   0.17036,   0.00563,   0.00013,
+     +    0.00009,   0.00292,   0.00577,
+     +    0.39396,   0.11132,   0.13452,   0.00489,   0.00030,
+     +    0.00009,   0.00275,   0.00514,
+     +    0.36299,   0.10130,   0.10933,   0.00450,   0.00036,
+     +    0.00004,   0.00251,   0.00459,
+     +    0.33671,   0.09302,   0.09073,   0.00403,   0.00044,
+     +   -0.00003,   0.00232,   0.00431,
+     +    0.31451,   0.08606,   0.07678,   0.00379,   0.00052,
+     +    0.00003,   0.00217,   0.00383,
+     +    0.29521,   0.08007,   0.06591,   0.00339,   0.00047,
+     +    0.00011,   0.00198,   0.00368,
+     +    0.27825,   0.07477,   0.05726,   0.00327,   0.00049,
+     +    0.00014,   0.00185,   0.00336 /
+        DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=8,14)/
+     +    0.26305,   0.07021,   0.05026,   0.00304,   0.00049,
+     +    0.00012,   0.00174,   0.00311,
+     +    0.24958,   0.06613,   0.04456,   0.00283,   0.00048,
+     +    0.00018,   0.00164,   0.00289,
+     +    0.23744,   0.06247,   0.03982,   0.00267,   0.00047,
+     +    0.00020,   0.00156,   0.00270,
+     +    0.22638,   0.05919,   0.03583,   0.00252,   0.00046,
+     +    0.00020,   0.00150,   0.00252,
+     +    0.21629,   0.05625,   0.03248,   0.00240,   0.00045,
+     +    0.00024,   0.00138,   0.00231,
+     +    0.20702,   0.05356,   0.02960,   0.00231,   0.00045,
+     +    0.00023,   0.00133,   0.00221,
+     +    0.19853,   0.05111,   0.02712,   0.00220,   0.00043,
+     +    0.00021,   0.00126,   0.00210 /
+        DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),F(8,33,K),K=15,19)/
+     +    0.19070,   0.04886,   0.02495,   0.00206,   0.00039,
+     +    0.00017,   0.00116,   0.00197,
+     +    0.18348,   0.04681,   0.02307,   0.00197,   0.00038,
+     +    0.00019,   0.00111,   0.00186,
+     +    0.17682,   0.04492,   0.02142,   0.00189,   0.00037,
+     +    0.00021,   0.00107,   0.00175,
+     +    0.17056,   0.04314,   0.01996,   0.00181,   0.00038,
+     +    0.00021,   0.00103,   0.00169,
+     +    0.16475,   0.04150,   0.01867,   0.00173,   0.00038,
+     +    0.00020,   0.00099,   0.00162 /
+        DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=1,7)/
+     +    0.39205,   0.10682,   0.13532,   0.00382,   0.00015,
+     +    0.00005,   0.00205,   0.00392,
+     +    0.35541,   0.09566,   0.10567,   0.00349,   0.00024,
+     +    0.00001,   0.00190,   0.00349,
+     +    0.32547,   0.08654,   0.08486,   0.00322,   0.00029,
+     +    0.00000,   0.00166,   0.00320,
+     +    0.30077,   0.07903,   0.06991,   0.00275,   0.00024,
+     +    0.00002,   0.00154,   0.00306,
+     +    0.27981,   0.07276,   0.05867,   0.00255,   0.00030,
+     +    0.00002,   0.00143,   0.00262,
+     +    0.26147,   0.06743,   0.05003,   0.00237,   0.00030,
+     +    0.00001,   0.00130,   0.00242,
+     +    0.24548,   0.06279,   0.04319,   0.00225,   0.00029,
+     +    0.00003,   0.00120,   0.00222 /
+        DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=8,14)/
+     +    0.23116,   0.05879,   0.03773,   0.00215,   0.00030,
+     +    0.00007,   0.00114,   0.00204,
+     +    0.21854,   0.05519,   0.03328,   0.00196,   0.00029,
+     +    0.00009,   0.00106,   0.00195,
+     +    0.20722,   0.05199,   0.02960,   0.00185,   0.00027,
+     +    0.00008,   0.00100,   0.00177,
+     +    0.19698,   0.04915,   0.02654,   0.00180,   0.00027,
+     +    0.00008,   0.00095,   0.00158,
+     +    0.18785,   0.04655,   0.02397,   0.00163,   0.00030,
+     +    0.00012,   0.00090,   0.00154,
+     +    0.17927,   0.04420,   0.02179,   0.00156,   0.00030,
+     +    0.00011,   0.00083,   0.00145,
+     +    0.17143,   0.04209,   0.01991,   0.00149,   0.00028,
+     +    0.00010,   0.00077,   0.00136 /
+        DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),F(8,34,K),K=15,19)/
+     +    0.16425,   0.04017,   0.01827,   0.00143,   0.00025,
+     +    0.00010,   0.00071,   0.00127,
+     +    0.15763,   0.03841,   0.01685,   0.00139,   0.00024,
+     +    0.00010,   0.00068,   0.00118,
+     +    0.15155,   0.03680,   0.01559,   0.00136,   0.00024,
+     +    0.00010,   0.00066,   0.00111,
+     +    0.14592,   0.03526,   0.01450,   0.00126,   0.00023,
+     +    0.00009,   0.00064,   0.00106,
+     +    0.14070,   0.03385,   0.01353,   0.00118,   0.00023,
+     +    0.00009,   0.00061,   0.00103 /
+        DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=1,7)/
+     +    0.35234,   0.09146,   0.10650,   0.00259,   0.00005,
+     +    0.00005,   0.00137,   0.00270,
+     +    0.31724,   0.08113,   0.08191,   0.00228,   0.00014,
+     +    0.00000,   0.00125,   0.00249,
+     +    0.28884,   0.07296,   0.06503,   0.00213,   0.00020,
+     +    0.00006,   0.00116,   0.00221,
+     +    0.26548,   0.06635,   0.05307,   0.00177,   0.00024,
+     +    0.00000,   0.00106,   0.00196,
+     +    0.24556,   0.06079,   0.04416,   0.00174,   0.00023,
+     +    0.00004,   0.00097,   0.00176,
+     +    0.22847,   0.05605,   0.03734,   0.00165,   0.00026,
+     +    0.00005,   0.00093,   0.00157,
+     +    0.21361,   0.05201,   0.03206,   0.00152,   0.00026,
+     +    0.00006,   0.00086,   0.00140 /
+        DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=8,14)/
+     +    0.20078,   0.04848,   0.02787,   0.00130,   0.00024,
+     +    0.00006,   0.00077,   0.00127,
+     +    0.18898,   0.04536,   0.02447,   0.00128,   0.00026,
+     +    0.00006,   0.00074,   0.00112,
+     +    0.17847,   0.04259,   0.02166,   0.00123,   0.00024,
+     +    0.00006,   0.00070,   0.00104,
+     +    0.16923,   0.04011,   0.01932,   0.00110,   0.00021,
+     +    0.00007,   0.00066,   0.00100,
+     +    0.16080,   0.03789,   0.01738,   0.00106,   0.00021,
+     +    0.00009,   0.00064,   0.00094,
+     +    0.15317,   0.03588,   0.01575,   0.00094,   0.00021,
+     +    0.00011,   0.00059,   0.00093,
+     +    0.14616,   0.03407,   0.01436,   0.00089,   0.00021,
+     +    0.00011,   0.00055,   0.00087 /
+        DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),F(8,35,K),K=15,19)/
+     +    0.13968,   0.03245,   0.01315,   0.00090,   0.00020,
+     +    0.00009,   0.00052,   0.00076,
+     +    0.13375,   0.03094,   0.01210,   0.00085,   0.00020,
+     +    0.00008,   0.00049,   0.00071,
+     +    0.12832,   0.02955,   0.01118,   0.00080,   0.00019,
+     +    0.00007,   0.00046,   0.00068,
+     +    0.12329,   0.02826,   0.01037,   0.00072,   0.00019,
+     +    0.00008,   0.00045,   0.00067,
+     +    0.11865,   0.02707,   0.00966,   0.00065,   0.00019,
+     +    0.00009,   0.00044,   0.00065 /
+        DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=1,7)/
+     +    0.31330,   0.07733,   0.08288,   0.00177,   0.00000,
+     +   -0.00003,   0.00088,   0.00187,
+     +    0.28041,   0.06822,   0.06302,   0.00144,   0.00009,
+     +   -0.00004,   0.00079,   0.00162,
+     +    0.25374,   0.06101,   0.04961,   0.00141,   0.00007,
+     +   -0.00006,   0.00070,   0.00146,
+     +    0.23203,   0.05517,   0.04006,   0.00118,   0.00010,
+     +   -0.00005,   0.00064,   0.00130,
+     +    0.21358,   0.05034,   0.03309,   0.00116,   0.00013,
+     +   -0.00004,   0.00061,   0.00112,
+     +    0.19785,   0.04627,   0.02783,   0.00116,   0.00013,
+     +    0.00001,   0.00058,   0.00104,
+     +    0.18426,   0.04273,   0.02374,   0.00107,   0.00017,
+     +    0.00003,   0.00054,   0.00100 /
+        DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=8,14)/
+     +    0.17221,   0.03969,   0.02051,   0.00106,   0.00011,
+     +    0.00001,   0.00046,   0.00084,
+     +    0.16170,   0.03706,   0.01793,   0.00097,   0.00009,
+     +   -0.00001,   0.00043,   0.00071,
+     +    0.15248,   0.03470,   0.01582,   0.00085,   0.00013,
+     +    0.00002,   0.00044,   0.00064,
+     +    0.14416,   0.03258,   0.01407,   0.00078,   0.00018,
+     +    0.00006,   0.00044,   0.00060,
+     +    0.13638,   0.03073,   0.01262,   0.00076,   0.00015,
+     +    0.00007,   0.00039,   0.00062,
+     +    0.12959,   0.02902,   0.01139,   0.00065,   0.00014,
+     +    0.00005,   0.00035,   0.00060,
+     +    0.12336,   0.02747,   0.01035,   0.00061,   0.00014,
+     +    0.00005,   0.00033,   0.00056 /
+        DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),F(8,36,K),K=15,19)/
+     +    0.11757,   0.02607,   0.00946,   0.00065,   0.00013,
+     +    0.00005,   0.00033,   0.00049,
+     +    0.11244,   0.02480,   0.00868,   0.00057,   0.00014,
+     +    0.00005,   0.00032,   0.00045,
+     +    0.10775,   0.02364,   0.00800,   0.00048,   0.00014,
+     +    0.00006,   0.00031,   0.00043,
+     +    0.10335,   0.02257,   0.00741,   0.00037,   0.00012,
+     +    0.00005,   0.00028,   0.00047,
+     +    0.09925,   0.02159,   0.00688,   0.00030,   0.00011,
+     +    0.00005,   0.00026,   0.00048 /
+        DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=1,7)/
+     +    0.27525,   0.06459,   0.06374,   0.00111,  -0.00005,
+     +   -0.00005,   0.00055,   0.00125,
+     +    0.24473,   0.05664,   0.04782,   0.00091,   0.00003,
+     +   -0.00001,   0.00049,   0.00114,
+     +    0.22018,   0.05041,   0.03722,   0.00089,   0.00009,
+     +   -0.00003,   0.00046,   0.00096,
+     +    0.20019,   0.04535,   0.02981,   0.00084,   0.00004,
+     +   -0.00002,   0.00039,   0.00085,
+     +    0.18350,   0.04118,   0.02444,   0.00073,   0.00006,
+     +   -0.00005,   0.00033,   0.00077,
+     +    0.16931,   0.03769,   0.02041,   0.00073,   0.00010,
+     +   -0.00004,   0.00033,   0.00057,
+     +    0.15694,   0.03470,   0.01733,   0.00078,   0.00007,
+     +    0.00001,   0.00032,   0.00053 /
+        DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=8,14)/
+     +    0.14644,   0.03210,   0.01491,   0.00058,   0.00006,
+     +    0.00000,   0.00028,   0.00052,
+     +    0.13704,   0.02984,   0.01297,   0.00052,   0.00007,
+     +   -0.00001,   0.00025,   0.00048,
+     +    0.12858,   0.02784,   0.01140,   0.00055,   0.00007,
+     +   -0.00001,   0.00025,   0.00044,
+     +    0.12108,   0.02608,   0.01010,   0.00053,   0.00009,
+     +    0.00001,   0.00026,   0.00041,
+     +    0.11447,   0.02449,   0.00903,   0.00044,   0.00011,
+     +    0.00004,   0.00026,   0.00041,
+     +    0.10845,   0.02308,   0.00812,   0.00041,   0.00009,
+     +    0.00003,   0.00024,   0.00034,
+     +    0.10297,   0.02181,   0.00736,   0.00039,   0.00009,
+     +    0.00003,   0.00023,   0.00030 /
+        DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),F(8,37,K),K=15,19)/
+     +    0.09797,   0.02066,   0.00671,   0.00037,   0.00010,
+     +    0.00004,   0.00022,   0.00030,
+     +    0.09338,   0.01961,   0.00615,   0.00032,   0.00009,
+     +    0.00004,   0.00021,   0.00029,
+     +    0.08918,   0.01866,   0.00566,   0.00028,   0.00008,
+     +    0.00004,   0.00019,   0.00028,
+     +    0.08531,   0.01778,   0.00523,   0.00022,   0.00007,
+     +    0.00003,   0.00018,   0.00030,
+     +    0.08173,   0.01697,   0.00485,   0.00019,   0.00007,
+     +    0.00003,   0.00017,   0.00030 /
+        DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=1,7)/
+     +    0.23909,   0.05334,   0.04839,   0.00074,  -0.00005,
+     +   -0.00004,   0.00033,   0.00078,
+     +    0.21085,   0.04646,   0.03583,   0.00067,   0.00002,
+     +   -0.00007,   0.00027,   0.00072,
+     +    0.18855,   0.04107,   0.02757,   0.00068,   0.00000,
+     +   -0.00007,   0.00027,   0.00052,
+     +    0.17047,   0.03675,   0.02186,   0.00059,   0.00004,
+     +   -0.00007,   0.00022,   0.00049,
+     +    0.15564,   0.03323,   0.01777,   0.00050,   0.00005,
+     +   -0.00003,   0.00023,   0.00044,
+     +    0.14301,   0.03026,   0.01476,   0.00046,   0.00006,
+     +   -0.00002,   0.00023,   0.00036,
+     +    0.13227,   0.02772,   0.01244,   0.00036,   0.00008,
+     +    0.00002,   0.00023,   0.00039 /
+        DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),F(8,38,K),K=8,14)/
+     +    0.12269,   0.02557,   0.01064,   0.00036,   0.00008,
+     +    0.00001,   0.00020,   0.00032,
+     +    0.11425,   0.02369,   0.00921,   0.00037,   0.00007,
+     +   -0.00001,   0.00017,   0.00026,
+     +    0.10693,   0.02203,   0.00806,   0.00032,   0.00006,
+     +   -0.00001,   0.00016,   0.00025,
+     +    0.10049,   0.02058,   0.00712,   0.00025,   0.00005,
+     +    0.00000,   0.00016,   0.00024,
+     +    0.09467,   0.01927,   0.00634,   0.00024,   0.00006,
+     +    0.00001,   0.00015,   0.00021,
+     +    0.08939,   0.01810,   0.00570,   0.00020,   0.00007,
+     +    0.00003,   0.00015,   0.00023,
+     +    0.08467,   0.01705,   0.00515,   0.00017,   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.08043,   0.01610,   0.00468,   0.00014,   0.00009,
+     +    0.00004,   0.00016,   0.00019,
+     +    0.07641,   0.01524,   0.00427,   0.00014,   0.00008,
+     +    0.00003,   0.00015,   0.00018,
+     +    0.07274,   0.01446,   0.00393,   0.00014,   0.00007,
+     +    0.00002,   0.00014,   0.00018,
+     +    0.06941,   0.01374,   0.00362,   0.00012,   0.00007,
+     +    0.00003,   0.00013,   0.00020,
+     +    0.06635,   0.01308,   0.00335,   0.00010,   0.00006,
+     +    0.00003,   0.00012,   0.00021 /
+        DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=1,7)/
+     +    0.20464,   0.04338,   0.03612,   0.00052,  -0.00002,
+     +    0.00000,   0.00023,   0.00049,
+     +    0.17935,   0.03748,   0.02638,   0.00036,  -0.00001,
+     +   -0.00005,   0.00014,   0.00042,
+     +    0.15939,   0.03293,   0.02008,   0.00040,   0.00004,
+     +   -0.00006,   0.00016,   0.00031,
+     +    0.14335,   0.02929,   0.01576,   0.00035,   0.00002,
+     +   -0.00004,   0.00016,   0.00029,
+     +    0.13022,   0.02633,   0.01272,   0.00023,   0.00006,
+     +   -0.00003,   0.00015,   0.00031,
+     +    0.11899,   0.02389,   0.01048,   0.00023,   0.00003,
+     +   -0.00004,   0.00013,   0.00023,
+     +    0.10943,   0.02180,   0.00879,   0.00024,   0.00007,
+     +    0.00000,   0.00015,   0.00020 /
+        DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=8,14)/
+     +    0.10123,   0.02001,   0.00748,   0.00018,   0.00006,
+     +    0.00000,   0.00013,   0.00021,
+     +    0.09400,   0.01847,   0.00644,   0.00017,   0.00006,
+     +    0.00000,   0.00012,   0.00018,
+     +    0.08767,   0.01712,   0.00561,   0.00015,   0.00007,
+     +    0.00001,   0.00013,   0.00017,
+     +    0.08209,   0.01594,   0.00494,   0.00011,   0.00006,
+     +    0.00002,   0.00012,   0.00017,
+     +    0.07705,   0.01489,   0.00439,   0.00010,   0.00005,
+     +    0.00001,   0.00009,   0.00015,
+     +    0.07250,   0.01395,   0.00393,   0.00012,   0.00006,
+     +    0.00002,   0.00010,   0.00014,
+     +    0.06845,   0.01310,   0.00354,   0.00011,   0.00006,
+     +    0.00002,   0.00011,   0.00013 /
+        DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),F(8,39,K),K=15,19)/
+     +    0.06483,   0.01233,   0.00322,   0.00008,   0.00005,
+     +    0.00002,   0.00010,   0.00011,
+     +    0.06149,   0.01164,   0.00293,   0.00006,   0.00006,
+     +    0.00003,   0.00010,   0.00012,
+     +    0.05845,   0.01102,   0.00269,   0.00004,   0.00006,
+     +    0.00004,   0.00009,   0.00012,
+     +    0.05566,   0.01046,   0.00247,   0.00004,   0.00006,
+     +    0.00004,   0.00009,   0.00010,
+     +    0.05308,   0.00994,   0.00229,   0.00005,   0.00005,
+     +    0.00003,   0.00008,   0.00008 /
+        DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=1,7)/
+     +    0.17307,   0.03490,   0.02665,   0.00046,  -0.00007,
+     +   -0.00009,   0.00005,   0.00024,
+     +    0.15055,   0.02994,   0.01920,   0.00037,  -0.00004,
+     +   -0.00009,   0.00006,   0.00024,
+     +    0.13291,   0.02615,   0.01444,   0.00037,  -0.00001,
+     +   -0.00007,   0.00005,   0.00017,
+     +    0.11911,   0.02315,   0.01127,   0.00019,   0.00003,
+     +   -0.00005,   0.00008,   0.00016,
+     +    0.10754,   0.02069,   0.00902,   0.00015,   0.00001,
+     +   -0.00005,   0.00007,   0.00016,
+     +    0.09777,   0.01869,   0.00739,   0.00020,   0.00002,
+     +   -0.00004,   0.00007,   0.00013,
+     +    0.08962,   0.01699,   0.00617,   0.00018,   0.00002,
+     +   -0.00003,   0.00007,   0.00012 /
+        DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=8,14)/
+     +    0.08262,   0.01553,   0.00523,   0.00013,   0.00002,
+     +   -0.00002,   0.00006,   0.00010,
+     +    0.07649,   0.01429,   0.00449,   0.00009,   0.00003,
+     +    0.00000,   0.00006,   0.00012,
+     +    0.07110,   0.01321,   0.00390,   0.00007,   0.00003,
+     +    0.00000,   0.00006,   0.00011,
+     +    0.06633,   0.01225,   0.00342,   0.00007,   0.00003,
+     +   -0.00001,   0.00005,   0.00007,
+     +    0.06205,   0.01141,   0.00303,   0.00008,   0.00002,
+     +    0.00000,   0.00006,   0.00007,
+     +    0.05829,   0.01066,   0.00271,   0.00007,   0.00003,
+     +    0.00001,   0.00006,   0.00007,
+     +    0.05490,   0.00998,   0.00244,   0.00005,   0.00003,
+     +    0.00001,   0.00006,   0.00007 /
+        DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),F(8,40,K),K=15,19)/
+     +    0.05183,   0.00938,   0.00220,   0.00003,   0.00003,
+     +    0.00001,   0.00006,   0.00007,
+     +    0.04900,   0.00884,   0.00201,   0.00004,   0.00002,
+     +    0.00001,   0.00005,   0.00007,
+     +    0.04643,   0.00835,   0.00184,   0.00005,   0.00002,
+     +    0.00000,   0.00004,   0.00006,
+     +    0.04411,   0.00790,   0.00169,   0.00004,   0.00002,
+     +    0.00001,   0.00004,   0.00005,
+     +    0.04199,   0.00749,   0.00156,   0.00004,   0.00002,
+     +    0.00001,   0.00004,   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.14400,   0.02740,   0.01919,   0.00016,  -0.00001,
+     +   -0.00001,   0.00007,   0.00017,
+     +    0.12445,   0.02339,   0.01370,   0.00012,  -0.00002,
+     +   -0.00004,   0.00003,   0.00015,
+     +    0.10933,   0.02034,   0.01022,   0.00013,   0.00000,
+     +   -0.00001,   0.00006,   0.00012,
+     +    0.09717,   0.01790,   0.00791,   0.00015,   0.00000,
+     +   -0.00002,   0.00005,   0.00010,
+     +    0.08733,   0.01594,   0.00630,   0.00012,  -0.00001,
+     +   -0.00003,   0.00002,   0.00010,
+     +    0.07917,   0.01434,   0.00513,   0.00008,   0.00002,
+     +   -0.00002,   0.00002,   0.00010,
+     +    0.07220,   0.01299,   0.00426,   0.00008,   0.00000,
+     +   -0.00001,   0.00004,   0.00011 /
+        DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=8,14)/
+     +    0.06627,   0.01185,   0.00359,   0.00008,   0.00000,
+     +   -0.00002,   0.00003,   0.00007,
+     +    0.06113,   0.01086,   0.00307,   0.00008,   0.00000,
+     +   -0.00001,   0.00002,   0.00007,
+     +    0.05666,   0.01000,   0.00266,   0.00005,   0.00001,
+     +    0.00000,   0.00003,   0.00009,
+     +    0.05273,   0.00925,   0.00233,   0.00003,   0.00001,
+     +    0.00000,   0.00003,   0.00009,
+     +    0.04919,   0.00860,   0.00206,   0.00006,   0.00001,
+     +    0.00000,   0.00003,   0.00004,
+     +    0.04605,   0.00801,   0.00183,   0.00006,   0.00001,
+     +    0.00000,   0.00003,   0.00004,
+     +    0.04325,   0.00748,   0.00164,   0.00005,   0.00001,
+     +    0.00000,   0.00003,   0.00004 /
+        DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),F(8,41,K),K=15,19)/
+     +    0.04073,   0.00701,   0.00149,   0.00004,   0.00000,
+     +    0.00000,   0.00002,   0.00004,
+     +    0.03841,   0.00660,   0.00135,   0.00004,   0.00000,
+     +    0.00000,   0.00001,   0.00004,
+     +    0.03632,   0.00622,   0.00123,   0.00004,   0.00000,
+     +    0.00000,   0.00001,   0.00004,
+     +    0.03442,   0.00587,   0.00113,   0.00005,   0.00001,
+     +    0.00000,   0.00001,   0.00004,
+     +    0.03269,   0.00555,   0.00104,   0.00005,   0.00001,
+     +    0.00000,   0.00002,   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.09451,   0.01603,   0.00934,   0.00000,  -0.00003,
+     +    0.00000,   0.00001,   0.00009,
+     +    0.08031,   0.01345,   0.00648,   0.00004,  -0.00001,
+     +   -0.00001,  -0.00001,   0.00005,
+     +    0.06960,   0.01152,   0.00472,   0.00006,   0.00001,
+     +    0.00000,   0.00002,   0.00002,
+     +    0.06117,   0.01003,   0.00358,   0.00002,   0.00000,
+     +   -0.00002,   0.00001,   0.00001,
+     +    0.05440,   0.00883,   0.00281,   0.00001,   0.00000,
+     +   -0.00001,   0.00002,   0.00002,
+     +    0.04875,   0.00786,   0.00225,   0.00004,   0.00001,
+     +    0.00000,   0.00002,   0.00002,
+     +    0.04411,   0.00705,   0.00185,   0.00002,   0.00001,
+     +    0.00000,   0.00002,   0.00000 /
+        DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=8,14)/
+     +    0.04011,   0.00637,   0.00155,   0.00003,   0.00001,
+     +    0.00000,   0.00001,   0.00001,
+     +    0.03668,   0.00579,   0.00131,   0.00001,   0.00001,
+     +    0.00001,   0.00001,   0.00003,
+     +    0.03372,   0.00529,   0.00113,   0.00000,   0.00001,
+     +    0.00000,   0.00001,   0.00003,
+     +    0.03114,   0.00487,   0.00098,   0.00000,   0.00001,
+     +    0.00000,   0.00001,   0.00002,
+     +    0.02888,   0.00449,   0.00086,   0.00000,   0.00001,
+     +    0.00000,   0.00001,   0.00002,
+     +    0.02686,   0.00415,   0.00076,  -0.00001,   0.00001,
+     +    0.00000,   0.00001,   0.00002,
+     +    0.02506,   0.00386,   0.00068,   0.00000,   0.00001,
+     +    0.00001,   0.00001,   0.00003 /
+        DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),F(8,42,K),K=15,19)/
+     +    0.02342,   0.00360,   0.00061,   0.00002,   0.00001,
+     +    0.00000,   0.00001,   0.00002,
+     +    0.02199,   0.00336,   0.00055,   0.00001,   0.00001,
+     +    0.00000,   0.00001,   0.00002,
+     +    0.02071,   0.00315,   0.00050,  -0.00001,   0.00000,
+     +    0.00000,   0.00001,   0.00002,
+     +    0.01952,   0.00296,   0.00046,  -0.00001,   0.00000,
+     +    0.00000,   0.00001,   0.00002,
+     +    0.01844,   0.00278,   0.00042,   0.00000,   0.00000,
+     +    0.00000,   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.05705,   0.00853,   0.00409,   0.00005,  -0.00001,
+     +   -0.00001,  -0.00002,   0.00001,
+     +    0.04770,   0.00705,   0.00276,   0.00005,   0.00000,
+     +   -0.00001,   0.00000,   0.00001,
+     +    0.04072,   0.00595,   0.00196,   0.00002,   0.00000,
+     +    0.00000,   0.00000,   0.00002,
+     +    0.03534,   0.00510,   0.00146,   0.00001,  -0.00001,
+     +   -0.00001,   0.00000,   0.00000,
+     +    0.03104,   0.00444,   0.00113,   0.00000,   0.00000,
+     +   -0.00001,   0.00000,   0.00001,
+     +    0.02754,   0.00391,   0.00089,   0.00000,   0.00000,
+     +   -0.00001,   0.00000,   0.00000,
+     +    0.02464,   0.00347,   0.00073,   0.00000,   0.00000,
+     +   -0.00001,   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.02220,   0.00311,   0.00060,   0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.02013,   0.00280,   0.00050,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01835,   0.00254,   0.00043,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00001,
+     +    0.01681,   0.00231,   0.00037,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00001,
+     +    0.01548,   0.00212,   0.00033,  -0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01428,   0.00195,   0.00029,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01324,   0.00180,   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.01232,   0.00166,   0.00023,  -0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00001,
+     +    0.01149,   0.00155,   0.00021,  -0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01075,   0.00144,   0.00019,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01008,   0.00135,   0.00017,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00947,   0.00126,   0.00016,   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=1,7)/
+     +    0.03071,   0.00396,   0.00154,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.02518,   0.00321,   0.00101,   0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00001,
+     +    0.02119,   0.00266,   0.00070,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01810,   0.00226,   0.00051,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01567,   0.00194,   0.00039,   0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01373,   0.00169,   0.00030,   0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01216,   0.00148,   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.01085,   0.00131,   0.00020,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00974,   0.00117,   0.00017,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00880,   0.00105,   0.00014,   0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00799,   0.00095,   0.00012,   0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00731,   0.00086,   0.00011,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00669,   0.00079,   0.00009,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00616,   0.00072,   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.00569,   0.00066,   0.00007,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00527,   0.00061,   0.00007,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00490,   0.00057,   0.00006,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00456,   0.00053,   0.00005,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00426,   0.00049,   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.01405,   0.00152,   0.00047,   0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.01130,   0.00121,   0.00029,  -0.00001,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00930,   0.00098,   0.00020,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00780,   0.00082,   0.00014,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00666,   0.00069,   0.00011,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00576,   0.00059,   0.00008,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00502,   0.00051,   0.00007,   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.00443,   0.00045,   0.00005,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00393,   0.00040,   0.00004,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00351,   0.00035,   0.00004,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00316,   0.00032,   0.00003,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00285,   0.00028,   0.00003,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00259,   0.00026,   0.00002,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00236,   0.00023,   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.00217,   0.00021,   0.00002,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00199,   0.00019,   0.00002,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00183,   0.00018,   0.00002,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00170,   0.00016,   0.00001,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00157,   0.00015,   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.00112,   0.00007,   0.00001,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00084,   0.00005,   0.00001,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00066,   0.00004,   0.00001,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00053,   0.00003,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00043,   0.00003,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00036,   0.00002,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00030,   0.00002,   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.00026,   0.00002,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00022,   0.00001,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00019,   0.00001,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00017,   0.00001,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00015,   0.00001,   0.00000,   0.00000,   0.00000,
+     +    0.00000,   0.00000,   0.00000,
+     +    0.00013,   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 /
+        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.00007,   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(82,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