Annotation of OpenXM/src/hgm/so3/src/so3_nc.c, Revision 1.2
1.1 takayama 1: #include <stdio.h>
2: #include <math.h>
3: #ifdef USE_GSL_LIB
4: #include <gsl/gsl_errno.h>
5: #include <gsl/gsl_odeiv.h>
6: #else
7: #include "t-gsl_errno.h"
8: #include "t-gsl_odeiv.h"
9: #endif
10:
11: /* gcc evalnc.c -lgsl -lblas -lm */
12: /* gcc evalnc.c `pkg-config --cflags gsl` `pkg-config --libs gsl` */
13:
14: int so3_func();
15: void so3_nc(double a[3],double t0,double y[4]);
16: void so3_evalByS(int deg,double a,double b,double c,double t,double f[4]);
17:
18: #define MDEG 20
19:
1.2 ! takayama 20: #define SO3_QUIET_DEFAULT 0
! 21: #define SO3_Deg_DEFAULT 10
! 22: int SO3_Quiet = SO3_QUIET_DEFAULT;
! 23: int SO3_Deg = SO3_Deg_DEFAULT;
1.1 takayama 24: #ifdef STANDALONE
25: main(int argc,char *argv[]) {
26: double a[3];
27: double y[4];
28: double t0;
29: int i,j;
30:
31: t0 = 0.0001; /* Small enough number seems to be good (Hueristics) */
32: j = 0;
33: for (i=1; i<argc; i++) {
34: if (strcmp(argv[i],"--quiet")==0) SO3_Quiet = 1;
35: else if (strcmp(argv[i],"--t0")==0) {
36: i++; sscanf(argv[i],"%lg",&t0);
37: }else if (strcmp(argv[i],"--deg")==0) {
38: i++; sscanf(argv[i],"%d",&SO3_Deg);
39: if ((SO3_Deg > MDEG-2) || (SO3_Deg < 0)) {
40: fprintf(stderr,"Error: deg should be less than %d\n",MDEG-2); return(-1);
41: }
42: } else if (j<3) sscanf(argv[i],"%lg",&(a[j++]));
43: }
44: if (j != 3) {
45: so3_usage();
46: return(-1);
47: }
48: so3_nc(a,t0,y);
49: // printf("%lg, %lg, %lg, %lg\n",y[0],y[1],y[2],y[3]);
50: printf("%.15e, %.15e, %.15e, %.15e\n",y[0],y[1],y[2],y[3]);
51: }
52: #else
53: void so3_main(double *in1,double *in2,double *in3,double *t0p,int *quiet,int *deg,double *out) {
54: double a[3];
55: double y[4];
56: double t0;
57: int i,j;
1.2 ! takayama 58: SO3_Quiet = SO3_QUIET_DEFAULT;
! 59: SO3_Deg = SO3_Deg_DEFAULT;
1.1 takayama 60: if (*quiet) SO3_Quiet = 1;
61: if (*deg) {
62: SO3_Deg = *deg;
63: if (!SO3_Quiet) fprintf(stderr,"deg is set to %d\n",SO3_Deg);
64: }
65: t0 = 0.0001; /* Small enough number seems to be good (Hueristics) */
66: if (*t0p > 0.0) {
67: t0 = *t0p;
68: if (!SO3_Quiet) fprintf(stderr,"t0 is set to %lf\n",t0);
69: }
70: j = 0;
71: if ((SO3_Deg > MDEG-2) || (SO3_Deg < 0)) {
72: fprintf(stderr,"Error: deg should be less than %d\n",MDEG-2);
73: *out = 0.0; return;
74: }
75: a[0] = *in1; a[1] = *in2; a[2] = *in3;
1.2 ! takayama 76: // fprintf(stderr,"DEBUG: %lf,%lf,%lf,%lf\n",t0,a[0],a[1],a[2]);
1.1 takayama 77: so3_nc(a,t0,y);
78: // printf("%lg, %lg, %lg, %lg\n",y[0],y[1],y[2],y[3]);
79: if (!SO3_Quiet) printf("%.15e, %.15e, %.15e, %.15e\n",y[0],y[1],y[2],y[3]);
80: *out = y[0];
81: }
82: #endif
83:
84: so3_usage() {
85: fprintf(stderr,"Usage: so3_nc a b c returns nc(a,b,c) and its gradients\n");
86: fprintf(stderr," where nc is the normalization constant\n" );
87: fprintf(stderr," of the Fisher distribution on SO(3) for the diagonal matrix diag(a,b,c).\n");
88: fprintf(stderr," See http://arxiv.org/abs/1110.0721\n");
89: fprintf(stderr,"Options: --quiet --t0 T0 --deg DEG\n");
90: fprintf(stderr," Series is evaluated at T0*(a,b,c) and the value is extended to (a,b,c) by diff. eq.\n");
91: }
92:
93: /* Evaluate normalization constant */
94: double SO3_A[3];
95: double SO3_R; /* rho */
96: int so3_func();
97: void so3_nc(double a[3],double t0,double y[4]) {
98: int i;
99: int deg;
100: double r;
101: double y0[4];
102: double myerr,myerr2;
103: deg = SO3_Deg;
104: for (i=0; i<4; i++) SO3_A[i]=a[i];
105: SO3_R = 0.0;
106: r = a[0]-a[1]-a[2]; if (r > SO3_R) SO3_R = r;
107: r = -a[0]+a[1]-a[2]; if (r > SO3_R) SO3_R = r;
108: r = -a[0]-a[1]+a[2]; if (r > SO3_R) SO3_R = r;
109: r = a[0]+a[1]+a[2]; if (r > SO3_R) SO3_R = r;
110: if (!SO3_Quiet) fprintf(stderr,"SO3_R=%lg, exp(SO3_R t) is the asymptotics of nc.\n",SO3_R);
111:
112: const gsl_odeiv_step_type *T = gsl_odeiv_step_rkf45;
113: gsl_odeiv_step *s = gsl_odeiv_step_alloc(T, 4); /* rank4 */
114:
115: /*
116: * Absolute error 1e-6
117: * Relative error 0.0.
118: */
119: gsl_odeiv_control *c = gsl_odeiv_control_y_new(1e-6, 0.0);
120:
121: /* rank 4 system */
122: gsl_odeiv_evolve *e = gsl_odeiv_evolve_alloc(4);
123: gsl_odeiv_system sys = {so3_func, NULL, 4, NULL};
124: /* t : start, t1 : goal */
125: double t = t0, t1 = 1.0;
126: double h = 1e-6;
127: if (!SO3_Quiet) {
128: fprintf(stderr,"Set initial values at t0*(a,b,c) by evaluating series and find relevant t0.\n");
129: fprintf(stderr,"t0=%lf, a=a[0]=%lf, b=a[1]=%lf, c=a[2]=%lf\n",t0,a[0],a[1],a[2]);
130: }
131: do {
132: if (!SO3_Quiet) fprintf(stderr,"t0=%lf\n",t0);
133: so3_evalByS(deg,a[0],a[1],a[2], t0, y0);
134: if (!SO3_Quiet) fprintf(stderr,"[%2d]: %lg,%lg,%lg,%lg\n",deg,y0[0],y0[1],y0[2],y0[3]);
135: so3_evalByS(deg+1,a[0],a[1],a[2], t0, y);
136: if (!SO3_Quiet) fprintf(stderr,"[%2d]: %lg,%lg,%lg,%lg\n",deg+1,y[0],y[1],y[2],y[3]);
137: myerr=0.0;
138: for (i=0; i<4; i++) {
139: myerr2 = (y0[i]-y[i])/y0[i]; if (myerr2 <0) myerr2 = -myerr2;
140: if (myerr2 > myerr) myerr = myerr2; /* sup norm */
141: }
142: if (myerr < 1e-6) break; /* should take smaller value? */
143: t0 = t0/2.0;
144: } while (1);
145: t=t0;
146: for (i=0; i<4; i++) y[i]=y[i]*exp(-SO3_R*t0);
147: if (!SO3_Quiet) fprintf(stderr,"[%2d]*exp(-SO3_R*t0): %lg,%lg,%lg,%lg\n",deg+1,y[0],y[1],y[2],y[3]);
148: if (!SO3_Quiet) fprintf(stderr,"Result by HGM (solving ODE) ------ \n");
149:
150: while (t < t1) {
151: int status = gsl_odeiv_evolve_apply(e, c, s, &sys, &t, t1, &h, y);
152: if (status != GSL_SUCCESS) break;
153: }
154: if (!SO3_Quiet) fprintf(stderr,"t and V : t=%.5e %.5e %.5e, %.5e %.5e\n", t, y[0], y[1],y[2],y[3]);
155: for (i=0; i<4; i++) y[i]=y[i]*exp(SO3_R*t);
156: if (!SO3_Quiet) fprintf(stderr,"V*exp(SO3_R*1): t= %.5e %.5e %.5e, %.5e %.5e\n", t, y[0], y[1],y[2],y[3]);
157: if (!SO3_Quiet) fprintf(stderr,"Returned value is V=[so3_nc(a,b,c), c_a, c_b, c_c]\n");
158:
159: gsl_odeiv_evolve_free(e);
160: gsl_odeiv_control_free(c);
161: gsl_odeiv_step_free(s);
162: }
163:
164: /* From FB2/Prog/gls_ode_test2b.c */
165:
166: /*
167: d/dt y_i = f_i(t, y_1, ..., y_n), f_i=f[i]
168: y[0] = y, y[1]=y'.
169:
170: Ref: Note: See the Corollary 1 of the paper rotation.c on this function func.
171:
172: */
173: int so3_func(double t, const double y[], double f[], void *params)
174: {
175: extern double SO3_A[3];
176: f[0] = SO3_A[0]*y[1]+SO3_A[1]*y[2]+SO3_A[2]*y[3] -SO3_R*y[0];
177: f[1] = SO3_A[0]*y[0]+SO3_A[2]*y[2]+SO3_A[1]*y[3] - (2/t)*y[1] -SO3_R*y[1];
178: f[2] = SO3_A[1]*y[0]+SO3_A[2]*y[1]+SO3_A[0]*y[3] - (2/t)*y[2] -SO3_R*y[2];
179: f[3] = SO3_A[2]*y[0]+SO3_A[1]*y[1]+SO3_A[0]*y[2] - (2/t)*y[3] -SO3_R*y[3];
180: return GSL_SUCCESS;
181: }
182:
183: /* Evaluation of nc by a series */
184: void so3_evalByS(int deg,double a,double b,double c,double t,double f[4]) {
185: double Tnc[MDEG][MDEG][MDEG];
186: double ex[MDEG][MDEG][MDEG];
187: int i,j,k;
188: if (deg >= MDEG) {
189: fprintf(stderr,"Error: degree is too high\n");
190: }
191: for (i=0; i<MDEG; i++)for (j=0; j<MDEG; j++)for (k=0; k<MDEG; k++)Tnc[i][j][k]=0.0;
192: /* load("sord.rr"); forC(20); */
193: /* begin table */
194: Tnc[19][19][19]=1.8373e-54;
195: Tnc[19][19][17]=6.62551e-52;
196: Tnc[19][17][19]=6.62551e-52;
197: Tnc[17][19][19]=6.62551e-52;
198: Tnc[18][18][18]=1.36444e-50;
199: Tnc[19][19][15]=1.9059e-49;
200: Tnc[19][17][17]=2.39276e-49;
201: Tnc[17][19][17]=2.39276e-49;
202: Tnc[19][15][19]=1.9059e-49;
203: Tnc[17][17][19]=2.39276e-49;
204: Tnc[15][19][19]=1.9059e-49;
205: Tnc[18][18][16]=4.41547e-48;
206: Tnc[18][16][18]=4.41547e-48;
207: Tnc[16][18][18]=4.41547e-48;
208: Tnc[19][19][13]=4.24702e-47;
209: Tnc[19][17][15]=6.89438e-47;
210: Tnc[17][19][15]=6.89438e-47;
211: Tnc[19][15][17]=6.89438e-47;
212: Tnc[17][17][17]=8.65399e-47;
213: Tnc[15][19][17]=6.89438e-47;
214: Tnc[19][13][19]=4.24702e-47;
215: Tnc[17][15][19]=6.89438e-47;
216: Tnc[15][17][19]=6.89438e-47;
217: Tnc[13][19][19]=4.24702e-47;
218: Tnc[18][18][14]=1.12446e-45;
219: Tnc[18][16][16]=1.43125e-45;
220: Tnc[16][18][16]=1.43125e-45;
221: Tnc[18][14][18]=1.12446e-45;
222: Tnc[16][16][18]=1.43125e-45;
223: Tnc[14][18][18]=1.12446e-45;
224: Tnc[19][19][11]=7.05695e-45;
225: Tnc[19][17][13]=1.53917e-44;
226: Tnc[17][19][13]=1.53917e-44;
227: Tnc[19][15][15]=1.99021e-44;
228: Tnc[17][17][15]=2.49763e-44;
229: Tnc[15][19][15]=1.99021e-44;
230: Tnc[19][13][17]=1.53917e-44;
231: Tnc[17][15][17]=2.49763e-44;
232: Tnc[15][17][17]=2.49763e-44;
233: Tnc[13][19][17]=1.53917e-44;
234: Tnc[19][11][19]=7.05695e-45;
235: Tnc[17][13][19]=1.53917e-44;
236: Tnc[15][15][19]=1.99021e-44;
237: Tnc[13][17][19]=1.53917e-44;
238: Tnc[11][19][19]=7.05695e-45;
239: Tnc[18][18][12]=2.17975e-43;
240: Tnc[18][16][14]=3.65163e-43;
241: Tnc[16][18][14]=3.65163e-43;
242: Tnc[18][14][16]=3.65163e-43;
243: Tnc[16][16][16]=4.64694e-43;
244: Tnc[14][18][16]=3.65163e-43;
245: Tnc[18][12][18]=2.17975e-43;
246: Tnc[16][14][18]=3.65163e-43;
247: Tnc[14][16][18]=3.65163e-43;
248: Tnc[12][18][18]=2.17975e-43;
249: Tnc[19][19][9]=8.30395e-43;
250: Tnc[19][17][11]=2.56293e-42;
251: Tnc[17][19][11]=2.56293e-42;
252: Tnc[19][15][13]=4.45255e-42;
253: Tnc[17][17][13]=5.58632e-42;
254: Tnc[15][19][13]=4.45255e-42;
255: Tnc[19][13][15]=4.45255e-42;
256: Tnc[17][15][15]=7.22178e-42;
257: Tnc[15][17][15]=7.22178e-42;
258: Tnc[13][19][15]=4.45255e-42;
259: Tnc[19][11][17]=2.56293e-42;
260: Tnc[17][13][17]=5.58632e-42;
261: Tnc[15][15][17]=7.22178e-42;
262: Tnc[13][17][17]=5.58632e-42;
263: Tnc[11][19][17]=2.56293e-42;
264: Tnc[19][9][19]=8.30395e-43;
265: Tnc[17][11][19]=2.56293e-42;
266: Tnc[15][13][19]=4.45255e-42;
267: Tnc[13][15][19]=4.45255e-42;
268: Tnc[11][17][19]=2.56293e-42;
269: Tnc[9][19][19]=8.30395e-43;
270: Tnc[18][18][10]=3.07779e-41;
271: Tnc[18][16][12]=7.09362e-41;
272: Tnc[16][18][12]=7.09362e-41;
273: Tnc[18][14][14]=9.3363e-41;
274: Tnc[16][16][14]=1.1878e-40;
275: Tnc[14][18][14]=9.3363e-41;
276: Tnc[18][12][16]=7.09362e-41;
277: Tnc[16][14][16]=1.1878e-40;
278: Tnc[14][16][16]=1.1878e-40;
279: Tnc[12][18][16]=7.09362e-41;
280: Tnc[18][10][18]=3.07779e-41;
281: Tnc[16][12][18]=7.09362e-41;
282: Tnc[14][14][18]=9.3363e-41;
283: Tnc[12][16][18]=7.09362e-41;
284: Tnc[10][18][18]=3.07779e-41;
285: Tnc[19][19][7]=6.42744e-41;
286: Tnc[19][17][9]=3.02313e-40;
287: Tnc[17][19][9]=3.02313e-40;
288: Tnc[19][15][11]=7.43206e-40;
289: Tnc[17][17][11]=9.3216e-40;
290: Tnc[15][19][11]=7.43206e-40;
291: Tnc[19][13][13]=9.98548e-40;
292: Tnc[17][15][13]=1.61866e-39;
293: Tnc[15][17][13]=1.61866e-39;
294: Tnc[13][19][13]=9.98548e-40;
295: Tnc[19][11][15]=7.43206e-40;
296: Tnc[17][13][15]=1.61866e-39;
297: Tnc[15][15][15]=2.09201e-39;
298: Tnc[13][17][15]=1.61866e-39;
299: Tnc[11][19][15]=7.43206e-40;
300: Tnc[19][9][17]=3.02313e-40;
301: Tnc[17][11][17]=9.3216e-40;
302: Tnc[15][13][17]=1.61866e-39;
303: Tnc[13][15][17]=1.61866e-39;
304: Tnc[11][17][17]=9.3216e-40;
305: Tnc[9][19][17]=3.02313e-40;
306: Tnc[19][7][19]=6.42744e-41;
307: Tnc[17][9][19]=3.02313e-40;
308: Tnc[15][11][19]=7.43206e-40;
309: Tnc[13][13][19]=9.98548e-40;
310: Tnc[11][15][19]=7.43206e-40;
311: Tnc[9][17][19]=3.02313e-40;
312: Tnc[7][19][19]=6.42744e-41;
313: Tnc[18][18][8]=2.97769e-39;
314: Tnc[18][16][10]=1.00404e-38;
315: Tnc[16][18][10]=1.00404e-38;
316: Tnc[18][14][12]=1.81805e-38;
317: Tnc[16][16][12]=2.31226e-38;
318: Tnc[14][18][12]=1.81805e-38;
319: Tnc[18][12][14]=1.81805e-38;
320: Tnc[16][14][14]=3.04251e-38;
321: Tnc[14][16][14]=3.04251e-38;
322: Tnc[12][18][14]=1.81805e-38;
323: Tnc[18][10][16]=1.00404e-38;
324: Tnc[16][12][16]=2.31226e-38;
325: Tnc[14][14][16]=3.04251e-38;
326: Tnc[12][16][16]=2.31226e-38;
327: Tnc[10][18][16]=1.00404e-38;
328: Tnc[18][8][18]=2.97769e-39;
329: Tnc[16][10][18]=1.00404e-38;
330: Tnc[14][12][18]=1.81805e-38;
331: Tnc[12][14][18]=1.81805e-38;
332: Tnc[10][16][18]=1.00404e-38;
333: Tnc[8][18][18]=2.97769e-39;
334: Tnc[19][19][5]=2.91875e-39;
335: Tnc[19][17][7]=2.34655e-38;
336: Tnc[17][19][7]=2.34655e-38;
337: Tnc[19][15][9]=8.79116e-38;
338: Tnc[17][17][9]=1.1022e-37;
339: Tnc[15][19][9]=8.79116e-38;
340: Tnc[19][13][11]=1.67142e-37;
341: Tnc[17][15][11]=2.70751e-37;
342: Tnc[15][17][11]=2.70751e-37;
343: Tnc[13][19][11]=1.67142e-37;
344: Tnc[19][11][13]=1.67142e-37;
345: Tnc[17][13][13]=3.63678e-37;
346: Tnc[15][15][13]=4.69881e-37;
347: Tnc[13][17][13]=3.63678e-37;
348: Tnc[11][19][13]=1.67142e-37;
349: Tnc[19][9][15]=8.79116e-38;
350: Tnc[17][11][15]=2.70751e-37;
351: Tnc[15][13][15]=4.69881e-37;
352: Tnc[13][15][15]=4.69881e-37;
353: Tnc[11][17][15]=2.70751e-37;
354: Tnc[9][19][15]=8.79116e-38;
355: Tnc[19][7][17]=2.34655e-38;
356: Tnc[17][9][17]=1.1022e-37;
357: Tnc[15][11][17]=2.70751e-37;
358: Tnc[13][13][17]=3.63678e-37;
359: Tnc[11][15][17]=2.70751e-37;
360: Tnc[9][17][17]=1.1022e-37;
361: Tnc[7][19][17]=2.34655e-38;
362: Tnc[19][5][19]=2.91875e-39;
363: Tnc[17][7][19]=2.34655e-38;
364: Tnc[15][9][19]=8.79116e-38;
365: Tnc[13][11][19]=1.67142e-37;
366: Tnc[11][13][19]=1.67142e-37;
367: Tnc[9][15][19]=8.79116e-38;
368: Tnc[7][17][19]=2.34655e-38;
369: Tnc[5][19][19]=2.91875e-39;
370: Tnc[18][18][6]=1.80281e-37;
371: Tnc[18][16][8]=9.74107e-37;
372: Tnc[16][18][8]=9.74107e-37;
373: Tnc[18][14][10]=2.58048e-36;
374: Tnc[16][16][10]=3.2807e-36;
375: Tnc[14][18][10]=2.58048e-36;
376: Tnc[18][12][12]=3.55017e-36;
377: Tnc[16][14][12]=5.93708e-36;
378: Tnc[14][16][12]=5.93708e-36;
379: Tnc[12][18][12]=3.55017e-36;
380: Tnc[18][10][14]=2.58048e-36;
381: Tnc[16][12][14]=5.93708e-36;
382: Tnc[14][14][14]=7.80966e-36;
383: Tnc[12][16][14]=5.93708e-36;
384: Tnc[10][18][14]=2.58048e-36;
385: Tnc[18][8][16]=9.74107e-37;
386: Tnc[16][10][16]=3.2807e-36;
387: Tnc[14][12][16]=5.93708e-36;
388: Tnc[12][14][16]=5.93708e-36;
389: Tnc[10][16][16]=3.2807e-36;
390: Tnc[8][18][16]=9.74107e-37;
391: Tnc[18][6][18]=1.80281e-37;
392: Tnc[16][8][18]=9.74107e-37;
393: Tnc[14][10][18]=2.58048e-36;
394: Tnc[12][12][18]=3.55017e-36;
395: Tnc[10][14][18]=2.58048e-36;
396: Tnc[8][16][18]=9.74107e-37;
397: Tnc[6][18][18]=1.80281e-37;
398: Tnc[19][19][3]=6.35428e-38;
399: Tnc[19][17][5]=1.0691e-36;
400: Tnc[17][19][5]=1.0691e-36;
401: Tnc[19][15][7]=6.84611e-36;
402: Tnc[17][17][7]=8.57921e-36;
403: Tnc[15][19][7]=6.84611e-36;
404: Tnc[19][13][9]=1.98356e-35;
405: Tnc[17][15][9]=3.21035e-35;
406: Tnc[15][17][9]=3.21035e-35;
407: Tnc[13][19][9]=1.98356e-35;
408: Tnc[19][11][11]=2.80689e-35;
409: Tnc[17][13][11]=6.10019e-35;
410: Tnc[15][15][11]=7.87855e-35;
411: Tnc[13][17][11]=6.10019e-35;
412: Tnc[11][19][11]=2.80689e-35;
413: Tnc[19][9][13]=1.98356e-35;
414: Tnc[17][11][13]=6.10019e-35;
415: Tnc[15][13][13]=1.05793e-34;
416: Tnc[13][15][13]=1.05793e-34;
417: Tnc[11][17][13]=6.10019e-35;
418: Tnc[9][19][13]=1.98356e-35;
419: Tnc[19][7][15]=6.84611e-36;
420: Tnc[17][9][15]=3.21035e-35;
421: Tnc[15][11][15]=7.87855e-35;
422: Tnc[13][13][15]=1.05793e-34;
423: Tnc[11][15][15]=7.87855e-35;
424: Tnc[9][17][15]=3.21035e-35;
425: Tnc[7][19][15]=6.84611e-36;
426: Tnc[19][5][17]=1.0691e-36;
427: Tnc[17][7][17]=8.57921e-36;
428: Tnc[15][9][17]=3.21035e-35;
429: Tnc[13][11][17]=6.10019e-35;
430: Tnc[11][13][17]=6.10019e-35;
431: Tnc[9][15][17]=3.21035e-35;
432: Tnc[7][17][17]=8.57921e-36;
433: Tnc[5][19][17]=1.0691e-36;
434: Tnc[19][3][19]=6.35428e-38;
435: Tnc[17][5][19]=1.0691e-36;
436: Tnc[15][7][19]=6.84611e-36;
437: Tnc[13][9][19]=1.98356e-35;
438: Tnc[11][11][19]=2.80689e-35;
439: Tnc[9][13][19]=1.98356e-35;
440: Tnc[7][15][19]=6.84611e-36;
441: Tnc[5][17][19]=1.0691e-36;
442: Tnc[3][19][19]=6.35428e-38;
443: Tnc[18][18][4]=5.88673e-36;
444: Tnc[18][16][6]=5.91702e-35;
445: Tnc[16][18][6]=5.91702e-35;
446: Tnc[18][14][8]=2.51178e-34;
447: Tnc[16][16][8]=3.1918e-34;
448: Tnc[14][18][8]=2.51178e-34;
449: Tnc[18][12][10]=5.05553e-34;
450: Tnc[16][14][10]=8.44721e-34;
451: Tnc[14][16][10]=8.44721e-34;
452: Tnc[12][18][10]=5.05553e-34;
453: Tnc[18][10][12]=5.05553e-34;
454: Tnc[16][12][12]=1.16178e-33;
455: Tnc[14][14][12]=1.52762e-33;
456: Tnc[12][16][12]=1.16178e-33;
457: Tnc[10][18][12]=5.05553e-34;
458: Tnc[18][8][14]=2.51178e-34;
459: Tnc[16][10][14]=8.44721e-34;
460: Tnc[14][12][14]=1.52762e-33;
461: Tnc[12][14][14]=1.52762e-33;
462: Tnc[10][16][14]=8.44721e-34;
463: Tnc[8][18][14]=2.51178e-34;
464: Tnc[18][6][16]=5.91702e-35;
465: Tnc[16][8][16]=3.1918e-34;
466: Tnc[14][10][16]=8.44721e-34;
467: Tnc[12][12][16]=1.16178e-33;
468: Tnc[10][14][16]=8.44721e-34;
469: Tnc[8][16][16]=3.1918e-34;
470: Tnc[6][18][16]=5.91702e-35;
471: Tnc[18][4][18]=5.88673e-36;
472: Tnc[16][6][18]=5.91702e-35;
473: Tnc[14][8][18]=2.51178e-34;
474: Tnc[12][10][18]=5.05553e-34;
475: Tnc[10][12][18]=5.05553e-34;
476: Tnc[8][14][18]=2.51178e-34;
477: Tnc[6][16][18]=5.91702e-35;
478: Tnc[4][18][18]=5.88673e-36;
479: Tnc[19][19][1]=4.18362e-37;
480: Tnc[19][17][3]=2.33662e-35;
481: Tnc[17][19][3]=2.33662e-35;
482: Tnc[19][15][5]=3.13132e-34;
483: Tnc[17][17][5]=3.9216e-34;
484: Tnc[15][19][5]=3.13132e-34;
485: Tnc[19][13][7]=1.55073e-33;
486: Tnc[17][15][7]=2.50705e-33;
487: Tnc[15][17][7]=2.50705e-33;
488: Tnc[13][19][7]=1.55073e-33;
489: Tnc[19][11][9]=3.34407e-33;
490: Tnc[17][13][9]=7.25682e-33;
491: Tnc[15][15][9]=9.36783e-33;
492: Tnc[13][17][9]=7.25682e-33;
493: Tnc[11][19][9]=3.34407e-33;
494: Tnc[19][9][11]=3.34407e-33;
495: Tnc[17][11][11]=1.02657e-32;
496: Tnc[15][13][11]=1.77879e-32;
497: Tnc[13][15][11]=1.77879e-32;
498: Tnc[11][17][11]=1.02657e-32;
499: Tnc[9][19][11]=3.34407e-33;
500: Tnc[19][7][13]=1.55073e-33;
501: Tnc[17][9][13]=7.25682e-33;
502: Tnc[15][11][13]=1.77879e-32;
503: Tnc[13][13][13]=2.38763e-32;
504: Tnc[11][15][13]=1.77879e-32;
505: Tnc[9][17][13]=7.25682e-33;
506: Tnc[7][19][13]=1.55073e-33;
507: Tnc[19][5][15]=3.13132e-34;
508: Tnc[17][7][15]=2.50705e-33;
509: Tnc[15][9][15]=9.36783e-33;
510: Tnc[13][11][15]=1.77879e-32;
511: Tnc[11][13][15]=1.77879e-32;
512: Tnc[9][15][15]=9.36783e-33;
513: Tnc[7][17][15]=2.50705e-33;
514: Tnc[5][19][15]=3.13132e-34;
515: Tnc[19][3][17]=2.33662e-35;
516: Tnc[17][5][17]=3.9216e-34;
517: Tnc[15][7][17]=2.50705e-33;
518: Tnc[13][9][17]=7.25682e-33;
519: Tnc[11][11][17]=1.02657e-32;
520: Tnc[9][13][17]=7.25682e-33;
521: Tnc[7][15][17]=2.50705e-33;
522: Tnc[5][17][17]=3.9216e-34;
523: Tnc[3][19][17]=2.33662e-35;
524: Tnc[19][1][19]=4.18362e-37;
525: Tnc[17][3][19]=2.33662e-35;
526: Tnc[15][5][19]=3.13132e-34;
527: Tnc[13][7][19]=1.55073e-33;
528: Tnc[11][9][19]=3.34407e-33;
529: Tnc[9][11][19]=3.34407e-33;
530: Tnc[7][13][19]=1.55073e-33;
531: Tnc[5][15][19]=3.13132e-34;
532: Tnc[3][17][19]=2.33662e-35;
533: Tnc[1][19][19]=4.18362e-37;
534: Tnc[18][18][2]=7.7507e-35;
535: Tnc[18][16][4]=1.93965e-33;
536: Tnc[16][18][4]=1.93965e-33;
537: Tnc[18][14][6]=1.53168e-32;
538: Tnc[16][16][6]=1.94516e-32;
539: Tnc[14][18][6]=1.53168e-32;
540: Tnc[18][12][8]=4.94009e-32;
541: Tnc[16][14][8]=8.24521e-32;
542: Tnc[14][16][8]=8.24521e-32;
543: Tnc[12][18][8]=4.94009e-32;
544: Tnc[18][10][10]=7.22723e-32;
545: Tnc[16][12][10]=1.65837e-31;
546: Tnc[14][14][10]=2.17953e-31;
547: Tnc[12][16][10]=1.65837e-31;
548: Tnc[10][18][10]=7.22723e-32;
549: Tnc[18][8][12]=4.94009e-32;
550: Tnc[16][10][12]=1.65837e-31;
551: Tnc[14][12][12]=2.99644e-31;
552: Tnc[12][14][12]=2.99644e-31;
553: Tnc[10][16][12]=1.65837e-31;
554: Tnc[8][18][12]=4.94009e-32;
555: Tnc[18][6][14]=1.53168e-32;
556: Tnc[16][8][14]=8.24521e-32;
557: Tnc[14][10][14]=2.17953e-31;
558: Tnc[12][12][14]=2.99644e-31;
559: Tnc[10][14][14]=2.17953e-31;
560: Tnc[8][16][14]=8.24521e-32;
561: Tnc[6][18][14]=1.53168e-32;
562: Tnc[18][4][16]=1.93965e-33;
563: Tnc[16][6][16]=1.94516e-32;
564: Tnc[14][8][16]=8.24521e-32;
565: Tnc[12][10][16]=1.65837e-31;
566: Tnc[10][12][16]=1.65837e-31;
567: Tnc[8][14][16]=8.24521e-32;
568: Tnc[6][16][16]=1.94516e-32;
569: Tnc[4][18][16]=1.93965e-33;
570: Tnc[18][2][18]=7.7507e-35;
571: Tnc[16][4][18]=1.93965e-33;
572: Tnc[14][6][18]=1.53168e-32;
573: Tnc[12][8][18]=4.94009e-32;
574: Tnc[10][10][18]=7.22723e-32;
575: Tnc[8][12][18]=4.94009e-32;
576: Tnc[6][14][18]=1.53168e-32;
577: Tnc[4][16][18]=1.93965e-33;
578: Tnc[2][18][18]=7.7507e-35;
579: Tnc[19][17][1]=1.54574e-34;
580: Tnc[17][19][1]=1.54574e-34;
581: Tnc[19][15][3]=6.87619e-33;
582: Tnc[17][17][3]=8.6046e-33;
583: Tnc[15][19][3]=6.87619e-33;
584: Tnc[19][13][5]=7.12626e-32;
585: Tnc[17][15][5]=1.15045e-31;
586: Tnc[15][17][5]=1.15045e-31;
587: Tnc[13][19][5]=7.12626e-32;
588: Tnc[19][11][7]=2.62665e-31;
589: Tnc[17][13][7]=5.68909e-31;
590: Tnc[15][15][7]=7.3395e-31;
591: Tnc[13][17][7]=5.68909e-31;
592: Tnc[11][19][7]=2.62665e-31;
593: Tnc[19][9][9]=4.00278e-31;
594: Tnc[17][11][9]=1.22596e-30;
595: Tnc[15][13][9]=2.12194e-30;
596: Tnc[13][15][9]=2.12194e-30;
597: Tnc[11][17][9]=1.22596e-30;
598: Tnc[9][19][9]=4.00278e-31;
599: Tnc[19][7][11]=2.62665e-31;
600: Tnc[17][9][11]=1.22596e-30;
601: Tnc[15][11][11]=3.00058e-30;
602: Tnc[13][13][11]=4.02567e-30;
603: Tnc[11][15][11]=3.00058e-30;
604: Tnc[9][17][11]=1.22596e-30;
605: Tnc[7][19][11]=2.62665e-31;
606: Tnc[19][5][13]=7.12626e-32;
607: Tnc[17][7][13]=5.68909e-31;
608: Tnc[15][9][13]=2.12194e-30;
609: Tnc[13][11][13]=4.02567e-30;
610: Tnc[11][13][13]=4.02567e-30;
611: Tnc[9][15][13]=2.12194e-30;
612: Tnc[7][17][13]=5.68909e-31;
613: Tnc[5][19][13]=7.12626e-32;
614: Tnc[19][3][15]=6.87619e-33;
615: Tnc[17][5][15]=1.15045e-31;
616: Tnc[15][7][15]=7.3395e-31;
617: Tnc[13][9][15]=2.12194e-30;
618: Tnc[11][11][15]=3.00058e-30;
619: Tnc[9][13][15]=2.12194e-30;
620: Tnc[7][15][15]=7.3395e-31;
621: Tnc[5][17][15]=1.15045e-31;
622: Tnc[3][19][15]=6.87619e-33;
623: Tnc[19][1][17]=1.54574e-34;
624: Tnc[17][3][17]=8.6046e-33;
625: Tnc[15][5][17]=1.15045e-31;
626: Tnc[13][7][17]=5.68909e-31;
627: Tnc[11][9][17]=1.22596e-30;
628: Tnc[9][11][17]=1.22596e-30;
629: Tnc[7][13][17]=5.68909e-31;
630: Tnc[5][15][17]=1.15045e-31;
631: Tnc[3][17][17]=8.6046e-33;
632: Tnc[1][19][17]=1.54574e-34;
633: Tnc[17][1][19]=1.54574e-34;
634: Tnc[15][3][19]=6.87619e-33;
635: Tnc[13][5][19]=7.12626e-32;
636: Tnc[11][7][19]=2.62665e-31;
637: Tnc[9][9][19]=4.00278e-31;
638: Tnc[7][11][19]=2.62665e-31;
639: Tnc[5][13][19]=7.12626e-32;
640: Tnc[3][15][19]=6.87619e-33;
641: Tnc[1][17][19]=1.54574e-34;
642: Tnc[18][18][0]=1.71749e-34;
643: Tnc[18][16][2]=2.56592e-32;
644: Tnc[16][18][2]=2.56592e-32;
645: Tnc[18][14][4]=5.04466e-31;
646: Tnc[16][16][4]=6.40127e-31;
647: Tnc[14][18][4]=5.04466e-31;
648: Tnc[18][12][6]=3.02663e-30;
649: Tnc[16][14][6]=5.04436e-30;
650: Tnc[14][16][6]=5.04436e-30;
651: Tnc[12][18][6]=3.02663e-30;
652: Tnc[18][10][8]=7.09536e-30;
653: Tnc[16][12][8]=1.625e-29;
654: Tnc[14][14][8]=2.13435e-29;
655: Tnc[12][16][8]=1.625e-29;
656: Tnc[10][18][8]=7.09536e-30;
657: Tnc[18][8][10]=7.09536e-30;
658: Tnc[16][10][10]=2.37641e-29;
659: Tnc[14][12][10]=4.28908e-29;
660: Tnc[12][14][10]=4.28908e-29;
661: Tnc[10][16][10]=2.37641e-29;
662: Tnc[8][18][10]=7.09536e-30;
663: Tnc[18][6][12]=3.02663e-30;
664: Tnc[16][8][12]=1.625e-29;
665: Tnc[14][10][12]=4.28908e-29;
666: Tnc[12][12][12]=5.8938e-29;
667: Tnc[10][14][12]=4.28908e-29;
668: Tnc[8][16][12]=1.625e-29;
669: Tnc[6][18][12]=3.02663e-30;
670: Tnc[18][4][14]=5.04466e-31;
671: Tnc[16][6][14]=5.04436e-30;
672: Tnc[14][8][14]=2.13435e-29;
673: Tnc[12][10][14]=4.28908e-29;
674: Tnc[10][12][14]=4.28908e-29;
675: Tnc[8][14][14]=2.13435e-29;
676: Tnc[6][16][14]=5.04436e-30;
677: Tnc[4][18][14]=5.04466e-31;
678: Tnc[18][2][16]=2.56592e-32;
679: Tnc[16][4][16]=6.40127e-31;
680: Tnc[14][6][16]=5.04436e-30;
681: Tnc[12][8][16]=1.625e-29;
682: Tnc[10][10][16]=2.37641e-29;
683: Tnc[8][12][16]=1.625e-29;
684: Tnc[6][14][16]=5.04436e-30;
685: Tnc[4][16][16]=6.40127e-31;
686: Tnc[2][18][16]=2.56592e-32;
687: Tnc[18][0][18]=1.71749e-34;
688: Tnc[16][2][18]=2.56592e-32;
689: Tnc[14][4][18]=5.04466e-31;
690: Tnc[12][6][18]=3.02663e-30;
691: Tnc[10][8][18]=7.09536e-30;
692: Tnc[8][10][18]=7.09536e-30;
693: Tnc[6][12][18]=3.02663e-30;
694: Tnc[4][14][18]=5.04466e-31;
695: Tnc[2][16][18]=2.56592e-32;
696: Tnc[0][18][18]=1.71749e-34;
697: Tnc[19][15][1]=4.57538e-32;
698: Tnc[17][17][1]=5.71923e-32;
699: Tnc[15][19][1]=4.57538e-32;
700: Tnc[19][13][3]=1.57398e-30;
701: Tnc[17][15][3]=2.5362e-30;
702: Tnc[15][17][3]=2.5362e-30;
703: Tnc[13][19][3]=1.57398e-30;
704: Tnc[19][11][5]=1.21405e-29;
705: Tnc[17][13][5]=2.62293e-29;
706: Tnc[15][15][5]=3.38111e-29;
707: Tnc[13][17][5]=2.62293e-29;
708: Tnc[11][19][5]=1.21405e-29;
709: Tnc[19][9][7]=3.16223e-29;
710: Tnc[17][11][7]=9.65617e-29;
711: Tnc[15][13][7]=1.66894e-28;
712: Tnc[13][15][7]=1.66894e-28;
713: Tnc[11][17][7]=9.65617e-29;
714: Tnc[9][19][7]=3.16223e-29;
715: Tnc[19][7][9]=3.16223e-29;
716: Tnc[17][9][9]=1.47094e-28;
717: Tnc[15][11][9]=3.59329e-28;
718: Tnc[13][13][9]=4.81788e-28;
719: Tnc[11][15][9]=3.59329e-28;
720: Tnc[9][17][9]=1.47094e-28;
721: Tnc[7][19][9]=3.16223e-29;
722: Tnc[19][5][11]=1.21405e-29;
723: Tnc[17][7][11]=9.65617e-29;
724: Tnc[15][9][11]=3.59329e-28;
725: Tnc[13][11][11]=6.80953e-28;
726: Tnc[11][13][11]=6.80953e-28;
727: Tnc[9][15][11]=3.59329e-28;
728: Tnc[7][17][11]=9.65617e-29;
729: Tnc[5][19][11]=1.21405e-29;
730: Tnc[19][3][13]=1.57398e-30;
731: Tnc[17][5][13]=2.62293e-29;
732: Tnc[15][7][13]=1.66894e-28;
733: Tnc[13][9][13]=4.81788e-28;
734: Tnc[11][11][13]=6.80953e-28;
735: Tnc[9][13][13]=4.81788e-28;
736: Tnc[7][15][13]=1.66894e-28;
737: Tnc[5][17][13]=2.62293e-29;
738: Tnc[3][19][13]=1.57398e-30;
739: Tnc[19][1][15]=4.57538e-32;
740: Tnc[17][3][15]=2.5362e-30;
741: Tnc[15][5][15]=3.38111e-29;
742: Tnc[13][7][15]=1.66894e-28;
743: Tnc[11][9][15]=3.59329e-28;
744: Tnc[9][11][15]=3.59329e-28;
745: Tnc[7][13][15]=1.66894e-28;
746: Tnc[5][15][15]=3.38111e-29;
747: Tnc[3][17][15]=2.5362e-30;
748: Tnc[1][19][15]=4.57538e-32;
749: Tnc[17][1][17]=5.71923e-32;
750: Tnc[15][3][17]=2.5362e-30;
751: Tnc[13][5][17]=2.62293e-29;
752: Tnc[11][7][17]=9.65617e-29;
753: Tnc[9][9][17]=1.47094e-28;
754: Tnc[7][11][17]=9.65617e-29;
755: Tnc[5][13][17]=2.62293e-29;
756: Tnc[3][15][17]=2.5362e-30;
757: Tnc[1][17][17]=5.71923e-32;
758: Tnc[15][1][19]=4.57538e-32;
759: Tnc[13][3][19]=1.57398e-30;
760: Tnc[11][5][19]=1.21405e-29;
761: Tnc[9][7][19]=3.16223e-29;
762: Tnc[7][9][19]=3.16223e-29;
763: Tnc[5][11][19]=1.21405e-29;
764: Tnc[3][13][19]=1.57398e-30;
765: Tnc[1][15][19]=4.57538e-32;
766: Tnc[18][16][0]=5.71923e-32;
767: Tnc[16][18][0]=5.71923e-32;
768: Tnc[18][14][2]=6.71235e-30;
769: Tnc[16][16][2]=8.50819e-30;
770: Tnc[14][18][2]=6.71235e-30;
771: Tnc[18][12][4]=1.00261e-28;
772: Tnc[16][14][4]=1.66785e-28;
773: Tnc[14][16][4]=1.66785e-28;
774: Tnc[12][18][4]=1.00261e-28;
775: Tnc[18][10][6]=4.37222e-28;
776: Tnc[16][12][6]=9.98824e-28;
777: Tnc[14][14][6]=1.31084e-27;
778: Tnc[12][16][6]=9.98824e-28;
779: Tnc[10][18][6]=4.37222e-28;
780: Tnc[18][8][8]=7.00612e-28;
781: Tnc[16][10][8]=2.33948e-27;
782: Tnc[14][12][8]=4.21641e-27;
783: Tnc[12][14][8]=4.21641e-27;
784: Tnc[10][16][8]=2.33948e-27;
785: Tnc[8][18][8]=7.00612e-28;
786: Tnc[18][6][10]=4.37222e-28;
787: Tnc[16][8][10]=2.33948e-27;
788: Tnc[14][10][10]=6.16308e-27;
789: Tnc[12][12][10]=8.46369e-27;
790: Tnc[10][14][10]=6.16308e-27;
791: Tnc[8][16][10]=2.33948e-27;
792: Tnc[6][18][10]=4.37222e-28;
793: Tnc[18][4][12]=1.00261e-28;
794: Tnc[16][6][12]=9.98824e-28;
795: Tnc[14][8][12]=4.21641e-27;
796: Tnc[12][10][12]=8.46369e-27;
797: Tnc[10][12][12]=8.46369e-27;
798: Tnc[8][14][12]=4.21641e-27;
799: Tnc[6][16][12]=9.98824e-28;
800: Tnc[4][18][12]=1.00261e-28;
801: Tnc[18][2][14]=6.71235e-30;
802: Tnc[16][4][14]=1.66785e-28;
803: Tnc[14][6][14]=1.31084e-27;
804: Tnc[12][8][14]=4.21641e-27;
805: Tnc[10][10][14]=6.16308e-27;
806: Tnc[8][12][14]=4.21641e-27;
807: Tnc[6][14][14]=1.31084e-27;
808: Tnc[4][16][14]=1.66785e-28;
809: Tnc[2][18][14]=6.71235e-30;
810: Tnc[18][0][16]=5.71923e-32;
811: Tnc[16][2][16]=8.50819e-30;
812: Tnc[14][4][16]=1.66785e-28;
813: Tnc[12][6][16]=9.98824e-28;
814: Tnc[10][8][16]=2.33948e-27;
815: Tnc[8][10][16]=2.33948e-27;
816: Tnc[6][12][16]=9.98824e-28;
817: Tnc[4][14][16]=1.66785e-28;
818: Tnc[2][16][16]=8.50819e-30;
819: Tnc[0][18][16]=5.71923e-32;
820: Tnc[16][0][18]=5.71923e-32;
821: Tnc[14][2][18]=6.71235e-30;
822: Tnc[12][4][18]=1.00261e-28;
823: Tnc[10][6][18]=4.37222e-28;
824: Tnc[8][8][18]=7.00612e-28;
825: Tnc[6][10][18]=4.37222e-28;
826: Tnc[4][12][18]=1.00261e-28;
827: Tnc[2][14][18]=6.71235e-30;
828: Tnc[0][16][18]=5.71923e-32;
829: Tnc[19][13][1]=1.05503e-29;
830: Tnc[17][15][1]=1.69558e-29;
831: Tnc[15][17][1]=1.69558e-29;
832: Tnc[13][19][1]=1.05503e-29;
833: Tnc[19][11][3]=2.70111e-28;
834: Tnc[17][13][3]=5.81585e-28;
835: Tnc[15][15][3]=7.48882e-28;
836: Tnc[13][17][3]=5.81585e-28;
837: Tnc[11][19][3]=2.70111e-28;
838: Tnc[19][9][5]=1.47227e-27;
839: Tnc[17][11][5]=4.47766e-27;
840: Tnc[15][13][5]=7.72439e-27;
841: Tnc[13][15][5]=7.72439e-27;
842: Tnc[11][17][5]=4.47766e-27;
843: Tnc[9][19][5]=1.47227e-27;
844: Tnc[19][7][7]=2.5164e-27;
845: Tnc[17][9][7]=1.16526e-26;
846: Tnc[15][11][7]=2.8394e-26;
847: Tnc[13][13][7]=3.80398e-26;
848: Tnc[11][15][7]=2.8394e-26;
849: Tnc[9][17][7]=1.16526e-26;
850: Tnc[7][19][7]=2.5164e-27;
851: Tnc[19][5][9]=1.47227e-27;
852: Tnc[17][7][9]=1.16526e-26;
853: Tnc[15][9][9]=4.32318e-26;
854: Tnc[13][11][9]=8.181e-26;
855: Tnc[11][13][9]=8.181e-26;
856: Tnc[9][15][9]=4.32318e-26;
857: Tnc[7][17][9]=1.16526e-26;
858: Tnc[5][19][9]=1.47227e-27;
859: Tnc[19][3][11]=2.70111e-28;
860: Tnc[17][5][11]=4.47766e-27;
861: Tnc[15][7][11]=2.8394e-26;
862: Tnc[13][9][11]=8.181e-26;
863: Tnc[11][11][11]=1.15557e-25;
864: Tnc[9][13][11]=8.181e-26;
865: Tnc[7][15][11]=2.8394e-26;
866: Tnc[5][17][11]=4.47766e-27;
867: Tnc[3][19][11]=2.70111e-28;
868: Tnc[19][1][13]=1.05503e-29;
869: Tnc[17][3][13]=5.81585e-28;
870: Tnc[15][5][13]=7.72439e-27;
871: Tnc[13][7][13]=3.80398e-26;
872: Tnc[11][9][13]=8.181e-26;
873: Tnc[9][11][13]=8.181e-26;
874: Tnc[7][13][13]=3.80398e-26;
875: Tnc[5][15][13]=7.72439e-27;
876: Tnc[3][17][13]=5.81585e-28;
877: Tnc[1][19][13]=1.05503e-29;
878: Tnc[17][1][15]=1.69558e-29;
879: Tnc[15][3][15]=7.48882e-28;
880: Tnc[13][5][15]=7.72439e-27;
881: Tnc[11][7][15]=2.8394e-26;
882: Tnc[9][9][15]=4.32318e-26;
883: Tnc[7][11][15]=2.8394e-26;
884: Tnc[5][13][15]=7.72439e-27;
885: Tnc[3][15][15]=7.48882e-28;
886: Tnc[1][17][15]=1.69558e-29;
887: Tnc[15][1][17]=1.69558e-29;
888: Tnc[13][3][17]=5.81585e-28;
889: Tnc[11][5][17]=4.47766e-27;
890: Tnc[9][7][17]=1.16526e-26;
891: Tnc[7][9][17]=1.16526e-26;
892: Tnc[5][11][17]=4.47766e-27;
893: Tnc[3][13][17]=5.81585e-28;
894: Tnc[1][15][17]=1.69558e-29;
895: Tnc[13][1][19]=1.05503e-29;
896: Tnc[11][3][19]=2.70111e-28;
897: Tnc[9][5][19]=1.47227e-27;
898: Tnc[7][7][19]=2.5164e-27;
899: Tnc[5][9][19]=1.47227e-27;
900: Tnc[3][11][19]=2.70111e-28;
901: Tnc[1][13][19]=1.05503e-29;
902: Tnc[18][14][0]=1.50718e-29;
903: Tnc[16][16][0]=1.90753e-29;
904: Tnc[14][18][0]=1.50718e-29;
905: Tnc[18][12][2]=1.34384e-27;
906: Tnc[16][14][2]=2.22969e-27;
907: Tnc[14][16][2]=2.22969e-27;
908: Tnc[12][18][2]=1.34384e-27;
909: Tnc[18][10][4]=1.45893e-26;
910: Tnc[16][12][4]=3.32156e-26;
911: Tnc[14][14][4]=4.35443e-26;
912: Tnc[12][16][4]=3.32156e-26;
913: Tnc[10][18][4]=1.45893e-26;
914: Tnc[18][8][6]=4.34867e-26;
915: Tnc[16][10][6]=1.44628e-25;
916: Tnc[14][12][6]=2.60166e-25;
917: Tnc[12][14][6]=2.60166e-25;
918: Tnc[10][16][6]=1.44628e-25;
919: Tnc[8][18][6]=4.34867e-26;
920: Tnc[18][6][8]=4.34867e-26;
921: Tnc[16][8][8]=2.3164e-25;
922: Tnc[14][10][8]=6.08691e-25;
923: Tnc[12][12][8]=8.35231e-25;
924: Tnc[10][14][8]=6.08691e-25;
925: Tnc[8][16][8]=2.3164e-25;
926: Tnc[6][18][8]=4.34867e-26;
927: Tnc[18][4][10]=1.45893e-26;
928: Tnc[16][6][10]=1.44628e-25;
929: Tnc[14][8][10]=6.08691e-25;
930: Tnc[12][10][10]=1.22009e-24;
931: Tnc[10][12][10]=1.22009e-24;
932: Tnc[8][14][10]=6.08691e-25;
933: Tnc[6][16][10]=1.44628e-25;
934: Tnc[4][18][10]=1.45893e-26;
935: Tnc[18][2][12]=1.34384e-27;
936: Tnc[16][4][12]=3.32156e-26;
937: Tnc[14][6][12]=2.60166e-25;
938: Tnc[12][8][12]=8.35231e-25;
939: Tnc[10][10][12]=1.22009e-24;
940: Tnc[8][12][12]=8.35231e-25;
941: Tnc[6][14][12]=2.60166e-25;
942: Tnc[4][16][12]=3.32156e-26;
943: Tnc[2][18][12]=1.34384e-27;
944: Tnc[18][0][14]=1.50718e-29;
945: Tnc[16][2][14]=2.22969e-27;
946: Tnc[14][4][14]=4.35443e-26;
947: Tnc[12][6][14]=2.60166e-25;
948: Tnc[10][8][14]=6.08691e-25;
949: Tnc[8][10][14]=6.08691e-25;
950: Tnc[6][12][14]=2.60166e-25;
951: Tnc[4][14][14]=4.35443e-26;
952: Tnc[2][16][14]=2.22969e-27;
953: Tnc[0][18][14]=1.50718e-29;
954: Tnc[16][0][16]=1.90753e-29;
955: Tnc[14][2][16]=2.22969e-27;
956: Tnc[12][4][16]=3.32156e-26;
957: Tnc[10][6][16]=1.44628e-25;
958: Tnc[8][8][16]=2.3164e-25;
959: Tnc[6][10][16]=1.44628e-25;
960: Tnc[4][12][16]=3.32156e-26;
961: Tnc[2][14][16]=2.22969e-27;
962: Tnc[0][16][16]=1.90753e-29;
963: Tnc[14][0][18]=1.50718e-29;
964: Tnc[12][2][18]=1.34384e-27;
965: Tnc[10][4][18]=1.45893e-26;
966: Tnc[8][6][18]=4.34867e-26;
967: Tnc[6][8][18]=4.34867e-26;
968: Tnc[4][10][18]=1.45893e-26;
969: Tnc[2][12][18]=1.34384e-27;
970: Tnc[0][14][18]=1.50718e-29;
971: Tnc[19][11][1]=1.82784e-27;
972: Tnc[17][13][1]=3.9168e-27;
973: Tnc[15][15][1]=5.03588e-27;
974: Tnc[13][17][1]=3.9168e-27;
975: Tnc[11][19][1]=1.82784e-27;
976: Tnc[19][9][3]=3.30672e-26;
977: Tnc[17][11][3]=1.00009e-25;
978: Tnc[15][13][3]=1.72078e-25;
979: Tnc[13][15][3]=1.72078e-25;
980: Tnc[11][17][3]=1.00009e-25;
981: Tnc[9][19][3]=3.30672e-26;
982: Tnc[19][7][5]=1.18268e-25;
983: Tnc[17][9][5]=5.44273e-25;
984: Tnc[15][11][5]=1.32174e-24;
985: Tnc[13][13][5]=1.76882e-24;
986: Tnc[11][15][5]=1.32174e-24;
987: Tnc[9][17][5]=5.44273e-25;
988: Tnc[7][19][5]=1.18268e-25;
989: Tnc[19][5][7]=1.18268e-25;
990: Tnc[17][7][7]=9.29809e-25;
991: Tnc[15][9][7]=3.43579e-24;
992: Tnc[13][11][7]=6.48942e-24;
993: Tnc[11][13][7]=6.48942e-24;
994: Tnc[9][15][7]=3.43579e-24;
995: Tnc[7][17][7]=9.29809e-25;
996: Tnc[5][19][7]=1.18268e-25;
997: Tnc[19][3][9]=3.30672e-26;
998: Tnc[17][5][9]=5.44273e-25;
999: Tnc[15][7][9]=3.43579e-24;
1000: Tnc[13][9][9]=9.8744e-24;
1001: Tnc[11][11][9]=1.39364e-23;
1002: Tnc[9][13][9]=9.8744e-24;
1003: Tnc[7][15][9]=3.43579e-24;
1004: Tnc[5][17][9]=5.44273e-25;
1005: Tnc[3][19][9]=3.30672e-26;
1006: Tnc[19][1][11]=1.82784e-27;
1007: Tnc[17][3][11]=1.00009e-25;
1008: Tnc[15][5][11]=1.32174e-24;
1009: Tnc[13][7][11]=6.48942e-24;
1010: Tnc[11][9][11]=1.39364e-23;
1011: Tnc[9][11][11]=1.39364e-23;
1012: Tnc[7][13][11]=6.48942e-24;
1013: Tnc[5][15][11]=1.32174e-24;
1014: Tnc[3][17][11]=1.00009e-25;
1015: Tnc[1][19][11]=1.82784e-27;
1016: Tnc[17][1][13]=3.9168e-27;
1017: Tnc[15][3][13]=1.72078e-25;
1018: Tnc[13][5][13]=1.76882e-24;
1019: Tnc[11][7][13]=6.48942e-24;
1020: Tnc[9][9][13]=9.8744e-24;
1021: Tnc[7][11][13]=6.48942e-24;
1022: Tnc[5][13][13]=1.76882e-24;
1023: Tnc[3][15][13]=1.72078e-25;
1024: Tnc[1][17][13]=3.9168e-27;
1025: Tnc[15][1][15]=5.03588e-27;
1026: Tnc[13][3][15]=1.72078e-25;
1027: Tnc[11][5][15]=1.32174e-24;
1028: Tnc[9][7][15]=3.43579e-24;
1029: Tnc[7][9][15]=3.43579e-24;
1030: Tnc[5][11][15]=1.32174e-24;
1031: Tnc[3][13][15]=1.72078e-25;
1032: Tnc[1][15][15]=5.03588e-27;
1033: Tnc[13][1][17]=3.9168e-27;
1034: Tnc[11][3][17]=1.00009e-25;
1035: Tnc[9][5][17]=5.44273e-25;
1036: Tnc[7][7][17]=9.29809e-25;
1037: Tnc[5][9][17]=5.44273e-25;
1038: Tnc[3][11][17]=1.00009e-25;
1039: Tnc[1][13][17]=3.9168e-27;
1040: Tnc[11][1][19]=1.82784e-27;
1041: Tnc[9][3][19]=3.30672e-26;
1042: Tnc[7][5][19]=1.18268e-25;
1043: Tnc[5][7][19]=1.18268e-25;
1044: Tnc[3][9][19]=3.30672e-26;
1045: Tnc[1][11][19]=1.82784e-27;
1046: Tnc[18][12][0]=3.0464e-27;
1047: Tnc[16][14][0]=5.03588e-27;
1048: Tnc[14][16][0]=5.03588e-27;
1049: Tnc[12][18][0]=3.0464e-27;
1050: Tnc[18][10][2]=1.97406e-25;
1051: Tnc[16][12][2]=4.47298e-25;
1052: Tnc[14][14][2]=5.85505e-25;
1053: Tnc[12][16][2]=4.47298e-25;
1054: Tnc[10][18][2]=1.97406e-25;
1055: Tnc[18][8][4]=1.46481e-24;
1056: Tnc[16][10][4]=4.84455e-24;
1057: Tnc[14][12][4]=8.69215e-24;
1058: Tnc[12][14][4]=8.69215e-24;
1059: Tnc[10][16][4]=4.84455e-24;
1060: Tnc[8][18][4]=1.46481e-24;
1061: Tnc[18][6][6]=2.72473e-24;
1062: Tnc[16][8][6]=1.4424e-23;
1063: Tnc[14][10][6]=3.77738e-23;
1064: Tnc[12][12][6]=5.17761e-23;
1065: Tnc[10][14][6]=3.77738e-23;
1066: Tnc[8][16][6]=1.4424e-23;
1067: Tnc[6][18][6]=2.72473e-24;
1068: Tnc[18][4][8]=1.46481e-24;
1069: Tnc[16][6][8]=1.4424e-23;
1070: Tnc[14][8][8]=6.04614e-23;
1071: Tnc[12][10][8]=1.20962e-22;
1072: Tnc[10][12][8]=1.20962e-22;
1073: Tnc[8][14][8]=6.04614e-23;
1074: Tnc[6][16][8]=1.4424e-23;
1075: Tnc[4][18][8]=1.46481e-24;
1076: Tnc[18][2][10]=1.97406e-25;
1077: Tnc[16][4][10]=4.84455e-24;
1078: Tnc[14][6][10]=3.77738e-23;
1079: Tnc[12][8][10]=1.20962e-22;
1080: Tnc[10][10][10]=1.76555e-22;
1081: Tnc[8][12][10]=1.20962e-22;
1082: Tnc[6][14][10]=3.77738e-23;
1083: Tnc[4][16][10]=4.84455e-24;
1084: Tnc[2][18][10]=1.97406e-25;
1085: Tnc[18][0][12]=3.0464e-27;
1086: Tnc[16][2][12]=4.47298e-25;
1087: Tnc[14][4][12]=8.69215e-24;
1088: Tnc[12][6][12]=5.17761e-23;
1089: Tnc[10][8][12]=1.20962e-22;
1090: Tnc[8][10][12]=1.20962e-22;
1091: Tnc[6][12][12]=5.17761e-23;
1092: Tnc[4][14][12]=8.69215e-24;
1093: Tnc[2][16][12]=4.47298e-25;
1094: Tnc[0][18][12]=3.0464e-27;
1095: Tnc[16][0][14]=5.03588e-27;
1096: Tnc[14][2][14]=5.85505e-25;
1097: Tnc[12][4][14]=8.69215e-24;
1098: Tnc[10][6][14]=3.77738e-23;
1099: Tnc[8][8][14]=6.04614e-23;
1100: Tnc[6][10][14]=3.77738e-23;
1101: Tnc[4][12][14]=8.69215e-24;
1102: Tnc[2][14][14]=5.85505e-25;
1103: Tnc[0][16][14]=5.03588e-27;
1104: Tnc[14][0][16]=5.03588e-27;
1105: Tnc[12][2][16]=4.47298e-25;
1106: Tnc[10][4][16]=4.84455e-24;
1107: Tnc[8][6][16]=1.4424e-23;
1108: Tnc[6][8][16]=1.4424e-23;
1109: Tnc[4][10][16]=4.84455e-24;
1110: Tnc[2][12][16]=4.47298e-25;
1111: Tnc[0][14][16]=5.03588e-27;
1112: Tnc[12][0][18]=3.0464e-27;
1113: Tnc[10][2][18]=1.97406e-25;
1114: Tnc[8][4][18]=1.46481e-24;
1115: Tnc[6][6][18]=2.72473e-24;
1116: Tnc[4][8][18]=1.46481e-24;
1117: Tnc[2][10][18]=1.97406e-25;
1118: Tnc[0][12][18]=3.0464e-27;
1119: Tnc[19][9][1]=2.26652e-25;
1120: Tnc[17][11][1]=6.79956e-25;
1121: Tnc[15][13][1]=1.16564e-24;
1122: Tnc[13][15][1]=1.16564e-24;
1123: Tnc[11][17][1]=6.79956e-25;
1124: Tnc[9][19][1]=2.26652e-25;
1125: Tnc[19][7][3]=2.69039e-24;
1126: Tnc[17][9][3]=1.22716e-23;
1127: Tnc[15][11][3]=2.9659e-23;
1128: Tnc[13][13][3]=3.96317e-23;
1129: Tnc[11][15][3]=2.9659e-23;
1130: Tnc[9][17][3]=1.22716e-23;
1131: Tnc[7][19][3]=2.69039e-24;
1132: Tnc[19][5][5]=5.62966e-24;
1133: Tnc[17][7][5]=4.38402e-23;
1134: Tnc[15][9][5]=1.61095e-22;
1135: Tnc[13][11][5]=3.03484e-22;
1136: Tnc[11][13][5]=3.03484e-22;
1137: Tnc[9][15][5]=1.61095e-22;
1138: Tnc[7][17][5]=4.38402e-23;
1139: Tnc[5][19][5]=5.62966e-24;
1140: Tnc[19][3][7]=2.69039e-24;
1141: Tnc[17][5][7]=4.38402e-23;
1142: Tnc[15][7][7]=2.75032e-22;
1143: Tnc[13][9][7]=7.87749e-22;
1144: Tnc[11][11][7]=1.11059e-21;
1145: Tnc[9][13][7]=7.87749e-22;
1146: Tnc[7][15][7]=2.75032e-22;
1147: Tnc[5][17][7]=4.38402e-23;
1148: Tnc[3][19][7]=2.69039e-24;
1149: Tnc[19][1][9]=2.26652e-25;
1150: Tnc[17][3][9]=1.22716e-23;
1151: Tnc[15][5][9]=1.61095e-22;
1152: Tnc[13][7][9]=7.87749e-22;
1153: Tnc[11][9][9]=1.68852e-21;
1154: Tnc[9][11][9]=1.68852e-21;
1155: Tnc[7][13][9]=7.87749e-22;
1156: Tnc[5][15][9]=1.61095e-22;
1157: Tnc[3][17][9]=1.22716e-23;
1158: Tnc[1][19][9]=2.26652e-25;
1159: Tnc[17][1][11]=6.79956e-25;
1160: Tnc[15][3][11]=2.9659e-23;
1161: Tnc[13][5][11]=3.03484e-22;
1162: Tnc[11][7][11]=1.11059e-21;
1163: Tnc[9][9][11]=1.68852e-21;
1164: Tnc[7][11][11]=1.11059e-21;
1165: Tnc[5][13][11]=3.03484e-22;
1166: Tnc[3][15][11]=2.9659e-23;
1167: Tnc[1][17][11]=6.79956e-25;
1168: Tnc[15][1][13]=1.16564e-24;
1169: Tnc[13][3][13]=3.96317e-23;
1170: Tnc[11][5][13]=3.03484e-22;
1171: Tnc[9][7][13]=7.87749e-22;
1172: Tnc[7][9][13]=7.87749e-22;
1173: Tnc[5][11][13]=3.03484e-22;
1174: Tnc[3][13][13]=3.96317e-23;
1175: Tnc[1][15][13]=1.16564e-24;
1176: Tnc[13][1][15]=1.16564e-24;
1177: Tnc[11][3][15]=2.9659e-23;
1178: Tnc[9][5][15]=1.61095e-22;
1179: Tnc[7][7][15]=2.75032e-22;
1180: Tnc[5][9][15]=1.61095e-22;
1181: Tnc[3][11][15]=2.9659e-23;
1182: Tnc[1][13][15]=1.16564e-24;
1183: Tnc[11][1][17]=6.79956e-25;
1184: Tnc[9][3][17]=1.22716e-23;
1185: Tnc[7][5][17]=4.38402e-23;
1186: Tnc[5][7][17]=4.38402e-23;
1187: Tnc[3][9][17]=1.22716e-23;
1188: Tnc[1][11][17]=6.79956e-25;
1189: Tnc[9][1][19]=2.26652e-25;
1190: Tnc[7][3][19]=2.69039e-24;
1191: Tnc[5][5][19]=5.62966e-24;
1192: Tnc[3][7][19]=2.69039e-24;
1193: Tnc[1][9][19]=2.26652e-25;
1194: Tnc[18][10][0]=4.53304e-25;
1195: Tnc[16][12][0]=1.01993e-24;
1196: Tnc[14][14][0]=1.33216e-24;
1197: Tnc[12][16][0]=1.01993e-24;
1198: Tnc[10][18][0]=4.53304e-25;
1199: Tnc[18][8][2]=2.00749e-23;
1200: Tnc[16][10][2]=6.58586e-23;
1201: Tnc[14][12][2]=1.17729e-22;
1202: Tnc[12][14][2]=1.17729e-22;
1203: Tnc[10][16][2]=6.58586e-23;
1204: Tnc[8][18][2]=2.00749e-23;
1205: Tnc[18][6][4]=9.29544e-23;
1206: Tnc[16][8][4]=4.87719e-22;
1207: Tnc[14][10][4]=1.27117e-21;
1208: Tnc[12][12][4]=1.73976e-21;
1209: Tnc[10][14][4]=1.27117e-21;
1210: Tnc[8][16][4]=4.87719e-22;
1211: Tnc[6][18][4]=9.29544e-23;
1212: Tnc[18][4][6]=9.29544e-23;
1213: Tnc[16][6][6]=9.06636e-22;
1214: Tnc[14][8][6]=3.77921e-21;
1215: Tnc[12][10][6]=7.54126e-21;
1216: Tnc[10][12][6]=7.54126e-21;
1217: Tnc[8][14][6]=3.77921e-21;
1218: Tnc[6][16][6]=9.06636e-22;
1219: Tnc[4][18][6]=9.29544e-23;
1220: Tnc[18][2][8]=2.00749e-23;
1221: Tnc[16][4][8]=4.87719e-22;
1222: Tnc[14][6][8]=3.77921e-21;
1223: Tnc[12][8][8]=1.20608e-20;
1224: Tnc[10][10][8]=1.75846e-20;
1225: Tnc[8][12][8]=1.20608e-20;
1226: Tnc[6][14][8]=3.77921e-21;
1227: Tnc[4][16][8]=4.87719e-22;
1228: Tnc[2][18][8]=2.00749e-23;
1229: Tnc[18][0][10]=4.53304e-25;
1230: Tnc[16][2][10]=6.58586e-23;
1231: Tnc[14][4][10]=1.27117e-21;
1232: Tnc[12][6][10]=7.54126e-21;
1233: Tnc[10][8][10]=1.75846e-20;
1234: Tnc[8][10][10]=1.75846e-20;
1235: Tnc[6][12][10]=7.54126e-21;
1236: Tnc[4][14][10]=1.27117e-21;
1237: Tnc[2][16][10]=6.58586e-23;
1238: Tnc[0][18][10]=4.53304e-25;
1239: Tnc[16][0][12]=1.01993e-24;
1240: Tnc[14][2][12]=1.17729e-22;
1241: Tnc[12][4][12]=1.73976e-21;
1242: Tnc[10][6][12]=7.54126e-21;
1243: Tnc[8][8][12]=1.20608e-20;
1244: Tnc[6][10][12]=7.54126e-21;
1245: Tnc[4][12][12]=1.73976e-21;
1246: Tnc[2][14][12]=1.17729e-22;
1247: Tnc[0][16][12]=1.01993e-24;
1248: Tnc[14][0][14]=1.33216e-24;
1249: Tnc[12][2][14]=1.17729e-22;
1250: Tnc[10][4][14]=1.27117e-21;
1251: Tnc[8][6][14]=3.77921e-21;
1252: Tnc[6][8][14]=3.77921e-21;
1253: Tnc[4][10][14]=1.27117e-21;
1254: Tnc[2][12][14]=1.17729e-22;
1255: Tnc[0][14][14]=1.33216e-24;
1256: Tnc[12][0][16]=1.01993e-24;
1257: Tnc[10][2][16]=6.58586e-23;
1258: Tnc[8][4][16]=4.87719e-22;
1259: Tnc[6][6][16]=9.06636e-22;
1260: Tnc[4][8][16]=4.87719e-22;
1261: Tnc[2][10][16]=6.58586e-23;
1262: Tnc[0][12][16]=1.01993e-24;
1263: Tnc[10][0][18]=4.53304e-25;
1264: Tnc[8][2][18]=2.00749e-23;
1265: Tnc[6][4][18]=9.29544e-23;
1266: Tnc[4][6][18]=9.29544e-23;
1267: Tnc[2][8][18]=2.00749e-23;
1268: Tnc[0][10][18]=4.53304e-25;
1269: Tnc[19][7][1]=1.87797e-23;
1270: Tnc[17][9][1]=8.45088e-23;
1271: Tnc[15][11][1]=2.02821e-22;
1272: Tnc[13][13][1]=2.70428e-22;
1273: Tnc[11][15][1]=2.02821e-22;
1274: Tnc[9][17][1]=8.45088e-23;
1275: Tnc[7][19][1]=1.87797e-23;
1276: Tnc[19][5][3]=1.30407e-22;
1277: Tnc[17][7][3]=1.0011e-21;
1278: Tnc[15][9][3]=3.64905e-21;
1279: Tnc[13][11][3]=6.84911e-21;
1280: Tnc[11][13][3]=6.84911e-21;
1281: Tnc[9][15][3]=3.64905e-21;
1282: Tnc[7][17][3]=1.0011e-21;
1283: Tnc[5][19][3]=1.30407e-22;
1284: Tnc[19][3][5]=1.30407e-22;
1285: Tnc[17][5][5]=2.09345e-21;
1286: Tnc[15][7][5]=1.3017e-20;
1287: Tnc[13][9][5]=3.71059e-20;
1288: Tnc[11][11][5]=5.22342e-20;
1289: Tnc[9][13][5]=3.71059e-20;
1290: Tnc[7][15][5]=1.3017e-20;
1291: Tnc[5][17][5]=2.09345e-21;
1292: Tnc[3][19][5]=1.30407e-22;
1293: Tnc[19][1][7]=1.87797e-23;
1294: Tnc[17][3][7]=1.0011e-21;
1295: Tnc[15][5][7]=1.3017e-20;
1296: Tnc[13][7][7]=6.32972e-20;
1297: Tnc[11][9][7]=1.35323e-19;
1298: Tnc[9][11][7]=1.35323e-19;
1299: Tnc[7][13][7]=6.32972e-20;
1300: Tnc[5][15][7]=1.3017e-20;
1301: Tnc[3][17][7]=1.0011e-21;
1302: Tnc[1][19][7]=1.87797e-23;
1303: Tnc[17][1][9]=8.45088e-23;
1304: Tnc[15][3][9]=3.64905e-21;
1305: Tnc[13][5][9]=3.71059e-20;
1306: Tnc[11][7][9]=1.35323e-19;
1307: Tnc[9][9][9]=2.05517e-19;
1308: Tnc[7][11][9]=1.35323e-19;
1309: Tnc[5][13][9]=3.71059e-20;
1310: Tnc[3][15][9]=3.64905e-21;
1311: Tnc[1][17][9]=8.45088e-23;
1312: Tnc[15][1][11]=2.02821e-22;
1313: Tnc[13][3][11]=6.84911e-21;
1314: Tnc[11][5][11]=5.22342e-20;
1315: Tnc[9][7][11]=1.35323e-19;
1316: Tnc[7][9][11]=1.35323e-19;
1317: Tnc[5][11][11]=5.22342e-20;
1318: Tnc[3][13][11]=6.84911e-21;
1319: Tnc[1][15][11]=2.02821e-22;
1320: Tnc[13][1][13]=2.70428e-22;
1321: Tnc[11][3][13]=6.84911e-21;
1322: Tnc[9][5][13]=3.71059e-20;
1323: Tnc[7][7][13]=6.32972e-20;
1324: Tnc[5][9][13]=3.71059e-20;
1325: Tnc[3][11][13]=6.84911e-21;
1326: Tnc[1][13][13]=2.70428e-22;
1327: Tnc[11][1][15]=2.02821e-22;
1328: Tnc[9][3][15]=3.64905e-21;
1329: Tnc[7][5][15]=1.3017e-20;
1330: Tnc[5][7][15]=1.3017e-20;
1331: Tnc[3][9][15]=3.64905e-21;
1332: Tnc[1][11][15]=2.02821e-22;
1333: Tnc[9][1][17]=8.45088e-23;
1334: Tnc[7][3][17]=1.0011e-21;
1335: Tnc[5][5][17]=2.09345e-21;
1336: Tnc[3][7][17]=1.0011e-21;
1337: Tnc[1][9][17]=8.45088e-23;
1338: Tnc[7][1][19]=1.87797e-23;
1339: Tnc[5][3][19]=1.30407e-22;
1340: Tnc[3][5][19]=1.30407e-22;
1341: Tnc[1][7][19]=1.87797e-23;
1342: Tnc[18][8][0]=4.69493e-23;
1343: Tnc[16][10][0]=1.52116e-22;
1344: Tnc[14][12][0]=2.70428e-22;
1345: Tnc[12][14][0]=2.70428e-22;
1346: Tnc[10][16][0]=1.52116e-22;
1347: Tnc[8][18][0]=4.69493e-23;
1348: Tnc[18][6][2]=1.29725e-21;
1349: Tnc[16][8][2]=6.7152e-21;
1350: Tnc[14][10][2]=1.73802e-20;
1351: Tnc[12][12][2]=2.37353e-20;
1352: Tnc[10][14][2]=1.73802e-20;
1353: Tnc[8][16][2]=6.7152e-21;
1354: Tnc[6][18][2]=1.29725e-21;
1355: Tnc[18][4][4]=3.22906e-21;
1356: Tnc[16][6][4]=3.10472e-20;
1357: Tnc[14][8][4]=1.28375e-19;
1358: Tnc[12][10][4]=2.55227e-19;
1359: Tnc[10][12][4]=2.55227e-19;
1360: Tnc[8][14][4]=1.28375e-19;
1361: Tnc[6][16][4]=3.10472e-20;
1362: Tnc[4][18][4]=3.22906e-21;
1363: Tnc[18][2][6]=1.29725e-21;
1364: Tnc[16][4][6]=3.10472e-20;
1365: Tnc[14][6][6]=2.38442e-19;
1366: Tnc[12][8][6]=7.57325e-19;
1367: Tnc[10][10][6]=1.10252e-18;
1368: Tnc[8][12][6]=7.57325e-19;
1369: Tnc[6][14][6]=2.38442e-19;
1370: Tnc[4][16][6]=3.10472e-20;
1371: Tnc[2][18][6]=1.29725e-21;
1372: Tnc[18][0][8]=4.69493e-23;
1373: Tnc[16][2][8]=6.7152e-21;
1374: Tnc[14][4][8]=1.28375e-19;
1375: Tnc[12][6][8]=7.57325e-19;
1376: Tnc[10][8][8]=1.76133e-18;
1377: Tnc[8][10][8]=1.76133e-18;
1378: Tnc[6][12][8]=7.57325e-19;
1379: Tnc[4][14][8]=1.28375e-19;
1380: Tnc[2][16][8]=6.7152e-21;
1381: Tnc[0][18][8]=4.69493e-23;
1382: Tnc[16][0][10]=1.52116e-22;
1383: Tnc[14][2][10]=1.73802e-20;
1384: Tnc[12][4][10]=2.55227e-19;
1385: Tnc[10][6][10]=1.10252e-18;
1386: Tnc[8][8][10]=1.76133e-18;
1387: Tnc[6][10][10]=1.10252e-18;
1388: Tnc[4][12][10]=2.55227e-19;
1389: Tnc[2][14][10]=1.73802e-20;
1390: Tnc[0][16][10]=1.52116e-22;
1391: Tnc[14][0][12]=2.70428e-22;
1392: Tnc[12][2][12]=2.37353e-20;
1393: Tnc[10][4][12]=2.55227e-19;
1394: Tnc[8][6][12]=7.57325e-19;
1395: Tnc[6][8][12]=7.57325e-19;
1396: Tnc[4][10][12]=2.55227e-19;
1397: Tnc[2][12][12]=2.37353e-20;
1398: Tnc[0][14][12]=2.70428e-22;
1399: Tnc[12][0][14]=2.70428e-22;
1400: Tnc[10][2][14]=1.73802e-20;
1401: Tnc[8][4][14]=1.28375e-19;
1402: Tnc[6][6][14]=2.38442e-19;
1403: Tnc[4][8][14]=1.28375e-19;
1404: Tnc[2][10][14]=1.73802e-20;
1405: Tnc[0][12][14]=2.70428e-22;
1406: Tnc[10][0][16]=1.52116e-22;
1407: Tnc[8][2][16]=6.7152e-21;
1408: Tnc[6][4][16]=3.10472e-20;
1409: Tnc[4][6][16]=3.10472e-20;
1410: Tnc[2][8][16]=6.7152e-21;
1411: Tnc[0][10][16]=1.52116e-22;
1412: Tnc[8][0][18]=4.69493e-23;
1413: Tnc[6][2][18]=1.29725e-21;
1414: Tnc[4][4][18]=3.22906e-21;
1415: Tnc[2][6][18]=1.29725e-21;
1416: Tnc[0][8][18]=4.69493e-23;
1417: Tnc[19][5][1]=9.36097e-22;
1418: Tnc[17][7][1]=7.02073e-21;
1419: Tnc[15][9][1]=2.52746e-20;
1420: Tnc[13][11][1]=4.71793e-20;
1421: Tnc[11][13][1]=4.71793e-20;
1422: Tnc[9][15][1]=2.52746e-20;
1423: Tnc[7][17][1]=7.02073e-21;
1424: Tnc[5][19][1]=9.36097e-22;
1425: Tnc[19][3][3]=3.10614e-21;
1426: Tnc[17][5][3]=4.86771e-20;
1427: Tnc[15][7][3]=2.98615e-19;
1428: Tnc[13][9][3]=8.45296e-19;
1429: Tnc[11][11][3]=1.18735e-18;
1430: Tnc[9][13][3]=8.45296e-19;
1431: Tnc[7][15][3]=2.98615e-19;
1432: Tnc[5][17][3]=4.86771e-20;
1433: Tnc[3][19][3]=3.10614e-21;
1434: Tnc[19][1][5]=9.36097e-22;
1435: Tnc[17][3][5]=4.86771e-20;
1436: Tnc[15][5][5]=6.23917e-19;
1437: Tnc[13][7][5]=3.00947e-18;
1438: Tnc[11][9][5]=6.41031e-18;
1439: Tnc[9][11][5]=6.41031e-18;
1440: Tnc[7][13][5]=3.00947e-18;
1441: Tnc[5][15][5]=6.23917e-19;
1442: Tnc[3][17][5]=4.86771e-20;
1443: Tnc[1][19][5]=9.36097e-22;
1444: Tnc[17][1][7]=7.02073e-21;
1445: Tnc[15][3][7]=2.98615e-19;
1446: Tnc[13][5][7]=3.00947e-18;
1447: Tnc[11][7][7]=1.0923e-17;
1448: Tnc[9][9][7]=1.65638e-17;
1449: Tnc[7][11][7]=1.0923e-17;
1450: Tnc[5][13][7]=3.00947e-18;
1451: Tnc[3][15][7]=2.98615e-19;
1452: Tnc[1][17][7]=7.02073e-21;
1453: Tnc[15][1][9]=2.52746e-20;
1454: Tnc[13][3][9]=8.45296e-19;
1455: Tnc[11][5][9]=6.41031e-18;
1456: Tnc[9][7][9]=1.65638e-17;
1457: Tnc[7][9][9]=1.65638e-17;
1458: Tnc[5][11][9]=6.41031e-18;
1459: Tnc[3][13][9]=8.45296e-19;
1460: Tnc[1][15][9]=2.52746e-20;
1461: Tnc[13][1][11]=4.71793e-20;
1462: Tnc[11][3][11]=1.18735e-18;
1463: Tnc[9][5][11]=6.41031e-18;
1464: Tnc[7][7][11]=1.0923e-17;
1465: Tnc[5][9][11]=6.41031e-18;
1466: Tnc[3][11][11]=1.18735e-18;
1467: Tnc[1][13][11]=4.71793e-20;
1468: Tnc[11][1][13]=4.71793e-20;
1469: Tnc[9][3][13]=8.45296e-19;
1470: Tnc[7][5][13]=3.00947e-18;
1471: Tnc[5][7][13]=3.00947e-18;
1472: Tnc[3][9][13]=8.45296e-19;
1473: Tnc[1][11][13]=4.71793e-20;
1474: Tnc[9][1][15]=2.52746e-20;
1475: Tnc[7][3][15]=2.98615e-19;
1476: Tnc[5][5][15]=6.23917e-19;
1477: Tnc[3][7][15]=2.98615e-19;
1478: Tnc[1][9][15]=2.52746e-20;
1479: Tnc[7][1][17]=7.02073e-21;
1480: Tnc[5][3][17]=4.86771e-20;
1481: Tnc[3][5][17]=4.86771e-20;
1482: Tnc[1][7][17]=7.02073e-21;
1483: Tnc[5][1][19]=9.36097e-22;
1484: Tnc[3][3][19]=3.10614e-21;
1485: Tnc[1][5][19]=9.36097e-22;
1486: Tnc[18][6][0]=3.12032e-21;
1487: Tnc[16][8][0]=1.57966e-20;
1488: Tnc[14][10][0]=4.04394e-20;
1489: Tnc[12][12][0]=5.50425e-20;
1490: Tnc[10][14][0]=4.04394e-20;
1491: Tnc[8][16][0]=1.57966e-20;
1492: Tnc[6][18][0]=3.12032e-21;
1493: Tnc[18][4][2]=4.63368e-20;
1494: Tnc[16][6][2]=4.35285e-19;
1495: Tnc[14][8][2]=1.77765e-18;
1496: Tnc[12][10][2]=3.51486e-18;
1497: Tnc[10][12][2]=3.51486e-18;
1498: Tnc[8][14][2]=1.77765e-18;
1499: Tnc[6][16][2]=4.35285e-19;
1500: Tnc[4][18][2]=4.63368e-20;
1501: Tnc[18][2][4]=4.63368e-20;
1502: Tnc[16][4][4]=1.08255e-18;
1503: Tnc[14][6][4]=8.20251e-18;
1504: Tnc[12][8][4]=2.58709e-17;
1505: Tnc[10][10][4]=3.75812e-17;
1506: Tnc[8][12][4]=2.58709e-17;
1507: Tnc[6][14][4]=8.20251e-18;
1508: Tnc[4][16][4]=1.08255e-18;
1509: Tnc[2][18][4]=4.63368e-20;
1510: Tnc[18][0][6]=3.12032e-21;
1511: Tnc[16][2][6]=4.35285e-19;
1512: Tnc[14][4][6]=8.20251e-18;
1513: Tnc[12][6][6]=4.79984e-17;
1514: Tnc[10][8][6]=1.1122e-16;
1515: Tnc[8][10][6]=1.1122e-16;
1516: Tnc[6][12][6]=4.79984e-17;
1517: Tnc[4][14][6]=8.20251e-18;
1518: Tnc[2][16][6]=4.35285e-19;
1519: Tnc[0][18][6]=3.12032e-21;
1520: Tnc[16][0][8]=1.57966e-20;
1521: Tnc[14][2][8]=1.77765e-18;
1522: Tnc[12][4][8]=2.58709e-17;
1523: Tnc[10][6][8]=1.1122e-16;
1524: Tnc[8][8][8]=1.7741e-16;
1525: Tnc[6][10][8]=1.1122e-16;
1526: Tnc[4][12][8]=2.58709e-17;
1527: Tnc[2][14][8]=1.77765e-18;
1528: Tnc[0][16][8]=1.57966e-20;
1529: Tnc[14][0][10]=4.04394e-20;
1530: Tnc[12][2][10]=3.51486e-18;
1531: Tnc[10][4][10]=3.75812e-17;
1532: Tnc[8][6][10]=1.1122e-16;
1533: Tnc[6][8][10]=1.1122e-16;
1534: Tnc[4][10][10]=3.75812e-17;
1535: Tnc[2][12][10]=3.51486e-18;
1536: Tnc[0][14][10]=4.04394e-20;
1537: Tnc[12][0][12]=5.50425e-20;
1538: Tnc[10][2][12]=3.51486e-18;
1539: Tnc[8][4][12]=2.58709e-17;
1540: Tnc[6][6][12]=4.79984e-17;
1541: Tnc[4][8][12]=2.58709e-17;
1542: Tnc[2][10][12]=3.51486e-18;
1543: Tnc[0][12][12]=5.50425e-20;
1544: Tnc[10][0][14]=4.04394e-20;
1545: Tnc[8][2][14]=1.77765e-18;
1546: Tnc[6][4][14]=8.20251e-18;
1547: Tnc[4][6][14]=8.20251e-18;
1548: Tnc[2][8][14]=1.77765e-18;
1549: Tnc[0][10][14]=4.04394e-20;
1550: Tnc[8][0][16]=1.57966e-20;
1551: Tnc[6][2][16]=4.35285e-19;
1552: Tnc[4][4][16]=1.08255e-18;
1553: Tnc[2][6][16]=4.35285e-19;
1554: Tnc[0][8][16]=1.57966e-20;
1555: Tnc[6][0][18]=3.12032e-21;
1556: Tnc[4][2][18]=4.63368e-20;
1557: Tnc[2][4][18]=4.63368e-20;
1558: Tnc[0][6][18]=3.12032e-21;
1559: Tnc[19][3][1]=2.34024e-20;
1560: Tnc[17][5][1]=3.51036e-19;
1561: Tnc[15][7][1]=2.10622e-18;
1562: Tnc[13][9][1]=5.89741e-18;
1563: Tnc[11][11][1]=8.25638e-18;
1564: Tnc[9][13][1]=5.89741e-18;
1565: Tnc[7][15][1]=2.10622e-18;
1566: Tnc[5][17][1]=3.51036e-19;
1567: Tnc[3][19][1]=2.34024e-20;
1568: Tnc[19][1][3]=2.34024e-20;
1569: Tnc[17][3][3]=1.16374e-18;
1570: Tnc[15][5][3]=1.45733e-17;
1571: Tnc[13][7][3]=6.94286e-17;
1572: Tnc[11][9][3]=1.47078e-16;
1573: Tnc[9][11][3]=1.47078e-16;
1574: Tnc[7][13][3]=6.94286e-17;
1575: Tnc[5][15][3]=1.45733e-17;
1576: Tnc[3][17][3]=1.16374e-18;
1577: Tnc[1][19][3]=2.34024e-20;
1578: Tnc[17][1][5]=3.51036e-19;
1579: Tnc[15][3][5]=1.45733e-17;
1580: Tnc[13][5][5]=1.44898e-16;
1581: Tnc[11][7][5]=5.22243e-16;
1582: Tnc[9][9][5]=7.90217e-16;
1583: Tnc[7][11][5]=5.22243e-16;
1584: Tnc[5][13][5]=1.44898e-16;
1585: Tnc[3][15][5]=1.45733e-17;
1586: Tnc[1][17][5]=3.51036e-19;
1587: Tnc[15][1][7]=2.10622e-18;
1588: Tnc[13][3][7]=6.94286e-17;
1589: Tnc[11][5][7]=5.22243e-16;
1590: Tnc[9][7][7]=1.34445e-15;
1591: Tnc[7][9][7]=1.34445e-15;
1592: Tnc[5][11][7]=5.22243e-16;
1593: Tnc[3][13][7]=6.94286e-17;
1594: Tnc[1][15][7]=2.10622e-18;
1595: Tnc[13][1][9]=5.89741e-18;
1596: Tnc[11][3][9]=1.47078e-16;
1597: Tnc[9][5][9]=7.90217e-16;
1598: Tnc[7][7][9]=1.34445e-15;
1599: Tnc[5][9][9]=7.90217e-16;
1600: Tnc[3][11][9]=1.47078e-16;
1601: Tnc[1][13][9]=5.89741e-18;
1602: Tnc[11][1][11]=8.25638e-18;
1603: Tnc[9][3][11]=1.47078e-16;
1604: Tnc[7][5][11]=5.22243e-16;
1605: Tnc[5][7][11]=5.22243e-16;
1606: Tnc[3][9][11]=1.47078e-16;
1607: Tnc[1][11][11]=8.25638e-18;
1608: Tnc[9][1][13]=5.89741e-18;
1609: Tnc[7][3][13]=6.94286e-17;
1610: Tnc[5][5][13]=1.44898e-16;
1611: Tnc[3][7][13]=6.94286e-17;
1612: Tnc[1][9][13]=5.89741e-18;
1613: Tnc[7][1][15]=2.10622e-18;
1614: Tnc[5][3][15]=1.45733e-17;
1615: Tnc[3][5][15]=1.45733e-17;
1616: Tnc[1][7][15]=2.10622e-18;
1617: Tnc[5][1][17]=3.51036e-19;
1618: Tnc[3][3][17]=1.16374e-18;
1619: Tnc[1][5][17]=3.51036e-19;
1620: Tnc[3][1][19]=2.34024e-20;
1621: Tnc[1][3][19]=2.34024e-20;
1622: Tnc[18][4][0]=1.17012e-19;
1623: Tnc[16][6][0]=1.05311e-18;
1624: Tnc[14][8][0]=4.21244e-18;
1625: Tnc[12][10][0]=8.25638e-18;
1626: Tnc[10][12][0]=8.25638e-18;
1627: Tnc[8][14][0]=4.21244e-18;
1628: Tnc[6][16][0]=1.05311e-18;
1629: Tnc[4][18][0]=1.17012e-19;
1630: Tnc[18][2][2]=6.97818e-19;
1631: Tnc[16][4][2]=1.56052e-17;
1632: Tnc[14][6][2]=1.15651e-16;
1633: Tnc[12][8][2]=3.60814e-16;
1634: Tnc[10][10][2]=5.22403e-16;
1635: Tnc[8][12][2]=3.60814e-16;
1636: Tnc[6][14][2]=1.15651e-16;
1637: Tnc[4][16][2]=1.56052e-17;
1638: Tnc[2][18][2]=6.97818e-19;
1639: Tnc[18][0][4]=1.17012e-19;
1640: Tnc[16][2][4]=1.56052e-17;
1641: Tnc[14][4][4]=2.87288e-16;
1642: Tnc[12][6][4]=1.66039e-15;
1643: Tnc[10][8][4]=3.82635e-15;
1644: Tnc[8][10][4]=3.82635e-15;
1645: Tnc[6][12][4]=1.66039e-15;
1646: Tnc[4][14][4]=2.87288e-16;
1647: Tnc[2][16][4]=1.56052e-17;
1648: Tnc[0][18][4]=1.17012e-19;
1649: Tnc[16][0][6]=1.05311e-18;
1650: Tnc[14][2][6]=1.15651e-16;
1651: Tnc[12][4][6]=1.66039e-15;
1652: Tnc[10][6][6]=7.08812e-15;
1653: Tnc[8][8][6]=1.12818e-14;
1654: Tnc[6][10][6]=7.08812e-15;
1655: Tnc[4][12][6]=1.66039e-15;
1656: Tnc[2][14][6]=1.15651e-16;
1657: Tnc[0][16][6]=1.05311e-18;
1658: Tnc[14][0][8]=4.21244e-18;
1659: Tnc[12][2][8]=3.60814e-16;
1660: Tnc[10][4][8]=3.82635e-15;
1661: Tnc[8][6][8]=1.12818e-14;
1662: Tnc[6][8][8]=1.12818e-14;
1663: Tnc[4][10][8]=3.82635e-15;
1664: Tnc[2][12][8]=3.60814e-16;
1665: Tnc[0][14][8]=4.21244e-18;
1666: Tnc[12][0][10]=8.25638e-18;
1667: Tnc[10][2][10]=5.22403e-16;
1668: Tnc[8][4][10]=3.82635e-15;
1669: Tnc[6][6][10]=7.08812e-15;
1670: Tnc[4][8][10]=3.82635e-15;
1671: Tnc[2][10][10]=5.22403e-16;
1672: Tnc[0][12][10]=8.25638e-18;
1673: Tnc[10][0][12]=8.25638e-18;
1674: Tnc[8][2][12]=3.60814e-16;
1675: Tnc[6][4][12]=1.66039e-15;
1676: Tnc[4][6][12]=1.66039e-15;
1677: Tnc[2][8][12]=3.60814e-16;
1678: Tnc[0][10][12]=8.25638e-18;
1679: Tnc[8][0][14]=4.21244e-18;
1680: Tnc[6][2][14]=1.15651e-16;
1681: Tnc[4][4][14]=2.87288e-16;
1682: Tnc[2][6][14]=1.15651e-16;
1683: Tnc[0][8][14]=4.21244e-18;
1684: Tnc[6][0][16]=1.05311e-18;
1685: Tnc[4][2][16]=1.56052e-17;
1686: Tnc[2][4][16]=1.56052e-17;
1687: Tnc[0][6][16]=1.05311e-18;
1688: Tnc[4][0][18]=1.17012e-19;
1689: Tnc[2][2][18]=6.97818e-19;
1690: Tnc[0][4][18]=1.17012e-19;
1691: Tnc[19][1][1]=1.95729e-19;
1692: Tnc[17][3][1]=8.80782e-18;
1693: Tnc[15][5][1]=1.05694e-16;
1694: Tnc[13][7][1]=4.93238e-16;
1695: Tnc[11][9][1]=1.0358e-15;
1696: Tnc[9][11][1]=1.0358e-15;
1697: Tnc[7][13][1]=4.93238e-16;
1698: Tnc[5][15][1]=1.05694e-16;
1699: Tnc[3][17][1]=8.80782e-18;
1700: Tnc[1][19][1]=1.95729e-19;
1701: Tnc[17][1][3]=8.80782e-18;
1702: Tnc[15][3][3]=3.49964e-16;
1703: Tnc[13][5][3]=3.40334e-15;
1704: Tnc[11][7][3]=1.21337e-14;
1705: Tnc[9][9][3]=1.82991e-14;
1706: Tnc[7][11][3]=1.21337e-14;
1707: Tnc[5][13][3]=3.40334e-15;
1708: Tnc[3][15][3]=3.49964e-16;
1709: Tnc[1][17][3]=8.80782e-18;
1710: Tnc[15][1][5]=1.05694e-16;
1711: Tnc[13][3][5]=3.40334e-15;
1712: Tnc[11][5][5]=2.52834e-14;
1713: Tnc[9][7][5]=6.47326e-14;
1714: Tnc[7][9][5]=6.47326e-14;
1715: Tnc[5][11][5]=2.52834e-14;
1716: Tnc[3][13][5]=3.40334e-15;
1717: Tnc[1][15][5]=1.05694e-16;
1718: Tnc[13][1][7]=4.93238e-16;
1719: Tnc[11][3][7]=1.21337e-14;
1720: Tnc[9][5][7]=6.47326e-14;
1721: Tnc[7][7][7]=1.09893e-13;
1722: Tnc[5][9][7]=6.47326e-14;
1723: Tnc[3][11][7]=1.21337e-14;
1724: Tnc[1][13][7]=4.93238e-16;
1725: Tnc[11][1][9]=1.0358e-15;
1726: Tnc[9][3][9]=1.82991e-14;
1727: Tnc[7][5][9]=6.47326e-14;
1728: Tnc[5][7][9]=6.47326e-14;
1729: Tnc[3][9][9]=1.82991e-14;
1730: Tnc[1][11][9]=1.0358e-15;
1731: Tnc[9][1][11]=1.0358e-15;
1732: Tnc[7][3][11]=1.21337e-14;
1733: Tnc[5][5][11]=2.52834e-14;
1734: Tnc[3][7][11]=1.21337e-14;
1735: Tnc[1][9][11]=1.0358e-15;
1736: Tnc[7][1][13]=4.93238e-16;
1737: Tnc[5][3][13]=3.40334e-15;
1738: Tnc[3][5][13]=3.40334e-15;
1739: Tnc[1][7][13]=4.93238e-16;
1740: Tnc[5][1][15]=1.05694e-16;
1741: Tnc[3][3][15]=3.49964e-16;
1742: Tnc[1][5][15]=1.05694e-16;
1743: Tnc[3][1][17]=8.80782e-18;
1744: Tnc[1][3][17]=8.80782e-18;
1745: Tnc[1][1][19]=1.95729e-19;
1746: Tnc[18][2][0]=1.95729e-18;
1747: Tnc[16][4][0]=3.96352e-17;
1748: Tnc[14][6][0]=2.8185e-16;
1749: Tnc[12][8][0]=8.63167e-16;
1750: Tnc[10][10][0]=1.24296e-15;
1751: Tnc[8][12][0]=8.63167e-16;
1752: Tnc[6][14][0]=2.8185e-16;
1753: Tnc[4][16][0]=3.96352e-17;
1754: Tnc[2][18][0]=1.95729e-18;
1755: Tnc[18][0][2]=1.95729e-18;
1756: Tnc[16][2][2]=2.3605e-16;
1757: Tnc[14][4][2]=4.16434e-15;
1758: Tnc[12][6][2]=2.35768e-14;
1759: Tnc[10][8][2]=5.38616e-14;
1760: Tnc[8][10][2]=5.38616e-14;
1761: Tnc[6][12][2]=2.35768e-14;
1762: Tnc[4][14][2]=4.16434e-15;
1763: Tnc[2][16][2]=2.3605e-16;
1764: Tnc[0][18][2]=1.95729e-18;
1765: Tnc[16][0][4]=3.96352e-17;
1766: Tnc[14][2][4]=4.16434e-15;
1767: Tnc[12][4][4]=5.84734e-14;
1768: Tnc[10][6][4]=2.46915e-13;
1769: Tnc[8][8][4]=3.91705e-13;
1770: Tnc[6][10][4]=2.46915e-13;
1771: Tnc[4][12][4]=5.84734e-14;
1772: Tnc[2][14][4]=4.16434e-15;
1773: Tnc[0][16][4]=3.96352e-17;
1774: Tnc[14][0][6]=2.8185e-16;
1775: Tnc[12][2][6]=2.35768e-14;
1776: Tnc[10][4][6]=2.46915e-13;
1777: Tnc[8][6][6]=7.24011e-13;
1778: Tnc[6][8][6]=7.24011e-13;
1779: Tnc[4][10][6]=2.46915e-13;
1780: Tnc[2][12][6]=2.35768e-14;
1781: Tnc[0][14][6]=2.8185e-16;
1782: Tnc[12][0][8]=8.63167e-16;
1783: Tnc[10][2][8]=5.38616e-14;
1784: Tnc[8][4][8]=3.91705e-13;
1785: Tnc[6][6][8]=7.24011e-13;
1786: Tnc[4][8][8]=3.91705e-13;
1787: Tnc[2][10][8]=5.38616e-14;
1788: Tnc[0][12][8]=8.63167e-16;
1789: Tnc[10][0][10]=1.24296e-15;
1790: Tnc[8][2][10]=5.38616e-14;
1791: Tnc[6][4][10]=2.46915e-13;
1792: Tnc[4][6][10]=2.46915e-13;
1793: Tnc[2][8][10]=5.38616e-14;
1794: Tnc[0][10][10]=1.24296e-15;
1795: Tnc[8][0][12]=8.63167e-16;
1796: Tnc[6][2][12]=2.35768e-14;
1797: Tnc[4][4][12]=5.84734e-14;
1798: Tnc[2][6][12]=2.35768e-14;
1799: Tnc[0][8][12]=8.63167e-16;
1800: Tnc[6][0][14]=2.8185e-16;
1801: Tnc[4][2][14]=4.16434e-15;
1802: Tnc[2][4][14]=4.16434e-15;
1803: Tnc[0][6][14]=2.8185e-16;
1804: Tnc[4][0][16]=3.96352e-17;
1805: Tnc[2][2][16]=2.3605e-16;
1806: Tnc[0][4][16]=3.96352e-17;
1807: Tnc[2][0][18]=1.95729e-18;
1808: Tnc[0][2][18]=1.95729e-18;
1809: Tnc[17][1][1]=7.39857e-17;
1810: Tnc[15][3][1]=2.66349e-15;
1811: Tnc[13][5][1]=2.48592e-14;
1812: Tnc[11][7][1]=8.70072e-14;
1813: Tnc[9][9][1]=1.30511e-13;
1814: Tnc[7][11][1]=8.70072e-14;
1815: Tnc[5][13][1]=2.48592e-14;
1816: Tnc[3][15][1]=2.66349e-15;
1817: Tnc[1][17][1]=7.39857e-17;
1818: Tnc[15][1][3]=2.66349e-15;
1819: Tnc[13][3][3]=8.21735e-14;
1820: Tnc[11][5][3]=5.98002e-13;
1821: Tnc[9][7][3]=1.51779e-12;
1822: Tnc[7][9][3]=1.51779e-12;
1823: Tnc[5][11][3]=5.98002e-13;
1824: Tnc[3][13][3]=8.21735e-14;
1825: Tnc[1][15][3]=2.66349e-15;
1826: Tnc[13][1][5]=2.48592e-14;
1827: Tnc[11][3][5]=5.98002e-13;
1828: Tnc[9][5][5]=3.1556e-12;
1829: Tnc[7][7][5]=5.33934e-12;
1830: Tnc[5][9][5]=3.1556e-12;
1831: Tnc[3][11][5]=5.98002e-13;
1832: Tnc[1][13][5]=2.48592e-14;
1833: Tnc[11][1][7]=8.70072e-14;
1834: Tnc[9][3][7]=1.51779e-12;
1835: Tnc[7][5][7]=5.33934e-12;
1836: Tnc[5][7][7]=5.33934e-12;
1837: Tnc[3][9][7]=1.51779e-12;
1838: Tnc[1][11][7]=8.70072e-14;
1839: Tnc[9][1][9]=1.30511e-13;
1840: Tnc[7][3][9]=1.51779e-12;
1841: Tnc[5][5][9]=3.1556e-12;
1842: Tnc[3][7][9]=1.51779e-12;
1843: Tnc[1][9][9]=1.30511e-13;
1844: Tnc[7][1][11]=8.70072e-14;
1845: Tnc[5][3][11]=5.98002e-13;
1846: Tnc[3][5][11]=5.98002e-13;
1847: Tnc[1][7][11]=8.70072e-14;
1848: Tnc[5][1][13]=2.48592e-14;
1849: Tnc[3][3][13]=8.21735e-14;
1850: Tnc[1][5][13]=2.48592e-14;
1851: Tnc[3][1][15]=2.66349e-15;
1852: Tnc[1][3][15]=2.66349e-15;
1853: Tnc[1][1][17]=7.39857e-17;
1854: Tnc[18][0][0]=8.22064e-18;
1855: Tnc[16][2][0]=6.65871e-16;
1856: Tnc[14][4][0]=1.06539e-14;
1857: Tnc[12][6][0]=5.80048e-14;
1858: Tnc[10][8][0]=1.30511e-13;
1859: Tnc[8][10][0]=1.30511e-13;
1860: Tnc[6][12][0]=5.80048e-14;
1861: Tnc[4][14][0]=1.06539e-14;
1862: Tnc[2][16][0]=6.65871e-16;
1863: Tnc[0][18][0]=8.22064e-18;
1864: Tnc[16][0][2]=6.65871e-16;
1865: Tnc[14][2][2]=6.33318e-14;
1866: Tnc[12][4][2]=8.53499e-13;
1867: Tnc[10][6][2]=3.53829e-12;
1868: Tnc[8][8][2]=5.58296e-12;
1869: Tnc[6][10][2]=3.53829e-12;
1870: Tnc[4][12][2]=8.53499e-13;
1871: Tnc[2][14][2]=6.33318e-14;
1872: Tnc[0][16][2]=6.65871e-16;
1873: Tnc[14][0][4]=1.06539e-14;
1874: Tnc[12][2][4]=8.53499e-13;
1875: Tnc[10][4][4]=8.75527e-12;
1876: Tnc[8][6][4]=2.54496e-11;
1877: Tnc[6][8][4]=2.54496e-11;
1878: Tnc[4][10][4]=8.75527e-12;
1879: Tnc[2][12][4]=8.53499e-13;
1880: Tnc[0][14][4]=1.06539e-14;
1881: Tnc[12][0][6]=5.80048e-14;
1882: Tnc[10][2][6]=3.53829e-12;
1883: Tnc[8][4][6]=2.54496e-11;
1884: Tnc[6][6][6]=4.68831e-11;
1885: Tnc[4][8][6]=2.54496e-11;
1886: Tnc[2][10][6]=3.53829e-12;
1887: Tnc[0][12][6]=5.80048e-14;
1888: Tnc[10][0][8]=1.30511e-13;
1889: Tnc[8][2][8]=5.58296e-12;
1890: Tnc[6][4][8]=2.54496e-11;
1891: Tnc[4][6][8]=2.54496e-11;
1892: Tnc[2][8][8]=5.58296e-12;
1893: Tnc[0][10][8]=1.30511e-13;
1894: Tnc[8][0][10]=1.30511e-13;
1895: Tnc[6][2][10]=3.53829e-12;
1896: Tnc[4][4][10]=8.75527e-12;
1897: Tnc[2][6][10]=3.53829e-12;
1898: Tnc[0][8][10]=1.30511e-13;
1899: Tnc[6][0][12]=5.80048e-14;
1900: Tnc[4][2][12]=8.53499e-13;
1901: Tnc[2][4][12]=8.53499e-13;
1902: Tnc[0][6][12]=5.80048e-14;
1903: Tnc[4][0][14]=1.06539e-14;
1904: Tnc[2][2][14]=6.33318e-14;
1905: Tnc[0][4][14]=1.06539e-14;
1906: Tnc[2][0][16]=6.65871e-16;
1907: Tnc[0][2][16]=6.65871e-16;
1908: Tnc[0][0][18]=8.22064e-18;
1909: Tnc[15][1][1]=2.24917e-14;
1910: Tnc[13][3][1]=6.29766e-13;
1911: Tnc[11][5][1]=4.40836e-12;
1912: Tnc[9][7][1]=1.10209e-11;
1913: Tnc[7][9][1]=1.10209e-11;
1914: Tnc[5][11][1]=4.40836e-12;
1915: Tnc[3][13][1]=6.29766e-13;
1916: Tnc[1][15][1]=2.24917e-14;
1917: Tnc[13][1][3]=6.29766e-13;
1918: Tnc[11][3][3]=1.45371e-11;
1919: Tnc[9][5][3]=7.53096e-11;
1920: Tnc[7][7][3]=1.2674e-10;
1921: Tnc[5][9][3]=7.53096e-11;
1922: Tnc[3][11][3]=1.45371e-11;
1923: Tnc[1][13][3]=6.29766e-13;
1924: Tnc[11][1][5]=4.40836e-12;
1925: Tnc[9][3][5]=7.53096e-11;
1926: Tnc[7][5][5]=2.62613e-10;
1927: Tnc[5][7][5]=2.62613e-10;
1928: Tnc[3][9][5]=7.53096e-11;
1929: Tnc[1][11][5]=4.40836e-12;
1930: Tnc[9][1][7]=1.10209e-11;
1931: Tnc[7][3][7]=1.2674e-10;
1932: Tnc[5][5][7]=2.62613e-10;
1933: Tnc[3][7][7]=1.2674e-10;
1934: Tnc[1][9][7]=1.10209e-11;
1935: Tnc[7][1][9]=1.10209e-11;
1936: Tnc[5][3][9]=7.53096e-11;
1937: Tnc[3][5][9]=7.53096e-11;
1938: Tnc[1][7][9]=1.10209e-11;
1939: Tnc[5][1][11]=4.40836e-12;
1940: Tnc[3][3][11]=1.45371e-11;
1941: Tnc[1][5][11]=4.40836e-12;
1942: Tnc[3][1][13]=6.29766e-13;
1943: Tnc[1][3][13]=6.29766e-13;
1944: Tnc[1][1][15]=2.24917e-14;
1945: Tnc[16][0][0]=2.81146e-15;
1946: Tnc[14][2][0]=1.79933e-13;
1947: Tnc[12][4][0]=2.20418e-12;
1948: Tnc[10][6][0]=8.81673e-12;
1949: Tnc[8][8][0]=1.37761e-11;
1950: Tnc[6][10][0]=8.81673e-12;
1951: Tnc[4][12][0]=2.20418e-12;
1952: Tnc[2][14][0]=1.79933e-13;
1953: Tnc[0][16][0]=2.81146e-15;
1954: Tnc[14][0][2]=1.79933e-13;
1955: Tnc[12][2][2]=1.30677e-11;
1956: Tnc[10][4][2]=1.28945e-10;
1957: Tnc[8][6][2]=3.69201e-10;
1958: Tnc[6][8][2]=3.69201e-10;
1959: Tnc[4][10][2]=1.28945e-10;
1960: Tnc[2][12][2]=1.30677e-11;
1961: Tnc[0][14][2]=1.79933e-13;
1962: Tnc[12][0][4]=2.20418e-12;
1963: Tnc[10][2][4]=1.28945e-10;
1964: Tnc[8][4][4]=9.10406e-10;
1965: Tnc[6][6][4]=1.66809e-09;
1966: Tnc[4][8][4]=9.10406e-10;
1967: Tnc[2][10][4]=1.28945e-10;
1968: Tnc[0][12][4]=2.20418e-12;
1969: Tnc[10][0][6]=8.81673e-12;
1970: Tnc[8][2][6]=3.69201e-10;
1971: Tnc[6][4][6]=1.66809e-09;
1972: Tnc[4][6][6]=1.66809e-09;
1973: Tnc[2][8][6]=3.69201e-10;
1974: Tnc[0][10][6]=8.81673e-12;
1975: Tnc[8][0][8]=1.37761e-11;
1976: Tnc[6][2][8]=3.69201e-10;
1977: Tnc[4][4][8]=9.10406e-10;
1978: Tnc[2][6][8]=3.69201e-10;
1979: Tnc[0][8][8]=1.37761e-11;
1980: Tnc[6][0][10]=8.81673e-12;
1981: Tnc[4][2][10]=1.28945e-10;
1982: Tnc[2][4][10]=1.28945e-10;
1983: Tnc[0][6][10]=8.81673e-12;
1984: Tnc[4][0][12]=2.20418e-12;
1985: Tnc[2][2][12]=1.30677e-11;
1986: Tnc[0][4][12]=2.20418e-12;
1987: Tnc[2][0][14]=1.79933e-13;
1988: Tnc[0][2][14]=1.79933e-13;
1989: Tnc[0][0][16]=2.81146e-15;
1990: Tnc[13][1][1]=5.35301e-12;
1991: Tnc[11][3][1]=1.12413e-10;
1992: Tnc[9][5][1]=5.62067e-10;
1993: Tnc[7][7][1]=9.36778e-10;
1994: Tnc[5][9][1]=5.62067e-10;
1995: Tnc[3][11][1]=1.12413e-10;
1996: Tnc[1][13][1]=5.35301e-12;
1997: Tnc[11][1][3]=1.12413e-10;
1998: Tnc[9][3][3]=1.84679e-09;
1999: Tnc[7][5][3]=6.34332e-09;
2000: Tnc[5][7][3]=6.34332e-09;
2001: Tnc[3][9][3]=1.84679e-09;
2002: Tnc[1][11][3]=1.12413e-10;
2003: Tnc[9][1][5]=5.62067e-10;
2004: Tnc[7][3][5]=6.34332e-09;
2005: Tnc[5][5][5]=1.30721e-08;
2006: Tnc[3][7][5]=6.34332e-09;
2007: Tnc[1][9][5]=5.62067e-10;
2008: Tnc[7][1][7]=9.36778e-10;
2009: Tnc[5][3][7]=6.34332e-09;
2010: Tnc[3][5][7]=6.34332e-09;
2011: Tnc[1][7][7]=9.36778e-10;
2012: Tnc[5][1][9]=5.62067e-10;
2013: Tnc[3][3][9]=1.84679e-09;
2014: Tnc[1][5][9]=5.62067e-10;
2015: Tnc[3][1][11]=1.12413e-10;
2016: Tnc[1][3][11]=1.12413e-10;
2017: Tnc[1][1][13]=5.35301e-12;
2018: Tnc[14][0][0]=7.64716e-13;
2019: Tnc[12][2][0]=3.74711e-11;
2020: Tnc[10][4][0]=3.3724e-10;
2021: Tnc[8][6][0]=9.36778e-10;
2022: Tnc[6][8][0]=9.36778e-10;
2023: Tnc[4][10][0]=3.3724e-10;
2024: Tnc[2][12][0]=3.74711e-11;
2025: Tnc[0][14][0]=7.64716e-13;
2026: Tnc[12][0][2]=3.74711e-11;
2027: Tnc[10][2][2]=1.99132e-09;
2028: Tnc[8][4][2]=1.35699e-08;
2029: Tnc[6][6][2]=2.46239e-08;
2030: Tnc[4][8][2]=1.35699e-08;
2031: Tnc[2][10][2]=1.99132e-09;
2032: Tnc[0][12][2]=3.74711e-11;
2033: Tnc[10][0][4]=3.3724e-10;
2034: Tnc[8][2][4]=1.35699e-08;
2035: Tnc[6][4][4]=6.0382e-08;
2036: Tnc[4][6][4]=6.0382e-08;
2037: Tnc[2][8][4]=1.35699e-08;
2038: Tnc[0][10][4]=3.3724e-10;
2039: Tnc[8][0][6]=9.36778e-10;
2040: Tnc[6][2][6]=2.46239e-08;
2041: Tnc[4][4][6]=6.0382e-08;
2042: Tnc[2][6][6]=2.46239e-08;
2043: Tnc[0][8][6]=9.36778e-10;
2044: Tnc[6][0][8]=9.36778e-10;
2045: Tnc[4][2][8]=1.35699e-08;
2046: Tnc[2][4][8]=1.35699e-08;
2047: Tnc[0][6][8]=9.36778e-10;
2048: Tnc[4][0][10]=3.3724e-10;
2049: Tnc[2][2][10]=1.99132e-09;
2050: Tnc[0][4][10]=3.3724e-10;
2051: Tnc[2][0][12]=3.74711e-11;
2052: Tnc[0][2][12]=3.74711e-11;
2053: Tnc[0][0][14]=7.64716e-13;
2054: Tnc[11][1][1]=9.63543e-10;
2055: Tnc[9][3][1]=1.44531e-08;
2056: Tnc[7][5][1]=4.81771e-08;
2057: Tnc[5][7][1]=4.81771e-08;
2058: Tnc[3][9][1]=1.44531e-08;
2059: Tnc[1][11][1]=9.63543e-10;
2060: Tnc[9][1][3]=1.44531e-08;
2061: Tnc[7][3][3]=1.57379e-07;
2062: Tnc[5][5][3]=3.21181e-07;
2063: Tnc[3][7][3]=1.57379e-07;
2064: Tnc[1][9][3]=1.44531e-08;
2065: Tnc[7][1][5]=4.81771e-08;
2066: Tnc[5][3][5]=3.21181e-07;
2067: Tnc[3][5][5]=3.21181e-07;
2068: Tnc[1][7][5]=4.81771e-08;
2069: Tnc[5][1][7]=4.81771e-08;
2070: Tnc[3][3][7]=1.57379e-07;
2071: Tnc[1][5][7]=4.81771e-08;
2072: Tnc[3][1][9]=1.44531e-08;
2073: Tnc[1][3][9]=1.44531e-08;
2074: Tnc[1][1][11]=9.63543e-10;
2075: Tnc[12][0][0]=1.6059e-10;
2076: Tnc[10][2][0]=5.78126e-09;
2077: Tnc[8][4][0]=3.61328e-08;
2078: Tnc[6][6][0]=6.42362e-08;
2079: Tnc[4][8][0]=3.61328e-08;
2080: Tnc[2][10][0]=5.78126e-09;
2081: Tnc[0][12][0]=1.6059e-10;
2082: Tnc[10][0][2]=5.78126e-09;
2083: Tnc[8][2][2]=2.11979e-07;
2084: Tnc[6][4][2]=9.15365e-07;
2085: Tnc[4][6][2]=9.15365e-07;
2086: Tnc[2][8][2]=2.11979e-07;
2087: Tnc[0][10][2]=5.78126e-09;
2088: Tnc[8][0][4]=3.61328e-08;
2089: Tnc[6][2][4]=9.15365e-07;
2090: Tnc[4][4][4]=2.22257e-06;
2091: Tnc[2][6][4]=9.15365e-07;
2092: Tnc[0][8][4]=3.61328e-08;
2093: Tnc[6][0][6]=6.42362e-08;
2094: Tnc[4][2][6]=9.15365e-07;
2095: Tnc[2][4][6]=9.15365e-07;
2096: Tnc[0][6][6]=6.42362e-08;
2097: Tnc[4][0][8]=3.61328e-08;
2098: Tnc[2][2][8]=2.11979e-07;
2099: Tnc[0][4][8]=3.61328e-08;
2100: Tnc[2][0][10]=5.78126e-09;
2101: Tnc[0][2][10]=5.78126e-09;
2102: Tnc[0][0][12]=1.6059e-10;
2103: Tnc[9][1][1]=1.25261e-07;
2104: Tnc[7][3][1]=1.25261e-06;
2105: Tnc[5][5][1]=2.50521e-06;
2106: Tnc[3][7][1]=1.25261e-06;
2107: Tnc[1][9][1]=1.25261e-07;
2108: Tnc[7][1][3]=1.25261e-06;
2109: Tnc[5][3][3]=8.10018e-06;
2110: Tnc[3][5][3]=8.10018e-06;
2111: Tnc[1][7][3]=1.25261e-06;
2112: Tnc[5][1][5]=2.50521e-06;
2113: Tnc[3][3][5]=8.10018e-06;
2114: Tnc[1][5][5]=2.50521e-06;
2115: Tnc[3][1][7]=1.25261e-06;
2116: Tnc[1][3][7]=1.25261e-06;
2117: Tnc[1][1][9]=1.25261e-07;
2118: Tnc[10][0][0]=2.50521e-08;
2119: Tnc[8][2][0]=6.26303e-07;
2120: Tnc[6][4][0]=2.50521e-06;
2121: Tnc[4][6][0]=2.50521e-06;
2122: Tnc[2][8][0]=6.26303e-07;
2123: Tnc[0][10][0]=2.50521e-08;
2124: Tnc[8][0][2]=6.26303e-07;
2125: Tnc[6][2][2]=1.45302e-05;
2126: Tnc[4][4][2]=3.45719e-05;
2127: Tnc[2][6][2]=1.45302e-05;
2128: Tnc[0][8][2]=6.26303e-07;
2129: Tnc[6][0][4]=2.50521e-06;
2130: Tnc[4][2][4]=3.45719e-05;
2131: Tnc[2][4][4]=3.45719e-05;
2132: Tnc[0][6][4]=2.50521e-06;
2133: Tnc[4][0][6]=2.50521e-06;
2134: Tnc[2][2][6]=1.45302e-05;
2135: Tnc[0][4][6]=2.50521e-06;
2136: Tnc[2][0][8]=6.26303e-07;
2137: Tnc[0][2][8]=6.26303e-07;
2138: Tnc[0][0][10]=2.50521e-08;
2139: Tnc[7][1][1]=1.10229e-05;
2140: Tnc[5][3][1]=6.61376e-05;
2141: Tnc[3][5][1]=6.61376e-05;
2142: Tnc[1][7][1]=1.10229e-05;
2143: Tnc[5][1][3]=6.61376e-05;
2144: Tnc[3][3][3]=0.000209436;
2145: Tnc[1][5][3]=6.61376e-05;
2146: Tnc[3][1][5]=6.61376e-05;
2147: Tnc[1][3][5]=6.61376e-05;
2148: Tnc[1][1][7]=1.10229e-05;
2149: Tnc[8][0][0]=2.75573e-06;
2150: Tnc[6][2][0]=4.40917e-05;
2151: Tnc[4][4][0]=9.92063e-05;
2152: Tnc[2][6][0]=4.40917e-05;
2153: Tnc[0][8][0]=2.75573e-06;
2154: Tnc[6][0][2]=4.40917e-05;
2155: Tnc[4][2][2]=0.000562169;
2156: Tnc[2][4][2]=0.000562169;
2157: Tnc[0][6][2]=4.40917e-05;
2158: Tnc[4][0][4]=9.92063e-05;
2159: Tnc[2][2][4]=0.000562169;
2160: Tnc[0][4][4]=9.92063e-05;
2161: Tnc[2][0][6]=4.40917e-05;
2162: Tnc[0][2][6]=4.40917e-05;
2163: Tnc[0][0][8]=2.75573e-06;
2164: Tnc[5][1][1]=0.000595238;
2165: Tnc[3][3][1]=0.00178571;
2166: Tnc[1][5][1]=0.000595238;
2167: Tnc[3][1][3]=0.00178571;
2168: Tnc[1][3][3]=0.00178571;
2169: Tnc[1][1][5]=0.000595238;
2170: Tnc[6][0][0]=0.000198413;
2171: Tnc[4][2][0]=0.00178571;
2172: Tnc[2][4][0]=0.00178571;
2173: Tnc[0][6][0]=0.000198413;
2174: Tnc[4][0][2]=0.00178571;
2175: Tnc[2][2][2]=0.00952381;
2176: Tnc[0][4][2]=0.00178571;
2177: Tnc[2][0][4]=0.00178571;
2178: Tnc[0][2][4]=0.00178571;
2179: Tnc[0][0][6]=0.000198413;
2180: Tnc[3][1][1]=0.0166667;
2181: Tnc[1][3][1]=0.0166667;
2182: Tnc[1][1][3]=0.0166667;
2183: Tnc[4][0][0]=0.00833333;
2184: Tnc[2][2][0]=0.0333333;
2185: Tnc[0][4][0]=0.00833333;
2186: Tnc[2][0][2]=0.0333333;
2187: Tnc[0][2][2]=0.0333333;
2188: Tnc[0][0][4]=0.00833333;
2189: Tnc[1][1][1]=0.166667;
2190: Tnc[2][0][0]=0.166667;
2191: Tnc[0][2][0]=0.166667;
2192: Tnc[0][0][2]=0.166667;
2193: Tnc[0][0][0]=1;
2194: /* end of table */
2195: f[0]=f[1]=f[2]=f[3]=0.0; ex[0][0][0] = 1.0;
2196: for (i=0; i<deg; i++) {
2197: for (j=0; j<deg; j++) {
2198: for (k=0; k<deg; k++) {
2199: if (i>0) ex[i][j][k] = ex[i-1][j][k]*(a*t);
2200: else if (j>0) ex[i][j][k] = ex[i][j-1][k]*(b*t);
2201: else if (k>0) ex[i][j][k] = ex[i][j][k-1]*(c*t);
2202: f[0] += (ex[i][j][k])*(Tnc[i][j][k]);
2203: if (i>0) f[1] += ((double) i)*(ex[i-1][j][k])*(Tnc[i][j][k]);
2204: if (j>0) f[2] += ((double) j)*(ex[i][j-1][k])*(Tnc[i][j][k]);
2205: if (k>0) f[3] += ((double) k)*(ex[i][j][k-1])*(Tnc[i][j][k]);
2206: }
2207: }
2208: }
2209: }
2210:
2211:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>