]> git.uio.no Git - u/mrichter/AliRoot.git/blob - PDF/spdf/smrsp31.F
Do not unload gAlice, it is needed until the end of the simulation run
[u/mrichter/AliRoot.git] / PDF / spdf / smrsp31.F
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.2  1996/10/30 08:30:48  cernlib
6 * Version 7.04
7 *
8 * Revision 1.1.1.1  1996/04/12 15:29:46  plothow
9 * Version 7.01
10 *
11 *
12 #include "pdf/pilot.h"
13 C
14       SUBROUTINE SMRSP31(X,SCALE,UPV,DNV,SEA,STR,CHM,BOT,GLU)
15 C
16 C ::::::::::::  PION STRUCTURE FUNCTION :: 10% SEA :::::::::::::::::
17 C
18 #include "pdf/impdp.inc"
19       PARAMETER(NX=50)
20       PARAMETER(NQ=19)
21       PARAMETER(NTENTH=21)
22       DIMENSION F(7,NX,NQ),G(7),XX(NX),N0(7)
23       DATA ((F(I,1,K),I=1,5),F(7,1,K),F(6,1,K),K=1,19)/
24      +0.00072,  0.00072,  2.24386,  0.11213,  0.01988,  0.000,  0.11213,
25      +0.00082,  0.00082,  6.01077,  0.19644,  0.10444,  0.000,  0.19644,
26      +0.00092,  0.00092, 11.34966,  0.31421,  0.22241,  0.000,  0.31421,
27      +0.00102,  0.00102, 18.30687,  0.46698,  0.37533,  0.000,  0.46698,
28      +0.00112,  0.00112, 26.61812,  0.65151,  0.56000,  0.000,  0.65151,
29      +0.00121,  0.00121, 36.29799,  0.86811,  0.77671,  0.000,  0.86811,
30      +0.00130,  0.00130, 47.25444,  1.11544,  1.02412,  0.000,  1.11544,
31      +0.00139,  0.00139, 59.39513,  1.39206,  1.30081,  0.000,  1.39206,
32      +0.00147,  0.00147, 72.64326,  1.69672,  1.60554,  0.000,  1.69672,
33      +0.00156,  0.00156, 86.72952,  2.02439,  1.93325,  0.000,  2.02439,
34      +0.00164,  0.00164,101.74886,  2.37690,  2.28579,  0.000,  2.37690,
35      +0.00172,  0.00172,117.67394,  2.75387,  2.66280,  0.000,  2.75387,
36      +0.00180,  0.00180,134.40170,  3.15338,  3.06232,  0.000,  3.15338,
37      +0.00188,  0.00188,151.60666,  3.56875,  3.47771,  0.000,  3.56875,
38      +0.00195,  0.00195,169.63820,  4.00718,  3.91615,  0.000,  4.00718,
39      +0.00203,  0.00203,188.13266,  4.46117,  4.37014,  0.000,  4.46117,
40      +0.00210,  0.00210,207.15977,  4.93213,  4.84110,  0.000,  4.93213,
41      +0.00217,  0.00217,226.74255,  5.42058,  5.32954,  0.000,  5.42058,
42      +0.00225,  0.00225,246.61613,  5.92074,  5.82970,  0.000,  5.92074/
43       DATA ((F(I,2,K),I=1,5),F(7,2,K),F(6,2,K),K=1,19)/
44      +0.00111,  0.00111,  2.17742,  0.11231,  0.01866,  0.000,  0.11231,
45      +0.00127,  0.00127,  5.45977,  0.18890,  0.09544,  0.000,  0.18890,
46      +0.00142,  0.00142,  9.89892,  0.29189,  0.19860,  0.000,  0.29189,
47      +0.00156,  0.00156, 15.48984,  0.42156,  0.32840,  0.000,  0.42156,
48      +0.00170,  0.00170, 21.98996,  0.57446,  0.48139,  0.000,  0.57446,
49      +0.00183,  0.00183, 29.39132,  0.75029,  0.65731,  0.000,  0.75029,
50      +0.00196,  0.00196, 37.60687,  0.94755,  0.85465,  0.000,  0.94755,
51      +0.00209,  0.00209, 46.55520,  1.16480,  1.07194,  0.000,  1.16480,
52      +0.00221,  0.00221, 56.17102,  1.40079,  1.30799,  0.000,  1.40079,
53      +0.00233,  0.00233, 66.25191,  1.65147,  1.55870,  0.000,  1.65147,
54      +0.00245,  0.00245, 76.86617,  1.91814,  1.82539,  0.000,  1.91814,
55      +0.00256,  0.00256, 87.99162,  2.20039,  2.10766,  0.000,  2.20039,
56      +0.00267,  0.00267, 99.55288,  2.49666,  2.40395,  0.000,  2.49666,
57      +0.00278,  0.00278,111.32133,  2.80196,  2.70926,  0.000,  2.80196,
58      +0.00289,  0.00289,123.54407,  3.12159,  3.02890,  0.000,  3.12159,
59      +0.00299,  0.00299,135.96835,  3.44999,  3.35730,  0.000,  3.44999,
60      +0.00309,  0.00309,148.64532,  3.78820,  3.69550,  0.000,  3.78820,
61      +0.00320,  0.00320,161.59227,  4.13658,  4.04388,  0.000,  4.13658,
62      +0.00330,  0.00330,174.63095,  4.49097,  4.39826,  0.000,  4.49097/
63       DATA ((F(I,3,K),I=1,5),F(7,3,K),F(6,3,K),K=1,19)/
64      +0.00173,  0.00173,  2.11290,  0.11242,  0.01741,  0.000,  0.11242,
65      +0.00196,  0.00196,  4.95911,  0.18160,  0.08675,  0.000,  0.18160,
66      +0.00218,  0.00218,  8.63323,  0.27121,  0.17648,  0.000,  0.27121,
67      +0.00239,  0.00239, 13.10558,  0.38071,  0.28609,  0.000,  0.38071,
68      +0.00259,  0.00259, 18.16538,  0.50676,  0.41222,  0.000,  0.50676,
69      +0.00278,  0.00278, 23.79719,  0.64879,  0.55432,  0.000,  0.64879,
70      +0.00296,  0.00296, 29.92670,  0.80537,  0.71095,  0.000,  0.80537,
71      +0.00314,  0.00314, 36.48803,  0.97516,  0.88078,  0.000,  0.97516,
72      +0.00332,  0.00332, 43.43021,  1.15707,  1.06274,  0.000,  1.15707,
73      +0.00349,  0.00349, 50.60471,  1.34791,  1.25361,  0.000,  1.34791,
74      +0.00365,  0.00365, 58.06309,  1.54866,  1.45437,  0.000,  1.54866,
75      +0.00381,  0.00381, 65.78996,  1.75894,  1.66467,  0.000,  1.75894,
76      +0.00397,  0.00397, 73.73257,  1.97757,  1.88331,  0.000,  1.97757,
77      +0.00412,  0.00412, 81.73221,  2.20083,  2.10658,  0.000,  2.20083,
78      +0.00427,  0.00427, 89.96503,  2.43266,  2.33842,  0.000,  2.43266,
79      +0.00442,  0.00442, 98.25718,  2.66900,  2.57476,  0.000,  2.66900,
80      +0.00456,  0.00456,106.64689,  2.91061,  2.81637,  0.000,  2.91061,
81      +0.00470,  0.00470,115.14849,  3.15779,  3.06355,  0.000,  3.15779,
82      +0.00484,  0.00484,123.64326,  3.40756,  3.31331,  0.000,  3.40756/
83       DATA ((F(I,4,K),I=1,5),F(7,4,K),F(6,4,K),K=1,19)/
84      +0.00224,  0.00224,  2.07600,  0.11243,  0.01667,  0.000,  0.11243,
85      +0.00253,  0.00253,  4.68768,  0.17743,  0.08180,  0.000,  0.17743,
86      +0.00280,  0.00280,  7.96896,  0.25979,  0.16427,  0.000,  0.25979,
87      +0.00306,  0.00306, 11.88430,  0.35872,  0.26330,  0.000,  0.35872,
88      +0.00331,  0.00331, 16.24358,  0.47101,  0.37565,  0.000,  0.47101,
89      +0.00354,  0.00354, 21.03116,  0.59605,  0.50075,  0.000,  0.59605,
90      +0.00377,  0.00377, 26.18172,  0.73248,  0.63724,  0.000,  0.73248,
91      +0.00399,  0.00399, 31.63893,  0.87909,  0.78389,  0.000,  0.87909,
92      +0.00421,  0.00421, 37.36015,  1.03492,  0.93975,  0.000,  1.03492,
93      +0.00441,  0.00441, 43.22284,  1.19720,  1.10206,  0.000,  1.19720,
94      +0.00461,  0.00461, 49.27166,  1.36677,  1.27165,  0.000,  1.36677,
95      +0.00481,  0.00481, 55.49503,  1.54333,  1.44823,  0.000,  1.54333,
96      +0.00500,  0.00500, 61.85102,  1.72587,  1.63078,  0.000,  1.72587,
97      +0.00519,  0.00519, 68.21223,  1.91128,  1.81620,  0.000,  1.91128,
98      +0.00537,  0.00537, 74.72360,  2.10290,  2.00783,  0.000,  2.10290,
99      +0.00554,  0.00554, 81.24595,  2.29732,  2.20226,  0.000,  2.29732,
100      +0.00572,  0.00572, 87.81210,  2.49524,  2.40018,  0.000,  2.49524,
101      +0.00589,  0.00589, 94.43494,  2.69690,  2.60184,  0.000,  2.69690,
102      +0.00605,  0.00605,101.02118,  2.89987,  2.80481,  0.000,  2.89987/
103       DATA ((F(I,5,K),I=1,5),F(7,5,K),F(6,5,K),K=1,19)/
104      +0.00269,  0.00269,  2.05018,  0.11241,  0.01613,  0.000,  0.11241,
105      +0.00303,  0.00303,  4.50406,  0.17450,  0.07835,  0.000,  0.17450,
106      +0.00334,  0.00334,  7.52869,  0.25197,  0.15592,  0.000,  0.25197,
107      +0.00365,  0.00365, 11.08710,  0.34390,  0.24793,  0.000,  0.34390,
108      +0.00394,  0.00394, 15.00411,  0.44721,  0.35131,  0.000,  0.44721,
109      +0.00421,  0.00421, 19.26512,  0.56130,  0.46545,  0.000,  0.56130,
110      +0.00448,  0.00448, 23.81140,  0.68487,  0.58907,  0.000,  0.68487,
111      +0.00473,  0.00473, 28.59319,  0.81682,  0.72106,  0.000,  0.81682,
112      +0.00498,  0.00498, 33.57354,  0.95625,  0.86053,  0.000,  0.95625,
113      +0.00522,  0.00522, 38.64605,  1.10071,  1.00502,  0.000,  1.10071,
114      +0.00545,  0.00545, 43.85141,  1.25096,  1.15528,  0.000,  1.25096,
115      +0.00567,  0.00567, 49.18054,  1.40671,  1.31106,  0.000,  1.40671,
116      +0.00589,  0.00589, 54.59806,  1.56711,  1.47147,  0.000,  1.56711,
117      +0.00611,  0.00611, 59.99537,  1.72941,  1.63378,  0.000,  1.72941,
118      +0.00631,  0.00631, 65.49879,  1.89657,  1.80096,  0.000,  1.89657,
119      +0.00652,  0.00652, 70.98975,  2.06562,  1.97001,  0.000,  2.06562,
120      +0.00671,  0.00671, 76.49767,  2.23717,  2.14158,  0.000,  2.23717,
121      +0.00691,  0.00691, 82.03457,  2.41147,  2.31588,  0.000,  2.41147,
122      +0.00710,  0.00710, 87.52223,  2.58641,  2.49082,  0.000,  2.58641/
123       DATA ((F(I,6,K),I=1,5),F(7,6,K),F(6,6,K),K=1,19)/
124      +0.00310,  0.00310,  2.03035,  0.11238,  0.01571,  0.000,  0.11238,
125      +0.00348,  0.00348,  4.36654,  0.17225,  0.07570,  0.000,  0.17225,
126      +0.00384,  0.00384,  7.20387,  0.24607,  0.14961,  0.000,  0.24607,
127      +0.00418,  0.00418, 10.50550,  0.33283,  0.23646,  0.000,  0.33283,
128      +0.00450,  0.00450, 14.10781,  0.42960,  0.33329,  0.000,  0.42960,
129      +0.00481,  0.00481, 17.99749,  0.53576,  0.43951,  0.000,  0.53576,
130      +0.00511,  0.00511, 22.12087,  0.65011,  0.55391,  0.000,  0.65011,
131      +0.00540,  0.00540, 26.43316,  0.77161,  0.67544,  0.000,  0.77161,
132      +0.00567,  0.00567, 30.90157,  0.89942,  0.80329,  0.000,  0.89942,
133      +0.00594,  0.00594, 35.43105,  1.03132,  0.93521,  0.000,  1.03132,
134      +0.00620,  0.00620, 40.05954,  1.16799,  1.07191,  0.000,  1.16799,
135      +0.00645,  0.00645, 44.77979,  1.30920,  1.21315,  0.000,  1.30920,
136      +0.00669,  0.00669, 49.56099,  1.45416,  1.35813,  0.000,  1.45416,
137      +0.00693,  0.00693, 54.30733,  1.60042,  1.50440,  0.000,  1.60042,
138      +0.00716,  0.00716, 59.13235,  1.75065,  1.65465,  0.000,  1.75065,
139      +0.00739,  0.00739, 63.93156,  1.90220,  1.80621,  0.000,  1.90220,
140      +0.00761,  0.00761, 68.73198,  2.05561,  1.95963,  0.000,  2.05561,
141      +0.00782,  0.00782, 73.54510,  2.21114,  2.11517,  0.000,  2.21114,
142      +0.00803,  0.00803, 78.30254,  2.36689,  2.27093,  0.000,  2.36689/
143       DATA ((F(I,7,K),I=1,5),F(7,7,K),F(6,7,K),K=1,19)/
144      +0.00482,  0.00482,  1.96979,  0.11216,  0.01440,  0.000,  0.11216,
145      +0.00537,  0.00537,  3.96505,  0.16531,  0.06766,  0.000,  0.16531,
146      +0.00590,  0.00590,  6.28051,  0.22850,  0.13093,  0.000,  0.22850,
147      +0.00639,  0.00639,  8.88457,  0.30064,  0.20315,  0.000,  0.30064,
148      +0.00685,  0.00685, 11.64829,  0.37920,  0.28178,  0.000,  0.37920,
149      +0.00729,  0.00729, 14.56387,  0.46369,  0.36632,  0.000,  0.46369,
150      +0.00772,  0.00772, 17.59265,  0.55311,  0.45580,  0.000,  0.55311,
151      +0.00812,  0.00812, 20.70380,  0.64665,  0.54940,  0.000,  0.64665,
152      +0.00851,  0.00851, 23.87603,  0.74372,  0.64651,  0.000,  0.74372,
153      +0.00889,  0.00889, 27.04353,  0.84264,  0.74546,  0.000,  0.84264,
154      +0.00925,  0.00925, 30.23740,  0.94397,  0.84684,  0.000,  0.94397,
155      +0.00960,  0.00960, 33.45503,  1.04759,  0.95049,  0.000,  1.04759,
156      +0.00994,  0.00994, 36.67707,  1.15292,  1.05586,  0.000,  1.15292,
157      +0.01027,  0.01027, 39.83932,  1.25822,  1.16119,  0.000,  1.25822,
158      +0.01059,  0.01059, 43.02351,  1.36549,  1.26848,  0.000,  1.36549,
159      +0.01090,  0.01090, 46.15948,  1.47282,  1.37584,  0.000,  1.47282,
160      +0.01120,  0.01120, 49.26823,  1.58067,  1.48371,  0.000,  1.58067,
161      +0.01149,  0.01149, 52.35935,  1.68923,  1.59230,  0.000,  1.68923,
162      +0.01178,  0.01178, 55.38855,  1.79720,  1.70030,  0.000,  1.79720/
163       DATA ((F(I,8,K),I=1,5),F(7,8,K),F(6,8,K),K=1,19)/
164      +0.00748,  0.00748,  1.91056,  0.11169,  0.01306,  0.000,  0.11169,
165      +0.00830,  0.00830,  3.59926,  0.15840,  0.05989,  0.000,  0.15840,
166      +0.00905,  0.00905,  5.47304,  0.21197,  0.11356,  0.000,  0.21197,
167      +0.00976,  0.00976,  7.50964,  0.27139,  0.17307,  0.000,  0.27139,
168      +0.01042,  0.01042,  9.61153,  0.33461,  0.23638,  0.000,  0.33461,
169      +0.01105,  0.01105, 11.77712,  0.40125,  0.30310,  0.000,  0.40125,
170      +0.01165,  0.01165, 13.98078,  0.47056,  0.37249,  0.000,  0.47056,
171      +0.01222,  0.01222, 16.20313,  0.54196,  0.44396,  0.000,  0.54196,
172      +0.01277,  0.01277, 18.43193,  0.61502,  0.51709,  0.000,  0.61502,
173      +0.01329,  0.01329, 20.62298,  0.68854,  0.59068,  0.000,  0.68854,
174      +0.01379,  0.01379, 22.80208,  0.76301,  0.66520,  0.000,  0.76301,
175      +0.01428,  0.01428, 24.96990,  0.83834,  0.74060,  0.000,  0.83834,
176      +0.01475,  0.01475, 27.11509,  0.91418,  0.81649,  0.000,  0.91418,
177      +0.01520,  0.01520, 29.19535,  0.98928,  0.89165,  0.000,  0.98928,
178      +0.01564,  0.01564, 31.26960,  1.06515,  0.96757,  0.000,  1.06515,
179      +0.01607,  0.01607, 33.29131,  1.14043,  1.04291,  0.000,  1.14043,
180      +0.01648,  0.01648, 35.27670,  1.21551,  1.11804,  0.000,  1.21551,
181      +0.01688,  0.01688, 37.23380,  1.29054,  1.19313,  0.000,  1.29054,
182      +0.01728,  0.01728, 39.13424,  1.36464,  1.26727,  0.000,  1.36464/
183       DATA ((F(I,9,K),I=1,5),F(7,9,K),F(6,9,K),K=1,19)/
184      +0.00969,  0.00969,  1.87635,  0.11126,  0.01226,  0.000,  0.11126,
185      +0.01070,  0.01070,  3.40017,  0.15432,  0.05546,  0.000,  0.15432,
186      +0.01163,  0.01163,  5.04784,  0.20269,  0.10396,  0.000,  0.20269,
187      +0.01250,  0.01250,  6.80315,  0.25547,  0.15685,  0.000,  0.25547,
188      +0.01331,  0.01331,  8.58499,  0.31087,  0.21236,  0.000,  0.31087,
189      +0.01408,  0.01408, 10.39520,  0.36857,  0.27017,  0.000,  0.36857,
190      +0.01482,  0.01482, 12.21461,  0.42799,  0.32969,  0.000,  0.42799,
191      +0.01551,  0.01551, 14.02934,  0.48865,  0.39044,  0.000,  0.48865,
192      +0.01617,  0.01617, 15.83132,  0.55021,  0.45210,  0.000,  0.55021,
193      +0.01681,  0.01681, 17.58610,  0.61171,  0.51367,  0.000,  0.61171,
194      +0.01742,  0.01742, 19.31686,  0.67356,  0.57562,  0.000,  0.67356,
195      +0.01800,  0.01800, 21.02560,  0.73575,  0.63789,  0.000,  0.73575,
196      +0.01857,  0.01857, 22.70437,  0.79800,  0.70022,  0.000,  0.79800,
197      +0.01912,  0.01912, 24.32034,  0.85930,  0.76159,  0.000,  0.85930,
198      +0.01964,  0.01964, 25.92213,  0.92091,  0.82328,  0.000,  0.92091,
199      +0.02016,  0.02016, 27.47338,  0.98175,  0.88420,  0.000,  0.98175,
200      +0.02065,  0.02065, 28.98800,  1.04215,  0.94467,  0.000,  1.04215,
201      +0.02113,  0.02113, 30.47314,  1.10226,  1.00485,  0.000,  1.10226,
202      +0.02160,  0.02160, 31.90709,  1.16136,  1.06402,  0.000,  1.16136/
203       DATA ((F(I,10,K),I=1,5),F(7,10,K),F(6,10,K),K=1,19)/
204      +0.01163,  0.01163,  1.85218,  0.11086,  0.01169,  0.000,  0.11086,
205      +0.01281,  0.01281,  3.26499,  0.15139,  0.05238,  0.000,  0.15139,
206      +0.01389,  0.01389,  4.76509,  0.19626,  0.09740,  0.000,  0.19626,
207      +0.01490,  0.01490,  6.34056,  0.24464,  0.14592,  0.000,  0.24464,
208      +0.01584,  0.01584,  7.92097,  0.29494,  0.19635,  0.000,  0.29494,
209      +0.01673,  0.01673,  9.51035,  0.34691,  0.24845,  0.000,  0.34691,
210      +0.01757,  0.01757, 11.09364,  0.40004,  0.30170,  0.000,  0.40004,
211      +0.01837,  0.01837, 12.66030,  0.45392,  0.35569,  0.000,  0.45392,
212      +0.01913,  0.01913, 14.20477,  0.50830,  0.41018,  0.000,  0.50830,
213      +0.01985,  0.01985, 15.69844,  0.56232,  0.46431,  0.000,  0.56232,
214      +0.02055,  0.02055, 17.16277,  0.61640,  0.51850,  0.000,  0.61640,
215      +0.02122,  0.02122, 18.60047,  0.67053,  0.57273,  0.000,  0.67053,
216      +0.02187,  0.02187, 20.00553,  0.72448,  0.62678,  0.000,  0.72448,
217      +0.02248,  0.02248, 21.35067,  0.77739,  0.67979,  0.000,  0.77739,
218      +0.02309,  0.02309, 22.67827,  0.83039,  0.73288,  0.000,  0.83039,
219      +0.02367,  0.02367, 23.95791,  0.88254,  0.78513,  0.000,  0.88254,
220      +0.02423,  0.02423, 25.20201,  0.93414,  0.83681,  0.000,  0.93414,
221      +0.02477,  0.02477, 26.41717,  0.98533,  0.88810,  0.000,  0.98533,
222      +0.02530,  0.02530, 27.58545,  1.03552,  0.93837,  0.000,  1.03552/
223       DATA ((F(I,11,K),I=1,5),F(7,11,K),F(6,11,K),K=1,19)/
224      +0.01340,  0.01340,  1.83344,  0.11049,  0.01125,  0.000,  0.11049,
225      +0.01472,  0.01472,  3.16336,  0.14908,  0.05002,  0.000,  0.14908,
226      +0.01594,  0.01594,  4.55581,  0.19133,  0.09244,  0.000,  0.19133,
227      +0.01707,  0.01707,  6.00205,  0.23648,  0.13775,  0.000,  0.23648,
228      +0.01812,  0.01812,  7.43940,  0.28307,  0.18450,  0.000,  0.28307,
229      +0.01911,  0.01911,  8.87345,  0.33091,  0.23248,  0.000,  0.33091,
230      +0.02005,  0.02005, 10.29200,  0.37953,  0.28124,  0.000,  0.37953,
231      +0.02094,  0.02094, 11.68684,  0.42860,  0.33045,  0.000,  0.42860,
232      +0.02178,  0.02178, 13.05409,  0.47789,  0.37988,  0.000,  0.47789,
233      +0.02259,  0.02259, 14.36914,  0.52666,  0.42877,  0.000,  0.52666,
234      +0.02336,  0.02336, 15.65218,  0.57530,  0.47753,  0.000,  0.57530,
235      +0.02410,  0.02410, 16.90633,  0.62381,  0.52616,  0.000,  0.62381,
236      +0.02481,  0.02481, 18.12689,  0.67201,  0.57448,  0.000,  0.67201,
237      +0.02550,  0.02550, 19.29029,  0.71912,  0.62170,  0.000,  0.71912,
238      +0.02616,  0.02616, 20.43460,  0.76618,  0.66888,  0.000,  0.76618,
239      +0.02680,  0.02680, 21.53337,  0.81236,  0.71517,  0.000,  0.81236,
240      +0.02742,  0.02742, 22.59799,  0.85794,  0.76084,  0.000,  0.85794,
241      +0.02802,  0.02802, 23.63461,  0.90304,  0.80606,  0.000,  0.90304,
242      +0.02860,  0.02860, 24.62780,  0.94715,  0.85027,  0.000,  0.94715/
243       DATA ((F(I,12,K),I=1,5),F(7,12,K),F(6,12,K),K=1,19)/
244      +0.02081,  0.02081,  1.77474,  0.10892,  0.00987,  0.000,  0.10892,
245      +0.02270,  0.02270,  2.86371,  0.14165,  0.04288,  0.000,  0.14165,
246      +0.02443,  0.02443,  3.95580,  0.17628,  0.07779,  0.000,  0.17628,
247      +0.02602,  0.02602,  5.05108,  0.21227,  0.11405,  0.000,  0.21227,
248      +0.02750,  0.02750,  6.10785,  0.24858,  0.15061,  0.000,  0.24858,
249      +0.02888,  0.02888,  7.13565,  0.28512,  0.18738,  0.000,  0.28512,
250      +0.03018,  0.03018,  8.12957,  0.32162,  0.22411,  0.000,  0.32162,
251      +0.03140,  0.03140,  9.08714,  0.35787,  0.26058,  0.000,  0.35787,
252      +0.03257,  0.03257, 10.00852,  0.39377,  0.29669,  0.000,  0.39377,
253      +0.03367,  0.03367, 10.87888,  0.42883,  0.33195,  0.000,  0.42883,
254      +0.03472,  0.03472, 11.71477,  0.46337,  0.36669,  0.000,  0.46337,
255      +0.03572,  0.03572, 12.52012,  0.49744,  0.40096,  0.000,  0.49744,
256      +0.03669,  0.03669, 13.29315,  0.53094,  0.43464,  0.000,  0.53094,
257      +0.03761,  0.03761, 14.01917,  0.56336,  0.46724,  0.000,  0.56336,
258      +0.03850,  0.03850, 14.72531,  0.59545,  0.49951,  0.000,  0.59545,
259      +0.03935,  0.03935, 15.39467,  0.62666,  0.53090,  0.000,  0.62666,
260      +0.04017,  0.04017, 16.03585,  0.65721,  0.56161,  0.000,  0.65721,
261      +0.04097,  0.04097, 16.65368,  0.68721,  0.59178,  0.000,  0.68721,
262      +0.04174,  0.04174, 17.23866,  0.71632,  0.62104,  0.000,  0.71632/
263       DATA ((F(I,13,K),I=1,5),F(7,13,K),F(6,13,K),K=1,19)/
264      +0.03227,  0.03227,  1.71360,  0.10650,  0.00848,  0.000,  0.10650,
265      +0.03494,  0.03494,  2.58361,  0.13359,  0.03605,  0.000,  0.13359,
266      +0.03736,  0.03736,  3.41933,  0.16132,  0.06423,  0.000,  0.16132,
267      +0.03957,  0.03957,  4.22756,  0.18936,  0.09270,  0.000,  0.18936,
268      +0.04161,  0.04161,  4.98319,  0.21700,  0.12073,  0.000,  0.21700,
269      +0.04350,  0.04350,  5.69822,  0.24425,  0.14837,  0.000,  0.24425,
270      +0.04527,  0.04527,  6.37289,  0.27098,  0.17546,  0.000,  0.27098,
271      +0.04693,  0.04693,  7.00849,  0.29710,  0.20193,  0.000,  0.29710,
272      +0.04850,  0.04850,  7.60767,  0.32259,  0.22775,  0.000,  0.32259,
273      +0.04997,  0.04997,  8.16222,  0.34713,  0.25261,  0.000,  0.34713,
274      +0.05137,  0.05137,  8.68546,  0.37101,  0.27679,  0.000,  0.37101,
275      +0.05271,  0.05271,  9.18143,  0.39429,  0.30037,  0.000,  0.39429,
276      +0.05398,  0.05398,  9.65006,  0.41693,  0.32329,  0.000,  0.41693,
277      +0.05520,  0.05520, 10.08255,  0.43859,  0.34523,  0.000,  0.43859,
278      +0.05636,  0.05636, 10.49788,  0.45984,  0.36675,  0.000,  0.45984,
279      +0.05748,  0.05748, 10.88558,  0.48030,  0.38747,  0.000,  0.48030,
280      +0.05855,  0.05855, 11.25194,  0.50014,  0.40757,  0.000,  0.50014,
281      +0.05959,  0.05959, 11.60063,  0.51948,  0.42716,  0.000,  0.51948,
282      +0.06058,  0.06058, 11.92597,  0.53807,  0.44599,  0.000,  0.53807/
283       DATA ((F(I,14,K),I=1,5),F(7,14,K),F(6,14,K),K=1,19)/
284      +0.04167,  0.04167,  1.67531,  0.10455,  0.00767,  0.000,  0.10455,
285      +0.04490,  0.04490,  2.42574,  0.12845,  0.03221,  0.000,  0.12845,
286      +0.04781,  0.04781,  3.12812,  0.15245,  0.05680,  0.000,  0.15245,
287      +0.05047,  0.05047,  3.79222,  0.17631,  0.08122,  0.000,  0.17631,
288      +0.05289,  0.05289,  4.40081,  0.19950,  0.10494,  0.000,  0.19950,
289      +0.05514,  0.05514,  4.96666,  0.22209,  0.12802,  0.000,  0.22209,
290      +0.05723,  0.05723,  5.49211,  0.24400,  0.15039,  0.000,  0.24400,
291      +0.05919,  0.05919,  5.97994,  0.26519,  0.17203,  0.000,  0.26519,
292      +0.06102,  0.06102,  6.43362,  0.28568,  0.19295,  0.000,  0.28568,
293      +0.06275,  0.06275,  6.84774,  0.30523,  0.21291,  0.000,  0.30523,
294      +0.06438,  0.06438,  7.23383,  0.32410,  0.23217,  0.000,  0.32410,
295      +0.06593,  0.06593,  7.59578,  0.34237,  0.25081,  0.000,  0.34237,
296      +0.06741,  0.06741,  7.93409,  0.36001,  0.26881,  0.000,  0.36001,
297      +0.06881,  0.06881,  8.24242,  0.37676,  0.28592,  0.000,  0.37676,
298      +0.07015,  0.07015,  8.53597,  0.39310,  0.30260,  0.000,  0.39310,
299      +0.07143,  0.07143,  8.80694,  0.40873,  0.31856,  0.000,  0.40873,
300      +0.07266,  0.07266,  9.06050,  0.42381,  0.33395,  0.000,  0.42381,
301      +0.07385,  0.07385,  9.29972,  0.43842,  0.34887,  0.000,  0.43842,
302      +0.07498,  0.07498,  9.52044,  0.45239,  0.36314,  0.000,  0.45239/
303       DATA ((F(I,15,K),I=1,5),F(7,15,K),F(6,15,K),K=1,19)/
304      +0.04991,  0.04991,  1.64618,  0.10295,  0.00712,  0.000,  0.10295,
305      +0.05359,  0.05359,  2.31435,  0.12466,  0.02960,  0.000,  0.12466,
306      +0.05688,  0.05688,  2.92734,  0.14612,  0.05179,  0.000,  0.14612,
307      +0.05987,  0.05987,  3.49690,  0.16721,  0.07354,  0.000,  0.16721,
308      +0.06259,  0.06259,  4.01077,  0.18748,  0.09444,  0.000,  0.18748,
309      +0.06509,  0.06509,  4.48200,  0.20703,  0.11458,  0.000,  0.20703,
310      +0.06742,  0.06742,  4.91412,  0.22583,  0.13394,  0.000,  0.22583,
311      +0.06959,  0.06959,  5.31061,  0.24387,  0.15251,  0.000,  0.24387,
312      +0.07162,  0.07162,  5.67536,  0.26119,  0.17034,  0.000,  0.26119,
313      +0.07352,  0.07352,  6.00453,  0.27761,  0.18723,  0.000,  0.27761,
314      +0.07532,  0.07532,  6.30843,  0.29335,  0.20344,  0.000,  0.29335,
315      +0.07702,  0.07702,  6.59075,  0.30850,  0.21903,  0.000,  0.30850,
316      +0.07864,  0.07864,  6.85226,  0.32305,  0.23400,  0.000,  0.32305,
317      +0.08016,  0.08016,  7.08802,  0.33679,  0.24815,  0.000,  0.33679,
318      +0.08163,  0.08163,  7.31088,  0.35013,  0.26189,  0.000,  0.35013,
319      +0.08302,  0.08302,  7.51459,  0.36283,  0.27497,  0.000,  0.36283,
320      +0.08435,  0.08435,  7.70359,  0.37502,  0.28753,  0.000,  0.37502,
321      +0.08564,  0.08564,  7.88052,  0.38678,  0.29965,  0.000,  0.38678,
322      +0.08686,  0.08686,  8.04214,  0.39797,  0.31119,  0.000,  0.39797/
323       DATA ((F(I,16,K),I=1,5),F(7,16,K),F(6,16,K),K=1,19)/
324      +0.05739,  0.05739,  1.62205,  0.10155,  0.00670,  0.000,  0.10155,
325      +0.06142,  0.06142,  2.22766,  0.12160,  0.02764,  0.000,  0.12160,
326      +0.06501,  0.06501,  2.77389,  0.14117,  0.04805,  0.000,  0.14117,
327      +0.06826,  0.06826,  3.27406,  0.16019,  0.06784,  0.000,  0.16019,
328      +0.07121,  0.07121,  3.71939,  0.17831,  0.08667,  0.000,  0.17831,
329      +0.07392,  0.07392,  4.12300,  0.19564,  0.10468,  0.000,  0.19564,
330      +0.07642,  0.07642,  4.48911,  0.21219,  0.12186,  0.000,  0.21219,
331      +0.07875,  0.07875,  4.82166,  0.22797,  0.13824,  0.000,  0.22797,
332      +0.08093,  0.08093,  5.12468,  0.24302,  0.15387,  0.000,  0.24302,
333      +0.08296,  0.08296,  5.39539,  0.25720,  0.16859,  0.000,  0.25720,
334      +0.08487,  0.08487,  5.64314,  0.27072,  0.18264,  0.000,  0.27072,
335      +0.08668,  0.08668,  5.87144,  0.28368,  0.19609,  0.000,  0.28368,
336      +0.08839,  0.08839,  6.08119,  0.29606,  0.20895,  0.000,  0.29606,
337      +0.09001,  0.09001,  6.26838,  0.30770,  0.22105,  0.000,  0.30770,
338      +0.09156,  0.09156,  6.44418,  0.31895,  0.23275,  0.000,  0.31895,
339      +0.09303,  0.09303,  6.60338,  0.32961,  0.24384,  0.000,  0.32961,
340      +0.09443,  0.09443,  6.74990,  0.33981,  0.25445,  0.000,  0.33981,
341      +0.09577,  0.09577,  6.88607,  0.34962,  0.26466,  0.000,  0.34962,
342      +0.09705,  0.09705,  7.00920,  0.35891,  0.27434,  0.000,  0.35891/
343       DATA ((F(I,17,K),I=1,5),F(7,17,K),F(6,17,K),K=1,19)/
344      +0.08811,  0.08811,  1.53472,  0.09533,  0.00539,  0.000,  0.09533,
345      +0.09327,  0.09327,  1.95698,  0.11027,  0.02171,  0.000,  0.11027,
346      +0.09779,  0.09779,  2.31642,  0.12426,  0.03695,  0.000,  0.12426,
347      +0.10183,  0.10183,  2.62911,  0.13738,  0.05122,  0.000,  0.13738,
348      +0.10544,  0.10544,  2.89436,  0.14949,  0.06439,  0.000,  0.14949,
349      +0.10872,  0.10872,  3.12450,  0.16076,  0.07664,  0.000,  0.16076,
350      +0.11171,  0.11171,  3.32480,  0.17124,  0.08804,  0.000,  0.17124,
351      +0.11447,  0.11447,  3.49967,  0.18101,  0.09867,  0.000,  0.18101,
352      +0.11701,  0.11701,  3.65305,  0.19013,  0.10861,  0.000,  0.19013,
353      +0.11936,  0.11936,  3.78430,  0.19854,  0.11778,  0.000,  0.19854,
354      +0.12155,  0.12155,  3.90004,  0.20641,  0.12638,  0.000,  0.20641,
355      +0.12361,  0.12361,  4.00299,  0.21381,  0.13448,  0.000,  0.21381,
356      +0.12554,  0.12554,  4.09417,  0.22077,  0.14210,  0.000,  0.22077,
357      +0.12734,  0.12734,  4.17159,  0.22718,  0.14915,  0.000,  0.22718,
358      +0.12905,  0.12905,  4.24215,  0.23330,  0.15587,  0.000,  0.23330,
359      +0.13066,  0.13066,  4.30302,  0.23900,  0.16215,  0.000,  0.23900,
360      +0.13218,  0.13218,  4.35667,  0.24436,  0.16808,  0.000,  0.24436,
361      +0.13363,  0.13363,  4.40460,  0.24945,  0.17371,  0.000,  0.24945,
362      +0.13500,  0.13500,  4.44538,  0.25420,  0.17897,  0.000,  0.25420/
363       DATA ((F(I,18,K),I=1,5),F(7,18,K),F(6,18,K),K=1,19)/
364      +0.13363,  0.13363,  1.41572,  0.08496,  0.00410,  0.000,  0.08496,
365      +0.13958,  0.13958,  1.67114,  0.09496,  0.01608,  0.000,  0.09496,
366      +0.14466,  0.14466,  1.87224,  0.10385,  0.02673,  0.000,  0.10385,
367      +0.14909,  0.14909,  2.03503,  0.11183,  0.03630,  0.000,  0.11183,
368      +0.15297,  0.15297,  2.16313,  0.11889,  0.04480,  0.000,  0.11889,
369      +0.15642,  0.15642,  2.26660,  0.12522,  0.05246,  0.000,  0.12522,
370      +0.15951,  0.15951,  2.35033,  0.13091,  0.05938,  0.000,  0.13091,
371      +0.16229,  0.16229,  2.41809,  0.13605,  0.06565,  0.000,  0.13605,
372      +0.16483,  0.16483,  2.47300,  0.14069,  0.07136,  0.000,  0.14069,
373      +0.16711,  0.16711,  2.51528,  0.14483,  0.07650,  0.000,  0.14483,
374      +0.16921,  0.16921,  2.54913,  0.14860,  0.08120,  0.000,  0.14860,
375      +0.17115,  0.17115,  2.57633,  0.15206,  0.08554,  0.000,  0.15206,
376      +0.17294,  0.17294,  2.59764,  0.15522,  0.08954,  0.000,  0.15522,
377      +0.17458,  0.17458,  2.61213,  0.15803,  0.09316,  0.000,  0.15803,
378      +0.17611,  0.17611,  2.62364,  0.16066,  0.09655,  0.000,  0.16066,
379      +0.17753,  0.17753,  2.63074,  0.16304,  0.09964,  0.000,  0.16304,
380      +0.17886,  0.17886,  2.63478,  0.16522,  0.10251,  0.000,  0.16522,
381      +0.18010,  0.18010,  2.63655,  0.16724,  0.10519,  0.000,  0.16724,
382      +0.18125,  0.18125,  2.63537,  0.16906,  0.10765,  0.000,  0.16906/
383       DATA ((F(I,19,K),I=1,5),F(7,19,K),F(6,19,K),K=1,19)/
384      +0.16877,  0.16877,  1.32156,  0.07593,  0.00335,  0.000,  0.07593,
385      +0.17464,  0.17464,  1.48920,  0.08318,  0.01291,  0.000,  0.08318,
386      +0.17954,  0.17954,  1.61213,  0.08937,  0.02114,  0.000,  0.08937,
387      +0.18372,  0.18372,  1.70482,  0.09474,  0.02832,  0.000,  0.09474,
388      +0.18729,  0.18729,  1.77170,  0.09933,  0.03454,  0.000,  0.09933,
389      +0.19039,  0.19039,  1.82098,  0.10331,  0.04001,  0.000,  0.10331,
390      +0.19312,  0.19312,  1.85672,  0.10678,  0.04485,  0.000,  0.10678,
391      +0.19553,  0.19553,  1.88196,  0.10982,  0.04915,  0.000,  0.10982,
392      +0.19767,  0.19767,  1.89908,  0.11249,  0.05300,  0.000,  0.11249,
393      +0.19956,  0.19956,  1.90843,  0.11479,  0.05638,  0.000,  0.11479,
394      +0.20125,  0.20125,  1.91291,  0.11682,  0.05943,  0.000,  0.11682,
395      +0.20278,  0.20278,  1.91377,  0.11863,  0.06220,  0.000,  0.11863,
396      +0.20418,  0.20418,  1.91152,  0.12023,  0.06471,  0.000,  0.12023,
397      +0.20541,  0.20541,  1.90558,  0.12160,  0.06693,  0.000,  0.12160,
398      +0.20655,  0.20655,  1.89843,  0.12285,  0.06899,  0.000,  0.12285,
399      +0.20757,  0.20757,  1.88913,  0.12393,  0.07083,  0.000,  0.12393,
400      +0.20850,  0.20850,  1.87852,  0.12489,  0.07252,  0.000,  0.12489,
401      +0.20936,  0.20936,  1.86710,  0.12574,  0.07407,  0.000,  0.12574,
402      +0.21012,  0.21012,  1.85441,  0.12647,  0.07546,  0.000,  0.12647/
403       DATA ((F(I,20,K),I=1,5),F(7,20,K),F(6,20,K),K=1,19)/
404      +0.19770,  0.19770,  1.23883,  0.06785,  0.00282,  0.000,  0.06785,
405      +0.20306,  0.20306,  1.34982,  0.07327,  0.01073,  0.000,  0.07327,
406      +0.20740,  0.20740,  1.42451,  0.07773,  0.01736,  0.000,  0.07773,
407      +0.21101,  0.21101,  1.47562,  0.08147,  0.02302,  0.000,  0.08147,
408      +0.21400,  0.21400,  1.50745,  0.08455,  0.02782,  0.000,  0.08455,
409      +0.21652,  0.21652,  1.52670,  0.08713,  0.03197,  0.000,  0.08713,
410      +0.21868,  0.21868,  1.53669,  0.08931,  0.03556,  0.000,  0.08931,
411      +0.22052,  0.22052,  1.53979,  0.09115,  0.03871,  0.000,  0.09115,
412      +0.22211,  0.22211,  1.53783,  0.09271,  0.04147,  0.000,  0.09271,
413      +0.22345,  0.22345,  1.53108,  0.09399,  0.04386,  0.000,  0.09399,
414      +0.22462,  0.22462,  1.52164,  0.09508,  0.04598,  0.000,  0.09508,
415      +0.22564,  0.22564,  1.51039,  0.09601,  0.04788,  0.000,  0.09601,
416      +0.22652,  0.22652,  1.49765,  0.09679,  0.04958,  0.000,  0.09679,
417      +0.22726,  0.22726,  1.48298,  0.09741,  0.05105,  0.000,  0.09741,
418      +0.22792,  0.22792,  1.46809,  0.09795,  0.05239,  0.000,  0.09795,
419      +0.22848,  0.22848,  1.45228,  0.09837,  0.05358,  0.000,  0.09837,
420      +0.22895,  0.22895,  1.43612,  0.09871,  0.05464,  0.000,  0.09871,
421      +0.22937,  0.22937,  1.41991,  0.09898,  0.05561,  0.000,  0.09898,
422      +0.22970,  0.22970,  1.40330,  0.09918,  0.05646,  0.000,  0.09918/
423       DATA ((F(I,21,K),I=1,5),F(7,21,K),F(6,21,K),K=1,19)/
424      +0.22220,  0.22220,  1.16328,  0.06055,  0.00242,  0.000,  0.06055,
425      +0.22677,  0.22677,  1.23427,  0.06466,  0.00909,  0.000,  0.06466,
426      +0.23033,  0.23033,  1.27612,  0.06792,  0.01456,  0.000,  0.06792,
427      +0.23318,  0.23318,  1.29987,  0.07055,  0.01915,  0.000,  0.07055,
428      +0.23543,  0.23543,  1.30937,  0.07263,  0.02296,  0.000,  0.07263,
429      +0.23724,  0.23724,  1.31007,  0.07430,  0.02620,  0.000,  0.07430,
430      +0.23871,  0.23871,  1.30461,  0.07565,  0.02897,  0.000,  0.07565,
431      +0.23989,  0.23989,  1.29485,  0.07674,  0.03134,  0.000,  0.07674,
432      +0.24085,  0.24085,  1.28214,  0.07761,  0.03340,  0.000,  0.07761,
433      +0.24158,  0.24158,  1.26664,  0.07827,  0.03516,  0.000,  0.07827,
434      +0.24216,  0.24216,  1.24992,  0.07879,  0.03669,  0.000,  0.07879,
435      +0.24261,  0.24261,  1.23255,  0.07919,  0.03804,  0.000,  0.07919,
436      +0.24295,  0.24295,  1.21473,  0.07950,  0.03923,  0.000,  0.07950,
437      +0.24316,  0.24316,  1.19609,  0.07968,  0.04024,  0.000,  0.07968,
438      +0.24331,  0.24331,  1.17783,  0.07981,  0.04116,  0.000,  0.07981,
439      +0.24338,  0.24338,  1.15941,  0.07987,  0.04195,  0.000,  0.07987,
440      +0.24338,  0.24338,  1.14120,  0.07987,  0.04265,  0.000,  0.07987,
441      +0.24333,  0.24333,  1.12337,  0.07983,  0.04327,  0.000,  0.07983,
442      +0.24322,  0.24322,  1.10564,  0.07974,  0.04380,  0.000,  0.07974/
443       DATA ((F(I,22,K),I=1,5),F(7,22,K),F(6,22,K),K=1,19)/
444      +0.24801,  0.24801,  1.07612,  0.05239,  0.00202,  0.000,  0.05239,
445      +0.25134,  0.25134,  1.11121,  0.05532,  0.00751,  0.000,  0.05532,
446      +0.25372,  0.25372,  1.12467,  0.05752,  0.01190,  0.000,  0.05752,
447      +0.25547,  0.25547,  1.12558,  0.05921,  0.01551,  0.000,  0.05921,
448      +0.25667,  0.25667,  1.11707,  0.06045,  0.01844,  0.000,  0.06045,
449      +0.25749,  0.25749,  1.10332,  0.06138,  0.02088,  0.000,  0.06138,
450      +0.25801,  0.25801,  1.08628,  0.06207,  0.02293,  0.000,  0.06207,
451      +0.25830,  0.25830,  1.06723,  0.06256,  0.02466,  0.000,  0.06256,
452      +0.25841,  0.25841,  1.04707,  0.06290,  0.02614,  0.000,  0.06290,
453      +0.25833,  0.25833,  1.02585,  0.06309,  0.02736,  0.000,  0.06309,
454      +0.25814,  0.25814,  1.00460,  0.06318,  0.02842,  0.000,  0.06318,
455      +0.25786,  0.25786,  0.98368,  0.06320,  0.02933,  0.000,  0.06320,
456      +0.25750,  0.25750,  0.96313,  0.06316,  0.03012,  0.000,  0.06316,
457      +0.25704,  0.25704,  0.94263,  0.06304,  0.03077,  0.000,  0.06304,
458      +0.25655,  0.25655,  0.92298,  0.06289,  0.03135,  0.000,  0.06289,
459      +0.25600,  0.25600,  0.90373,  0.06269,  0.03183,  0.000,  0.06269,
460      +0.25541,  0.25541,  0.88510,  0.06247,  0.03225,  0.000,  0.06247,
461      +0.25480,  0.25480,  0.86716,  0.06222,  0.03261,  0.000,  0.06222,
462      +0.25414,  0.25414,  0.84969,  0.06195,  0.03291,  0.000,  0.06195/
463       DATA ((F(I,23,K),I=1,5),F(7,23,K),F(6,23,K),K=1,19)/
464      +0.26952,  0.26952,  0.99526,  0.04518,  0.00170,  0.000,  0.04518,
465      +0.27142,  0.27142,  1.00460,  0.04727,  0.00627,  0.000,  0.04727,
466      +0.27249,  0.27249,  0.99850,  0.04874,  0.00985,  0.000,  0.04874,
467      +0.27302,  0.27302,  0.98430,  0.04978,  0.01272,  0.000,  0.04978,
468      +0.27308,  0.27308,  0.96438,  0.05048,  0.01502,  0.000,  0.05048,
469      +0.27285,  0.27285,  0.94190,  0.05093,  0.01690,  0.000,  0.05093,
470      +0.27239,  0.27239,  0.91819,  0.05120,  0.01845,  0.000,  0.05120,
471      +0.27176,  0.27176,  0.89410,  0.05133,  0.01974,  0.000,  0.05133,
472      +0.27100,  0.27100,  0.87019,  0.05135,  0.02081,  0.000,  0.05135,
473      +0.27010,  0.27010,  0.84636,  0.05127,  0.02169,  0.000,  0.05127,
474      +0.26914,  0.26914,  0.82330,  0.05112,  0.02242,  0.000,  0.05112,
475      +0.26812,  0.26812,  0.80118,  0.05092,  0.02305,  0.000,  0.05092,
476      +0.26707,  0.26707,  0.77995,  0.05069,  0.02358,  0.000,  0.05069,
477      +0.26595,  0.26595,  0.75930,  0.05041,  0.02400,  0.000,  0.05041,
478      +0.26484,  0.26484,  0.73977,  0.05012,  0.02437,  0.000,  0.05012,
479      +0.26369,  0.26369,  0.72097,  0.04980,  0.02467,  0.000,  0.04980,
480      +0.26253,  0.26253,  0.70302,  0.04947,  0.02492,  0.000,  0.04947,
481      +0.26137,  0.26137,  0.68593,  0.04913,  0.02512,  0.000,  0.04913,
482      +0.26019,  0.26019,  0.66949,  0.04877,  0.02528,  0.000,  0.04877/
483       DATA ((F(I,24,K),I=1,5),F(7,24,K),F(6,24,K),K=1,19)/
484      +0.28744,  0.28744,  0.91965,  0.03881,  0.00144,  0.000,  0.03881,
485      +0.28780,  0.28780,  0.91010,  0.04029,  0.00527,  0.000,  0.04029,
486      +0.28748,  0.28748,  0.89026,  0.04124,  0.00820,  0.000,  0.04124,
487      +0.28673,  0.28673,  0.86590,  0.04185,  0.01053,  0.000,  0.04185,
488      +0.28563,  0.28563,  0.83872,  0.04218,  0.01235,  0.000,  0.04218,
489      +0.28432,  0.28432,  0.81099,  0.04232,  0.01381,  0.000,  0.04232,
490      +0.28285,  0.28285,  0.78357,  0.04233,  0.01499,  0.000,  0.04233,
491      +0.28130,  0.28130,  0.75694,  0.04224,  0.01596,  0.000,  0.04224,
492      +0.27968,  0.27968,  0.73139,  0.04207,  0.01675,  0.000,  0.04207,
493      +0.27798,  0.27798,  0.70670,  0.04183,  0.01738,  0.000,  0.04183,
494      +0.27625,  0.27625,  0.68332,  0.04154,  0.01790,  0.000,  0.04154,
495      +0.27453,  0.27453,  0.66125,  0.04124,  0.01833,  0.000,  0.04124,
496      +0.27281,  0.27281,  0.64040,  0.04091,  0.01869,  0.000,  0.04091,
497      +0.27106,  0.27106,  0.62048,  0.04055,  0.01896,  0.000,  0.04055,
498      +0.26935,  0.26935,  0.60180,  0.04019,  0.01919,  0.000,  0.04019,
499      +0.26763,  0.26763,  0.58405,  0.03982,  0.01937,  0.000,  0.03982,
500      +0.26593,  0.26593,  0.56726,  0.03944,  0.01951,  0.000,  0.03944,
501      +0.26427,  0.26427,  0.55140,  0.03907,  0.01962,  0.000,  0.03907,
502      +0.26260,  0.26260,  0.53630,  0.03868,  0.01970,  0.000,  0.03868/
503       DATA ((F(I,25,K),I=1,5),F(7,25,K),F(6,25,K),K=1,19)/
504      +0.30228,  0.30228,  0.84862,  0.03320,  0.00123,  0.000,  0.03320,
505      +0.30102,  0.30102,  0.82509,  0.03423,  0.00444,  0.000,  0.03423,
506      +0.29925,  0.29925,  0.79558,  0.03482,  0.00687,  0.000,  0.03482,
507      +0.29720,  0.29720,  0.76445,  0.03513,  0.00875,  0.000,  0.03513,
508      +0.29492,  0.29492,  0.73277,  0.03522,  0.01020,  0.000,  0.03522,
509      +0.29253,  0.29253,  0.70208,  0.03516,  0.01135,  0.000,  0.03516,
510      +0.29008,  0.29008,  0.67283,  0.03501,  0.01226,  0.000,  0.03501,
511      +0.28762,  0.28762,  0.64521,  0.03478,  0.01299,  0.000,  0.03478,
512      +0.28516,  0.28516,  0.61930,  0.03450,  0.01358,  0.000,  0.03450,
513      +0.28267,  0.28267,  0.59479,  0.03418,  0.01403,  0.000,  0.03418,
514      +0.28022,  0.28022,  0.57193,  0.03383,  0.01440,  0.000,  0.03383,
515      +0.27782,  0.27782,  0.55063,  0.03347,  0.01470,  0.000,  0.03347,
516      +0.27547,  0.27547,  0.53073,  0.03310,  0.01493,  0.000,  0.03310,
517      +0.27312,  0.27312,  0.51195,  0.03271,  0.01511,  0.000,  0.03271,
518      +0.27084,  0.27084,  0.49449,  0.03233,  0.01525,  0.000,  0.03233,
519      +0.26860,  0.26860,  0.47805,  0.03195,  0.01535,  0.000,  0.03195,
520      +0.26640,  0.26640,  0.46263,  0.03157,  0.01542,  0.000,  0.03157,
521      +0.26426,  0.26426,  0.44815,  0.03119,  0.01547,  0.000,  0.03119,
522      +0.26215,  0.26215,  0.43448,  0.03081,  0.01549,  0.000,  0.03081/
523       DATA ((F(I,26,K),I=1,5),F(7,26,K),F(6,26,K),K=1,19)/
524      +0.31439,  0.31439,  0.78172,  0.02828,  0.00104,  0.000,  0.02828,
525      +0.31148,  0.31148,  0.74792,  0.02898,  0.00376,  0.000,  0.02898,
526      +0.30824,  0.30824,  0.71170,  0.02931,  0.00576,  0.000,  0.02931,
527      +0.30488,  0.30488,  0.67621,  0.02942,  0.00730,  0.000,  0.02942,
528      +0.30143,  0.30143,  0.64194,  0.02935,  0.00846,  0.000,  0.02935,
529      +0.29798,  0.29798,  0.60983,  0.02918,  0.00936,  0.000,  0.02918,
530      +0.29457,  0.29457,  0.58001,  0.02893,  0.01007,  0.000,  0.02893,
531      +0.29123,  0.29123,  0.55241,  0.02863,  0.01062,  0.000,  0.02863,
532      +0.28796,  0.28796,  0.52694,  0.02830,  0.01106,  0.000,  0.02830,
533      +0.28473,  0.28473,  0.50325,  0.02793,  0.01139,  0.000,  0.02793,
534      +0.28159,  0.28159,  0.48140,  0.02756,  0.01164,  0.000,  0.02756,
535      +0.27854,  0.27854,  0.46125,  0.02719,  0.01185,  0.000,  0.02719,
536      +0.27560,  0.27560,  0.44261,  0.02681,  0.01200,  0.000,  0.02681,
537      +0.27269,  0.27269,  0.42520,  0.02642,  0.01211,  0.000,  0.02642,
538      +0.26990,  0.26990,  0.40911,  0.02605,  0.01219,  0.000,  0.02605,
539      +0.26716,  0.26716,  0.39408,  0.02567,  0.01223,  0.000,  0.02567,
540      +0.26451,  0.26451,  0.38008,  0.02531,  0.01226,  0.000,  0.02531,
541      +0.26194,  0.26194,  0.36701,  0.02495,  0.01227,  0.000,  0.02495,
542      +0.25942,  0.25942,  0.35475,  0.02460,  0.01226,  0.000,  0.02460/
543       DATA ((F(I,27,K),I=1,5),F(7,27,K),F(6,27,K),K=1,19)/
544      +0.32405,  0.32405,  0.71862,  0.02396,  0.00089,  0.000,  0.02396,
545      +0.31946,  0.31946,  0.67737,  0.02443,  0.00318,  0.000,  0.02443,
546      +0.31476,  0.31476,  0.63667,  0.02458,  0.00484,  0.000,  0.02458,
547      +0.31012,  0.31012,  0.59860,  0.02456,  0.00609,  0.000,  0.02456,
548      +0.30552,  0.30552,  0.56311,  0.02439,  0.00703,  0.000,  0.02439,
549      +0.30104,  0.30104,  0.53068,  0.02414,  0.00774,  0.000,  0.02414,
550      +0.29671,  0.29671,  0.50112,  0.02384,  0.00828,  0.000,  0.02384,
551      +0.29252,  0.29252,  0.47420,  0.02351,  0.00870,  0.000,  0.02351,
552      +0.28848,  0.28848,  0.44969,  0.02316,  0.00902,  0.000,  0.02316,
553      +0.28455,  0.28455,  0.42719,  0.02279,  0.00926,  0.000,  0.02279,
554      +0.28076,  0.28076,  0.40665,  0.02242,  0.00944,  0.000,  0.02242,
555      +0.27712,  0.27712,  0.38788,  0.02205,  0.00957,  0.000,  0.02205,
556      +0.27362,  0.27362,  0.37064,  0.02168,  0.00967,  0.000,  0.02168,
557      +0.27020,  0.27020,  0.35468,  0.02132,  0.00973,  0.000,  0.02132,
558      +0.26693,  0.26693,  0.34001,  0.02096,  0.00977,  0.000,  0.02096,
559      +0.26376,  0.26376,  0.32641,  0.02062,  0.00978,  0.000,  0.02062,
560      +0.26069,  0.26069,  0.31381,  0.02028,  0.00978,  0.000,  0.02028,
561      +0.25773,  0.25773,  0.30211,  0.01995,  0.00977,  0.000,  0.01995,
562      +0.25485,  0.25485,  0.29120,  0.01963,  0.00974,  0.000,  0.01963/
563       DATA ((F(I,28,K),I=1,5),F(7,28,K),F(6,28,K),K=1,19)/
564      +0.33149,  0.33149,  0.65909,  0.02019,  0.00076,  0.000,  0.02019,
565      +0.32523,  0.32523,  0.61263,  0.02049,  0.00269,  0.000,  0.02049,
566      +0.31909,  0.31909,  0.56916,  0.02053,  0.00407,  0.000,  0.02053,
567      +0.31318,  0.31318,  0.52981,  0.02042,  0.00509,  0.000,  0.02042,
568      +0.30747,  0.30747,  0.49411,  0.02019,  0.00584,  0.000,  0.02019,
569      +0.30200,  0.30200,  0.46210,  0.01991,  0.00640,  0.000,  0.01991,
570      +0.29678,  0.29678,  0.43340,  0.01960,  0.00682,  0.000,  0.01960,
571      +0.29179,  0.29179,  0.40760,  0.01926,  0.00713,  0.000,  0.01926,
572      +0.28703,  0.28703,  0.38438,  0.01891,  0.00737,  0.000,  0.01891,
573      +0.28244,  0.28244,  0.36330,  0.01855,  0.00754,  0.000,  0.01855,
574      +0.27806,  0.27806,  0.34422,  0.01820,  0.00766,  0.000,  0.01820,
575      +0.27387,  0.27387,  0.32691,  0.01785,  0.00775,  0.000,  0.01785,
576      +0.26987,  0.26987,  0.31113,  0.01751,  0.00780,  0.000,  0.01751,
577      +0.26598,  0.26598,  0.29663,  0.01718,  0.00783,  0.000,  0.01718,
578      +0.26228,  0.26228,  0.28338,  0.01685,  0.00784,  0.000,  0.01685,
579      +0.25871,  0.25871,  0.27117,  0.01654,  0.00784,  0.000,  0.01654,
580      +0.25527,  0.25527,  0.25991,  0.01623,  0.00782,  0.000,  0.01623,
581      +0.25196,  0.25196,  0.24951,  0.01594,  0.00779,  0.000,  0.01594,
582      +0.24876,  0.24876,  0.23985,  0.01565,  0.00775,  0.000,  0.01565/
583       DATA ((F(I,29,K),I=1,5),F(7,29,K),F(6,29,K),K=1,19)/
584      +0.33689,  0.33689,  0.60295,  0.01692,  0.00064,  0.000,  0.01692,
585      +0.32898,  0.32898,  0.55305,  0.01710,  0.00226,  0.000,  0.01710,
586      +0.32142,  0.32142,  0.50814,  0.01706,  0.00341,  0.000,  0.01706,
587      +0.31430,  0.31430,  0.46852,  0.01690,  0.00424,  0.000,  0.01690,
588      +0.30752,  0.30752,  0.43334,  0.01665,  0.00484,  0.000,  0.01665,
589      +0.30111,  0.30111,  0.40231,  0.01636,  0.00528,  0.000,  0.01636,
590      +0.29505,  0.29505,  0.37485,  0.01604,  0.00561,  0.000,  0.01604,
591      +0.28932,  0.28932,  0.35047,  0.01571,  0.00584,  0.000,  0.01571,
592      +0.28389,  0.28389,  0.32873,  0.01539,  0.00602,  0.000,  0.01539,
593      +0.27869,  0.27869,  0.30919,  0.01505,  0.00613,  0.000,  0.01505,
594      +0.27376,  0.27376,  0.29164,  0.01472,  0.00621,  0.000,  0.01472,
595      +0.26908,  0.26908,  0.27583,  0.01441,  0.00627,  0.000,  0.01441,
596      +0.26461,  0.26461,  0.26150,  0.01410,  0.00629,  0.000,  0.01410,
597      +0.26031,  0.26031,  0.24844,  0.01380,  0.00630,  0.000,  0.01380,
598      +0.25623,  0.25623,  0.23655,  0.01351,  0.00629,  0.000,  0.01351,
599      +0.25230,  0.25230,  0.22566,  0.01322,  0.00628,  0.000,  0.01322,
600      +0.24854,  0.24854,  0.21566,  0.01295,  0.00625,  0.000,  0.01295,
601      +0.24493,  0.24493,  0.20646,  0.01269,  0.00621,  0.000,  0.01269,
602      +0.24144,  0.24144,  0.19796,  0.01244,  0.00617,  0.000,  0.01244/
603       DATA ((F(I,30,K),I=1,5),F(7,30,K),F(6,30,K),K=1,19)/
604      +0.34038,  0.34038,  0.55000,  0.01409,  0.00054,  0.000,  0.01409,
605      +0.33086,  0.33086,  0.49811,  0.01419,  0.00191,  0.000,  0.01419,
606      +0.32194,  0.32194,  0.45280,  0.01409,  0.00285,  0.000,  0.01409,
607      +0.31364,  0.31364,  0.41367,  0.01391,  0.00353,  0.000,  0.01391,
608      +0.30585,  0.30585,  0.37955,  0.01365,  0.00401,  0.000,  0.01365,
609      +0.29855,  0.29855,  0.34988,  0.01337,  0.00435,  0.000,  0.01337,
610      +0.29171,  0.29171,  0.32394,  0.01307,  0.00460,  0.000,  0.01307,
611      +0.28529,  0.28529,  0.30114,  0.01276,  0.00478,  0.000,  0.01276,
612      +0.27924,  0.27924,  0.28100,  0.01246,  0.00490,  0.000,  0.01246,
613      +0.27350,  0.27350,  0.26305,  0.01216,  0.00498,  0.000,  0.01216,
614      +0.26807,  0.26807,  0.24704,  0.01186,  0.00503,  0.000,  0.01186,
615      +0.26293,  0.26293,  0.23271,  0.01158,  0.00506,  0.000,  0.01158,
616      +0.25806,  0.25806,  0.21981,  0.01130,  0.00507,  0.000,  0.01130,
617      +0.25339,  0.25339,  0.20811,  0.01104,  0.00506,  0.000,  0.01104,
618      +0.24897,  0.24897,  0.19752,  0.01078,  0.00504,  0.000,  0.01078,
619      +0.24474,  0.24474,  0.18786,  0.01053,  0.00502,  0.000,  0.01053,
620      +0.24069,  0.24069,  0.17904,  0.01030,  0.00499,  0.000,  0.01030,
621      +0.23682,  0.23682,  0.17095,  0.01007,  0.00495,  0.000,  0.01007,
622      +0.23310,  0.23310,  0.16351,  0.00986,  0.00491,  0.000,  0.00986/
623       DATA ((F(I,31,K),I=1,5),F(7,31,K),F(6,31,K),K=1,19)/
624      +0.34210,  0.34210,  0.50014,  0.01166,  0.00046,  0.000,  0.01166,
625      +0.33100,  0.33100,  0.44741,  0.01170,  0.00160,  0.000,  0.01170,
626      +0.32077,  0.32077,  0.40251,  0.01159,  0.00238,  0.000,  0.01159,
627      +0.31136,  0.31136,  0.36445,  0.01139,  0.00293,  0.000,  0.01139,
628      +0.30261,  0.30261,  0.33180,  0.01115,  0.00331,  0.000,  0.01115,
629      +0.29449,  0.29449,  0.30375,  0.01088,  0.00358,  0.000,  0.01088,
630      +0.28693,  0.28693,  0.27950,  0.01060,  0.00377,  0.000,  0.01060,
631      +0.27988,  0.27988,  0.25838,  0.01032,  0.00390,  0.000,  0.01032,
632      +0.27327,  0.27327,  0.23988,  0.01005,  0.00399,  0.000,  0.01005,
633      +0.26703,  0.26703,  0.22352,  0.00978,  0.00404,  0.000,  0.00978,
634      +0.26115,  0.26115,  0.20903,  0.00952,  0.00407,  0.000,  0.00952,
635      +0.25562,  0.25562,  0.19614,  0.00927,  0.00408,  0.000,  0.00927,
636      +0.25040,  0.25040,  0.18460,  0.00903,  0.00408,  0.000,  0.00903,
637      +0.24541,  0.24541,  0.17420,  0.00880,  0.00406,  0.000,  0.00880,
638      +0.24070,  0.24070,  0.16482,  0.00857,  0.00404,  0.000,  0.00857,
639      +0.23620,  0.23620,  0.15631,  0.00836,  0.00401,  0.000,  0.00836,
640      +0.23191,  0.23191,  0.14856,  0.00816,  0.00397,  0.000,  0.00816,
641      +0.22783,  0.22783,  0.14148,  0.00797,  0.00394,  0.000,  0.00797,
642      +0.22391,  0.22391,  0.13500,  0.00778,  0.00389,  0.000,  0.00778/
643       DATA ((F(I,32,K),I=1,5),F(7,32,K),F(6,32,K),K=1,19)/
644      +0.34217,  0.34217,  0.45324,  0.00957,  0.00039,  0.000,  0.00957,
645      +0.32955,  0.32955,  0.40063,  0.00958,  0.00134,  0.000,  0.00958,
646      +0.31807,  0.31807,  0.35679,  0.00945,  0.00198,  0.000,  0.00945,
647      +0.30762,  0.30762,  0.32024,  0.00926,  0.00242,  0.000,  0.00926,
648      +0.29797,  0.29797,  0.28933,  0.00903,  0.00272,  0.000,  0.00903,
649      +0.28909,  0.28909,  0.26308,  0.00879,  0.00293,  0.000,  0.00879,
650      +0.28088,  0.28088,  0.24062,  0.00854,  0.00307,  0.000,  0.00854,
651      +0.27325,  0.27325,  0.22122,  0.00829,  0.00317,  0.000,  0.00829,
652      +0.26615,  0.26615,  0.20436,  0.00805,  0.00323,  0.000,  0.00805,
653      +0.25946,  0.25946,  0.18957,  0.00781,  0.00326,  0.000,  0.00781,
654      +0.25320,  0.25320,  0.17656,  0.00758,  0.00327,  0.000,  0.00758,
655      +0.24733,  0.24733,  0.16504,  0.00737,  0.00327,  0.000,  0.00737,
656      +0.24180,  0.24180,  0.15478,  0.00716,  0.00326,  0.000,  0.00716,
657      +0.23653,  0.23653,  0.14559,  0.00696,  0.00324,  0.000,  0.00696,
658      +0.23158,  0.23158,  0.13733,  0.00677,  0.00322,  0.000,  0.00677,
659      +0.22687,  0.22687,  0.12987,  0.00659,  0.00319,  0.000,  0.00659,
660      +0.22239,  0.22239,  0.12311,  0.00642,  0.00315,  0.000,  0.00642,
661      +0.21813,  0.21813,  0.11696,  0.00626,  0.00312,  0.000,  0.00626,
662      +0.21406,  0.21406,  0.11134,  0.00610,  0.00308,  0.000,  0.00610/
663       DATA ((F(I,33,K),I=1,5),F(7,33,K),F(6,33,K),K=1,19)/
664      +0.34066,  0.34066,  0.40920,  0.00781,  0.00032,  0.000,  0.00781,
665      +0.32661,  0.32661,  0.35748,  0.00779,  0.00111,  0.000,  0.00779,
666      +0.31394,  0.31394,  0.31522,  0.00766,  0.00164,  0.000,  0.00766,
667      +0.30251,  0.30251,  0.28050,  0.00749,  0.00199,  0.000,  0.00749,
668      +0.29205,  0.29205,  0.25152,  0.00728,  0.00223,  0.000,  0.00728,
669      +0.28248,  0.28248,  0.22718,  0.00706,  0.00239,  0.000,  0.00706,
670      +0.27368,  0.27368,  0.20654,  0.00684,  0.00250,  0.000,  0.00684,
671      +0.26554,  0.26554,  0.18887,  0.00662,  0.00256,  0.000,  0.00662,
672      +0.25800,  0.25800,  0.17363,  0.00641,  0.00261,  0.000,  0.00641,
673      +0.25093,  0.25093,  0.16035,  0.00621,  0.00262,  0.000,  0.00621,
674      +0.24434,  0.24434,  0.14874,  0.00601,  0.00262,  0.000,  0.00601,
675      +0.23817,  0.23817,  0.13852,  0.00583,  0.00262,  0.000,  0.00583,
676      +0.23239,  0.23239,  0.12946,  0.00565,  0.00260,  0.000,  0.00565,
677      +0.22691,  0.22691,  0.12138,  0.00549,  0.00258,  0.000,  0.00549,
678      +0.22176,  0.22176,  0.11416,  0.00533,  0.00255,  0.000,  0.00533,
679      +0.21687,  0.21687,  0.10766,  0.00518,  0.00252,  0.000,  0.00518,
680      +0.21224,  0.21224,  0.10179,  0.00503,  0.00249,  0.000,  0.00503,
681      +0.20784,  0.20784,  0.09647,  0.00490,  0.00246,  0.000,  0.00490,
682      +0.20365,  0.20365,  0.09163,  0.00477,  0.00243,  0.000,  0.00477/
683       DATA ((F(I,34,K),I=1,5),F(7,34,K),F(6,34,K),K=1,19)/
684      +0.33768,  0.33768,  0.36793,  0.00630,  0.00027,  0.000,  0.00630,
685      +0.32226,  0.32226,  0.31772,  0.00627,  0.00092,  0.000,  0.00627,
686      +0.30849,  0.30849,  0.27742,  0.00615,  0.00134,  0.000,  0.00615,
687      +0.29616,  0.29616,  0.24476,  0.00600,  0.00163,  0.000,  0.00600,
688      +0.28496,  0.28496,  0.21785,  0.00581,  0.00181,  0.000,  0.00581,
689      +0.27477,  0.27477,  0.19547,  0.00562,  0.00194,  0.000,  0.00562,
690      +0.26544,  0.26544,  0.17666,  0.00543,  0.00201,  0.000,  0.00543,
691      +0.25687,  0.25687,  0.16070,  0.00524,  0.00206,  0.000,  0.00524,
692      +0.24895,  0.24895,  0.14702,  0.00506,  0.00209,  0.000,  0.00506,
693      +0.24156,  0.24156,  0.13518,  0.00489,  0.00209,  0.000,  0.00489,
694      +0.23469,  0.23469,  0.12489,  0.00473,  0.00209,  0.000,  0.00473,
695      +0.22829,  0.22829,  0.11588,  0.00457,  0.00208,  0.000,  0.00457,
696      +0.22230,  0.22230,  0.10794,  0.00442,  0.00206,  0.000,  0.00442,
697      +0.21665,  0.21665,  0.10089,  0.00428,  0.00204,  0.000,  0.00428,
698      +0.21135,  0.21135,  0.09461,  0.00415,  0.00202,  0.000,  0.00415,
699      +0.20633,  0.20633,  0.08898,  0.00403,  0.00199,  0.000,  0.00403,
700      +0.20159,  0.20159,  0.08392,  0.00391,  0.00196,  0.000,  0.00391,
701      +0.19710,  0.19710,  0.07935,  0.00379,  0.00193,  0.000,  0.00379,
702      +0.19283,  0.19283,  0.07520,  0.00369,  0.00190,  0.000,  0.00369/
703       DATA ((F(I,35,K),I=1,5),F(7,35,K),F(6,35,K),K=1,19)/
704      +0.33330,  0.33330,  0.32933,  0.00505,  0.00022,  0.000,  0.00505,
705      +0.31660,  0.31660,  0.28113,  0.00502,  0.00076,  0.000,  0.00502,
706      +0.30182,  0.30182,  0.24308,  0.00491,  0.00110,  0.000,  0.00491,
707      +0.28866,  0.28866,  0.21266,  0.00477,  0.00132,  0.000,  0.00477,
708      +0.27680,  0.27680,  0.18787,  0.00461,  0.00147,  0.000,  0.00461,
709      +0.26606,  0.26606,  0.16747,  0.00444,  0.00156,  0.000,  0.00444,
710      +0.25628,  0.25628,  0.15047,  0.00428,  0.00162,  0.000,  0.00428,
711      +0.24733,  0.24733,  0.13615,  0.00413,  0.00165,  0.000,  0.00413,
712      +0.23910,  0.23910,  0.12396,  0.00397,  0.00167,  0.000,  0.00397,
713      +0.23145,  0.23145,  0.11349,  0.00383,  0.00167,  0.000,  0.00383,
714      +0.22437,  0.22437,  0.10444,  0.00369,  0.00166,  0.000,  0.00369,
715      +0.21779,  0.21779,  0.09655,  0.00356,  0.00165,  0.000,  0.00356,
716      +0.21165,  0.21165,  0.08963,  0.00344,  0.00163,  0.000,  0.00344,
717      +0.20586,  0.20586,  0.08352,  0.00333,  0.00161,  0.000,  0.00333,
718      +0.20046,  0.20046,  0.07809,  0.00322,  0.00158,  0.000,  0.00322,
719      +0.19536,  0.19536,  0.07325,  0.00311,  0.00156,  0.000,  0.00311,
720      +0.19055,  0.19055,  0.06892,  0.00302,  0.00153,  0.000,  0.00302,
721      +0.18601,  0.18601,  0.06501,  0.00293,  0.00151,  0.000,  0.00293,
722      +0.18169,  0.18169,  0.06148,  0.00284,  0.00148,  0.000,  0.00284/
723       DATA ((F(I,36,K),I=1,5),F(7,36,K),F(6,36,K),K=1,19)/
724      +0.32758,  0.32758,  0.29333,  0.00400,  0.00018,  0.000,  0.00400,
725      +0.30969,  0.30969,  0.24754,  0.00396,  0.00062,  0.000,  0.00396,
726      +0.29399,  0.29399,  0.21195,  0.00387,  0.00089,  0.000,  0.00387,
727      +0.28011,  0.28011,  0.18386,  0.00375,  0.00107,  0.000,  0.00375,
728      +0.26767,  0.26767,  0.16123,  0.00361,  0.00118,  0.000,  0.00361,
729      +0.25646,  0.25646,  0.14278,  0.00347,  0.00125,  0.000,  0.00347,
730      +0.24630,  0.24630,  0.12754,  0.00334,  0.00129,  0.000,  0.00334,
731      +0.23704,  0.23704,  0.11479,  0.00321,  0.00131,  0.000,  0.00321,
732      +0.22857,  0.22857,  0.10402,  0.00308,  0.00132,  0.000,  0.00308,
733      +0.22072,  0.22072,  0.09483,  0.00296,  0.00131,  0.000,  0.00296,
734      +0.21348,  0.21348,  0.08692,  0.00285,  0.00130,  0.000,  0.00285,
735      +0.20677,  0.20677,  0.08007,  0.00274,  0.00129,  0.000,  0.00274,
736      +0.20053,  0.20053,  0.07408,  0.00264,  0.00127,  0.000,  0.00264,
737      +0.19467,  0.19467,  0.06882,  0.00255,  0.00125,  0.000,  0.00255,
738      +0.18920,  0.18920,  0.06417,  0.00246,  0.00123,  0.000,  0.00246,
739      +0.18406,  0.18406,  0.06003,  0.00238,  0.00121,  0.000,  0.00238,
740      +0.17922,  0.17922,  0.05634,  0.00230,  0.00119,  0.000,  0.00230,
741      +0.17466,  0.17466,  0.05303,  0.00223,  0.00116,  0.000,  0.00223,
742      +0.17034,  0.17034,  0.05004,  0.00216,  0.00114,  0.000,  0.00216/
743       DATA ((F(I,37,K),I=1,5),F(7,37,K),F(6,37,K),K=1,19)/
744      +0.32061,  0.32061,  0.25985,  0.00314,  0.00015,  0.000,  0.00314,
745      +0.30163,  0.30163,  0.21678,  0.00310,  0.00050,  0.000,  0.00310,
746      +0.28510,  0.28510,  0.18380,  0.00302,  0.00071,  0.000,  0.00302,
747      +0.27059,  0.27059,  0.15808,  0.00292,  0.00085,  0.000,  0.00292,
748      +0.25765,  0.25765,  0.13760,  0.00281,  0.00094,  0.000,  0.00281,
749      +0.24606,  0.24606,  0.12106,  0.00269,  0.00099,  0.000,  0.00269,
750      +0.23561,  0.23561,  0.10751,  0.00258,  0.00102,  0.000,  0.00258,
751      +0.22612,  0.22612,  0.09625,  0.00247,  0.00103,  0.000,  0.00247,
752      +0.21746,  0.21746,  0.08680,  0.00237,  0.00103,  0.000,  0.00237,
753      +0.20948,  0.20948,  0.07879,  0.00227,  0.00102,  0.000,  0.00227,
754      +0.20213,  0.20213,  0.07194,  0.00218,  0.00101,  0.000,  0.00218,
755      +0.19534,  0.19534,  0.06603,  0.00210,  0.00100,  0.000,  0.00210,
756      +0.18904,  0.18904,  0.06089,  0.00202,  0.00098,  0.000,  0.00202,
757      +0.18315,  0.18315,  0.05640,  0.00194,  0.00097,  0.000,  0.00194,
758      +0.17767,  0.17767,  0.05244,  0.00187,  0.00095,  0.000,  0.00187,
759      +0.17253,  0.17253,  0.04893,  0.00181,  0.00093,  0.000,  0.00181,
760      +0.16769,  0.16769,  0.04581,  0.00174,  0.00091,  0.000,  0.00174,
761      +0.16315,  0.16315,  0.04302,  0.00169,  0.00089,  0.000,  0.00169,
762      +0.15886,  0.15886,  0.04051,  0.00163,  0.00087,  0.000,  0.00163/
763       DATA ((F(I,38,K),I=1,5),F(7,38,K),F(6,38,K),K=1,19)/
764      +0.31240,  0.31240,  0.22879,  0.00242,  0.00012,  0.000,  0.00242,
765      +0.29246,  0.29246,  0.18866,  0.00240,  0.00040,  0.000,  0.00240,
766      +0.27522,  0.27522,  0.15839,  0.00233,  0.00057,  0.000,  0.00233,
767      +0.26017,  0.26017,  0.13507,  0.00225,  0.00067,  0.000,  0.00225,
768      +0.24683,  0.24683,  0.11669,  0.00215,  0.00074,  0.000,  0.00215,
769      +0.23494,  0.23494,  0.10198,  0.00206,  0.00077,  0.000,  0.00206,
770      +0.22426,  0.22426,  0.09003,  0.00197,  0.00079,  0.000,  0.00197,
771      +0.21460,  0.21460,  0.08018,  0.00188,  0.00080,  0.000,  0.00188,
772      +0.20582,  0.20582,  0.07197,  0.00180,  0.00080,  0.000,  0.00180,
773      +0.19776,  0.19776,  0.06504,  0.00172,  0.00079,  0.000,  0.00172,
774      +0.19037,  0.19037,  0.05916,  0.00165,  0.00078,  0.000,  0.00165,
775      +0.18356,  0.18356,  0.05410,  0.00158,  0.00077,  0.000,  0.00158,
776      +0.17727,  0.17727,  0.04972,  0.00152,  0.00076,  0.000,  0.00152,
777      +0.17139,  0.17139,  0.04592,  0.00146,  0.00074,  0.000,  0.00146,
778      +0.16593,  0.16593,  0.04257,  0.00140,  0.00073,  0.000,  0.00140,
779      +0.16083,  0.16083,  0.03963,  0.00135,  0.00071,  0.000,  0.00135,
780      +0.15604,  0.15604,  0.03701,  0.00130,  0.00069,  0.000,  0.00130,
781      +0.15156,  0.15156,  0.03468,  0.00126,  0.00068,  0.000,  0.00126,
782      +0.14732,  0.14732,  0.03259,  0.00121,  0.00066,  0.000,  0.00121/
783       DATA ((F(I,39,K),I=1,5),F(7,39,K),F(6,39,K),K=1,19)/
784      +0.30305,  0.30305,  0.20010,  0.00185,  0.00009,  0.000,  0.00185,
785      +0.28225,  0.28225,  0.16307,  0.00183,  0.00032,  0.000,  0.00183,
786      +0.26441,  0.26441,  0.13554,  0.00178,  0.00045,  0.000,  0.00178,
787      +0.24892,  0.24892,  0.11458,  0.00171,  0.00053,  0.000,  0.00171,
788      +0.23527,  0.23527,  0.09824,  0.00163,  0.00058,  0.000,  0.00163,
789      +0.22317,  0.22317,  0.08529,  0.00156,  0.00060,  0.000,  0.00156,
790      +0.21235,  0.21235,  0.07484,  0.00149,  0.00061,  0.000,  0.00149,
791      +0.20260,  0.20260,  0.06630,  0.00142,  0.00062,  0.000,  0.00142,
792      +0.19377,  0.19377,  0.05923,  0.00135,  0.00062,  0.000,  0.00135,
793      +0.18570,  0.18570,  0.05330,  0.00129,  0.00061,  0.000,  0.00129,
794      +0.17831,  0.17831,  0.04828,  0.00123,  0.00060,  0.000,  0.00123,
795      +0.17154,  0.17154,  0.04400,  0.00118,  0.00059,  0.000,  0.00118,
796      +0.16528,  0.16528,  0.04031,  0.00113,  0.00058,  0.000,  0.00113,
797      +0.15947,  0.15947,  0.03711,  0.00108,  0.00056,  0.000,  0.00108,
798      +0.15408,  0.15408,  0.03431,  0.00104,  0.00055,  0.000,  0.00104,
799      +0.14905,  0.14905,  0.03185,  0.00100,  0.00054,  0.000,  0.00100,
800      +0.14435,  0.14435,  0.02968,  0.00096,  0.00052,  0.000,  0.00096,
801      +0.13995,  0.13995,  0.02775,  0.00093,  0.00051,  0.000,  0.00093,
802      +0.13581,  0.13581,  0.02602,  0.00089,  0.00050,  0.000,  0.00089/
803       DATA ((F(I,40,K),I=1,5),F(7,40,K),F(6,40,K),K=1,19)/
804      +0.29258,  0.29258,  0.17369,  0.00139,  0.00007,  0.000,  0.00139,
805      +0.27107,  0.27107,  0.13987,  0.00138,  0.00025,  0.000,  0.00138,
806      +0.25274,  0.25274,  0.11507,  0.00133,  0.00035,  0.000,  0.00133,
807      +0.23693,  0.23693,  0.09641,  0.00128,  0.00041,  0.000,  0.00128,
808      +0.22307,  0.22307,  0.08204,  0.00122,  0.00044,  0.000,  0.00122,
809      +0.21084,  0.21084,  0.07074,  0.00116,  0.00046,  0.000,  0.00116,
810      +0.19995,  0.19995,  0.06170,  0.00110,  0.00047,  0.000,  0.00110,
811      +0.19018,  0.19018,  0.05436,  0.00105,  0.00047,  0.000,  0.00105,
812      +0.18137,  0.18137,  0.04833,  0.00100,  0.00047,  0.000,  0.00100,
813      +0.17335,  0.17335,  0.04330,  0.00095,  0.00046,  0.000,  0.00095,
814      +0.16603,  0.16603,  0.03908,  0.00091,  0.00045,  0.000,  0.00091,
815      +0.15934,  0.15934,  0.03548,  0.00086,  0.00044,  0.000,  0.00086,
816      +0.15317,  0.15317,  0.03240,  0.00083,  0.00043,  0.000,  0.00083,
817      +0.14746,  0.14746,  0.02974,  0.00079,  0.00042,  0.000,  0.00079,
818      +0.14218,  0.14218,  0.02742,  0.00076,  0.00041,  0.000,  0.00076,
819      +0.13726,  0.13726,  0.02539,  0.00073,  0.00040,  0.000,  0.00073,
820      +0.13268,  0.13268,  0.02360,  0.00070,  0.00039,  0.000,  0.00070,
821      +0.12840,  0.12840,  0.02202,  0.00067,  0.00038,  0.000,  0.00067,
822      +0.12438,  0.12438,  0.02061,  0.00065,  0.00037,  0.000,  0.00065/
823       DATA ((F(I,41,K),I=1,5),F(7,41,K),F(6,41,K),K=1,19)/
824      +0.28107,  0.28107,  0.14951,  0.00103,  0.00006,  0.000,  0.00103,
825      +0.25897,  0.25897,  0.11892,  0.00102,  0.00019,  0.000,  0.00102,
826      +0.24028,  0.24028,  0.09682,  0.00099,  0.00027,  0.000,  0.00099,
827      +0.22425,  0.22425,  0.08040,  0.00094,  0.00031,  0.000,  0.00094,
828      +0.21029,  0.21029,  0.06787,  0.00090,  0.00033,  0.000,  0.00090,
829      +0.19802,  0.19802,  0.05812,  0.00085,  0.00035,  0.000,  0.00085,
830      +0.18715,  0.18715,  0.05038,  0.00081,  0.00035,  0.000,  0.00081,
831      +0.17744,  0.17744,  0.04415,  0.00077,  0.00035,  0.000,  0.00077,
832      +0.16872,  0.16872,  0.03906,  0.00073,  0.00035,  0.000,  0.00073,
833      +0.16079,  0.16079,  0.03484,  0.00069,  0.00034,  0.000,  0.00069,
834      +0.15360,  0.15360,  0.03132,  0.00066,  0.00033,  0.000,  0.00066,
835      +0.14704,  0.14704,  0.02833,  0.00063,  0.00033,  0.000,  0.00063,
836      +0.14101,  0.14101,  0.02578,  0.00060,  0.00032,  0.000,  0.00060,
837      +0.13544,  0.13544,  0.02360,  0.00057,  0.00031,  0.000,  0.00057,
838      +0.13031,  0.13031,  0.02170,  0.00055,  0.00030,  0.000,  0.00055,
839      +0.12554,  0.12554,  0.02004,  0.00052,  0.00029,  0.000,  0.00052,
840      +0.12111,  0.12111,  0.01858,  0.00050,  0.00028,  0.000,  0.00050,
841      +0.11698,  0.11698,  0.01730,  0.00048,  0.00028,  0.000,  0.00048,
842      +0.11311,  0.11311,  0.01616,  0.00046,  0.00027,  0.000,  0.00046/
843       DATA ((F(I,42,K),I=1,5),F(7,42,K),F(6,42,K),K=1,19)/
844      +0.25505,  0.25505,  0.10751,  0.00053,  0.00003,  0.000,  0.00053,
845      +0.23226,  0.23226,  0.08335,  0.00053,  0.00011,  0.000,  0.00053,
846      +0.21325,  0.21325,  0.06639,  0.00051,  0.00015,  0.000,  0.00051,
847      +0.19715,  0.19715,  0.05410,  0.00048,  0.00017,  0.000,  0.00048,
848      +0.18329,  0.18329,  0.04493,  0.00046,  0.00018,  0.000,  0.00046,
849      +0.17123,  0.17123,  0.03793,  0.00043,  0.00019,  0.000,  0.00043,
850      +0.16065,  0.16065,  0.03247,  0.00041,  0.00019,  0.000,  0.00041,
851      +0.15127,  0.15127,  0.02813,  0.00038,  0.00019,  0.000,  0.00038,
852      +0.14291,  0.14291,  0.02464,  0.00036,  0.00018,  0.000,  0.00036,
853      +0.13539,  0.13539,  0.02178,  0.00034,  0.00018,  0.000,  0.00034,
854      +0.12859,  0.12859,  0.01942,  0.00033,  0.00017,  0.000,  0.00033,
855      +0.12243,  0.12243,  0.01744,  0.00031,  0.00017,  0.000,  0.00031,
856      +0.11682,  0.11682,  0.01577,  0.00029,  0.00016,  0.000,  0.00029,
857      +0.11166,  0.11166,  0.01434,  0.00028,  0.00016,  0.000,  0.00028,
858      +0.10693,  0.10693,  0.01311,  0.00027,  0.00015,  0.000,  0.00027,
859      +0.10256,  0.10256,  0.01205,  0.00025,  0.00015,  0.000,  0.00025,
860      +0.09852,  0.09852,  0.01112,  0.00024,  0.00014,  0.000,  0.00024,
861      +0.09477,  0.09477,  0.01031,  0.00023,  0.00014,  0.000,  0.00023,
862      +0.09128,  0.09128,  0.00959,  0.00022,  0.00013,  0.000,  0.00022/
863       DATA ((F(I,43,K),I=1,5),F(7,43,K),F(6,43,K),K=1,19)/
864      +0.22537,  0.22537,  0.07351,  0.00025,  0.00002,  0.000,  0.00025,
865      +0.20255,  0.20255,  0.05542,  0.00025,  0.00006,  0.000,  0.00025,
866      +0.18381,  0.18381,  0.04312,  0.00024,  0.00008,  0.000,  0.00024,
867      +0.16815,  0.16815,  0.03443,  0.00022,  0.00009,  0.000,  0.00022,
868      +0.15482,  0.15482,  0.02810,  0.00021,  0.00009,  0.000,  0.00021,
869      +0.14335,  0.14335,  0.02336,  0.00020,  0.00009,  0.000,  0.00020,
870      +0.13339,  0.13339,  0.01973,  0.00019,  0.00009,  0.000,  0.00019,
871      +0.12465,  0.12465,  0.01689,  0.00018,  0.00009,  0.000,  0.00018,
872      +0.11692,  0.11692,  0.01464,  0.00017,  0.00009,  0.000,  0.00017,
873      +0.11002,  0.11002,  0.01282,  0.00016,  0.00009,  0.000,  0.00016,
874      +0.10384,  0.10384,  0.01134,  0.00015,  0.00008,  0.000,  0.00015,
875      +0.09827,  0.09827,  0.01011,  0.00014,  0.00008,  0.000,  0.00014,
876      +0.09323,  0.09323,  0.00907,  0.00013,  0.00008,  0.000,  0.00013,
877      +0.08863,  0.08863,  0.00820,  0.00012,  0.00008,  0.000,  0.00012,
878      +0.08444,  0.08444,  0.00746,  0.00012,  0.00007,  0.000,  0.00012,
879      +0.08059,  0.08059,  0.00682,  0.00011,  0.00007,  0.000,  0.00011,
880      +0.07704,  0.07704,  0.00626,  0.00011,  0.00007,  0.000,  0.00011,
881      +0.07377,  0.07377,  0.00578,  0.00010,  0.00006,  0.000,  0.00010,
882      +0.07074,  0.07074,  0.00535,  0.00010,  0.00006,  0.000,  0.00010/
883       DATA ((F(I,44,K),I=1,5),F(7,44,K),F(6,44,K),K=1,19)/
884      +0.19244,  0.19244,  0.04693,  0.00010,  0.00001,  0.000,  0.00010,
885      +0.17036,  0.17036,  0.03430,  0.00010,  0.00002,  0.000,  0.00010,
886      +0.15253,  0.15253,  0.02600,  0.00010,  0.00003,  0.000,  0.00010,
887      +0.13785,  0.13785,  0.02030,  0.00009,  0.00004,  0.000,  0.00009,
888      +0.12553,  0.12553,  0.01626,  0.00008,  0.00004,  0.000,  0.00008,
889      +0.11505,  0.11505,  0.01329,  0.00008,  0.00004,  0.000,  0.00008,
890      +0.10605,  0.10605,  0.01107,  0.00007,  0.00004,  0.000,  0.00007,
891      +0.09824,  0.09824,  0.00936,  0.00007,  0.00004,  0.000,  0.00007,
892      +0.09140,  0.09140,  0.00802,  0.00006,  0.00004,  0.000,  0.00006,
893      +0.08534,  0.08534,  0.00696,  0.00006,  0.00004,  0.000,  0.00006,
894      +0.07996,  0.07996,  0.00610,  0.00006,  0.00003,  0.000,  0.00006,
895      +0.07515,  0.07515,  0.00539,  0.00005,  0.00003,  0.000,  0.00005,
896      +0.07083,  0.07083,  0.00481,  0.00005,  0.00003,  0.000,  0.00005,
897      +0.06692,  0.06692,  0.00432,  0.00005,  0.00003,  0.000,  0.00005,
898      +0.06338,  0.06338,  0.00390,  0.00004,  0.00003,  0.000,  0.00004,
899      +0.06014,  0.06014,  0.00355,  0.00004,  0.00003,  0.000,  0.00004,
900      +0.05718,  0.05718,  0.00324,  0.00004,  0.00003,  0.000,  0.00004,
901      +0.05447,  0.05447,  0.00298,  0.00004,  0.00003,  0.000,  0.00004,
902      +0.05197,  0.05197,  0.00275,  0.00004,  0.00002,  0.000,  0.00004/
903       DATA ((F(I,45,K),I=1,5),F(7,45,K),F(6,45,K),K=1,19)/
904      +0.15661,  0.15661,  0.02711,  0.00003,  0.00000,  0.000,  0.00003,
905      +0.13617,  0.13617,  0.01912,  0.00003,  0.00001,  0.000,  0.00003,
906      +0.11997,  0.11997,  0.01407,  0.00003,  0.00001,  0.000,  0.00003,
907      +0.10687,  0.10687,  0.01071,  0.00003,  0.00001,  0.000,  0.00003,
908      +0.09604,  0.09604,  0.00840,  0.00003,  0.00001,  0.000,  0.00003,
909      +0.08697,  0.08697,  0.00674,  0.00003,  0.00001,  0.000,  0.00003,
910      +0.07927,  0.07927,  0.00552,  0.00002,  0.00001,  0.000,  0.00002,
911      +0.07266,  0.07266,  0.00461,  0.00002,  0.00001,  0.000,  0.00002,
912      +0.06695,  0.06695,  0.00390,  0.00002,  0.00001,  0.000,  0.00002,
913      +0.06194,  0.06194,  0.00335,  0.00002,  0.00001,  0.000,  0.00002,
914      +0.05753,  0.05753,  0.00291,  0.00002,  0.00001,  0.000,  0.00002,
915      +0.05363,  0.05363,  0.00255,  0.00002,  0.00001,  0.000,  0.00002,
916      +0.05016,  0.05016,  0.00226,  0.00002,  0.00001,  0.000,  0.00002,
917      +0.04704,  0.04704,  0.00201,  0.00001,  0.00001,  0.000,  0.00001,
918      +0.04423,  0.04423,  0.00181,  0.00001,  0.00001,  0.000,  0.00001,
919      +0.04169,  0.04169,  0.00164,  0.00001,  0.00001,  0.000,  0.00001,
920      +0.03938,  0.03938,  0.00149,  0.00001,  0.00001,  0.000,  0.00001,
921      +0.03728,  0.03728,  0.00136,  0.00001,  0.00001,  0.000,  0.00001,
922      +0.03536,  0.03536,  0.00125,  0.00001,  0.00001,  0.000,  0.00001/
923       DATA ((F(I,46,K),I=1,5),F(7,46,K),F(6,46,K),K=1,19)/
924      +0.11838,  0.11838,  0.01338,  0.00001,  0.00000,  0.000,  0.00001,
925      +0.10061,  0.10061,  0.00903,  0.00001,  0.00000,  0.000,  0.00001,
926      +0.08687,  0.08687,  0.00642,  0.00001,  0.00000,  0.000,  0.00001,
927      +0.07599,  0.07599,  0.00474,  0.00001,  0.00000,  0.000,  0.00001,
928      +0.06716,  0.06716,  0.00363,  0.00001,  0.00000,  0.000,  0.00001,
929      +0.05989,  0.05989,  0.00285,  0.00001,  0.00000,  0.000,  0.00001,
930      +0.05383,  0.05383,  0.00230,  0.00001,  0.00000,  0.000,  0.00001,
931      +0.04870,  0.04870,  0.00189,  0.00001,  0.00000,  0.000,  0.00001,
932      +0.04432,  0.04432,  0.00158,  0.00000,  0.00000,  0.000,  0.000,
933      +0.04053,  0.04053,  0.00134,  0.00000,  0.00000,  0.000,  0.000,
934      +0.03724,  0.03724,  0.00115,  0.00000,  0.00000,  0.000,  0.000,
935      +0.03436,  0.03436,  0.00100,  0.00000,  0.00000,  0.000,  0.000,
936      +0.03182,  0.03182,  0.00088,  0.00000,  0.00000,  0.000,  0.000,
937      +0.02956,  0.02956,  0.00078,  0.00000,  0.00000,  0.000,  0.000,
938      +0.02756,  0.02756,  0.00069,  0.00000,  0.00000,  0.000,  0.000,
939      +0.02575,  0.02575,  0.00062,  0.00000,  0.00000,  0.000,  0.000,
940      +0.02413,  0.02413,  0.00056,  0.00000,  0.00000,  0.000,  0.000,
941      +0.02267,  0.02267,  0.00051,  0.00000,  0.00000,  0.000,  0.000,
942      +0.02134,  0.02134,  0.00047,  0.00000,  0.00000,  0.000,  0.000/
943       DATA ((F(I,47,K),I=1,5),F(7,47,K),F(6,47,K),K=1,19)/
944      +0.07837,  0.07837,  0.00495,  0.000,  0.000,  0.000,  0.000,
945      +0.06455,  0.06455,  0.00316,  0.000,  0.000,  0.000,  0.000,
946      +0.05420,  0.05420,  0.00215,  0.000,  0.000,  0.000,  0.000,
947      +0.04623,  0.04623,  0.00153,  0.000,  0.000,  0.000,  0.000,
948      +0.03993,  0.03993,  0.00114,  0.000,  0.000,  0.000,  0.000,
949      +0.03487,  0.03487,  0.00087,  0.000,  0.000,  0.000,  0.000,
950      +0.03074,  0.03074,  0.00069,  0.000,  0.000,  0.000,  0.000,
951      +0.02731,  0.02731,  0.00056,  0.000,  0.000,  0.000,  0.000,
952      +0.02443,  0.02443,  0.00046,  0.000,  0.000,  0.000,  0.000,
953      +0.02199,  0.02199,  0.00038,  0.000,  0.000,  0.000,  0.000,
954      +0.01991,  0.01991,  0.00033,  0.000,  0.000,  0.000,  0.000,
955      +0.01811,  0.01811,  0.00028,  0.000,  0.000,  0.000,  0.000,
956      +0.01655,  0.01655,  0.00024,  0.000,  0.000,  0.000,  0.000,
957      +0.01518,  0.01518,  0.00021,  0.000,  0.000,  0.000,  0.000,
958      +0.01397,  0.01397,  0.00019,  0.000,  0.000,  0.000,  0.000,
959      +0.01291,  0.01291,  0.00017,  0.000,  0.000,  0.000,  0.000,
960      +0.01196,  0.01196,  0.00015,  0.000,  0.000,  0.000,  0.000,
961      +0.01111,  0.01111,  0.00014,  0.000,  0.000,  0.000,  0.000,
962      +0.01035,  0.01035,  0.00012,  0.000,  0.000,  0.000,  0.000/
963       DATA ((F(I,48,K),I=1,5),F(7,48,K),F(6,48,K),K=1,19)/
964      +0.03767,  0.03767,  0.00091,  0.000,  0.000,  0.000,  0.000,
965      +0.02943,  0.02943,  0.00053,  0.000,  0.000,  0.000,  0.000,
966      +0.02358,  0.02358,  0.00034,  0.000,  0.000,  0.000,  0.000,
967      +0.01928,  0.01928,  0.00023,  0.000,  0.000,  0.000,  0.000,
968      +0.01602,  0.01602,  0.00017,  0.000,  0.000,  0.000,  0.000,
969      +0.01351,  0.01351,  0.00012,  0.000,  0.000,  0.000,  0.000,
970      +0.01152,  0.01152,  0.00009,  0.000,  0.000,  0.000,  0.000,
971      +0.00993,  0.00993,  0.00007,  0.000,  0.000,  0.000,  0.000,
972      +0.00864,  0.00864,  0.00006,  0.000,  0.000,  0.000,  0.000,
973      +0.00757,  0.00757,  0.00005,  0.000,  0.000,  0.000,  0.000,
974      +0.00668,  0.00668,  0.00004,  0.000,  0.000,  0.000,  0.000,
975      +0.00594,  0.00594,  0.00004,  0.000,  0.000,  0.000,  0.000,
976      +0.00530,  0.00530,  0.00003,  0.000,  0.000,  0.000,  0.000,
977      +0.00476,  0.00476,  0.00003,  0.000,  0.000,  0.000,  0.000,
978      +0.00430,  0.00430,  0.00002,  0.000,  0.000,  0.000,  0.000,
979      +0.00389,  0.00389,  0.00002,  0.000,  0.000,  0.000,  0.000,
980      +0.00354,  0.00354,  0.00002,  0.000,  0.000,  0.000,  0.000,
981      +0.00323,  0.00323,  0.00002,  0.000,  0.000,  0.000,  0.000,
982      +0.00296,  0.00296,  0.00001,  0.000,  0.000,  0.000,  0.000/
983       DATA ((F(I,49,K),I=1,5),F(7,49,K),F(6,49,K),K=1,19)/
984      +0.01779,  0.01779,  0.00017,  0.000,  0.000,  0.000,  0.000,
985      +0.01319,  0.01319,  0.00009,  0.000,  0.000,  0.000,  0.000,
986      +0.01008,  0.01008,  0.00006,  0.000,  0.000,  0.000,  0.000,
987      +0.00791,  0.00791,  0.00004,  0.000,  0.000,  0.000,  0.000,
988      +0.00633,  0.00633,  0.00003,  0.000,  0.000,  0.000,  0.000,
989      +0.00515,  0.00515,  0.00002,  0.000,  0.000,  0.000,  0.000,
990      +0.00426,  0.00426,  0.00001,  0.000,  0.000,  0.000,  0.000,
991      +0.00356,  0.00356,  0.00001,  0.000,  0.000,  0.000,  0.000,
992      +0.00301,  0.00301,  0.00001,  0.000,  0.000,  0.000,  0.000,
993      +0.00257,  0.00257,  0.00001,  0.000,  0.000,  0.000,  0.000,
994      +0.00221,  0.00221,  0.00001,  0.000,  0.000,  0.000,  0.000,
995      +0.00192,  0.00192,  0.000,  0.000,  0.000,  0.000,  0.000,
996      +0.00168,  0.00168,  0.000,  0.000,  0.000,  0.000,  0.000,
997      +0.00148,  0.00148,  0.000,  0.000,  0.000,  0.000,  0.000,
998      +0.00130,  0.00130,  0.000,  0.000,  0.000,  0.000,  0.000,
999      +0.00116,  0.00116,  0.000,  0.000,  0.000,  0.000,  0.000,
1000      +0.00104,  0.00104,  0.000,  0.000,  0.000,  0.000,  0.000,
1001      +0.00093,  0.00093,  0.000,  0.000,  0.000,  0.000,  0.000,
1002      +0.00084,  0.00084,  0.000,  0.000,  0.000,  0.000,  0.000/
1003       DATA ((F(I,50,K),I=1,5),F(7,50,K),F(6,50,K),K=1,19)/
1004      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1005      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1006      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1007      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1008      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1009      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1010      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1011      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1012      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1013      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1014      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1015      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1016      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1017      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1018      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1019      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1020      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1021      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000,
1022      +0.000,  0.000,  0.000,  0.000,  0.000,  0.000,  0.000/
1023       DATA XX/1.D-5,2.D-5,4.D-5,6.D-5,8.D-5,
1024      .        1.D-4,2.D-4,4.D-4,6.D-4,8.D-4,
1025      .        1.D-3,2.D-3,4.D-3,6.D-3,8.D-3,
1026      .        1.D-2,2.D-2,4.D-2,6.D-2,8.D-2,
1027      .     .1D0,.125D0,.15D0,.175D0,.2D0,.225D0,.25D0,.275D0,
1028      .     .3D0,.325D0,.35D0,.375D0,.4D0,.425D0,.45D0,.475D0,
1029      .     .5D0,.525D0,.55D0,.575D0,.6D0,.65D0,.7D0,.75D0,
1030      .     .8D0,.85D0,.9D0,.95D0,.975D0,1.D0/
1031       DATA XMIN,XMAX,QSQMIN,QSQMAX/1.D-5,1.D0,5.D0,1310720.D0/
1032       DATA N0/0,0,3,5,0,5,0/
1033       DATA ZEROD/0.D0/,PONED/0.1D0/,ONED/1.D0/,ONEDO/1.1D0/,TWOD/2.D0/
1034       DATA INIT/0/
1035       XSAVE=X
1036       IF(INIT.NE.0) GOTO 10
1037       INIT=1
1038       DO 20 N=1,NX-1
1039       DO 20 M=1,NQ
1040 C     READ(101,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),
1041 C    .          F(6,N,M)
1042 C 1=UV 2=DV 3=GLUE 4=(UBAR+DBAR)/2 5=CBAR 7=BBAR 6=SBAR
1043          DO 25 I=1,7
1044   25     F(I,N,M)=F(I,N,M)/(ONED-XX(N))**N0(I)
1045   20  CONTINUE
1046       DO 30 J=1,NTENTH-1
1047       XX(J)= LOG10(XX(J))+ONEDO
1048       DO 30 I=2,6
1049       DO 30 K=1,NQ
1050   30  F(I,J,K)= LOG(F(I,J,K))*F(I,NTENTH,K)/ LOG(F(I,NTENTH,K))
1051   50  FORMAT(7F10.5)
1052       DO 40 I=1,7
1053       DO 40 M=1,NQ
1054   40  F(I,NX,M)=ZEROD
1055   10  CONTINUE
1056       IF(X.LT.XMIN) X=XMIN
1057       IF(X.GT.XMAX) X=XMAX
1058       QSQ=SCALE**2
1059       IF(QSQ.LT.QSQMIN) QSQ=QSQMIN
1060       IF(QSQ.GT.QSQMAX) QSQ=QSQMAX
1061       XXX=X
1062       IF(X.LT.PONED) XXX= LOG10(X)+ONEDO
1063       N=0
1064   70  N=N+1
1065       IF(XXX.GT.XX(N+1)) GOTO 70
1066       A=(XXX-XX(N))/(XX(N+1)-XX(N))
1067       RM= LOG(QSQ/QSQMIN)/ LOG(TWOD)
1068       B=RM-AINT(RM)
1069       M=1+  INT(RM)
1070       DO 60 I=1,7
1071       G(I)= (ONED-A)*(ONED-B)*F(I,N,M)+(ONED-A)*B*F(I,N,M+1)
1072      .    + A*(ONED-B)*F(I,N+1,M)  + A*B*F(I,N+1,M+1)
1073       IF(N.GE.NTENTH) GOTO 65
1074       IF(I.EQ.7.OR.I.EQ.1) GOTO 65
1075           FAC=(ONED-B)*F(I,NTENTH,M)+B*F(I,NTENTH,M+1)
1076           G(I)=FAC**(G(I)/FAC)
1077   65  CONTINUE
1078       G(I)=G(I)*(ONED-X)**N0(I)
1079   60  CONTINUE
1080 C UPBAR DISTRIBUTION = D DISTRIBUTION
1081       UPV=G(2)
1082       DNV=G(2)
1083 C THIS SEA IS (UBAR+DBAR)/2
1084       SEA=G(4)
1085       STR=G(6)
1086       CHM=G(5)
1087       GLU=G(3)
1088       BOT=G(7)
1089       X=XSAVE
1090       RETURN
1091       END