var win_info;
var win_datos;

var RADIAN=Math.PI/180;

var fbeta;
var fks=new Array(12);

var index;

var lat,b,m,mp,corre,inter,inc,des,supcol,tacu,vacu,vcon;
var te=0;
var cubs=1;

var Ro=new Array(0.8,0.7,0.833,0.806,0.81,0.796,0.8,0.72,0.764,0.757,0.614,0.777,0.94,0.733,0.767,0.741,0.764,0.753,0.732,0.772,0.818,0.751,0.73,0.81,0.779,0.79,0.71,0.78,0.798,0.798,0.779,0.655,0.773,0.781,0.68,0.74,0.811,0.73,0.7,0.794,0.759,0.802,0.832,0.806,0.757,0.937,0.766,0.739,0.805,0.788,0.803,0.783,0.68,0.79,0.772,0.808,0.821,0.705,0.617,0.723,0.802,0.796,0.742,0.767,0.771,0.772,0.818,0.805,0.763,0.709,0.765,0.796,0.744,0.763,0.752,0.812,0.808,0.776,0.815,0.754,0.773,0.742,0.77,0.805,0.805,0.765,0.84,0.76,0.789,0.748,0.77,0.742,0.821,0.807,0.79,0.817,0.799,0.805,0.825,0.824,0.79,0.773,0.736,0.865,0.733,0.82,0.82,0.8,0.779,0.805,0.8,0.8,0.8,0.717,0.785,0.77,0.781,0.81,0.766,0.854,0.822,0.773,0.832,0.813,0.702,0.747,0.809,0.791,0.811,0.739,0.809,0.807,0.82,0.7,0.73,0.73,0.66,0.746,0.627,0.812,0.764,0.796,0.788,0.802,0.839,0.823,0.824,0.823,0.811,0.836,0.729,0.772,0.795,0.781,0.789,0.781,0.805,0.668,0.789,0.78,0.67,0.67,0.837,0.734,0.793,0.788,0.76,0.755,0.759,0.78,0.769,0.75,0.79,0.81,0.758,0.773,0.82,0.796,0.809,0.85,0.83,0.81,0.809,0.776,0.765,0.796,0.733,0.847,0.795,0.783,0.781,0.8,0.795,0.825,0.769,0.798);
var a1=new Array(4.5,6.19,3.63,3.7,3.89,4.27,4.54,4.5,1.53,3.84,1.3,4.36,6.72,1.04,3.4,2.32,4.7,1.88,1.5,3.75,4.17,4.15,7.78,4.13,3.52,5.12,4.3,6.26,3.34,3.34,1.63,1.26,1.09,3.97,7.4,5.4,4.43,7.3,5.3,4.58,6.51,4.59,4.81,4.1,3.84,15.65,4.15,1.08,3.6,3.68,3.81,3.72,7.1,8.38,3.75,3.83,7.03,3.95,1.65,3.95,3.95,4.27,3.69,3.65,4.7,3.75,4.62,4.34,1.31,4.36,7.31,3.9,4.1,3.82,4.29,3.55,3.83,2.02,3.66,1.29,3.41,3.62,6.36,4.34,4.34,5.67,8.3,4.5,1.73,4.12,3.92,4.02,4.17,4.39,6.16,3.87,3.24,4.34,4.39,4.15,4.2,1.09,4.32,4.46,0.238,2.7,2.85,3.85,4.07,4.34,4,4,4,3.63,3.66,3.85,3.84,3.47,4.01,4.22,4.19,1.09,4.66,1.32,4.11,4.38,4.16,3.79,3.68,1.08,4.06,3.95,5.71,6.83,4.61,4.9,4.5,2.78,2.22,3.55,3.99,4.27,4.23,3.95,4.23,3.77,3.66,3.02,3.64,3.6,3.53,3.77,3.63,3.55,3.12,3.7,4.34,5.55,3.12,7.8,4.3,4.2,3.87,3.49,3.21,3.68,1.09,1.23,1.38,2.15,1.61,1.25,4.17,2.61,4.1,1.09,4.26,4.27,4.03,4.07,4.41,3.7,2.22,1.97,1.26,4.27,1.04,4.01,3.63,3.72,3.97,4.31,3.33,3.13,3.08,3.34);
var a2=new Array(0,0,0.014,0.0155,0.0125,0.0031,0,0,0.0003,0.0164,0.0073,0.0101,0,0.0086,0.0113,0.0261,0.0029,0.0032,0.0054,0.0047,0.0082,0.0103,0,0.0148,0.0136,0,0,0,0.0075,0.0075,0.0063,0,0.0094,0.0076,0,0,0.0073,0,0,0.009,0.0256,0.0098,0.0147,0.0163,0.0164,0,0.0096,0.0056,0.007,0.0112,0.0156,0.0121,0,0,0.0047,0.0066,0.0234,0.013,0.0096,0.0067,0.0059,0.0031,0.0091,0.0097,0.0073,0.0047,0.0068,0.0023,0.0111,0.0036,0.051,0.009,0.0125,0.01,0.0076,0.0079,0.0066,0.0041,0.0096,0.0046,0.0098,0.0078,0.0131,0.0023,0.0023,0.017,0,0,0.0472,0.0075,0.0057,0.0065,0.0096,0.0074,0,0.0058,0.0114,0.0023,0.0049,0.0069,0,0.0094,0.0062,0.0089,0.0013,0.0203,0.0203,0.0082,0.0069,0.0023,0,0,0,0.0112,0.007,0.0108,0.0084,0,0.0056,0.0105,0.0148,0.0094,0.0042,0.0035,0.0159,0.0047,0.0049,0.0122,0.0118,0.0056,0.0089,0.0072,0,0,0.0082,0,0,0.0214,0.0058,0.0079,0.0089,0.0031,0.0031,0.0059,0.0126,0.0092,0.0089,0.0125,0.0096,0.0095,0.0092,0.0064,0.0071,0.0111,0.0142,0.0106,0.0023,0.0292,0.0142,0,0,0,0.0049,0.0193,0.0122,0.0112,0.0061,0.0078,0,0,0.0032,0.0094,0.011,0.008,0.0083,0.0094,0.0089,0.0031,0.0071,0.007,0,0,0.0021,0.0047,0.0052,0.0031,0.0086,0.0091,0.0071,0.0121,0.0076,0.0033,0.0128,0.0152,0.0156,0.0075);
var tm=new Array(true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true,true);
var sc=new Array(2,1.92,2.064,5.36,5.011,2.321,2.16,2.16,1.712,1.722,1.876,4.13,1.85,1.124,2.4,1.885,1.82,2.251,3.008,2.37,2.169,2.002,2,2.589,2.596,1.9,2.17,2.56,1.903,1.903,1.7,0.967,0.804,1.84,1.57,1.93,1.828,1.8,2.31,1.805,1.805,1.804,1.809,1.808,1.722,1.857,1.859,3.207,2.286,2.282,2.28,2.28,1.68,1.7,2.37,1.804,1.97,2.013,1.248,1.785,2.317,2.321,5.538,5.51,2.187,2.37,1.858,1.868,1.253,2.233,1.731,2.762,1.36,1.829,1.834,5.692,1.804,3.184,2.03,3.168,2.214,7.294,1.944,1.868,1.868,1.992,1.88,1.88,2.262,2.406,2.406,4.843,2.053,1.999,2.13,1.9,1.844,1.868,1.876,4.082,2.01,0.804,1.398,1.398,53.3,2.06,6,10.656,1.831,1.868,1.86,2.31,2.31,1.923,3.705,5.462,2.331,2.33,2.898,1.935,2.281,0.804,2.508,1.412,3.001,1.907,1.877,3.785,2.486,3.207,5.35,1.906,1.86,1.8,1.856,1.8,1.75,1.832,1.356,5.692,1.911,2.321,2.692,2.317,2.096,2.048,2.735,2.735,2.74,2.74,2.4,2.307,2.204,5.355,2.48,5.478,1.868,0.856,2.48,2.09,2.09,2.6,5.512,2.189,2.189,2.282,2.143,3.215,2.135,3.202,2.15,3.225,1.742,2.01,1.862,0.804,1.865,2.321,4.92,2.5,2.5,2.5,2.158,1.017,2.189,2.321,1.124,2.309,2.204,2.28,1.84,2.142,5.525,5.525,7.324,1.903);

var vconunit=new Array(40,80,60,100,80,60,50,30,40,60,40,35,30,6,30,40,30,3,30,4,12,2);
var units;

var rad=new Array(12);
var En=new Array(12);

var FS=new Array(12);
var valeFS;

var img1=new Image();
img1.src="graf1.gif";
var img2=new Image();
img2.src="graf2.gif";
var img3=new Image();
img3.src="graf3.gif";

var H=new Array(52);for(i=0;i<=51;i++)H[i]=new Array(12);
var Ta=new Array(52);for(i=0;i<=51;i++)Ta[i]=new Array(12);
var Tr=new Array(52);for(i=0;i<=51;i++)Tr[i]=new Array(12);

var H_cen=new Array(52);for(i=0;i<=51;i++)H_cen[i]=new Array(12);
var Ta_cen=new Array(52);for(i=0;i<=51;i++)Ta_cen[i]=new Array(12);
var Tr_cen=new Array(52);for(i=0;i<=51;i++)Tr_cen[i]=new Array(12);

var Ta_eren=new Array(52);for(i=0;i<=51;i++)Ta_eren[i]=new Array(12);
var Tr_eren=new Array(52);for(i=0;i<=51;i++)Tr_eren[i]=new Array(12);

var Tr_une=new Array(52);for(i=0;i<=51;i++)Tr_une[i]=new Array(12);

var dias_mes=new Array(31,28,31,30,31,30,31,31,30,31,30,31);

var ubival=new Array("ÁLAVA","ALBACETE","ALICANTE","ALMERÍA","ASTURIAS","ÁVILA","BADAJOZ","BALEARES","BARCELONA","BURGOS","CÁCERES","CÁDIZ","CANTABRIA","CASTELLÓN","CEUTA","CIUDAD REAL","CÓRDOBA","CUENCA","GERONA","GRANADA","GUADALAJARA","GUIPÚZCOA","HUELVA","HUESCA","JAÉN","LA CORUÑA","LA RIOJA","LAS PALMAS","LEÓN","LÉRIDA","LUGO","MADRID","MÁLAGA","MELILLA","MURCIA","NAVARRA","ORENSE","PALENCIA","PONTEVEDRA","SALAMANCA","SEGOVIA","SEVILLA","SORIA","STA.C.TENERIFE","TARRAGONA","TERUEL","TOLEDO","VALENCIA","VALLADOLID","VIZCAYA","ZAMORA","ZARAGOZA");

var radval=new Array("Censolar","EREN");
var taval=new Array("Censolar","EREN");
var trval=new Array("Censolar","EREN","UNE 94002");

var Lat=new Array(42.9,39.0,38.4,36.9,43.4,40.7,38.9,39.6,41.4,42.3,39.5,36.5,43.5,40.0,35.9,39.0,37.9,40.1,42.0,37.2,40.6,43.3,37.3,42.1,37.8,43.4,42.5,28.2,42.6,41.7,43.0,40.4,36.7,35.3,38.0,42.8,42.3,42.0,42.4,41.0,41.0,37.4,41.8,28.5,41.1,40.4,39.9,39.5,41.7,43.3,41.5,41.7);

H_cen[0][0]=4.6;H_cen[0][1]=6.9;H_cen[0][2]=11.2;H_cen[0][3]=13.0;H_cen[0][4]=14.8;H_cen[0][5]=16.6;H_cen[0][6]=18.1;H_cen[0][7]=17.3;H_cen[0][8]=14.3;H_cen[0][9]=9.5;H_cen[0][10]=5.5;H_cen[0][11]=4.1;H_cen[1][0]=6.7;H_cen[1][1]=10.5;H_cen[1][2]=15.0;H_cen[1][3]=19.2;H_cen[1][4]=21.2;H_cen[1][5]=25.1;H_cen[1][6]=26.7;H_cen[1][7]=23.2;H_cen[1][8]=18.8;H_cen[1][9]=12.4;H_cen[1][10]=8.4;H_cen[1][11]=6.4;H_cen[2][0]=8.5;H_cen[2][1]=12.0;H_cen[2][2]=16.3;H_cen[2][3]=18.9;H_cen[2][4]=23.1;H_cen[2][5]=24.8;H_cen[2][6]=25.8;H_cen[2][7]=22.5;H_cen[2][8]=18.3;H_cen[2][9]=13.6;H_cen[2][10]=9.8;H_cen[2][11]=7.6;H_cen[3][0]=8.9;H_cen[3][1]=12.2;H_cen[3][2]=16.4;H_cen[3][3]=19.6;H_cen[3][4]=23.1;H_cen[3][5]=24.6;H_cen[3][6]=25.3;H_cen[3][7]=22.5;H_cen[3][8]=18.5;H_cen[3][9]=13.9;H_cen[3][10]=10.0;H_cen[3][11]=8.0;H_cen[4][0]=5.3;H_cen[4][1]=7.7;H_cen[4][2]=10.6;H_cen[4][3]=12.2;H_cen[4][4]=15.0;H_cen[4][5]=15.2;H_cen[4][6]=16.8;H_cen[4][7]=14.8;H_cen[4][8]=12.4;H_cen[4][9]=9.8;H_cen[4][10]=5.9;H_cen[4][11]=4.6;H_cen[5][0]=6.0;H_cen[5][1]=9.1;H_cen[5][2]=13.5;H_cen[5][3]=17.7;H_cen[5][4]=19.4;H_cen[5][5]=22.3;H_cen[5][6]=26.3;H_cen[5][7]=25.3;H_cen[5][8]=18.8;H_cen[5][9]=11.2;H_cen[5][10]=6.9;H_cen[5][11]=5.2;H_cen[6][0]=6.5;H_cen[6][1]=10.0;H_cen[6][2]=13.6;H_cen[6][3]=18.7;H_cen[6][4]=21.8;H_cen[6][5]=24.6;H_cen[6][6]=25.9;H_cen[6][7]=23.8;H_cen[6][8]=17.9;H_cen[6][9]=12.3;H_cen[6][10]=8.2;H_cen[6][11]=6.2;H_cen[7][0]=7.2;H_cen[7][1]=10.7;H_cen[7][2]=14.4;H_cen[7][3]=16.2;H_cen[7][4]=21.0;H_cen[7][5]=22.7;H_cen[7][6]=24.2;H_cen[7][7]=20.6;H_cen[7][8]=16.4;H_cen[7][9]=12.1;H_cen[7][10]=8.5;H_cen[7][11]=6.5;H_cen[8][0]=6.5;H_cen[8][1]=9.5;H_cen[8][2]=12.9;H_cen[8][3]=16.1;H_cen[8][4]=18.6;H_cen[8][5]=20.3;H_cen[8][6]=21.6;H_cen[8][7]=18.1;H_cen[8][8]=14.6;H_cen[8][9]=10.8;H_cen[8][10]=7.2;H_cen[8][11]=5.8;H_cen[9][0]=5.1;H_cen[9][1]=7.9;H_cen[9][2]=12.4;H_cen[9][3]=16.0;H_cen[9][4]=18.7;H_cen[9][5]=21.5;H_cen[9][6]=23.0;H_cen[9][7]=20.7;H_cen[9][8]=16.7;H_cen[9][9]=10.1;H_cen[9][10]=6.5;H_cen[9][11]=4.5;H_cen[10][0]=6.8;H_cen[10][1]=10.0;H_cen[10][2]=14.7;H_cen[10][3]=19.6;H_cen[10][4]=22.1;H_cen[10][5]=25.1;H_cen[10][6]=28.1;H_cen[10][7]=25.4;H_cen[10][8]=19.7;H_cen[10][9]=12.7;H_cen[10][10]=8.9;H_cen[10][11]=6.6;H_cen[11][0]=8.1;H_cen[11][1]=11.5;H_cen[11][2]=15.7;H_cen[11][3]=18.5;H_cen[11][4]=22.2;H_cen[11][5]=23.8;H_cen[11][6]=25.9;H_cen[11][7]=23.0;H_cen[11][8]=18.1;H_cen[11][9]=14.2;H_cen[11][10]=10.0;H_cen[11][11]=7.4;H_cen[12][0]=5.0;H_cen[12][1]=7.4;H_cen[12][2]=11.0;H_cen[12][3]=13.0;H_cen[12][4]=16.1;H_cen[12][5]=17.0;H_cen[12][6]=18.4;H_cen[12][7]=15.5;H_cen[12][8]=13.0;H_cen[12][9]=9.5;H_cen[12][10]=5.8;H_cen[12][11]=4.5;H_cen[13][0]=8.0;H_cen[13][1]=12.2;H_cen[13][2]=15.5;H_cen[13][3]=17.4;H_cen[13][4]=20.6;H_cen[13][5]=21.4;H_cen[13][6]=23.9;H_cen[13][7]=19.5;H_cen[13][8]=16.6;H_cen[13][9]=13.1;H_cen[13][10]=8.6;H_cen[13][11]=7.3;H_cen[14][0]=8.9;H_cen[14][1]=13.1;H_cen[14][2]=18.6;H_cen[14][3]=21.0;H_cen[14][4]=24.3;H_cen[14][5]=26.7;H_cen[14][6]=26.8;H_cen[14][7]=24.3;H_cen[14][8]=19.1;H_cen[14][9]=14.2;H_cen[14][10]=11.0;H_cen[14][11]=8.6;H_cen[15][0]=7.0;H_cen[15][1]=10.1;H_cen[15][2]=15.0;H_cen[15][3]=18.7;H_cen[15][4]=21.4;H_cen[15][5]=23.7;H_cen[15][6]=25.3;H_cen[15][7]=23.2;H_cen[15][8]=18.8;H_cen[15][9]=12.5;H_cen[15][10]=8.7;H_cen[15][11]=6.5;H_cen[16][0]=7.2;H_cen[16][1]=10.1;H_cen[16][2]=15.1;H_cen[16][3]=18.5;H_cen[16][4]=21.8;H_cen[16][5]=25.9;H_cen[16][6]=28.5;H_cen[16][7]=25.1;H_cen[16][8]=19.9;H_cen[16][9]=12.6;H_cen[16][10]=8.6;H_cen[16][11]=6.9;H_cen[17][0]=5.9;H_cen[17][1]=8.8;H_cen[17][2]=12.9;H_cen[17][3]=17.4;H_cen[17][4]=18.7;H_cen[17][5]=22.0;H_cen[17][6]=25.6;H_cen[17][7]=22.3;H_cen[17][8]=17.5;H_cen[17][9]=11.2;H_cen[17][10]=7.2;H_cen[17][11]=5.5;H_cen[18][0]=7.1;H_cen[18][1]=10.5;H_cen[18][2]=14.2;H_cen[18][3]=15.9;H_cen[18][4]=18.7;H_cen[18][5]=19.0;H_cen[18][6]=22.3;H_cen[18][7]=18.5;H_cen[18][8]=14.9;H_cen[18][9]=11.7;H_cen[18][10]=7.8;H_cen[18][11]=6.6;H_cen[19][0]=7.8;H_cen[19][1]=10.8;H_cen[19][2]=15.2;H_cen[19][3]=18.5;H_cen[19][4]=21.9;H_cen[19][5]=24.8;H_cen[19][6]=26.7;H_cen[19][7]=23.6;H_cen[19][8]=18.8;H_cen[19][9]=12.9;H_cen[19][10]=9.6;H_cen[19][11]=7.1;H_cen[20][0]=6.5;H_cen[20][1]=9.2;H_cen[20][2]=14.0;H_cen[20][3]=17.9;H_cen[20][4]=19.4;H_cen[20][5]=22.7;H_cen[20][6]=25.0;H_cen[20][7]=23.2;H_cen[20][8]=17.8;H_cen[20][9]=11.7;H_cen[20][10]=7.8;H_cen[20][11]=5.6;H_cen[21][0]=5.5;H_cen[21][1]=7.7;H_cen[21][2]=11.3;H_cen[21][3]=11.7;H_cen[21][4]=14.6;H_cen[21][5]=16.2;H_cen[21][6]=16.1;H_cen[21][7]=13.6;H_cen[21][8]=12.7;H_cen[21][9]=10.3;H_cen[21][10]=6.2;H_cen[21][11]=5.0;H_cen[22][0]=7.6;H_cen[22][1]=11.3;H_cen[22][2]=16.0;H_cen[22][3]=19.5;H_cen[22][4]=24.1;H_cen[22][5]=25.6;H_cen[22][6]=28.7;H_cen[22][7]=25.6;H_cen[22][8]=21.2;H_cen[22][9]=14.5;H_cen[22][10]=9.2;H_cen[22][11]=7.5;H_cen[23][0]=6.1;H_cen[23][1]=9.6;H_cen[23][2]=14.3;H_cen[23][3]=18.7;H_cen[23][4]=20.3;H_cen[23][5]=22.1;H_cen[23][6]=23.1;H_cen[23][7]=20.9;H_cen[23][8]=16.9;H_cen[23][9]=11.3;H_cen[23][10]=7.2;H_cen[23][11]=5.1;H_cen[24][0]=6.7;H_cen[24][1]=10.1;H_cen[24][2]=14.4;H_cen[24][3]=18.0;H_cen[24][4]=20.3;H_cen[24][5]=24.4;H_cen[24][6]=26.7;H_cen[24][7]=24.1;H_cen[24][8]=19.2;H_cen[24][9]=11.9;H_cen[24][10]=8.1;H_cen[24][11]=6.5;H_cen[25][0]=5.4;H_cen[25][1]=8.0;H_cen[25][2]=11.4;H_cen[25][3]=12.4;H_cen[25][4]=15.4;H_cen[25][5]=16.2;H_cen[25][6]=17.4;H_cen[25][7]=15.3;H_cen[25][8]=13.9;H_cen[25][9]=10.9;H_cen[25][10]=6.4;H_cen[25][11]=5.1;H_cen[26][0]=5.6;H_cen[26][1]=6.8;H_cen[26][2]=13.7;H_cen[26][3]=16.6;H_cen[26][4]=19.2;H_cen[26][5]=21.4;H_cen[26][6]=23.3;H_cen[26][7]=20.8;H_cen[26][8]=16.2;H_cen[26][9]=10.7;H_cen[26][10]=6.8;H_cen[26][11]=4.8;H_cen[27][0]=11.2;H_cen[27][1]=14.2;H_cen[27][2]=17.8;H_cen[27][3]=19.6;H_cen[27][4]=21.7;H_cen[27][5]=22.5;H_cen[27][6]=24.3;H_cen[27][7]=21.9;H_cen[27][8]=19.8;H_cen[27][9]=15.1;H_cen[27][10]=12.3;H_cen[27][11]=10.7;H_cen[28][0]=5.8;H_cen[28][1]=8.7;H_cen[28][2]=13.8;H_cen[28][3]=17.2;H_cen[28][4]=19.5;H_cen[28][5]=22.1;H_cen[28][6]=24.2;H_cen[28][7]=20.9;H_cen[28][8]=17.2;H_cen[28][9]=10.4;H_cen[28][10]=7.0;H_cen[28][11]=4.8;H_cen[29][0]=6.0;H_cen[29][1]=9.9;H_cen[29][2]=18.0;H_cen[29][3]=18.8;H_cen[29][4]=20.9;H_cen[29][5]=22.6;H_cen[29][6]=23.8;H_cen[29][7]=21.3;H_cen[29][8]=16.8;H_cen[29][9]=12.1;H_cen[29][10]=7.2;H_cen[29][11]=4.8;H_cen[30][0]=5.1;H_cen[30][1]=7.6;H_cen[30][2]=11.7;H_cen[30][3]=15.2;H_cen[30][4]=17.1;H_cen[30][5]=19.5;H_cen[30][6]=20.2;H_cen[30][7]=18.4;H_cen[30][8]=15.0;H_cen[30][9]=9.9;H_cen[30][10]=6.2;H_cen[30][11]=4.5;H_cen[31][0]=6.7;H_cen[31][1]=10.6;H_cen[31][2]=13.6;H_cen[31][3]=18.8;H_cen[31][4]=20.9;H_cen[31][5]=23.5;H_cen[31][6]=26.0;H_cen[31][7]=23.1;H_cen[31][8]=16.9;H_cen[31][9]=11.4;H_cen[31][10]=7.5;H_cen[31][11]=5.9;H_cen[32][0]=8.3;H_cen[32][1]=12.0;H_cen[32][2]=15.5;H_cen[32][3]=18.5;H_cen[32][4]=23.2;H_cen[32][5]=24.5;H_cen[32][6]=26.5;H_cen[32][7]=23.2;H_cen[32][8]=19.0;H_cen[32][9]=13.6;H_cen[32][10]=9.3;H_cen[32][11]=8.0;H_cen[33][0]=9.4;H_cen[33][1]=12.6;H_cen[33][2]=17.2;H_cen[33][3]=20.3;H_cen[33][4]=23.0;H_cen[33][5]=24.8;H_cen[33][6]=24.8;H_cen[33][7]=22.6;H_cen[33][8]=18.3;H_cen[33][9]=14.2;H_cen[33][10]=10.9;H_cen[33][11]=8.7;H_cen[34][0]=10.1;H_cen[34][1]=14.8;H_cen[34][2]=16.6;H_cen[34][3]=20.4;H_cen[34][4]=24.2;H_cen[34][5]=25.6;H_cen[34][6]=27.7;H_cen[34][7]=23.5;H_cen[34][8]=18.6;H_cen[34][9]=13.9;H_cen[34][10]=9.8;H_cen[34][11]=8.1;H_cen[35][0]=5.0;H_cen[35][1]=7.4;H_cen[35][2]=12.3;H_cen[35][3]=14.5;H_cen[35][4]=17.1;H_cen[35][5]=18.9;H_cen[35][6]=20.5;H_cen[35][7]=18.2;H_cen[35][8]=16.2;H_cen[35][9]=10.2;H_cen[35][10]=6.0;H_cen[35][11]=4.5;H_cen[36][0]=4.7;H_cen[36][1]=7.3;H_cen[36][2]=11.3;H_cen[36][3]=14.0;H_cen[36][4]=16.2;H_cen[36][5]=17.6;H_cen[36][6]=18.3;H_cen[36][7]=16.6;H_cen[36][8]=14.3;H_cen[36][9]=9.4;H_cen[36][10]=5.6;H_cen[36][11]=4.3;H_cen[37][0]=5.3;H_cen[37][1]=9.0;H_cen[37][2]=13.2;H_cen[37][3]=17.5;H_cen[37][4]=19.7;H_cen[37][5]=21.8;H_cen[37][6]=24.1;H_cen[37][7]=21.6;H_cen[37][8]=17.1;H_cen[37][9]=10.9;H_cen[37][10]=6.6;H_cen[37][11]=4.6;H_cen[38][0]=5.5;H_cen[38][1]=8.2;H_cen[38][2]=13.0;H_cen[38][3]=15.7;H_cen[38][4]=17.5;H_cen[38][5]=20.4;H_cen[38][6]=22.0;H_cen[38][7]=18.9;H_cen[38][8]=15.1;H_cen[38][9]=11.3;H_cen[38][10]=6.8;H_cen[38][11]=5.5;H_cen[39][0]=6.1;H_cen[39][1]=9.5;H_cen[39][2]=13.5;H_cen[39][3]=17.1;H_cen[39][4]=19.7;H_cen[39][5]=22.8;H_cen[39][6]=24.6;H_cen[39][7]=22.6;H_cen[39][8]=17.5;H_cen[39][9]=11.3;H_cen[39][10]=7.4;H_cen[39][11]=5.2;H_cen[40][0]=5.7;H_cen[40][1]=8.8;H_cen[40][2]=13.4;H_cen[40][3]=18.4;H_cen[40][4]=20.4;H_cen[40][5]=22.6;H_cen[40][6]=25.7;H_cen[40][7]=24.9;H_cen[40][8]=18.8;H_cen[40][9]=11.4;H_cen[40][10]=6.8;H_cen[40][11]=5.1;H_cen[41][0]=7.3;H_cen[41][1]=10.9;H_cen[41][2]=14.4;H_cen[41][3]=19.2;H_cen[41][4]=22.4;H_cen[41][5]=24.3;H_cen[41][6]=24.9;H_cen[41][7]=23.0;H_cen[41][8]=17.9;H_cen[41][9]=12.3;H_cen[41][10]=8.8;H_cen[41][11]=6.9;H_cen[42][0]=5.9;H_cen[42][1]=8.7;H_cen[42][2]=12.8;H_cen[42][3]=17.1;H_cen[42][4]=19.7;H_cen[42][5]=21.8;H_cen[42][6]=24.1;H_cen[42][7]=22.3;H_cen[42][8]=17.5;H_cen[42][9]=11.1;H_cen[42][10]=7.6;H_cen[42][11]=5.6;H_cen[43][0]=10.7;H_cen[43][1]=13.3;H_cen[43][2]=18.1;H_cen[43][3]=21.5;H_cen[43][4]=25.7;H_cen[43][5]=26.5;H_cen[43][6]=29.3;H_cen[43][7]=26.6;H_cen[43][8]=21.2;H_cen[43][9]=16.2;H_cen[43][10]=10.8;H_cen[43][11]=9.3;H_cen[44][0]=7.3;H_cen[44][1]=10.7;H_cen[44][2]=14.9;H_cen[44][3]=17.6;H_cen[44][4]=20.2;H_cen[44][5]=22.5;H_cen[44][6]=23.8;H_cen[44][7]=20.5;H_cen[44][8]=16.4;H_cen[44][9]=12.3;H_cen[44][10]=8.8;H_cen[44][11]=6.3;H_cen[45][0]=6.1;H_cen[45][1]=8.8;H_cen[45][2]=12.9;H_cen[45][3]=16.7;H_cen[45][4]=18.4;H_cen[45][5]=20.6;H_cen[45][6]=21.8;H_cen[45][7]=20.7;H_cen[45][8]=16.9;H_cen[45][9]=11.0;H_cen[45][10]=7.1;H_cen[45][11]=5.3;H_cen[46][0]=6.2;H_cen[46][1]=9.5;H_cen[46][2]=14.0;H_cen[46][3]=19.3;H_cen[46][4]=21.0;H_cen[46][5]=24.4;H_cen[46][6]=27.2;H_cen[46][7]=24.5;H_cen[46][8]=18.1;H_cen[46][9]=11.9;H_cen[46][10]=7.6;H_cen[46][11]=5.6;H_cen[47][0]=7.6;H_cen[47][1]=10.6;H_cen[47][2]=14.9;H_cen[47][3]=18.1;H_cen[47][4]=20.6;H_cen[47][5]=22.8;H_cen[47][6]=23.8;H_cen[47][7]=20.7;H_cen[47][8]=16.7;H_cen[47][9]=12.0;H_cen[47][10]=8.7;H_cen[47][11]=6.6;H_cen[48][0]=5.5;H_cen[48][1]=8.8;H_cen[48][2]=13.9;H_cen[48][3]=17.2;H_cen[48][4]=19.9;H_cen[48][5]=22.6;H_cen[48][6]=25.1;H_cen[48][7]=23.0;H_cen[48][8]=18.3;H_cen[48][9]=11.2;H_cen[48][10]=6.9;H_cen[48][11]=4.2;H_cen[49][0]=5.0;H_cen[49][1]=7.1;H_cen[49][2]=10.8;H_cen[49][3]=12.7;H_cen[49][4]=15.5;H_cen[49][5]=16.7;H_cen[49][6]=17.9;H_cen[49][7]=15.7;H_cen[49][8]=13.1;H_cen[49][9]=9.3;H_cen[49][10]=6.0;H_cen[49][11]=4.6;H_cen[50][0]=5.4;H_cen[50][1]=8.9;H_cen[50][2]=13.2;H_cen[50][3]=17.3;H_cen[50][4]=22.2;H_cen[50][5]=21.6;H_cen[50][6]=23.5;H_cen[50][7]=22.0;H_cen[50][8]=17.2;H_cen[50][9]=11.1;H_cen[50][10]=6.7;H_cen[50][11]=4.6;H_cen[51][0]=6.3;H_cen[51][1]=9.8;H_cen[51][2]=15.2;H_cen[51][3]=18.3;H_cen[51][4]=21.8;H_cen[51][5]=24.2;H_cen[51][6]=25.1;H_cen[51][7]=23.4;H_cen[51][8]=18.3;H_cen[51][9]=12.1;H_cen[51][10]=7.4;H_cen[51][11]=5.7;

Ta_cen[0][0]=7;Ta_cen[0][1]=7;Ta_cen[0][2]=11;Ta_cen[0][3]=12;Ta_cen[0][4]=15;Ta_cen[0][5]=19;Ta_cen[0][6]=21;Ta_cen[0][7]=21;Ta_cen[0][8]=19;Ta_cen[0][9]=15;Ta_cen[0][10]=10;Ta_cen[0][11]=7;Ta_cen[1][0]=6;Ta_cen[1][1]=8;Ta_cen[1][2]=11;Ta_cen[1][3]=13;Ta_cen[1][4]=17;Ta_cen[1][5]=22;Ta_cen[1][6]=26;Ta_cen[1][7]=26;Ta_cen[1][8]=22;Ta_cen[1][9]=16;Ta_cen[1][10]=11;Ta_cen[1][11]=7;Ta_cen[2][0]=13;Ta_cen[2][1]=14;Ta_cen[2][2]=16;Ta_cen[2][3]=18;Ta_cen[2][4]=21;Ta_cen[2][5]=25;Ta_cen[2][6]=28;Ta_cen[2][7]=28;Ta_cen[2][8]=26;Ta_cen[2][9]=21;Ta_cen[2][10]=17;Ta_cen[2][11]=14;Ta_cen[3][0]=15;Ta_cen[3][1]=15;Ta_cen[3][2]=16;Ta_cen[3][3]=18;Ta_cen[3][4]=21;Ta_cen[3][5]=24;Ta_cen[3][6]=27;Ta_cen[3][7]=28;Ta_cen[3][8]=26;Ta_cen[3][9]=22;Ta_cen[3][10]=18;Ta_cen[3][11]=16;Ta_cen[4][0]=9;Ta_cen[4][1]=10;Ta_cen[4][2]=11;Ta_cen[4][3]=12;Ta_cen[4][4]=15;Ta_cen[4][5]=18;Ta_cen[4][6]=20;Ta_cen[4][7]=20;Ta_cen[4][8]=19;Ta_cen[4][9]=16;Ta_cen[4][10]=12;Ta_cen[4][11]=10;Ta_cen[5][0]=4;Ta_cen[5][1]=5;Ta_cen[5][2]=8;Ta_cen[5][3]=11;Ta_cen[5][4]=14;Ta_cen[5][5]=18;Ta_cen[5][6]=22;Ta_cen[5][7]=22;Ta_cen[5][8]=18;Ta_cen[5][9]=13;Ta_cen[5][10]=8;Ta_cen[5][11]=5;Ta_cen[6][0]=11;Ta_cen[6][1]=12;Ta_cen[6][2]=15;Ta_cen[6][3]=17;Ta_cen[6][4]=20;Ta_cen[6][5]=25;Ta_cen[6][6]=28;Ta_cen[6][7]=28;Ta_cen[6][8]=25;Ta_cen[6][9]=20;Ta_cen[6][10]=15;Ta_cen[6][11]=11;Ta_cen[7][0]=12;Ta_cen[7][1]=13;Ta_cen[7][2]=14;Ta_cen[7][3]=17;Ta_cen[7][4]=19;Ta_cen[7][5]=23;Ta_cen[7][6]=26;Ta_cen[7][7]=27;Ta_cen[7][8]=25;Ta_cen[7][9]=20;Ta_cen[7][10]=16;Ta_cen[7][11]=14;Ta_cen[8][0]=11;Ta_cen[8][1]=12;Ta_cen[8][2]=14;Ta_cen[8][3]=17;Ta_cen[8][4]=20;Ta_cen[8][5]=24;Ta_cen[8][6]=26;Ta_cen[8][7]=26;Ta_cen[8][8]=24;Ta_cen[8][9]=20;Ta_cen[8][10]=16;Ta_cen[8][11]=12;Ta_cen[9][0]=5;Ta_cen[9][1]=6;Ta_cen[9][2]=9;Ta_cen[9][3]=11;Ta_cen[9][4]=14;Ta_cen[9][5]=18;Ta_cen[9][6]=21;Ta_cen[9][7]=21;Ta_cen[9][8]=18;Ta_cen[9][9]=13;Ta_cen[9][10]=9;Ta_cen[9][11]=5;Ta_cen[10][0]=10;Ta_cen[10][1]=11;Ta_cen[10][2]=14;Ta_cen[10][3]=16;Ta_cen[10][4]=19;Ta_cen[10][5]=25;Ta_cen[10][6]=28;Ta_cen[10][7]=28;Ta_cen[10][8]=25;Ta_cen[10][9]=19;Ta_cen[10][10]=14;Ta_cen[10][11]=10;Ta_cen[11][0]=13;Ta_cen[11][1]=15;Ta_cen[11][2]=17;Ta_cen[11][3]=19;Ta_cen[11][4]=21;Ta_cen[11][5]=24;Ta_cen[11][6]=27;Ta_cen[11][7]=27;Ta_cen[11][8]=25;Ta_cen[11][9]=22;Ta_cen[11][10]=18;Ta_cen[11][11]=15;Ta_cen[12][0]=11;Ta_cen[12][1]=11;Ta_cen[12][2]=14;Ta_cen[12][3]=14;Ta_cen[12][4]=16;Ta_cen[12][5]=19;Ta_cen[12][6]=21;Ta_cen[12][7]=21;Ta_cen[12][8]=20;Ta_cen[12][9]=17;Ta_cen[12][10]=14;Ta_cen[12][11]=12;Ta_cen[13][0]=13;Ta_cen[13][1]=13;Ta_cen[13][2]=15;Ta_cen[13][3]=17;Ta_cen[13][4]=20;Ta_cen[13][5]=24;Ta_cen[13][6]=26;Ta_cen[13][7]=27;Ta_cen[13][8]=25;Ta_cen[13][9]=21;Ta_cen[13][10]=16;Ta_cen[13][11]=13;Ta_cen[14][0]=15;Ta_cen[14][1]=15;Ta_cen[14][2]=16;Ta_cen[14][3]=17;Ta_cen[14][4]=19;Ta_cen[14][5]=23;Ta_cen[14][6]=25;Ta_cen[14][7]=26;Ta_cen[14][8]=24;Ta_cen[14][9]=21;Ta_cen[14][10]=18;Ta_cen[14][11]=16;Ta_cen[15][0]=7;Ta_cen[15][1]=9;Ta_cen[15][2]=12;Ta_cen[15][3]=15;Ta_cen[15][4]=18;Ta_cen[15][5]=23;Ta_cen[15][6]=28;Ta_cen[15][7]=27;Ta_cen[15][8]=20;Ta_cen[15][9]=17;Ta_cen[15][10]=11;Ta_cen[15][11]=8;Ta_cen[16][0]=11;Ta_cen[16][1]=13;Ta_cen[16][2]=16;Ta_cen[16][3]=18;Ta_cen[16][4]=21;Ta_cen[16][5]=26;Ta_cen[16][6]=30;Ta_cen[16][7]=30;Ta_cen[16][8]=26;Ta_cen[16][9]=21;Ta_cen[16][10]=16;Ta_cen[16][11]=12;Ta_cen[17][0]=5;Ta_cen[17][1]=6;Ta_cen[17][2]=9;Ta_cen[17][3]=12;Ta_cen[17][4]=15;Ta_cen[17][5]=20;Ta_cen[17][6]=24;Ta_cen[17][7]=23;Ta_cen[17][8]=20;Ta_cen[17][9]=14;Ta_cen[17][10]=9;Ta_cen[17][11]=6;Ta_cen[18][0]=9;Ta_cen[18][1]=10;Ta_cen[18][2]=13;Ta_cen[18][3]=15;Ta_cen[18][4]=19;Ta_cen[18][5]=23;Ta_cen[18][6]=26;Ta_cen[18][7]=25;Ta_cen[18][8]=23;Ta_cen[18][9]=18;Ta_cen[18][10]=13;Ta_cen[18][11]=10;Ta_cen[19][0]=9;Ta_cen[19][1]=10;Ta_cen[19][2]=13;Ta_cen[19][3]=16;Ta_cen[19][4]=18;Ta_cen[19][5]=24;Ta_cen[19][6]=27;Ta_cen[19][7]=27;Ta_cen[19][8]=24;Ta_cen[19][9]=18;Ta_cen[19][10]=13;Ta_cen[19][11]=9;Ta_cen[20][0]=7;Ta_cen[20][1]=8;Ta_cen[20][2]=12;Ta_cen[20][3]=14;Ta_cen[20][4]=18;Ta_cen[20][5]=22;Ta_cen[20][6]=26;Ta_cen[20][7]=26;Ta_cen[20][8]=22;Ta_cen[20][9]=16;Ta_cen[20][10]=10;Ta_cen[20][11]=8;Ta_cen[21][0]=10;Ta_cen[21][1]=10;Ta_cen[21][2]=13;Ta_cen[21][3]=14;Ta_cen[21][4]=16;Ta_cen[21][5]=19;Ta_cen[21][6]=21;Ta_cen[21][7]=21;Ta_cen[21][8]=20;Ta_cen[21][9]=17;Ta_cen[21][10]=13;Ta_cen[21][11]=10;Ta_cen[22][0]=13;Ta_cen[22][1]=14;Ta_cen[22][2]=16;Ta_cen[22][3]=20;Ta_cen[22][4]=21;Ta_cen[22][5]=24;Ta_cen[22][6]=27;Ta_cen[22][7]=27;Ta_cen[22][8]=25;Ta_cen[22][9]=21;Ta_cen[22][10]=17;Ta_cen[22][11]=14;Ta_cen[23][0]=7;Ta_cen[23][1]=8;Ta_cen[23][2]=12;Ta_cen[23][3]=15;Ta_cen[23][4]=18;Ta_cen[23][5]=22;Ta_cen[23][6]=25;Ta_cen[23][7]=25;Ta_cen[23][8]=21;Ta_cen[23][9]=16;Ta_cen[23][10]=11;Ta_cen[23][11]=7;Ta_cen[24][0]=11;Ta_cen[24][1]=11;Ta_cen[24][2]=14;Ta_cen[24][3]=17;Ta_cen[24][4]=21;Ta_cen[24][5]=26;Ta_cen[24][6]=30;Ta_cen[24][7]=29;Ta_cen[24][8]=25;Ta_cen[24][9]=19;Ta_cen[24][10]=15;Ta_cen[24][11]=10;Ta_cen[25][0]=12;Ta_cen[25][1]=12;Ta_cen[25][2]=14;Ta_cen[25][3]=14;Ta_cen[25][4]=16;Ta_cen[25][5]=19;Ta_cen[25][6]=20;Ta_cen[25][7]=21;Ta_cen[25][8]=20;Ta_cen[25][9]=17;Ta_cen[25][10]=14;Ta_cen[25][11]=12;Ta_cen[26][0]=7;Ta_cen[26][1]=9;Ta_cen[26][2]=12;Ta_cen[26][3]=14;Ta_cen[26][4]=17;Ta_cen[26][5]=21;Ta_cen[26][6]=24;Ta_cen[26][7]=24;Ta_cen[26][8]=21;Ta_cen[26][9]=16;Ta_cen[26][10]=11;Ta_cen[26][11]=8;Ta_cen[27][0]=20;Ta_cen[27][1]=20;Ta_cen[27][2]=21;Ta_cen[27][3]=22;Ta_cen[27][4]=23;Ta_cen[27][5]=24;Ta_cen[27][6]=25;Ta_cen[27][7]=25;Ta_cen[27][8]=26;Ta_cen[27][9]=25;Ta_cen[27][10]=23;Ta_cen[27][11]=21;Ta_cen[28][0]=5;Ta_cen[28][1]=6;Ta_cen[28][2]=10;Ta_cen[28][3]=12;Ta_cen[28][4]=15;Ta_cen[28][5]=19;Ta_cen[28][6]=22;Ta_cen[28][7]=22;Ta_cen[28][8]=19;Ta_cen[28][9]=14;Ta_cen[28][10]=9;Ta_cen[28][11]=6;Ta_cen[29][0]=7;Ta_cen[29][1]=10;Ta_cen[29][2]=14;Ta_cen[29][3]=15;Ta_cen[29][4]=21;Ta_cen[29][5]=24;Ta_cen[29][6]=27;Ta_cen[29][7]=27;Ta_cen[29][8]=23;Ta_cen[29][9]=18;Ta_cen[29][10]=11;Ta_cen[29][11]=8;Ta_cen[30][0]=8;Ta_cen[30][1]=9;Ta_cen[30][2]=11;Ta_cen[30][3]=13;Ta_cen[30][4]=15;Ta_cen[30][5]=18;Ta_cen[30][6]=20;Ta_cen[30][7]=21;Ta_cen[30][8]=19;Ta_cen[30][9]=15;Ta_cen[30][10]=11;Ta_cen[30][11]=8;Ta_cen[31][0]=6;Ta_cen[31][1]=8;Ta_cen[31][2]=11;Ta_cen[31][3]=13;Ta_cen[31][4]=18;Ta_cen[31][5]=23;Ta_cen[31][6]=28;Ta_cen[31][7]=26;Ta_cen[31][8]=21;Ta_cen[31][9]=15;Ta_cen[31][10]=11;Ta_cen[31][11]=7;Ta_cen[32][0]=15;Ta_cen[32][1]=15;Ta_cen[32][2]=17;Ta_cen[32][3]=19;Ta_cen[32][4]=21;Ta_cen[32][5]=25;Ta_cen[32][6]=27;Ta_cen[32][7]=28;Ta_cen[32][8]=26;Ta_cen[32][9]=22;Ta_cen[32][10]=18;Ta_cen[32][11]=15;Ta_cen[33][0]=15;Ta_cen[33][1]=15;Ta_cen[33][2]=16;Ta_cen[33][3]=18;Ta_cen[33][4]=21;Ta_cen[33][5]=25;Ta_cen[33][6]=27;Ta_cen[33][7]=28;Ta_cen[33][8]=26;Ta_cen[33][9]=22;Ta_cen[33][10]=18;Ta_cen[33][11]=16;Ta_cen[34][0]=12;Ta_cen[34][1]=12;Ta_cen[34][2]=15;Ta_cen[34][3]=17;Ta_cen[34][4]=21;Ta_cen[34][5]=25;Ta_cen[34][6]=28;Ta_cen[34][7]=28;Ta_cen[34][8]=25;Ta_cen[34][9]=20;Ta_cen[34][10]=16;Ta_cen[34][11]=12;Ta_cen[35][0]=7;Ta_cen[35][1]=7;Ta_cen[35][2]=11;Ta_cen[35][3]=13;Ta_cen[35][4]=16;Ta_cen[35][5]=20;Ta_cen[35][6]=22;Ta_cen[35][7]=23;Ta_cen[35][8]=20;Ta_cen[35][9]=15;Ta_cen[35][10]=10;Ta_cen[35][11]=8;Ta_cen[36][0]=9;Ta_cen[36][1]=9;Ta_cen[36][2]=13;Ta_cen[36][3]=15;Ta_cen[36][4]=18;Ta_cen[36][5]=21;Ta_cen[36][6]=24;Ta_cen[36][7]=23;Ta_cen[36][8]=21;Ta_cen[36][9]=16;Ta_cen[36][10]=12;Ta_cen[36][11]=9;Ta_cen[37][0]=5;Ta_cen[37][1]=7;Ta_cen[37][2]=10;Ta_cen[37][3]=13;Ta_cen[37][4]=16;Ta_cen[37][5]=20;Ta_cen[37][6]=23;Ta_cen[37][7]=23;Ta_cen[37][8]=20;Ta_cen[37][9]=14;Ta_cen[37][10]=9;Ta_cen[37][11]=6;Ta_cen[38][0]=11;Ta_cen[38][1]=12;Ta_cen[38][2]=14;Ta_cen[38][3]=16;Ta_cen[38][4]=18;Ta_cen[38][5]=20;Ta_cen[38][6]=22;Ta_cen[38][7]=23;Ta_cen[38][8]=20;Ta_cen[38][9]=17;Ta_cen[38][10]=14;Ta_cen[38][11]=12;Ta_cen[39][0]=6;Ta_cen[39][1]=7;Ta_cen[39][2]=10;Ta_cen[39][3]=13;Ta_cen[39][4]=16;Ta_cen[39][5]=20;Ta_cen[39][6]=24;Ta_cen[39][7]=23;Ta_cen[39][8]=20;Ta_cen[39][9]=14;Ta_cen[39][10]=9;Ta_cen[39][11]=6;Ta_cen[40][0]=4;Ta_cen[40][1]=6;Ta_cen[40][2]=10;Ta_cen[40][3]=12;Ta_cen[40][4]=15;Ta_cen[40][5]=20;Ta_cen[40][6]=24;Ta_cen[40][7]=23;Ta_cen[40][8]=20;Ta_cen[40][9]=14;Ta_cen[40][10]=9;Ta_cen[40][11]=5;Ta_cen[41][0]=11;Ta_cen[41][1]=13;Ta_cen[41][2]=14;Ta_cen[41][3]=17;Ta_cen[41][4]=21;Ta_cen[41][5]=25;Ta_cen[41][6]=29;Ta_cen[41][7]=29;Ta_cen[41][8]=24;Ta_cen[41][9]=20;Ta_cen[41][10]=16;Ta_cen[41][11]=12;Ta_cen[42][0]=4;Ta_cen[42][1]=6;Ta_cen[42][2]=9;Ta_cen[42][3]=11;Ta_cen[42][4]=14;Ta_cen[42][5]=19;Ta_cen[42][6]=22;Ta_cen[42][7]=22;Ta_cen[42][8]=18;Ta_cen[42][9]=13;Ta_cen[42][10]=8;Ta_cen[42][11]=5;Ta_cen[43][0]=19;Ta_cen[43][1]=20;Ta_cen[43][2]=20;Ta_cen[43][3]=21;Ta_cen[43][4]=22;Ta_cen[43][5]=24;Ta_cen[43][6]=26;Ta_cen[43][7]=27;Ta_cen[43][8]=26;Ta_cen[43][9]=25;Ta_cen[43][10]=23;Ta_cen[43][11]=20;Ta_cen[44][0]=11;Ta_cen[44][1]=12;Ta_cen[44][2]=14;Ta_cen[44][3]=16;Ta_cen[44][4]=19;Ta_cen[44][5]=22;Ta_cen[44][6]=25;Ta_cen[44][7]=26;Ta_cen[44][8]=23;Ta_cen[44][9]=20;Ta_cen[44][10]=15;Ta_cen[44][11]=12;Ta_cen[45][0]=5;Ta_cen[45][1]=6;Ta_cen[45][2]=9;Ta_cen[45][3]=12;Ta_cen[45][4]=16;Ta_cen[45][5]=20;Ta_cen[45][6]=23;Ta_cen[45][7]=24;Ta_cen[45][8]=19;Ta_cen[45][9]=14;Ta_cen[45][10]=9;Ta_cen[45][11]=6;Ta_cen[46][0]=8;Ta_cen[46][1]=9;Ta_cen[46][2]=13;Ta_cen[46][3]=15;Ta_cen[46][4]=19;Ta_cen[46][5]=24;Ta_cen[46][6]=27;Ta_cen[46][7]=23;Ta_cen[46][8]=23;Ta_cen[46][9]=17;Ta_cen[46][10]=12;Ta_cen[46][11]=8;Ta_cen[47][0]=12;Ta_cen[47][1]=13;Ta_cen[47][2]=15;Ta_cen[47][3]=17;Ta_cen[47][4]=20;Ta_cen[47][5]=23;Ta_cen[47][6]=26;Ta_cen[47][7]=27;Ta_cen[47][8]=24;Ta_cen[47][9]=20;Ta_cen[47][10]=16;Ta_cen[47][11]=13;Ta_cen[48][0]=4;Ta_cen[48][1]=6;Ta_cen[48][2]=9;Ta_cen[48][3]=12;Ta_cen[48][4]=17;Ta_cen[48][5]=21;Ta_cen[48][6]=24;Ta_cen[48][7]=23;Ta_cen[48][8]=18;Ta_cen[48][9]=13;Ta_cen[48][10]=8;Ta_cen[48][11]=4;Ta_cen[49][0]=10;Ta_cen[49][1]=11;Ta_cen[49][2]=12;Ta_cen[49][3]=13;Ta_cen[49][4]=16;Ta_cen[49][5]=20;Ta_cen[49][6]=22;Ta_cen[49][7]=22;Ta_cen[49][8]=20;Ta_cen[49][9]=16;Ta_cen[49][10]=13;Ta_cen[49][11]=10;Ta_cen[50][0]=6;Ta_cen[50][1]=7;Ta_cen[50][2]=11;Ta_cen[50][3]=13;Ta_cen[50][4]=16;Ta_cen[50][5]=21;Ta_cen[50][6]=24;Ta_cen[50][7]=23;Ta_cen[50][8]=20;Ta_cen[50][9]=15;Ta_cen[50][10]=10;Ta_cen[50][11]=6;Ta_cen[51][0]=8;Ta_cen[51][1]=10;Ta_cen[51][2]=13;Ta_cen[51][3]=16;Ta_cen[51][4]=19;Ta_cen[51][5]=23;Ta_cen[51][6]=26;Ta_cen[51][7]=26;Ta_cen[51][8]=23;Ta_cen[51][9]=17;Ta_cen[51][10]=12;Ta_cen[51][11]=9;

Tr_cen[0][0]=5;Tr_cen[0][1]=6;Tr_cen[0][2]=8;Tr_cen[0][3]=10;Tr_cen[0][4]=11;Tr_cen[0][5]=12;Tr_cen[0][6]=13;Tr_cen[0][7]=12;Tr_cen[0][8]=11;Tr_cen[0][9]=10;Tr_cen[0][10]=8;Tr_cen[0][11]=5;Tr_cen[1][0]=5;Tr_cen[1][1]=6;Tr_cen[1][2]=8;Tr_cen[1][3]=10;Tr_cen[1][4]=11;Tr_cen[1][5]=12;Tr_cen[1][6]=13;Tr_cen[1][7]=12;Tr_cen[1][8]=11;Tr_cen[1][9]=10;Tr_cen[1][10]=8;Tr_cen[1][11]=5;Tr_cen[2][0]=8;Tr_cen[2][1]=9;Tr_cen[2][2]=11;Tr_cen[2][3]=13;Tr_cen[2][4]=14;Tr_cen[2][5]=15;Tr_cen[2][6]=16;Tr_cen[2][7]=15;Tr_cen[2][8]=14;Tr_cen[2][9]=13;Tr_cen[2][10]=11;Tr_cen[2][11]=8;Tr_cen[3][0]=8;Tr_cen[3][1]=9;Tr_cen[3][2]=11;Tr_cen[3][3]=13;Tr_cen[3][4]=14;Tr_cen[3][5]=15;Tr_cen[3][6]=16;Tr_cen[3][7]=15;Tr_cen[3][8]=14;Tr_cen[3][9]=13;Tr_cen[3][10]=11;Tr_cen[3][11]=8;Tr_cen[4][0]=6;Tr_cen[4][1]=7;Tr_cen[4][2]=9;Tr_cen[4][3]=11;Tr_cen[4][4]=12;Tr_cen[4][5]=13;Tr_cen[4][6]=14;Tr_cen[4][7]=13;Tr_cen[4][8]=12;Tr_cen[4][9]=11;Tr_cen[4][10]=9;Tr_cen[4][11]=6;Tr_cen[5][0]=4;Tr_cen[5][1]=5;Tr_cen[5][2]=7;Tr_cen[5][3]=9;Tr_cen[5][4]=10;Tr_cen[5][5]=11;Tr_cen[5][6]=12;Tr_cen[5][7]=11;Tr_cen[5][8]=10;Tr_cen[5][9]=9;Tr_cen[5][10]=7;Tr_cen[5][11]=4;Tr_cen[6][0]=6;Tr_cen[6][1]=7;Tr_cen[6][2]=9;Tr_cen[6][3]=11;Tr_cen[6][4]=12;Tr_cen[6][5]=13;Tr_cen[6][6]=14;Tr_cen[6][7]=13;Tr_cen[6][8]=12;Tr_cen[6][9]=11;Tr_cen[6][10]=9;Tr_cen[6][11]=6;Tr_cen[7][0]=8;Tr_cen[7][1]=9;Tr_cen[7][2]=11;Tr_cen[7][3]=13;Tr_cen[7][4]=14;Tr_cen[7][5]=15;Tr_cen[7][6]=16;Tr_cen[7][7]=15;Tr_cen[7][8]=14;Tr_cen[7][9]=13;Tr_cen[7][10]=11;Tr_cen[7][11]=8;Tr_cen[8][0]=8;Tr_cen[8][1]=9;Tr_cen[8][2]=11;Tr_cen[8][3]=13;Tr_cen[8][4]=14;Tr_cen[8][5]=15;Tr_cen[8][6]=16;Tr_cen[8][7]=15;Tr_cen[8][8]=14;Tr_cen[8][9]=13;Tr_cen[8][10]=11;Tr_cen[8][11]=8;Tr_cen[9][0]=4;Tr_cen[9][1]=5;Tr_cen[9][2]=7;Tr_cen[9][3]=9;Tr_cen[9][4]=10;Tr_cen[9][5]=11;Tr_cen[9][6]=12;Tr_cen[9][7]=11;Tr_cen[9][8]=10;Tr_cen[9][9]=9;Tr_cen[9][10]=7;Tr_cen[9][11]=4;Tr_cen[10][0]=6;Tr_cen[10][1]=7;Tr_cen[10][2]=9;Tr_cen[10][3]=11;Tr_cen[10][4]=12;Tr_cen[10][5]=13;Tr_cen[10][6]=14;Tr_cen[10][7]=13;Tr_cen[10][8]=12;Tr_cen[10][9]=11;Tr_cen[10][10]=9;Tr_cen[10][11]=6;Tr_cen[11][0]=8;Tr_cen[11][1]=9;Tr_cen[11][2]=11;Tr_cen[11][3]=13;Tr_cen[11][4]=14;Tr_cen[11][5]=15;Tr_cen[11][6]=16;Tr_cen[11][7]=15;Tr_cen[11][8]=14;Tr_cen[11][9]=13;Tr_cen[11][10]=11;Tr_cen[11][11]=8;Tr_cen[12][0]=8;Tr_cen[12][1]=9;Tr_cen[12][2]=11;Tr_cen[12][3]=13;Tr_cen[12][4]=14;Tr_cen[12][5]=15;Tr_cen[12][6]=16;Tr_cen[12][7]=15;Tr_cen[12][8]=14;Tr_cen[12][9]=13;Tr_cen[12][10]=11;Tr_cen[12][11]=8;Tr_cen[13][0]=8;Tr_cen[13][1]=9;Tr_cen[13][2]=11;Tr_cen[13][3]=13;Tr_cen[13][4]=14;Tr_cen[13][5]=15;Tr_cen[13][6]=16;Tr_cen[13][7]=15;Tr_cen[13][8]=14;Tr_cen[13][9]=13;Tr_cen[13][10]=11;Tr_cen[13][11]=8;Tr_cen[14][0]=8;Tr_cen[14][1]=9;Tr_cen[14][2]=10;Tr_cen[14][3]=12;Tr_cen[14][4]=13;Tr_cen[14][5]=13;Tr_cen[14][6]=14;Tr_cen[14][7]=13;Tr_cen[14][8]=11;Tr_cen[14][9]=12;Tr_cen[14][10]=11;Tr_cen[14][11]=8;Tr_cen[15][0]=5;Tr_cen[15][1]=6;Tr_cen[15][2]=8;Tr_cen[15][3]=10;Tr_cen[15][4]=11;Tr_cen[15][5]=12;Tr_cen[15][6]=13;Tr_cen[15][7]=12;Tr_cen[15][8]=11;Tr_cen[15][9]=10;Tr_cen[15][10]=8;Tr_cen[15][11]=5;Tr_cen[16][0]=6;Tr_cen[16][1]=7;Tr_cen[16][2]=9;Tr_cen[16][3]=11;Tr_cen[16][4]=12;Tr_cen[16][5]=13;Tr_cen[16][6]=14;Tr_cen[16][7]=13;Tr_cen[16][8]=12;Tr_cen[16][9]=11;Tr_cen[16][10]=9;Tr_cen[16][11]=6;Tr_cen[17][0]=4;Tr_cen[17][1]=5;Tr_cen[17][2]=7;Tr_cen[17][3]=9;Tr_cen[17][4]=10;Tr_cen[17][5]=11;Tr_cen[17][6]=12;Tr_cen[17][7]=11;Tr_cen[17][8]=10;Tr_cen[17][9]=9;Tr_cen[17][10]=7;Tr_cen[17][11]=4;Tr_cen[18][0]=6;Tr_cen[18][1]=7;Tr_cen[18][2]=9;Tr_cen[18][3]=11;Tr_cen[18][4]=12;Tr_cen[18][5]=13;Tr_cen[18][6]=14;Tr_cen[18][7]=13;Tr_cen[18][8]=12;Tr_cen[18][9]=11;Tr_cen[18][10]=9;Tr_cen[18][11]=6;Tr_cen[19][0]=6;Tr_cen[19][1]=7;Tr_cen[19][2]=9;Tr_cen[19][3]=11;Tr_cen[19][4]=12;Tr_cen[19][5]=13;Tr_cen[19][6]=14;Tr_cen[19][7]=13;Tr_cen[19][8]=12;Tr_cen[19][9]=11;Tr_cen[19][10]=9;Tr_cen[19][11]=6;Tr_cen[20][0]=6;Tr_cen[20][1]=7;Tr_cen[20][2]=9;Tr_cen[20][3]=11;Tr_cen[20][4]=12;Tr_cen[20][5]=13;Tr_cen[20][6]=14;Tr_cen[20][7]=13;Tr_cen[20][8]=12;Tr_cen[20][9]=11;Tr_cen[20][10]=9;Tr_cen[20][11]=6;Tr_cen[21][0]=8;Tr_cen[21][1]=9;Tr_cen[21][2]=11;Tr_cen[21][3]=13;Tr_cen[21][4]=14;Tr_cen[21][5]=15;Tr_cen[21][6]=16;Tr_cen[21][7]=15;Tr_cen[21][8]=14;Tr_cen[21][9]=13;Tr_cen[21][10]=11;Tr_cen[21][11]=8;Tr_cen[22][0]=8;Tr_cen[22][1]=9;Tr_cen[22][2]=11;Tr_cen[22][3]=13;Tr_cen[22][4]=14;Tr_cen[22][5]=15;Tr_cen[22][6]=16;Tr_cen[22][7]=15;Tr_cen[22][8]=14;Tr_cen[22][9]=13;Tr_cen[22][10]=11;Tr_cen[22][11]=8;Tr_cen[23][0]=5;Tr_cen[23][1]=6;Tr_cen[23][2]=8;Tr_cen[23][3]=10;Tr_cen[23][4]=11;Tr_cen[23][5]=12;Tr_cen[23][6]=13;Tr_cen[23][7]=12;Tr_cen[23][8]=11;Tr_cen[23][9]=10;Tr_cen[23][10]=8;Tr_cen[23][11]=5;Tr_cen[24][0]=8;Tr_cen[24][1]=9;Tr_cen[24][2]=11;Tr_cen[24][3]=13;Tr_cen[24][4]=14;Tr_cen[24][5]=15;Tr_cen[24][6]=17;Tr_cen[24][7]=16;Tr_cen[24][8]=14;Tr_cen[24][9]=13;Tr_cen[24][10]=11;Tr_cen[24][11]=7;Tr_cen[25][0]=8;Tr_cen[25][1]=9;Tr_cen[25][2]=11;Tr_cen[25][3]=13;Tr_cen[25][4]=14;Tr_cen[25][5]=15;Tr_cen[25][6]=16;Tr_cen[25][7]=15;Tr_cen[25][8]=14;Tr_cen[25][9]=13;Tr_cen[25][10]=11;Tr_cen[25][11]=8;Tr_cen[26][0]=6;Tr_cen[26][1]=7;Tr_cen[26][2]=9;Tr_cen[26][3]=11;Tr_cen[26][4]=12;Tr_cen[26][5]=13;Tr_cen[26][6]=14;Tr_cen[26][7]=13;Tr_cen[26][8]=12;Tr_cen[26][9]=11;Tr_cen[26][10]=9;Tr_cen[26][11]=6;Tr_cen[27][0]=8;Tr_cen[27][1]=9;Tr_cen[27][2]=11;Tr_cen[27][3]=13;Tr_cen[27][4]=14;Tr_cen[27][5]=15;Tr_cen[27][6]=16;Tr_cen[27][7]=15;Tr_cen[27][8]=14;Tr_cen[27][9]=13;Tr_cen[27][10]=11;Tr_cen[27][11]=8;Tr_cen[28][0]=4;Tr_cen[28][1]=5;Tr_cen[28][2]=7;Tr_cen[28][3]=9;Tr_cen[28][4]=10;Tr_cen[28][5]=11;Tr_cen[28][6]=12;Tr_cen[28][7]=11;Tr_cen[28][8]=10;Tr_cen[28][9]=9;Tr_cen[28][10]=7;Tr_cen[28][11]=4;Tr_cen[29][0]=5;Tr_cen[29][1]=6;Tr_cen[29][2]=8;Tr_cen[29][3]=10;Tr_cen[29][4]=11;Tr_cen[29][5]=12;Tr_cen[29][6]=13;Tr_cen[29][7]=12;Tr_cen[29][8]=11;Tr_cen[29][9]=10;Tr_cen[29][10]=8;Tr_cen[29][11]=5;Tr_cen[30][0]=6;Tr_cen[30][1]=7;Tr_cen[30][2]=9;Tr_cen[30][3]=11;Tr_cen[30][4]=12;Tr_cen[30][5]=13;Tr_cen[30][6]=14;Tr_cen[30][7]=13;Tr_cen[30][8]=12;Tr_cen[30][9]=11;Tr_cen[30][10]=9;Tr_cen[30][11]=6;Tr_cen[31][0]=6;Tr_cen[31][1]=7;Tr_cen[31][2]=9;Tr_cen[31][3]=11;Tr_cen[31][4]=12;Tr_cen[31][5]=13;Tr_cen[31][6]=14;Tr_cen[31][7]=13;Tr_cen[31][8]=12;Tr_cen[31][9]=11;Tr_cen[31][10]=9;Tr_cen[31][11]=6;Tr_cen[32][0]=8;Tr_cen[32][1]=9;Tr_cen[32][2]=11;Tr_cen[32][3]=13;Tr_cen[32][4]=14;Tr_cen[32][5]=15;Tr_cen[32][6]=16;Tr_cen[32][7]=15;Tr_cen[32][8]=14;Tr_cen[32][9]=13;Tr_cen[32][10]=11;Tr_cen[32][11]=8;Tr_cen[33][0]=8;Tr_cen[33][1]=9;Tr_cen[33][2]=11;Tr_cen[33][3]=13;Tr_cen[33][4]=14;Tr_cen[33][5]=15;Tr_cen[33][6]=16;Tr_cen[33][7]=15;Tr_cen[33][8]=14;Tr_cen[33][9]=13;Tr_cen[33][10]=11;Tr_cen[33][11]=8;Tr_cen[34][0]=8;Tr_cen[34][1]=9;Tr_cen[34][2]=11;Tr_cen[34][3]=13;Tr_cen[34][4]=14;Tr_cen[34][5]=15;Tr_cen[34][6]=16;Tr_cen[34][7]=15;Tr_cen[34][8]=14;Tr_cen[34][9]=13;Tr_cen[34][10]=11;Tr_cen[34][11]=8;Tr_cen[35][0]=5;Tr_cen[35][1]=6;Tr_cen[35][2]=8;Tr_cen[35][3]=10;Tr_cen[35][4]=11;Tr_cen[35][5]=12;Tr_cen[35][6]=13;Tr_cen[35][7]=12;Tr_cen[35][8]=11;Tr_cen[35][9]=10;Tr_cen[35][10]=8;Tr_cen[35][11]=5;Tr_cen[36][0]=5;Tr_cen[36][1]=7;Tr_cen[36][2]=9;Tr_cen[36][3]=11;Tr_cen[36][4]=12;Tr_cen[36][5]=13;Tr_cen[36][6]=14;Tr_cen[36][7]=13;Tr_cen[36][8]=12;Tr_cen[36][9]=11;Tr_cen[36][10]=9;Tr_cen[36][11]=6;Tr_cen[37][0]=5;Tr_cen[37][1]=6;Tr_cen[37][2]=8;Tr_cen[37][3]=10;Tr_cen[37][4]=11;Tr_cen[37][5]=12;Tr_cen[37][6]=13;Tr_cen[37][7]=12;Tr_cen[37][8]=11;Tr_cen[37][9]=10;Tr_cen[37][10]=8;Tr_cen[37][11]=5;Tr_cen[38][0]=8;Tr_cen[38][1]=9;Tr_cen[38][2]=11;Tr_cen[38][3]=13;Tr_cen[38][4]=14;Tr_cen[38][5]=15;Tr_cen[38][6]=16;Tr_cen[38][7]=15;Tr_cen[38][8]=14;Tr_cen[38][9]=13;Tr_cen[38][10]=11;Tr_cen[38][11]=8;Tr_cen[39][0]=5;Tr_cen[39][1]=6;Tr_cen[39][2]=8;Tr_cen[39][3]=10;Tr_cen[39][4]=11;Tr_cen[39][5]=12;Tr_cen[39][6]=13;Tr_cen[39][7]=12;Tr_cen[39][8]=11;Tr_cen[39][9]=10;Tr_cen[39][10]=8;Tr_cen[39][11]=5;Tr_cen[40][0]=4;Tr_cen[40][1]=5;Tr_cen[40][2]=7;Tr_cen[40][3]=9;Tr_cen[40][4]=10;Tr_cen[40][5]=11;Tr_cen[40][6]=12;Tr_cen[40][7]=11;Tr_cen[40][8]=10;Tr_cen[40][9]=9;Tr_cen[40][10]=7;Tr_cen[40][11]=4;Tr_cen[41][0]=8;Tr_cen[41][1]=9;Tr_cen[41][2]=11;Tr_cen[41][3]=13;Tr_cen[41][4]=14;Tr_cen[41][5]=15;Tr_cen[41][6]=16;Tr_cen[41][7]=15;Tr_cen[41][8]=14;Tr_cen[41][9]=13;Tr_cen[41][10]=11;Tr_cen[41][11]=8;Tr_cen[42][0]=4;Tr_cen[42][1]=5;Tr_cen[42][2]=7;Tr_cen[42][3]=9;Tr_cen[42][4]=10;Tr_cen[42][5]=11;Tr_cen[42][6]=12;Tr_cen[42][7]=11;Tr_cen[42][8]=10;Tr_cen[42][9]=9;Tr_cen[42][10]=7;Tr_cen[42][11]=4;Tr_cen[43][0]=8;Tr_cen[43][1]=9;Tr_cen[43][2]=11;Tr_cen[43][3]=13;Tr_cen[43][4]=14;Tr_cen[43][5]=15;Tr_cen[43][6]=16;Tr_cen[43][7]=15;Tr_cen[43][8]=14;Tr_cen[43][9]=13;Tr_cen[43][10]=11;Tr_cen[43][11]=8;Tr_cen[44][0]=6;Tr_cen[44][1]=7;Tr_cen[44][2]=9;Tr_cen[44][3]=11;Tr_cen[44][4]=12;Tr_cen[44][5]=13;Tr_cen[44][6]=14;Tr_cen[44][7]=13;Tr_cen[44][8]=12;Tr_cen[44][9]=11;Tr_cen[44][10]=9;Tr_cen[44][11]=6;Tr_cen[45][0]=4;Tr_cen[45][1]=5;Tr_cen[45][2]=7;Tr_cen[45][3]=9;Tr_cen[45][4]=10;Tr_cen[45][5]=11;Tr_cen[45][6]=12;Tr_cen[45][7]=11;Tr_cen[45][8]=10;Tr_cen[45][9]=9;Tr_cen[45][10]=7;Tr_cen[45][11]=4;Tr_cen[46][0]=6;Tr_cen[46][1]=7;Tr_cen[46][2]=9;Tr_cen[46][3]=11;Tr_cen[46][4]=12;Tr_cen[46][5]=13;Tr_cen[46][6]=14;Tr_cen[46][7]=13;Tr_cen[46][8]=12;Tr_cen[46][9]=11;Tr_cen[46][10]=9;Tr_cen[46][11]=6;Tr_cen[47][0]=8;Tr_cen[47][1]=9;Tr_cen[47][2]=11;Tr_cen[47][3]=13;Tr_cen[47][4]=14;Tr_cen[47][5]=15;Tr_cen[47][6]=16;Tr_cen[47][7]=15;Tr_cen[47][8]=14;Tr_cen[47][9]=13;Tr_cen[47][10]=11;Tr_cen[47][11]=8;Tr_cen[48][0]=5;Tr_cen[48][1]=6;Tr_cen[48][2]=8;Tr_cen[48][3]=10;Tr_cen[48][4]=11;Tr_cen[48][5]=12;Tr_cen[48][6]=13;Tr_cen[48][7]=12;Tr_cen[48][8]=11;Tr_cen[48][9]=10;Tr_cen[48][10]=8;Tr_cen[48][11]=5;Tr_cen[49][0]=6;Tr_cen[49][1]=7;Tr_cen[49][2]=9;Tr_cen[49][3]=11;Tr_cen[49][4]=12;Tr_cen[49][5]=13;Tr_cen[49][6]=14;Tr_cen[49][7]=13;Tr_cen[49][8]=12;Tr_cen[49][9]=11;Tr_cen[49][10]=9;Tr_cen[49][11]=6;Tr_cen[50][0]=5;Tr_cen[50][1]=6;Tr_cen[50][2]=8;Tr_cen[50][3]=10;Tr_cen[50][4]=11;Tr_cen[50][5]=12;Tr_cen[50][6]=13;Tr_cen[50][7]=12;Tr_cen[50][8]=11;Tr_cen[50][9]=10;Tr_cen[50][10]=8;Tr_cen[50][11]=5;Tr_cen[51][0]=5;Tr_cen[51][1]=6;Tr_cen[51][2]=8;Tr_cen[51][3]=10;Tr_cen[51][4]=11;Tr_cen[51][5]=12;Tr_cen[51][6]=13;Tr_cen[51][7]=12;Tr_cen[51][8]=11;Tr_cen[51][9]=10;Tr_cen[51][10]=8;Tr_cen[51][11]=5;

Ta_eren[0][0]=-1.0;Ta_eren[0][1]=-1.0;Ta_eren[0][2]=-1.0;Ta_eren[0][3]=-1.0;Ta_eren[0][4]=-1.0;Ta_eren[0][5]=-1.0;Ta_eren[0][6]=-1.0;Ta_eren[0][7]=-1.0;Ta_eren[0][8]=-1.0;Ta_eren[0][9]=-1.0;Ta_eren[0][10]=-1.0;Ta_eren[0][11]=-1.0;Ta_eren[1][0]=-1.0;Ta_eren[1][1]=-1.0;Ta_eren[1][2]=-1.0;Ta_eren[1][3]=-1.0;Ta_eren[1][4]=-1.0;Ta_eren[1][5]=-1.0;Ta_eren[1][6]=-1.0;Ta_eren[1][7]=-1.0;Ta_eren[1][8]=-1.0;Ta_eren[1][9]=-1.0;Ta_eren[1][10]=-1.0;Ta_eren[1][11]=-1.0;Ta_eren[2][0]=-1.0;Ta_eren[2][1]=-1.0;Ta_eren[2][2]=-1.0;Ta_eren[2][3]=-1.0;Ta_eren[2][4]=-1.0;Ta_eren[2][5]=-1.0;Ta_eren[2][6]=-1.0;Ta_eren[2][7]=-1.0;Ta_eren[2][8]=-1.0;Ta_eren[2][9]=-1.0;Ta_eren[2][10]=-1.0;Ta_eren[2][11]=-1.0;Ta_eren[3][0]=-1.0;Ta_eren[3][1]=-1.0;Ta_eren[3][2]=-1.0;Ta_eren[3][3]=-1.0;Ta_eren[3][4]=-1.0;Ta_eren[3][5]=-1.0;Ta_eren[3][6]=-1.0;Ta_eren[3][7]=-1.0;Ta_eren[3][8]=-1.0;Ta_eren[3][9]=-1.0;Ta_eren[3][10]=-1.0;Ta_eren[3][11]=-1.0;Ta_eren[4][0]=-1.0;Ta_eren[4][1]=-1.0;Ta_eren[4][2]=-1.0;Ta_eren[4][3]=-1.0;Ta_eren[4][4]=-1.0;Ta_eren[4][5]=-1.0;Ta_eren[4][6]=-1.0;Ta_eren[4][7]=-1.0;Ta_eren[4][8]=-1.0;Ta_eren[4][9]=-1.0;Ta_eren[4][10]=-1.0;Ta_eren[4][11]=-1.0;Ta_eren[5][0]=3.5;Ta_eren[5][1]=4.4;Ta_eren[5][2]=7.5;Ta_eren[5][3]=10.1;Ta_eren[5][4]=13.7;Ta_eren[5][5]=18.1;Ta_eren[5][6]=21.9;Ta_eren[5][7]=21.6;Ta_eren[5][8]=17.9;Ta_eren[5][9]=11.9;Ta_eren[5][10]=7.2;Ta_eren[5][11]=4.1;Ta_eren[6][0]=-1.0;Ta_eren[6][1]=-1.0;Ta_eren[6][2]=-1.0;Ta_eren[6][3]=-1.0;Ta_eren[6][4]=-1.0;Ta_eren[6][5]=-1.0;Ta_eren[6][6]=-1.0;Ta_eren[6][7]=-1.0;Ta_eren[6][8]=-1.0;Ta_eren[6][9]=-1.0;Ta_eren[6][10]=-1.0;Ta_eren[6][11]=-1.0;Ta_eren[7][0]=-1.0;Ta_eren[7][1]=-1.0;Ta_eren[7][2]=-1.0;Ta_eren[7][3]=-1.0;Ta_eren[7][4]=-1.0;Ta_eren[7][5]=-1.0;Ta_eren[7][6]=-1.0;Ta_eren[7][7]=-1.0;Ta_eren[7][8]=-1.0;Ta_eren[7][9]=-1.0;Ta_eren[7][10]=-1.0;Ta_eren[7][11]=-1.0;Ta_eren[8][0]=-1.0;Ta_eren[8][1]=-1.0;Ta_eren[8][2]=-1.0;Ta_eren[8][3]=-1.0;Ta_eren[8][4]=-1.0;Ta_eren[8][5]=-1.0;Ta_eren[8][6]=-1.0;Ta_eren[8][7]=-1.0;Ta_eren[8][8]=-1.0;Ta_eren[8][9]=-1.0;Ta_eren[8][10]=-1.0;Ta_eren[8][11]=-1.0;Ta_eren[9][0]=3.3;Ta_eren[9][1]=4.7;Ta_eren[9][2]=8.4;Ta_eren[9][3]=10.6;Ta_eren[9][4]=13.7;Ta_eren[9][5]=17.9;Ta_eren[9][6]=20.9;Ta_eren[9][7]=20.5;Ta_eren[9][8]=17.7;Ta_eren[9][9]=12.5;Ta_eren[9][10]=7.3;Ta_eren[9][11]=4.1;Ta_eren[10][0]=-1.0;Ta_eren[10][1]=-1.0;Ta_eren[10][2]=-1.0;Ta_eren[10][3]=-1.0;Ta_eren[10][4]=-1.0;Ta_eren[10][5]=-1.0;Ta_eren[10][6]=-1.0;Ta_eren[10][7]=-1.0;Ta_eren[10][8]=-1.0;Ta_eren[10][9]=-1.0;Ta_eren[10][10]=-1.0;Ta_eren[10][11]=-1.0;Ta_eren[11][0]=-1.0;Ta_eren[11][1]=-1.0;Ta_eren[11][2]=-1.0;Ta_eren[11][3]=-1.0;Ta_eren[11][4]=-1.0;Ta_eren[11][5]=-1.0;Ta_eren[11][6]=-1.0;Ta_eren[11][7]=-1.0;Ta_eren[11][8]=-1.0;Ta_eren[11][9]=-1.0;Ta_eren[11][10]=-1.0;Ta_eren[11][11]=-1.0;Ta_eren[12][0]=-1.0;Ta_eren[12][1]=-1.0;Ta_eren[12][2]=-1.0;Ta_eren[12][3]=-1.0;Ta_eren[12][4]=-1.0;Ta_eren[12][5]=-1.0;Ta_eren[12][6]=-1.0;Ta_eren[12][7]=-1.0;Ta_eren[12][8]=-1.0;Ta_eren[12][9]=-1.0;Ta_eren[12][10]=-1.0;Ta_eren[12][11]=-1.0;Ta_eren[13][0]=-1.0;Ta_eren[13][1]=-1.0;Ta_eren[13][2]=-1.0;Ta_eren[13][3]=-1.0;Ta_eren[13][4]=-1.0;Ta_eren[13][5]=-1.0;Ta_eren[13][6]=-1.0;Ta_eren[13][7]=-1.0;Ta_eren[13][8]=-1.0;Ta_eren[13][9]=-1.0;Ta_eren[13][10]=-1.0;Ta_eren[13][11]=-1.0;Ta_eren[14][0]=-1.0;Ta_eren[14][1]=-1.0;Ta_eren[14][2]=-1.0;Ta_eren[14][3]=-1.0;Ta_eren[14][4]=-1.0;Ta_eren[14][5]=-1.0;Ta_eren[14][6]=-1.0;Ta_eren[14][7]=-1.0;Ta_eren[14][8]=-1.0;Ta_eren[14][9]=-1.0;Ta_eren[14][10]=-1.0;Ta_eren[14][11]=-1.0;Ta_eren[15][0]=-1.0;Ta_eren[15][1]=-1.0;Ta_eren[15][2]=-1.0;Ta_eren[15][3]=-1.0;Ta_eren[15][4]=-1.0;Ta_eren[15][5]=-1.0;Ta_eren[15][6]=-1.0;Ta_eren[15][7]=-1.0;Ta_eren[15][8]=-1.0;Ta_eren[15][9]=-1.0;Ta_eren[15][10]=-1.0;Ta_eren[15][11]=-1.0;Ta_eren[16][0]=-1.0;Ta_eren[16][1]=-1.0;Ta_eren[16][2]=-1.0;Ta_eren[16][3]=-1.0;Ta_eren[16][4]=-1.0;Ta_eren[16][5]=-1.0;Ta_eren[16][6]=-1.0;Ta_eren[16][7]=-1.0;Ta_eren[16][8]=-1.0;Ta_eren[16][9]=-1.0;Ta_eren[16][10]=-1.0;Ta_eren[16][11]=-1.0;Ta_eren[17][0]=-1.0;Ta_eren[17][1]=-1.0;Ta_eren[17][2]=-1.0;Ta_eren[17][3]=-1.0;Ta_eren[17][4]=-1.0;Ta_eren[17][5]=-1.0;Ta_eren[17][6]=-1.0;Ta_eren[17][7]=-1.0;Ta_eren[17][8]=-1.0;Ta_eren[17][9]=-1.0;Ta_eren[17][10]=-1.0;Ta_eren[17][11]=-1.0;Ta_eren[18][0]=-1.0;Ta_eren[18][1]=-1.0;Ta_eren[18][2]=-1.0;Ta_eren[18][3]=-1.0;Ta_eren[18][4]=-1.0;Ta_eren[18][5]=-1.0;Ta_eren[18][6]=-1.0;Ta_eren[18][7]=-1.0;Ta_eren[18][8]=-1.0;Ta_eren[18][9]=-1.0;Ta_eren[18][10]=-1.0;Ta_eren[18][11]=-1.0;Ta_eren[19][0]=-1.0;Ta_eren[19][1]=-1.0;Ta_eren[19][2]=-1.0;Ta_eren[19][3]=-1.0;Ta_eren[19][4]=-1.0;Ta_eren[19][5]=-1.0;Ta_eren[19][6]=-1.0;Ta_eren[19][7]=-1.0;Ta_eren[19][8]=-1.0;Ta_eren[19][9]=-1.0;Ta_eren[19][10]=-1.0;Ta_eren[19][11]=-1.0;Ta_eren[20][0]=-1.0;Ta_eren[20][1]=-1.0;Ta_eren[20][2]=-1.0;Ta_eren[20][3]=-1.0;Ta_eren[20][4]=-1.0;Ta_eren[20][5]=-1.0;Ta_eren[20][6]=-1.0;Ta_eren[20][7]=-1.0;Ta_eren[20][8]=-1.0;Ta_eren[20][9]=-1.0;Ta_eren[20][10]=-1.0;Ta_eren[20][11]=-1.0;Ta_eren[21][0]=-1.0;Ta_eren[21][1]=-1.0;Ta_eren[21][2]=-1.0;Ta_eren[21][3]=-1.0;Ta_eren[21][4]=-1.0;Ta_eren[21][5]=-1.0;Ta_eren[21][6]=-1.0;Ta_eren[21][7]=-1.0;Ta_eren[21][8]=-1.0;Ta_eren[21][9]=-1.0;Ta_eren[21][10]=-1.0;Ta_eren[21][11]=-1.0;Ta_eren[22][0]=-1.0;Ta_eren[22][1]=-1.0;Ta_eren[22][2]=-1.0;Ta_eren[22][3]=-1.0;Ta_eren[22][4]=-1.0;Ta_eren[22][5]=-1.0;Ta_eren[22][6]=-1.0;Ta_eren[22][7]=-1.0;Ta_eren[22][8]=-1.0;Ta_eren[22][9]=-1.0;Ta_eren[22][10]=-1.0;Ta_eren[22][11]=-1.0;Ta_eren[23][0]=-1.0;Ta_eren[23][1]=-1.0;Ta_eren[23][2]=-1.0;Ta_eren[23][3]=-1.0;Ta_eren[23][4]=-1.0;Ta_eren[23][5]=-1.0;Ta_eren[23][6]=-1.0;Ta_eren[23][7]=-1.0;Ta_eren[23][8]=-1.0;Ta_eren[23][9]=-1.0;Ta_eren[23][10]=-1.0;Ta_eren[23][11]=-1.0;Ta_eren[24][0]=-1.0;Ta_eren[24][1]=-1.0;Ta_eren[24][2]=-1.0;Ta_eren[24][3]=-1.0;Ta_eren[24][4]=-1.0;Ta_eren[24][5]=-1.0;Ta_eren[24][6]=-1.0;Ta_eren[24][7]=-1.0;Ta_eren[24][8]=-1.0;Ta_eren[24][9]=-1.0;Ta_eren[24][10]=-1.0;Ta_eren[24][11]=-1.0;Ta_eren[25][0]=-1.0;Ta_eren[25][1]=-1.0;Ta_eren[25][2]=-1.0;Ta_eren[25][3]=-1.0;Ta_eren[25][4]=-1.0;Ta_eren[25][5]=-1.0;Ta_eren[25][6]=-1.0;Ta_eren[25][7]=-1.0;Ta_eren[25][8]=-1.0;Ta_eren[25][9]=-1.0;Ta_eren[25][10]=-1.0;Ta_eren[25][11]=-1.0;Ta_eren[26][0]=-1.0;Ta_eren[26][1]=-1.0;Ta_eren[26][2]=-1.0;Ta_eren[26][3]=-1.0;Ta_eren[26][4]=-1.0;Ta_eren[26][5]=-1.0;Ta_eren[26][6]=-1.0;Ta_eren[26][7]=-1.0;Ta_eren[26][8]=-1.0;Ta_eren[26][9]=-1.0;Ta_eren[26][10]=-1.0;Ta_eren[26][11]=-1.0;Ta_eren[27][0]=-1.0;Ta_eren[27][1]=-1.0;Ta_eren[27][2]=-1.0;Ta_eren[27][3]=-1.0;Ta_eren[27][4]=-1.0;Ta_eren[27][5]=-1.0;Ta_eren[27][6]=-1.0;Ta_eren[27][7]=-1.0;Ta_eren[27][8]=-1.0;Ta_eren[27][9]=-1.0;Ta_eren[27][10]=-1.0;Ta_eren[27][11]=-1.0;Ta_eren[28][0]=3.9;Ta_eren[28][1]=5.5;Ta_eren[28][2]=9.1;Ta_eren[28][3]=11.5;Ta_eren[28][4]=14.2;Ta_eren[28][5]=19.2;Ta_eren[28][6]=22.0;Ta_eren[28][7]=21.6;Ta_eren[28][8]=18.5;Ta_eren[28][9]=13.3;Ta_eren[28][10]=8.3;Ta_eren[28][11]=4.6;Ta_eren[29][0]=-1.0;Ta_eren[29][1]=-1.0;Ta_eren[29][2]=-1.0;Ta_eren[29][3]=-1.0;Ta_eren[29][4]=-1.0;Ta_eren[29][5]=-1.0;Ta_eren[29][6]=-1.0;Ta_eren[29][7]=-1.0;Ta_eren[29][8]=-1.0;Ta_eren[29][9]=-1.0;Ta_eren[29][10]=-1.0;Ta_eren[29][11]=-1.0;Ta_eren[30][0]=-1.0;Ta_eren[30][1]=-1.0;Ta_eren[30][2]=-1.0;Ta_eren[30][3]=-1.0;Ta_eren[30][4]=-1.0;Ta_eren[30][5]=-1.0;Ta_eren[30][6]=-1.0;Ta_eren[30][7]=-1.0;Ta_eren[30][8]=-1.0;Ta_eren[30][9]=-1.0;Ta_eren[30][10]=-1.0;Ta_eren[30][11]=-1.0;Ta_eren[31][0]=-1.0;Ta_eren[31][1]=-1.0;Ta_eren[31][2]=-1.0;Ta_eren[31][3]=-1.0;Ta_eren[31][4]=-1.0;Ta_eren[31][5]=-1.0;Ta_eren[31][6]=-1.0;Ta_eren[31][7]=-1.0;Ta_eren[31][8]=-1.0;Ta_eren[31][9]=-1.0;Ta_eren[31][10]=-1.0;Ta_eren[31][11]=-1.0;Ta_eren[32][0]=-1.0;Ta_eren[32][1]=-1.0;Ta_eren[32][2]=-1.0;Ta_eren[32][3]=-1.0;Ta_eren[32][4]=-1.0;Ta_eren[32][5]=-1.0;Ta_eren[32][6]=-1.0;Ta_eren[32][7]=-1.0;Ta_eren[32][8]=-1.0;Ta_eren[32][9]=-1.0;Ta_eren[32][10]=-1.0;Ta_eren[32][11]=-1.0;Ta_eren[33][0]=-1.0;Ta_eren[33][1]=-1.0;Ta_eren[33][2]=-1.0;Ta_eren[33][3]=-1.0;Ta_eren[33][4]=-1.0;Ta_eren[33][5]=-1.0;Ta_eren[33][6]=-1.0;Ta_eren[33][7]=-1.0;Ta_eren[33][8]=-1.0;Ta_eren[33][9]=-1.0;Ta_eren[33][10]=-1.0;Ta_eren[33][11]=-1.0;Ta_eren[34][0]=-1.0;Ta_eren[34][1]=-1.0;Ta_eren[34][2]=-1.0;Ta_eren[34][3]=-1.0;Ta_eren[34][4]=-1.0;Ta_eren[34][5]=-1.0;Ta_eren[34][6]=-1.0;Ta_eren[34][7]=-1.0;Ta_eren[34][8]=-1.0;Ta_eren[34][9]=-1.0;Ta_eren[34][10]=-1.0;Ta_eren[34][11]=-1.0;Ta_eren[35][0]=-1.0;Ta_eren[35][1]=-1.0;Ta_eren[35][2]=-1.0;Ta_eren[35][3]=-1.0;Ta_eren[35][4]=-1.0;Ta_eren[35][5]=-1.0;Ta_eren[35][6]=-1.0;Ta_eren[35][7]=-1.0;Ta_eren[35][8]=-1.0;Ta_eren[35][9]=-1.0;Ta_eren[35][10]=-1.0;Ta_eren[35][11]=-1.0;Ta_eren[36][0]=-1.0;Ta_eren[36][1]=-1.0;Ta_eren[36][2]=-1.0;Ta_eren[36][3]=-1.0;Ta_eren[36][4]=-1.0;Ta_eren[36][5]=-1.0;Ta_eren[36][6]=-1.0;Ta_eren[36][7]=-1.0;Ta_eren[36][8]=-1.0;Ta_eren[36][9]=-1.0;Ta_eren[36][10]=-1.0;Ta_eren[36][11]=-1.0;Ta_eren[37][0]=4.2;Ta_eren[37][1]=5.8;Ta_eren[37][2]=9.6;Ta_eren[37][3]=12.1;Ta_eren[37][4]=15.2;Ta_eren[37][5]=20.0;Ta_eren[37][6]=23.2;Ta_eren[37][7]=22.8;Ta_eren[37][8]=19.4;Ta_eren[37][9]=13.7;Ta_eren[37][10]=8.3;Ta_eren[37][11]=4.7;Ta_eren[38][0]=-1.0;Ta_eren[38][1]=-1.0;Ta_eren[38][2]=-1.0;Ta_eren[38][3]=-1.0;Ta_eren[38][4]=-1.0;Ta_eren[38][5]=-1.0;Ta_eren[38][6]=-1.0;Ta_eren[38][7]=-1.0;Ta_eren[38][8]=-1.0;Ta_eren[38][9]=-1.0;Ta_eren[38][10]=-1.0;Ta_eren[38][11]=-1.0;Ta_eren[39][0]=4.2;Ta_eren[39][1]=6.4;Ta_eren[39][2]=9.8;Ta_eren[39][3]=12.3;Ta_eren[39][4]=15.4;Ta_eren[39][5]=20.4;Ta_eren[39][6]=23.7;Ta_eren[39][7]=23.6;Ta_eren[39][8]=20.1;Ta_eren[39][9]=14.1;Ta_eren[39][10]=8.9;Ta_eren[39][11]=5.4;Ta_eren[40][0]=3.2;Ta_eren[40][1]=5.0;Ta_eren[40][2]=8.9;Ta_eren[40][3]=11.6;Ta_eren[40][4]=14.7;Ta_eren[40][5]=20.1;Ta_eren[40][6]=23.8;Ta_eren[40][7]=23.3;Ta_eren[40][8]=19.2;Ta_eren[40][9]=13.1;Ta_eren[40][10]=7.6;Ta_eren[40][11]=4.0;Ta_eren[41][0]=-1.0;Ta_eren[41][1]=-1.0;Ta_eren[41][2]=-1.0;Ta_eren[41][3]=-1.0;Ta_eren[41][4]=-1.0;Ta_eren[41][5]=-1.0;Ta_eren[41][6]=-1.0;Ta_eren[41][7]=-1.0;Ta_eren[41][8]=-1.0;Ta_eren[41][9]=-1.0;Ta_eren[41][10]=-1.0;Ta_eren[41][11]=-1.0;Ta_eren[42][0]=3.4;Ta_eren[42][1]=4.8;Ta_eren[42][2]=7.9;Ta_eren[42][3]=10.5;Ta_eren[42][4]=13.5;Ta_eren[42][5]=18.4;Ta_eren[42][6]=21.7;Ta_eren[42][7]=21.6;Ta_eren[42][8]=18.2;Ta_eren[42][9]=12.5;Ta_eren[42][10]=7.5;Ta_eren[42][11]=4.2;Ta_eren[43][0]=-1.0;Ta_eren[43][1]=-1.0;Ta_eren[43][2]=-1.0;Ta_eren[43][3]=-1.0;Ta_eren[43][4]=-1.0;Ta_eren[43][5]=-1.0;Ta_eren[43][6]=-1.0;Ta_eren[43][7]=-1.0;Ta_eren[43][8]=-1.0;Ta_eren[43][9]=-1.0;Ta_eren[43][10]=-1.0;Ta_eren[43][11]=-1.0;Ta_eren[44][0]=-1.0;Ta_eren[44][1]=-1.0;Ta_eren[44][2]=-1.0;Ta_eren[44][3]=-1.0;Ta_eren[44][4]=-1.0;Ta_eren[44][5]=-1.0;Ta_eren[44][6]=-1.0;Ta_eren[44][7]=-1.0;Ta_eren[44][8]=-1.0;Ta_eren[44][9]=-1.0;Ta_eren[44][10]=-1.0;Ta_eren[44][11]=-1.0;Ta_eren[45][0]=-1.0;Ta_eren[45][1]=-1.0;Ta_eren[45][2]=-1.0;Ta_eren[45][3]=-1.0;Ta_eren[45][4]=-1.0;Ta_eren[45][5]=-1.0;Ta_eren[45][6]=-1.0;Ta_eren[45][7]=-1.0;Ta_eren[45][8]=-1.0;Ta_eren[45][9]=-1.0;Ta_eren[45][10]=-1.0;Ta_eren[45][11]=-1.0;Ta_eren[46][0]=-1.0;Ta_eren[46][1]=-1.0;Ta_eren[46][2]=-1.0;Ta_eren[46][3]=-1.0;Ta_eren[46][4]=-1.0;Ta_eren[46][5]=-1.0;Ta_eren[46][6]=-1.0;Ta_eren[46][7]=-1.0;Ta_eren[46][8]=-1.0;Ta_eren[46][9]=-1.0;Ta_eren[46][10]=-1.0;Ta_eren[46][11]=-1.0;Ta_eren[47][0]=-1.0;Ta_eren[47][1]=-1.0;Ta_eren[47][2]=-1.0;Ta_eren[47][3]=-1.0;Ta_eren[47][4]=-1.0;Ta_eren[47][5]=-1.0;Ta_eren[47][6]=-1.0;Ta_eren[47][7]=-1.0;Ta_eren[47][8]=-1.0;Ta_eren[47][9]=-1.0;Ta_eren[47][10]=-1.0;Ta_eren[47][11]=-1.0;Ta_eren[48][0]=4.5;Ta_eren[48][1]=6.3;Ta_eren[48][2]=10.1;Ta_eren[48][3]=12.5;Ta_eren[48][4]=15.5;Ta_eren[48][5]=20.4;Ta_eren[48][6]=23.4;Ta_eren[48][7]=22.8;Ta_eren[48][8]=19.6;Ta_eren[48][9]=14.2;Ta_eren[48][10]=8.9;Ta_eren[48][11]=5.2;Ta_eren[49][0]=-1.0;Ta_eren[49][1]=-1.0;Ta_eren[49][2]=-1.0;Ta_eren[49][3]=-1.0;Ta_eren[49][4]=-1.0;Ta_eren[49][5]=-1.0;Ta_eren[49][6]=-1.0;Ta_eren[49][7]=-1.0;Ta_eren[49][8]=-1.0;Ta_eren[49][9]=-1.0;Ta_eren[49][10]=-1.0;Ta_eren[49][11]=-1.0;Ta_eren[50][0]=4.3;Ta_eren[50][1]=6.2;Ta_eren[50][2]=10.2;Ta_eren[50][3]=12.7;Ta_eren[50][4]=15.4;Ta_eren[50][5]=20.6;Ta_eren[50][6]=23.7;Ta_eren[50][7]=22.4;Ta_eren[50][8]=19.3;Ta_eren[50][9]=14.1;Ta_eren[50][10]=9.1;Ta_eren[50][11]=5.0;Ta_eren[51][0]=-1.0;Ta_eren[51][1]=-1.0;Ta_eren[51][2]=-1.0;Ta_eren[51][3]=-1.0;Ta_eren[51][4]=-1.0;Ta_eren[51][5]=-1.0;Ta_eren[51][6]=-1.0;Ta_eren[51][7]=-1.0;Ta_eren[51][8]=-1.0;Ta_eren[51][9]=-1.0;Ta_eren[51][10]=-1.0;Ta_eren[51][11]=-1.0;

Tr_eren[0][0]=-1;Tr_eren[0][1]=-1;Tr_eren[0][2]=-1;Tr_eren[0][3]=-1;Tr_eren[0][4]=-1;Tr_eren[0][5]=-1;Tr_eren[0][6]=-1;Tr_eren[0][7]=-1;Tr_eren[0][8]=-1;Tr_eren[0][9]=-1;Tr_eren[0][10]=-1;Tr_eren[0][11]=-1;Tr_eren[1][0]=-1;Tr_eren[1][1]=-1;Tr_eren[1][2]=-1;Tr_eren[1][3]=-1;Tr_eren[1][4]=-1;Tr_eren[1][5]=-1;Tr_eren[1][6]=-1;Tr_eren[1][7]=-1;Tr_eren[1][8]=-1;Tr_eren[1][9]=-1;Tr_eren[1][10]=-1;Tr_eren[1][11]=-1;Tr_eren[2][0]=-1;Tr_eren[2][1]=-1;Tr_eren[2][2]=-1;Tr_eren[2][3]=-1;Tr_eren[2][4]=-1;Tr_eren[2][5]=-1;Tr_eren[2][6]=-1;Tr_eren[2][7]=-1;Tr_eren[2][8]=-1;Tr_eren[2][9]=-1;Tr_eren[2][10]=-1;Tr_eren[2][11]=-1;Tr_eren[3][0]=-1;Tr_eren[3][1]=-1;Tr_eren[3][2]=-1;Tr_eren[3][3]=-1;Tr_eren[3][4]=-1;Tr_eren[3][5]=-1;Tr_eren[3][6]=-1;Tr_eren[3][7]=-1;Tr_eren[3][8]=-1;Tr_eren[3][9]=-1;Tr_eren[3][10]=-1;Tr_eren[3][11]=-1;Tr_eren[4][0]=-1;Tr_eren[4][1]=-1;Tr_eren[4][2]=-1;Tr_eren[4][3]=-1;Tr_eren[4][4]=-1;Tr_eren[4][5]=-1;Tr_eren[4][6]=-1;Tr_eren[4][7]=-1;Tr_eren[4][8]=-1;Tr_eren[4][9]=-1;Tr_eren[4][10]=-1;Tr_eren[4][11]=-1;Tr_eren[5][0]=8;Tr_eren[5][1]=8;Tr_eren[5][2]=10;Tr_eren[5][3]=12;Tr_eren[5][4]=14;Tr_eren[5][5]=16;Tr_eren[5][6]=18;Tr_eren[5][7]=18;Tr_eren[5][8]=16;Tr_eren[5][9]=14;Tr_eren[5][10]=12;Tr_eren[5][11]=10;Tr_eren[6][0]=-1;Tr_eren[6][1]=-1;Tr_eren[6][2]=-1;Tr_eren[6][3]=-1;Tr_eren[6][4]=-1;Tr_eren[6][5]=-1;Tr_eren[6][6]=-1;Tr_eren[6][7]=-1;Tr_eren[6][8]=-1;Tr_eren[6][9]=-1;Tr_eren[6][10]=-1;Tr_eren[6][11]=-1;Tr_eren[7][0]=-1;Tr_eren[7][1]=-1;Tr_eren[7][2]=-1;Tr_eren[7][3]=-1;Tr_eren[7][4]=-1;Tr_eren[7][5]=-1;Tr_eren[7][6]=-1;Tr_eren[7][7]=-1;Tr_eren[7][8]=-1;Tr_eren[7][9]=-1;Tr_eren[7][10]=-1;Tr_eren[7][11]=-1;Tr_eren[8][0]=-1;Tr_eren[8][1]=-1;Tr_eren[8][2]=-1;Tr_eren[8][3]=-1;Tr_eren[8][4]=-1;Tr_eren[8][5]=-1;Tr_eren[8][6]=-1;Tr_eren[8][7]=-1;Tr_eren[8][8]=-1;Tr_eren[8][9]=-1;Tr_eren[8][10]=-1;Tr_eren[8][11]=-1;Tr_eren[9][0]=8;Tr_eren[9][1]=9;Tr_eren[9][2]=10;Tr_eren[9][3]=11;Tr_eren[9][4]=13;Tr_eren[9][5]=15;Tr_eren[9][6]=17;Tr_eren[9][7]=17;Tr_eren[9][8]=15;Tr_eren[9][9]=13;Tr_eren[9][10]=11;Tr_eren[9][11]=10;Tr_eren[10][0]=-1;Tr_eren[10][1]=-1;Tr_eren[10][2]=-1;Tr_eren[10][3]=-1;Tr_eren[10][4]=-1;Tr_eren[10][5]=-1;Tr_eren[10][6]=-1;Tr_eren[10][7]=-1;Tr_eren[10][8]=-1;Tr_eren[10][9]=-1;Tr_eren[10][10]=-1;Tr_eren[10][11]=-1;Tr_eren[11][0]=-1;Tr_eren[11][1]=-1;Tr_eren[11][2]=-1;Tr_eren[11][3]=-1;Tr_eren[11][4]=-1;Tr_eren[11][5]=-1;Tr_eren[11][6]=-1;Tr_eren[11][7]=-1;Tr_eren[11][8]=-1;Tr_eren[11][9]=-1;Tr_eren[11][10]=-1;Tr_eren[11][11]=-1;Tr_eren[12][0]=-1;Tr_eren[12][1]=-1;Tr_eren[12][2]=-1;Tr_eren[12][3]=-1;Tr_eren[12][4]=-1;Tr_eren[12][5]=-1;Tr_eren[12][6]=-1;Tr_eren[12][7]=-1;Tr_eren[12][8]=-1;Tr_eren[12][9]=-1;Tr_eren[12][10]=-1;Tr_eren[12][11]=-1;Tr_eren[13][0]=-1;Tr_eren[13][1]=-1;Tr_eren[13][2]=-1;Tr_eren[13][3]=-1;Tr_eren[13][4]=-1;Tr_eren[13][5]=-1;Tr_eren[13][6]=-1;Tr_eren[13][7]=-1;Tr_eren[13][8]=-1;Tr_eren[13][9]=-1;Tr_eren[13][10]=-1;Tr_eren[13][11]=-1;Tr_eren[14][0]=-1;Tr_eren[14][1]=-1;Tr_eren[14][2]=-1;Tr_eren[14][3]=-1;Tr_eren[14][4]=-1;Tr_eren[14][5]=-1;Tr_eren[14][6]=-1;Tr_eren[14][7]=-1;Tr_eren[14][8]=-1;Tr_eren[14][9]=-1;Tr_eren[14][10]=-1;Tr_eren[14][11]=-1;Tr_eren[15][0]=-1;Tr_eren[15][1]=-1;Tr_eren[15][2]=-1;Tr_eren[15][3]=-1;Tr_eren[15][4]=-1;Tr_eren[15][5]=-1;Tr_eren[15][6]=-1;Tr_eren[15][7]=-1;Tr_eren[15][8]=-1;Tr_eren[15][9]=-1;Tr_eren[15][10]=-1;Tr_eren[15][11]=-1;Tr_eren[16][0]=-1;Tr_eren[16][1]=-1;Tr_eren[16][2]=-1;Tr_eren[16][3]=-1;Tr_eren[16][4]=-1;Tr_eren[16][5]=-1;Tr_eren[16][6]=-1;Tr_eren[16][7]=-1;Tr_eren[16][8]=-1;Tr_eren[16][9]=-1;Tr_eren[16][10]=-1;Tr_eren[16][11]=-1;Tr_eren[17][0]=-1;Tr_eren[17][1]=-1;Tr_eren[17][2]=-1;Tr_eren[17][3]=-1;Tr_eren[17][4]=-1;Tr_eren[17][5]=-1;Tr_eren[17][6]=-1;Tr_eren[17][7]=-1;Tr_eren[17][8]=-1;Tr_eren[17][9]=-1;Tr_eren[17][10]=-1;Tr_eren[17][11]=-1;Tr_eren[18][0]=-1;Tr_eren[18][1]=-1;Tr_eren[18][2]=-1;Tr_eren[18][3]=-1;Tr_eren[18][4]=-1;Tr_eren[18][5]=-1;Tr_eren[18][6]=-1;Tr_eren[18][7]=-1;Tr_eren[18][8]=-1;Tr_eren[18][9]=-1;Tr_eren[18][10]=-1;Tr_eren[18][11]=-1;Tr_eren[19][0]=-1;Tr_eren[19][1]=-1;Tr_eren[19][2]=-1;Tr_eren[19][3]=-1;Tr_eren[19][4]=-1;Tr_eren[19][5]=-1;Tr_eren[19][6]=-1;Tr_eren[19][7]=-1;Tr_eren[19][8]=-1;Tr_eren[19][9]=-1;Tr_eren[19][10]=-1;Tr_eren[19][11]=-1;Tr_eren[20][0]=-1;Tr_eren[20][1]=-1;Tr_eren[20][2]=-1;Tr_eren[20][3]=-1;Tr_eren[20][4]=-1;Tr_eren[20][5]=-1;Tr_eren[20][6]=-1;Tr_eren[20][7]=-1;Tr_eren[20][8]=-1;Tr_eren[20][9]=-1;Tr_eren[20][10]=-1;Tr_eren[20][11]=-1;Tr_eren[21][0]=-1;Tr_eren[21][1]=-1;Tr_eren[21][2]=-1;Tr_eren[21][3]=-1;Tr_eren[21][4]=-1;Tr_eren[21][5]=-1;Tr_eren[21][6]=-1;Tr_eren[21][7]=-1;Tr_eren[21][8]=-1;Tr_eren[21][9]=-1;Tr_eren[21][10]=-1;Tr_eren[21][11]=-1;Tr_eren[22][0]=-1;Tr_eren[22][1]=-1;Tr_eren[22][2]=-1;Tr_eren[22][3]=-1;Tr_eren[22][4]=-1;Tr_eren[22][5]=-1;Tr_eren[22][6]=-1;Tr_eren[22][7]=-1;Tr_eren[22][8]=-1;Tr_eren[22][9]=-1;Tr_eren[22][10]=-1;Tr_eren[22][11]=-1;Tr_eren[23][0]=-1;Tr_eren[23][1]=-1;Tr_eren[23][2]=-1;Tr_eren[23][3]=-1;Tr_eren[23][4]=-1;Tr_eren[23][5]=-1;Tr_eren[23][6]=-1;Tr_eren[23][7]=-1;Tr_eren[23][8]=-1;Tr_eren[23][9]=-1;Tr_eren[23][10]=-1;Tr_eren[23][11]=-1;Tr_eren[24][0]=-1;Tr_eren[24][1]=-1;Tr_eren[24][2]=-1;Tr_eren[24][3]=-1;Tr_eren[24][4]=-1;Tr_eren[24][5]=-1;Tr_eren[24][6]=-1;Tr_eren[24][7]=-1;Tr_eren[24][8]=-1;Tr_eren[24][9]=-1;Tr_eren[24][10]=-1;Tr_eren[24][11]=-1;Tr_eren[25][0]=-1;Tr_eren[25][1]=-1;Tr_eren[25][2]=-1;Tr_eren[25][3]=-1;Tr_eren[25][4]=-1;Tr_eren[25][5]=-1;Tr_eren[25][6]=-1;Tr_eren[25][7]=-1;Tr_eren[25][8]=-1;Tr_eren[25][9]=-1;Tr_eren[25][10]=-1;Tr_eren[25][11]=-1;Tr_eren[26][0]=-1;Tr_eren[26][1]=-1;Tr_eren[26][2]=-1;Tr_eren[26][3]=-1;Tr_eren[26][4]=-1;Tr_eren[26][5]=-1;Tr_eren[26][6]=-1;Tr_eren[26][7]=-1;Tr_eren[26][8]=-1;Tr_eren[26][9]=-1;Tr_eren[26][10]=-1;Tr_eren[26][11]=-1;Tr_eren[27][0]=-1;Tr_eren[27][1]=-1;Tr_eren[27][2]=-1;Tr_eren[27][3]=-1;Tr_eren[27][4]=-1;Tr_eren[27][5]=-1;Tr_eren[27][6]=-1;Tr_eren[27][7]=-1;Tr_eren[27][8]=-1;Tr_eren[27][9]=-1;Tr_eren[27][10]=-1;Tr_eren[27][11]=-1;Tr_eren[28][0]=8;Tr_eren[28][1]=8;Tr_eren[28][2]=10;Tr_eren[28][3]=12;Tr_eren[28][4]=14;Tr_eren[28][5]=16;Tr_eren[28][6]=18;Tr_eren[28][7]=18;Tr_eren[28][8]=16;Tr_eren[28][9]=14;Tr_eren[28][10]=12;Tr_eren[28][11]=10;Tr_eren[29][0]=-1;Tr_eren[29][1]=-1;Tr_eren[29][2]=-1;Tr_eren[29][3]=-1;Tr_eren[29][4]=-1;Tr_eren[29][5]=-1;Tr_eren[29][6]=-1;Tr_eren[29][7]=-1;Tr_eren[29][8]=-1;Tr_eren[29][9]=-1;Tr_eren[29][10]=-1;Tr_eren[29][11]=-1;Tr_eren[30][0]=-1;Tr_eren[30][1]=-1;Tr_eren[30][2]=-1;Tr_eren[30][3]=-1;Tr_eren[30][4]=-1;Tr_eren[30][5]=-1;Tr_eren[30][6]=-1;Tr_eren[30][7]=-1;Tr_eren[30][8]=-1;Tr_eren[30][9]=-1;Tr_eren[30][10]=-1;Tr_eren[30][11]=-1;Tr_eren[31][0]=-1;Tr_eren[31][1]=-1;Tr_eren[31][2]=-1;Tr_eren[31][3]=-1;Tr_eren[31][4]=-1;Tr_eren[31][5]=-1;Tr_eren[31][6]=-1;Tr_eren[31][7]=-1;Tr_eren[31][8]=-1;Tr_eren[31][9]=-1;Tr_eren[31][10]=-1;Tr_eren[31][11]=-1;Tr_eren[32][0]=-1;Tr_eren[32][1]=-1;Tr_eren[32][2]=-1;Tr_eren[32][3]=-1;Tr_eren[32][4]=-1;Tr_eren[32][5]=-1;Tr_eren[32][6]=-1;Tr_eren[32][7]=-1;Tr_eren[32][8]=-1;Tr_eren[32][9]=-1;Tr_eren[32][10]=-1;Tr_eren[32][11]=-1;Tr_eren[33][0]=-1;Tr_eren[33][1]=-1;Tr_eren[33][2]=-1;Tr_eren[33][3]=-1;Tr_eren[33][4]=-1;Tr_eren[33][5]=-1;Tr_eren[33][6]=-1;Tr_eren[33][7]=-1;Tr_eren[33][8]=-1;Tr_eren[33][9]=-1;Tr_eren[33][10]=-1;Tr_eren[33][11]=-1;Tr_eren[34][0]=-1;Tr_eren[34][1]=-1;Tr_eren[34][2]=-1;Tr_eren[34][3]=-1;Tr_eren[34][4]=-1;Tr_eren[34][5]=-1;Tr_eren[34][6]=-1;Tr_eren[34][7]=-1;Tr_eren[34][8]=-1;Tr_eren[34][9]=-1;Tr_eren[34][10]=-1;Tr_eren[34][11]=-1;Tr_eren[35][0]=-1;Tr_eren[35][1]=-1;Tr_eren[35][2]=-1;Tr_eren[35][3]=-1;Tr_eren[35][4]=-1;Tr_eren[35][5]=-1;Tr_eren[35][6]=-1;Tr_eren[35][7]=-1;Tr_eren[35][8]=-1;Tr_eren[35][9]=-1;Tr_eren[35][10]=-1;Tr_eren[35][11]=-1;Tr_eren[36][0]=-1;Tr_eren[36][1]=-1;Tr_eren[36][2]=-1;Tr_eren[36][3]=-1;Tr_eren[36][4]=-1;Tr_eren[36][5]=-1;Tr_eren[36][6]=-1;Tr_eren[36][7]=-1;Tr_eren[36][8]=-1;Tr_eren[36][9]=-1;Tr_eren[36][10]=-1;Tr_eren[36][11]=-1;Tr_eren[37][0]=9;Tr_eren[37][1]=9;Tr_eren[37][2]=11;Tr_eren[37][3]=13;Tr_eren[37][4]=15;Tr_eren[37][5]=17;Tr_eren[37][6]=19;Tr_eren[37][7]=19;Tr_eren[37][8]=17;Tr_eren[37][9]=15;Tr_eren[37][10]=13;Tr_eren[37][11]=11;Tr_eren[38][0]=-1;Tr_eren[38][1]=-1;Tr_eren[38][2]=-1;Tr_eren[38][3]=-1;Tr_eren[38][4]=-1;Tr_eren[38][5]=-1;Tr_eren[38][6]=-1;Tr_eren[38][7]=-1;Tr_eren[38][8]=-1;Tr_eren[38][9]=-1;Tr_eren[38][10]=-1;Tr_eren[38][11]=-1;Tr_eren[39][0]=9;Tr_eren[39][1]=9;Tr_eren[39][2]=11;Tr_eren[39][3]=13;Tr_eren[39][4]=15;Tr_eren[39][5]=17;Tr_eren[39][6]=19;Tr_eren[39][7]=19;Tr_eren[39][8]=17;Tr_eren[39][9]=15;Tr_eren[39][10]=13;Tr_eren[39][11]=11;Tr_eren[40][0]=8;Tr_eren[40][1]=8;Tr_eren[40][2]=10;Tr_eren[40][3]=12;Tr_eren[40][4]=14;Tr_eren[40][5]=16;Tr_eren[40][6]=18;Tr_eren[40][7]=18;Tr_eren[40][8]=16;Tr_eren[40][9]=14;Tr_eren[40][10]=12;Tr_eren[40][11]=10;Tr_eren[41][0]=-1;Tr_eren[41][1]=-1;Tr_eren[41][2]=-1;Tr_eren[41][3]=-1;Tr_eren[41][4]=-1;Tr_eren[41][5]=-1;Tr_eren[41][6]=-1;Tr_eren[41][7]=-1;Tr_eren[41][8]=-1;Tr_eren[41][9]=-1;Tr_eren[41][10]=-1;Tr_eren[41][11]=-1;Tr_eren[42][0]=8;Tr_eren[42][1]=8;Tr_eren[42][2]=10;Tr_eren[42][3]=12;Tr_eren[42][4]=14;Tr_eren[42][5]=16;Tr_eren[42][6]=18;Tr_eren[42][7]=18;Tr_eren[42][8]=16;Tr_eren[42][9]=14;Tr_eren[42][10]=12;Tr_eren[42][11]=10;Tr_eren[43][0]=-1;Tr_eren[43][1]=-1;Tr_eren[43][2]=-1;Tr_eren[43][3]=-1;Tr_eren[43][4]=-1;Tr_eren[43][5]=-1;Tr_eren[43][6]=-1;Tr_eren[43][7]=-1;Tr_eren[43][8]=-1;Tr_eren[43][9]=-1;Tr_eren[43][10]=-1;Tr_eren[43][11]=-1;Tr_eren[44][0]=-1;Tr_eren[44][1]=-1;Tr_eren[44][2]=-1;Tr_eren[44][3]=-1;Tr_eren[44][4]=-1;Tr_eren[44][5]=-1;Tr_eren[44][6]=-1;Tr_eren[44][7]=-1;Tr_eren[44][8]=-1;Tr_eren[44][9]=-1;Tr_eren[44][10]=-1;Tr_eren[44][11]=-1;Tr_eren[45][0]=-1;Tr_eren[45][1]=-1;Tr_eren[45][2]=-1;Tr_eren[45][3]=-1;Tr_eren[45][4]=-1;Tr_eren[45][5]=-1;Tr_eren[45][6]=-1;Tr_eren[45][7]=-1;Tr_eren[45][8]=-1;Tr_eren[45][9]=-1;Tr_eren[45][10]=-1;Tr_eren[45][11]=-1;Tr_eren[46][0]=-1;Tr_eren[46][1]=-1;Tr_eren[46][2]=-1;Tr_eren[46][3]=-1;Tr_eren[46][4]=-1;Tr_eren[46][5]=-1;Tr_eren[46][6]=-1;Tr_eren[46][7]=-1;Tr_eren[46][8]=-1;Tr_eren[46][9]=-1;Tr_eren[46][10]=-1;Tr_eren[46][11]=-1;Tr_eren[47][0]=-1;Tr_eren[47][1]=-1;Tr_eren[47][2]=-1;Tr_eren[47][3]=-1;Tr_eren[47][4]=-1;Tr_eren[47][5]=-1;Tr_eren[47][6]=-1;Tr_eren[47][7]=-1;Tr_eren[47][8]=-1;Tr_eren[47][9]=-1;Tr_eren[47][10]=-1;Tr_eren[47][11]=-1;Tr_eren[48][0]=9;Tr_eren[48][1]=9;Tr_eren[48][2]=11;Tr_eren[48][3]=13;Tr_eren[48][4]=15;Tr_eren[48][5]=17;Tr_eren[48][6]=19;Tr_eren[48][7]=19;Tr_eren[48][8]=17;Tr_eren[48][9]=15;Tr_eren[48][10]=13;Tr_eren[48][11]=11;Tr_eren[49][0]=-1;Tr_eren[49][1]=-1;Tr_eren[49][2]=-1;Tr_eren[49][3]=-1;Tr_eren[49][4]=-1;Tr_eren[49][5]=-1;Tr_eren[49][6]=-1;Tr_eren[49][7]=-1;Tr_eren[49][8]=-1;Tr_eren[49][9]=-1;Tr_eren[49][10]=-1;Tr_eren[49][11]=-1;Tr_eren[50][0]=-1;Tr_eren[50][1]=-1;Tr_eren[50][2]=-1;Tr_eren[50][3]=-1;Tr_eren[50][4]=-1;Tr_eren[50][5]=-1;Tr_eren[50][6]=-1;Tr_eren[50][7]=-1;Tr_eren[50][8]=-1;Tr_eren[50][9]=-1;Tr_eren[50][10]=-1;Tr_eren[50][11]=-1;Tr_eren[51][0]=9;Tr_eren[51][1]=9;Tr_eren[51][2]=11;Tr_eren[51][3]=13;Tr_eren[51][4]=15;Tr_eren[51][5]=17;Tr_eren[51][6]=19;Tr_eren[51][7]=19;Tr_eren[51][8]=17;Tr_eren[51][9]=15;Tr_eren[51][10]=13;Tr_eren[51][11]=11;

Tr_une[0][0]=7;Tr_une[0][1]=7;Tr_une[0][2]=8;Tr_une[0][3]=10;Tr_une[0][4]=12;Tr_une[0][5]=14;Tr_une[0][6]=16;Tr_une[0][7]=16;Tr_une[0][8]=14;Tr_une[0][9]=12;Tr_une[0][10]=8;Tr_une[0][11]=7;Tr_une[1][0]=7;Tr_une[1][1]=8;Tr_une[1][2]=9;Tr_une[1][3]=11;Tr_une[1][4]=14;Tr_une[1][5]=17;Tr_une[1][6]=19;Tr_une[1][7]=19;Tr_une[1][8]=17;Tr_une[1][9]=13;Tr_une[1][10]=9;Tr_une[1][11]=7;Tr_une[2][0]=11;Tr_une[2][1]=12;Tr_une[2][2]=13;Tr_une[2][3]=14;Tr_une[2][4]=16;Tr_une[2][5]=18;Tr_une[2][6]=20;Tr_une[2][7]=20;Tr_une[2][8]=19;Tr_une[2][9]=16;Tr_une[2][10]=13;Tr_une[2][11]=12;Tr_une[3][0]=12;Tr_une[3][1]=12;Tr_une[3][2]=13;Tr_une[3][3]=14;Tr_une[3][4]=16;Tr_une[3][5]=18;Tr_une[3][6]=20;Tr_une[3][7]=21;Tr_une[3][8]=19;Tr_une[3][9]=17;Tr_une[3][10]=14;Tr_une[3][11]=12;Tr_une[4][0]=9;Tr_une[4][1]=9;Tr_une[4][2]=10;Tr_une[4][3]=10;Tr_une[4][4]=12;Tr_une[4][5]=14;Tr_une[4][6]=15;Tr_une[4][7]=16;Tr_une[4][8]=15;Tr_une[4][9]=13;Tr_une[4][10]=10;Tr_une[4][11]=9;Tr_une[5][0]=6;Tr_une[5][1]=6;Tr_une[5][2]=7;Tr_une[5][3]=9;Tr_une[5][4]=11;Tr_une[5][5]=14;Tr_une[5][6]=17;Tr_une[5][7]=16;Tr_une[5][8]=14;Tr_une[5][9]=11;Tr_une[5][10]=8;Tr_une[5][11]=6;Tr_une[6][0]=9;Tr_une[6][1]=10;Tr_une[6][2]=11;Tr_une[6][3]=13;Tr_une[6][4]=15;Tr_une[6][5]=18;Tr_une[6][6]=20;Tr_une[6][7]=20;Tr_une[6][8]=18;Tr_une[6][9]=15;Tr_une[6][10]=12;Tr_une[6][11]=9;Tr_une[7][0]=11;Tr_une[7][1]=11;Tr_une[7][2]=12;Tr_une[7][3]=13;Tr_une[7][4]=15;Tr_une[7][5]=18;Tr_une[7][6]=20;Tr_une[7][7]=20;Tr_une[7][8]=19;Tr_une[7][9]=17;Tr_une[7][10]=14;Tr_une[7][11]=12;Tr_une[8][0]=9;Tr_une[8][1]=10;Tr_une[8][2]=11;Tr_une[8][3]=12;Tr_une[8][4]=14;Tr_une[8][5]=17;Tr_une[8][6]=19;Tr_une[8][7]=19;Tr_une[8][8]=17;Tr_une[8][9]=15;Tr_une[8][10]=12;Tr_une[8][11]=10;Tr_une[9][0]=5;Tr_une[9][1]=6;Tr_une[9][2]=7;Tr_une[9][3]=9;Tr_une[9][4]=11;Tr_une[9][5]=13;Tr_une[9][6]=16;Tr_une[9][7]=16;Tr_une[9][8]=14;Tr_une[9][9]=11;Tr_une[9][10]=7;Tr_une[9][11]=6;Tr_une[10][0]=9;Tr_une[10][1]=10;Tr_une[10][2]=11;Tr_une[10][3]=12;Tr_une[10][4]=14;Tr_une[10][5]=18;Tr_une[10][6]=21;Tr_une[10][7]=20;Tr_une[10][8]=19;Tr_une[10][9]=15;Tr_une[10][10]=11;Tr_une[10][11]=9;Tr_une[11][0]=12;Tr_une[11][1]=12;Tr_une[11][2]=13;Tr_une[11][3]=14;Tr_une[11][4]=16;Tr_une[11][5]=18;Tr_une[11][6]=19;Tr_une[11][7]=20;Tr_une[11][8]=19;Tr_une[11][9]=17;Tr_une[11][10]=14;Tr_une[11][11]=12;Tr_une[12][0]=10;Tr_une[12][1]=10;Tr_une[12][2]=11;Tr_une[12][3]=11;Tr_une[12][4]=13;Tr_une[12][5]=15;Tr_une[12][6]=16;Tr_une[12][7]=16;Tr_une[12][8]=16;Tr_une[12][9]=14;Tr_une[12][10]=12;Tr_une[12][11]=10;Tr_une[13][0]=10;Tr_une[13][1]=11;Tr_une[13][2]=12;Tr_une[13][3]=13;Tr_une[13][4]=15;Tr_une[13][5]=18;Tr_une[13][6]=19;Tr_une[13][7]=20;Tr_une[13][8]=18;Tr_une[13][9]=16;Tr_une[13][10]=12;Tr_une[13][11]=11;Tr_une[14][0]=11;Tr_une[14][1]=11;Tr_une[14][2]=12;Tr_une[14][3]=13;Tr_une[14][4]=14;Tr_une[14][5]=16;Tr_une[14][6]=18;Tr_une[14][7]=18;Tr_une[14][8]=17;Tr_une[14][9]=15;Tr_une[14][10]=13;Tr_une[14][11]=12;Tr_une[15][0]=7;Tr_une[15][1]=8;Tr_une[15][2]=10;Tr_une[15][3]=11;Tr_une[15][4]=14;Tr_une[15][5]=17;Tr_une[15][6]=20;Tr_une[15][7]=20;Tr_une[15][8]=17;Tr_une[15][9]=13;Tr_une[15][10]=10;Tr_une[15][11]=7;Tr_une[16][0]=10;Tr_une[16][1]=11;Tr_une[16][2]=12;Tr_une[16][3]=14;Tr_une[16][4]=16;Tr_une[16][5]=19;Tr_une[16][6]=21;Tr_une[16][7]=21;Tr_une[16][8]=19;Tr_une[16][9]=16;Tr_une[16][10]=12;Tr_une[16][11]=10;Tr_une[17][0]=6;Tr_une[17][1]=7;Tr_une[17][2]=8;Tr_une[17][3]=10;Tr_une[17][4]=13;Tr_une[17][5]=16;Tr_une[17][6]=18;Tr_une[17][7]=18;Tr_une[17][8]=16;Tr_une[17][9]=12;Tr_une[17][10]=9;Tr_une[17][11]=7;Tr_une[18][0]=8;Tr_une[18][1]=9;Tr_une[18][2]=10;Tr_une[18][3]=11;Tr_une[18][4]=14;Tr_une[18][5]=16;Tr_une[18][6]=19;Tr_une[18][7]=18;Tr_une[18][8]=17;Tr_une[18][9]=14;Tr_une[18][10]=10;Tr_une[18][11]=9;Tr_une[19][0]=8;Tr_une[19][1]=9;Tr_une[19][2]=10;Tr_une[19][3]=12;Tr_une[19][4]=14;Tr_une[19][5]=17;Tr_une[19][6]=20;Tr_une[19][7]=19;Tr_une[19][8]=17;Tr_une[19][9]=14;Tr_une[19][10]=11;Tr_une[19][11]=8;Tr_une[20][0]=7;Tr_une[20][1]=8;Tr_une[20][2]=9;Tr_une[20][3]=11;Tr_une[20][4]=14;Tr_une[20][5]=17;Tr_une[20][6]=19;Tr_une[20][7]=19;Tr_une[20][8]=16;Tr_une[20][9]=13;Tr_une[20][10]=9;Tr_une[20][11]=7;Tr_une[21][0]=9;Tr_une[21][1]=9;Tr_une[21][2]=10;Tr_une[21][3]=11;Tr_une[21][4]=12;Tr_une[21][5]=14;Tr_une[21][6]=16;Tr_une[21][7]=16;Tr_une[21][8]=15;Tr_une[21][9]=14;Tr_une[21][10]=11;Tr_une[21][11]=9;Tr_une[22][0]=12;Tr_une[22][1]=12;Tr_une[22][2]=13;Tr_une[22][3]=14;Tr_une[22][4]=16;Tr_une[22][5]=18;Tr_une[22][6]=20;Tr_une[22][7]=20;Tr_une[22][8]=19;Tr_une[22][9]=17;Tr_une[22][10]=14;Tr_une[22][11]=12;Tr_une[23][0]=7;Tr_une[23][1]=8;Tr_une[23][2]=10;Tr_une[23][3]=11;Tr_une[23][4]=14;Tr_une[23][5]=16;Tr_une[23][6]=19;Tr_une[23][7]=18;Tr_une[23][8]=17;Tr_une[23][9]=13;Tr_une[23][10]=9;Tr_une[23][11]=7;Tr_une[24][0]=9;Tr_une[24][1]=10;Tr_une[24][2]=11;Tr_une[24][3]=13;Tr_une[24][4]=16;Tr_une[24][5]=19;Tr_une[24][6]=21;Tr_une[24][7]=21;Tr_une[24][8]=19;Tr_une[24][9]=15;Tr_une[24][10]=12;Tr_une[24][11]=9;Tr_une[25][0]=10;Tr_une[25][1]=10;Tr_une[25][2]=11;Tr_une[25][3]=12;Tr_une[25][4]=13;Tr_une[25][5]=14;Tr_une[25][6]=16;Tr_une[25][7]=16;Tr_une[25][8]=15;Tr_une[25][9]=14;Tr_une[25][10]=12;Tr_une[25][11]=11;Tr_une[26][0]=7;Tr_une[26][1]=8;Tr_une[26][2]=10;Tr_une[26][3]=11;Tr_une[26][4]=13;Tr_une[26][5]=16;Tr_une[26][6]=18;Tr_une[26][7]=18;Tr_une[26][8]=16;Tr_une[26][9]=13;Tr_une[26][10]=10;Tr_une[26][11]=8;Tr_une[27][0]=15;Tr_une[27][1]=15;Tr_une[27][2]=16;Tr_une[27][3]=16;Tr_une[27][4]=17;Tr_une[27][5]=18;Tr_une[27][6]=19;Tr_une[27][7]=19;Tr_une[27][8]=19;Tr_une[27][9]=18;Tr_une[27][10]=17;Tr_une[27][11]=16;Tr_une[28][0]=6;Tr_une[28][1]=6;Tr_une[28][2]=8;Tr_une[28][3]=9;Tr_une[28][4]=12;Tr_une[28][5]=14;Tr_une[28][6]=16;Tr_une[28][7]=16;Tr_une[28][8]=15;Tr_une[28][9]=11;Tr_une[28][10]=8;Tr_une[28][11]=6;Tr_une[29][0]=7;Tr_une[29][1]=9;Tr_une[29][2]=10;Tr_une[29][3]=12;Tr_une[29][4]=15;Tr_une[29][5]=17;Tr_une[29][6]=20;Tr_une[29][7]=19;Tr_une[29][8]=17;Tr_une[29][9]=14;Tr_une[29][10]=10;Tr_une[29][11]=7;Tr_une[30][0]=7;Tr_une[30][1]=8;Tr_une[30][2]=9;Tr_une[30][3]=10;Tr_une[30][4]=11;Tr_une[30][5]=13;Tr_une[30][6]=15;Tr_une[30][7]=15;Tr_une[30][8]=14;Tr_une[30][9]=12;Tr_une[30][10]=9;Tr_une[30][11]=8;Tr_une[31][0]=8;Tr_une[31][1]=8;Tr_une[31][2]=10;Tr_une[31][3]=12;Tr_une[31][4]=14;Tr_une[31][5]=17;Tr_une[31][6]=20;Tr_une[31][7]=19;Tr_une[31][8]=17;Tr_une[31][9]=13;Tr_une[31][10]=10;Tr_une[31][11]=8;Tr_une[32][0]=12;Tr_une[32][1]=12;Tr_une[32][2]=13;Tr_une[32][3]=14;Tr_une[32][4]=16;Tr_une[32][5]=18;Tr_une[32][6]=20;Tr_une[32][7]=20;Tr_une[32][8]=19;Tr_une[32][9]=16;Tr_une[32][10]=14;Tr_une[32][11]=12;Tr_une[33][0]=12;Tr_une[33][1]=13;Tr_une[33][2]=13;Tr_une[33][3]=14;Tr_une[33][4]=16;Tr_une[33][5]=18;Tr_une[33][6]=20;Tr_une[33][7]=20;Tr_une[33][8]=19;Tr_une[33][9]=17;Tr_une[33][10]=14;Tr_une[33][11]=13;Tr_une[34][0]=11;Tr_une[34][1]=11;Tr_une[34][2]=12;Tr_une[34][3]=13;Tr_une[34][4]=15;Tr_une[34][5]=17;Tr_une[34][6]=19;Tr_une[34][7]=20;Tr_une[34][8]=18;Tr_une[34][9]=16;Tr_une[34][10]=13;Tr_une[34][11]=11;Tr_une[35][0]=7;Tr_une[35][1]=8;Tr_une[35][2]=9;Tr_une[35][3]=10;Tr_une[35][4]=12;Tr_une[35][5]=15;Tr_une[35][6]=17;Tr_une[35][7]=17;Tr_une[35][8]=16;Tr_une[35][9]=13;Tr_une[35][10]=9;Tr_une[35][11]=7;Tr_une[36][0]=8;Tr_une[36][1]=10;Tr_une[36][2]=11;Tr_une[36][3]=12;Tr_une[36][4]=14;Tr_une[36][5]=16;Tr_une[36][6]=18;Tr_une[36][7]=18;Tr_une[36][8]=17;Tr_une[36][9]=13;Tr_une[36][10]=11;Tr_une[36][11]=9;Tr_une[37][0]=6;Tr_une[37][1]=7;Tr_une[37][2]=8;Tr_une[37][3]=10;Tr_une[37][4]=12;Tr_une[37][5]=15;Tr_une[37][6]=17;Tr_une[37][7]=17;Tr_une[37][8]=15;Tr_une[37][9]=12;Tr_une[37][10]=9;Tr_une[37][11]=6;Tr_une[38][0]=10;Tr_une[38][1]=11;Tr_une[38][2]=11;Tr_une[38][3]=13;Tr_une[38][4]=14;Tr_une[38][5]=16;Tr_une[38][6]=17;Tr_une[38][7]=17;Tr_une[38][8]=16;Tr_une[38][9]=14;Tr_une[38][10]=12;Tr_une[38][11]=10;Tr_une[39][0]=6;Tr_une[39][1]=7;Tr_une[39][2]=8;Tr_une[39][3]=10;Tr_une[39][4]=12;Tr_une[39][5]=15;Tr_une[39][6]=17;Tr_une[39][7]=17;Tr_une[39][8]=15;Tr_une[39][9]=12;Tr_une[39][10]=8;Tr_une[39][11]=6;Tr_une[40][0]=6;Tr_une[40][1]=7;Tr_une[40][2]=8;Tr_une[40][3]=10;Tr_une[40][4]=12;Tr_une[40][5]=15;Tr_une[40][6]=18;Tr_une[40][7]=18;Tr_une[40][8]=15;Tr_une[40][9]=12;Tr_une[40][10]=8;Tr_une[40][11]=6;Tr_une[41][0]=11;Tr_une[41][1]=11;Tr_une[41][2]=13;Tr_une[41][3]=14;Tr_une[41][4]=16;Tr_une[41][5]=19;Tr_une[41][6]=21;Tr_une[41][7]=21;Tr_une[41][8]=20;Tr_une[41][9]=16;Tr_une[41][10]=13;Tr_une[41][11]=11;Tr_une[42][0]=5;Tr_une[42][1]=6;Tr_une[42][2]=7;Tr_une[42][3]=9;Tr_une[42][4]=11;Tr_une[42][5]=14;Tr_une[42][6]=17;Tr_une[42][7]=16;Tr_une[42][8]=14;Tr_une[42][9]=11;Tr_une[42][10]=8;Tr_une[42][11]=6;Tr_une[43][0]=15;Tr_une[43][1]=15;Tr_une[43][2]=16;Tr_une[43][3]=16;Tr_une[43][4]=17;Tr_une[43][5]=18;Tr_une[43][6]=20;Tr_une[43][7]=20;Tr_une[43][8]=20;Tr_une[43][9]=18;Tr_une[43][10]=17;Tr_une[43][11]=16;Tr_une[44][0]=10;Tr_une[44][1]=11;Tr_une[44][2]=12;Tr_une[44][3]=14;Tr_une[44][4]=16;Tr_une[44][5]=18;Tr_une[44][6]=20;Tr_une[44][7]=20;Tr_une[44][8]=19;Tr_une[44][9]=16;Tr_une[44][10]=12;Tr_une[44][11]=11;Tr_une[45][0]=6;Tr_une[45][1]=7;Tr_une[45][2]=8;Tr_une[45][3]=10;Tr_une[45][4]=12;Tr_une[45][5]=15;Tr_une[45][6]=18;Tr_une[45][7]=17;Tr_une[45][8]=15;Tr_une[45][9]=12;Tr_une[45][10]=8;Tr_une[45][11]=6;Tr_une[46][0]=8;Tr_une[46][1]=9;Tr_une[46][2]=11;Tr_une[46][3]=12;Tr_une[46][4]=15;Tr_une[46][5]=18;Tr_une[46][6]=21;Tr_une[46][7]=20;Tr_une[46][8]=18;Tr_une[46][9]=14;Tr_une[46][10]=11;Tr_une[46][11]=8;Tr_une[47][0]=10;Tr_une[47][1]=11;Tr_une[47][2]=12;Tr_une[47][3]=13;Tr_une[47][4]=15;Tr_une[47][5]=17;Tr_une[47][6]=19;Tr_une[47][7]=20;Tr_une[47][8]=18;Tr_une[47][9]=16;Tr_une[47][10]=13;Tr_une[47][11]=11;Tr_une[48][0]=6;Tr_une[48][1]=8;Tr_une[48][2]=9;Tr_une[48][3]=10;Tr_une[48][4]=12;Tr_une[48][5]=15;Tr_une[48][6]=18;Tr_une[48][7]=18;Tr_une[48][8]=16;Tr_une[48][9]=12;Tr_une[48][10]=9;Tr_une[48][11]=7;Tr_une[49][0]=9;Tr_une[49][1]=10;Tr_une[49][2]=10;Tr_une[49][3]=11;Tr_une[49][4]=13;Tr_une[49][5]=15;Tr_une[49][6]=17;Tr_une[49][7]=17;Tr_une[49][8]=16;Tr_une[49][9]=14;Tr_une[49][10]=11;Tr_une[49][11]=10;Tr_une[50][0]=6;Tr_une[50][1]=8;Tr_une[50][2]=9;Tr_une[50][3]=10;Tr_une[50][4]=13;Tr_une[50][5]=16;Tr_une[50][6]=18;Tr_une[50][7]=18;Tr_une[50][8]=16;Tr_une[50][9]=12;Tr_une[50][10]=9;Tr_une[50][11]=7;Tr_une[51][0]=8;Tr_une[51][1]=9;Tr_une[51][2]=10;Tr_une[51][3]=12;Tr_une[51][4]=15;Tr_une[51][5]=17;Tr_une[51][6]=20;Tr_une[51][7]=19;Tr_une[51][8]=17;Tr_une[51][9]=14;Tr_une[51][10]=10;Tr_une[51][11]=8;

function fun_modelo()
{
	document.forms["frmFC"].elements["txtRo"].value=Ro[document.forms["frmFC"].elements["cboCapta"].selectedIndex];	
	document.forms["frmFC"].elements["txta1"].value=a1[document.forms["frmFC"].elements["cboCapta"].selectedIndex];	
	document.forms["frmFC"].elements["txta2"].value=a2[document.forms["frmFC"].elements["cboCapta"].selectedIndex];	
	if(tm[document.forms["frmFC"].elements["cboCapta"].selectedIndex]==true)
	{
		document.forms["frmFC"].elements["optdT"][0].checked=true;
		te=0;
	}
	else
	{
		document.forms["frmFC"].elements["optdT"][1].checked=true;
		te=1;
	}
	
	document.forms["frmFC"].txtSupcol.value=sc[document.forms["frmFC"].cboCapta.selectedIndex];
	
	fun_validar();
}

function fun_fbeta(lat,inc,des)
{
	fbeta=(1-0.0113*Math.pow(Math.sin(inc*RADIAN),1.5)*
           Math.pow(des,2.32)*(des-1.648)*
           Math.pow(Math.pow(des,2.32)+4237,-1))*
	       (1+0.0058*Math.pow(inc,0.5)*des*
           (1-0.56*Math.pow(Math.abs(1*lat),0.16)));
}

function fun_fks(l,i)
{
    var m,n;//int
    var d,sh,ibdf,ibg,idfg,ci;//float

	for(m=1;m<=12;m++)
    {
    	d=23*Math.sin(0.01745329*30*(m-1));
        sh=Math.cos(0.01745329*l)*Math.cos(0.01745329*d)*0.87+Math.sin(0.01745329*l)*Math.sin(0.01745329*d);
        if(sh<0)
         	sh=0;
        ibdf=4+2*Math.sin(0.01745329*30*(m-2));
        ibg=Math.pow(sh+Math.pow(ibdf,-1),-1);
        idfg=Math.pow(ibdf*sh+1,-1);
        ci=Math.cos(0.01745329*(l-i))*Math.cos(0.01745329*d)*0.87+Math.sin(0.01745329*(l-i))*Math.sin(0.01745329*d);
        if(ci<0)
           	ci=0;
        if(m<11)
           	n=m+2;
        else
           	n=m-10;
        fks[n-1]=ibg*ci+idfg*Math.pow(Math.cos(0.01745329*i/2),2);
        fks[n-1]=0.01*Math.round(100*fks[n-1]);
    }
}

function fun_calcular()
{
	index=document.forms["frmFC"].cboUbi.selectedIndex;
	
	var index_eren=new Array(5,9,28,37,39,40,42,48,50);
	var eren=false;
	for(i=0;i<=8;i++)
	{
		if(index==index_eren[i])
		{
			eren=true;
			break;
		}
	}
	
	if((document.forms["frmFC"].cboTa.selectedIndex==1 || document.forms["frmFC"].cboTr.selectedIndex==1) && eren==false)
	{
		var ubi_eren="Fuente de datos: EREN\n\nUbicaciones posibles:\n";
		for(i=0;i<=8;i++)
		ubi_eren+="\n"+ubival[index_eren[i]];
		alert(ubi_eren);
		fun_borrar();
		return;
	}
	
	lat=Lat[index];
	b=parseFloat(document.forms["frmFC"].txtRo.value);
	m=parseFloat(document.forms["frmFC"].txta1.value);
	mp=parseFloat(document.forms["frmFC"].txta2.value);
		if(mp!=0)
			m=0.75*m+16*Math.pow(mp*b,0.5);
	    if(te==0)
    	{
        	m=m/(1+0.006*m);
	        b=b*(1-0.006*m);
	    }
	corre=parseFloat(document.forms["frmFC"].txtCorre.value);
	inter=parseFloat(document.forms["frmFC"].txtInter.value);
	inc=parseFloat(document.forms["frmFC"].txtInc.value);
	des=parseFloat(document.forms["frmFC"].txtDes.value);
	supcol=parseFloat(document.forms["frmFC"].txtNumcol.value)*parseFloat(document.forms["frmFC"].txtSupcol.value);
	tacu=parseFloat(document.forms["frmFC"].txtTacu.value);
	vacu=parseFloat(document.forms["frmFC"].txtVacu.value);
	vcon=parseFloat(document.forms["frmFC"].txtVconUnit.value)*parseInt(document.forms["frmFC"].txtUnits.value);
	
	fun_fks(lat,inc);
	fun_fbeta(lat,inc,des);

   	valeFS=true;

	for(mes=1;mes<=12;mes++)
	{
		if(document.forms["frmFC"].cboRad.selectedIndex==0)
			H[index][mes-1]=H_cen[index][mes-1];
		
		if(document.forms["frmFC"].cboTr.selectedIndex==0)
			Tr[index][mes-1]=Tr_cen[index][mes-1];
		else if(document.forms["frmFC"].cboTr.selectedIndex==1)
			Tr[index][mes-1]=Tr_eren[index][mes-1];
		else
			Tr[index][mes-1]=Tr_une[index][mes-1];
		
		if(document.forms["frmFC"].cboTa.selectedIndex==0)
			Ta[index][mes-1]=Ta_cen[index][mes-1];
		else
			Ta[index][mes-1]=Ta_eren[index][mes-1];
		
		var ocu=parseInt(document.forms["frmFC"].elements["txtOcu"+mes].value);
		
		rad[mes-1]=fks[mes-1]*fbeta*1000*corre*H[index][mes-1]*dias_mes[mes-1];//kJ/mes
		En[mes-1]=4.187*dias_mes[mes-1]*0.01*ocu*vcon*(tacu-Tr[index][mes-1]);//kJ/mes

		fun_FS(mes);

		if(FS[mes-1]==-991)
        {
			FS[mes-1]="V/A!";
			valeFS=false;
        }
		else if(FS[mes-1]==-992)
		{
			FS[mes-1]="D1!";
			valeFS=false;
        }
		else if(FS[mes-1]==-993)
		{
			FS[mes-1]="D2!";
			valeFS=false;
        }
		else if(FS[mes-1]<0)
		{
			FS[mes-1]="ERR";
			valeFS=false;
        }
		else
		{
			FS[mes-1]=Math.round(100*FS[mes-1]);
		}
	
		if(ocu==0)
		{
			FS[mes-1]=100;
			valeFS=true;
		}

		document.forms["frmFC"].elements["txtFS"+mes].value=FS[mes-1];
	}
	
	if(valeFS==false)
	{
		document.forms["frmFC"].txtFS.value="";	
	}
	else
	{
		var sumaEn=0;
		var sumaFS=0;
	    for(mes=1;mes<=12;mes++)
    	{
			if(parseInt(document.forms["frmFC"].elements["txtOcu"+mes].value)==0)
				continue;
			sumaEn+=En[mes-1];
        	sumaFS+=0.01*FS[mes-1]*En[mes-1];
		}
		if(sumaEn!=0)
			document.forms["frmFC"].txtFS.value=Math.round(100*(sumaFS/sumaEn));
		else
			document.forms["frmFC"].txtFS.value="";
	}
	
	for(mes=1;mes<=12;mes++)
	{
		if(isNaN(FS[mes-1]))
			document.forms["frmFC"].elements["graf"+mes].height=0;
		else
		{
			if(FS[mes-1]<=100)
			{
				if(parseInt(document.forms["frmFC"].elements["txtOcu"+mes].value)!=0)
					document.forms["frmFC"].elements["graf"+mes].src=img1.src;
				else
					document.forms["frmFC"].elements["graf"+mes].src=img3.src;
				document.forms["frmFC"].elements["graf"+mes].height=0.01*FS[mes-1]*50;
			}
			else
			{
				document.forms["frmFC"].elements["graf"+mes].src=img2.src;
				document.forms["frmFC"].elements["graf"+mes].height=50;
			}
		}
	}
}

function fun_FS(mes)
{
    var sd;
	if(cubs==1)
		sd=0.96;
	else
		sd=0.94;
		
	var Ea=supcol*b*sd*inter*rad[mes-1] //kJ/mes;
	var delta=24*3600*dias_mes[mes-1];//s
    var k1=Math.pow(vacu/(75*supcol),-0.25);
    var k2=(11.6+1.18*tacu+3.86*Tr[index][mes-1]-2.32*Ta[index][mes-1])/(100-Ta[index][mes-1]);
    var Ep=supcol*m*inter*(100-Ta[index][mes-1])*delta*k1*k2;
    var D1=Ea/En[mes-1];
    var D2=Ep/(1000*En[mes-1]);

    if(vacu/supcol<37.5 || vacu/supcol>300)
        FS[mes-1]=-991;
    else if(D1<0 || D1>3)
        FS[mes-1]=-992;
    else if(D2<0 || D2>18)
        FS[mes-1]=-993;
    else
        FS[mes-1]=1.029*D1-0.065*D2-0.245*D1*D1+0.0018*D2*D2+0.0215*D1*D1*D1;
}

function fun_borrar()
{
	for(i=1;i<=12;i++)
	{
		document.forms["frmFC"].elements["txtFS"+i].value="";
		document.forms["frmFC"].elements["graf"+i].height=0;
	}
	document.forms["frmFC"].txtFS.value="";	
}

function fun_vconunit()
{
	if(document.forms["frmFC"].cboCriDem.selectedIndex!=0)
	{
		document.forms["frmFC"].txtVconUnit.value=vconunit[document.forms["frmFC"].cboCriDem.selectedIndex-1];	
		fun_validar();
	}
}

function fun_fixvconunit()
{
	if(document.forms["frmFC"].cboCriDem.selectedIndex!=0)
	{
		document.forms["frmFC"].txtVconUnit.blur();
		document.forms["frmFC"].cboCriDem.focus();
	}
}

function fun_validar()
{
	if(!fun_valida(document.forms["frmFC"].txtCorre,0.5,1.5)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtRo,0,1)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txta1,0,30)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txta2,0,1)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtInter,0.5,1)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtSupcol,0,Infinity)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtInc,0,90)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtDes,0,70)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtNumcol,1,Infinity)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtTacu,35,60)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtVacu,0,Infinity)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtVconUnit,0,Infinity)) 
		return;
	if(!fun_valida(document.forms["frmFC"].txtUnits,1,Infinity)) 
		return;
	for(i=1;i<=12;i++)
	{
		if(!fun_valida(document.forms["frmFC"].elements["txtOcu"+i],0,100)) 
			return;
	}
	
	fun_calcular();
}

function fun_valida(campo,minval,maxval)
{
	if(campo.value=="")
	{
		alert("Falta el valor del dato.");
		fun_borrar();
		campo.focus();
		return false;
	}	
	else if(isNaN(campo.value))
	{
		alert("El dato debe ser numérico.");
		fun_borrar();
		campo.select();
		return false;
	}	
	else if(minval!=-1 && maxval!=-1 && (parseFloat(campo.value) < minval || maxval < parseFloat(campo.value)))
	{
		var err;
		if(maxval!=Infinity)
			err="El valor del dato debe estar comprendido entre "+minval+" y "+maxval+".";
		else
			err="El valor del dato debe ser mayor o igual que "+minval+".";
		alert(err);
		fun_borrar();
		campo.select();
		return false;
	}	
	
	return true;
}

function fun_examinar()
{
	fun_calcular();
	if(document.forms["frmFC"].txtFS.value=="")
		return;
		
	var hini='<html><head><title>Datos internos</title></head><body><p>Ubicaci&oacute;n: '+ubival[document.forms["frmFC"].cboUbi.selectedIndex]+'</p><table border="0" cellpadding="4" cellspacing="0">';
	
	var meses='<tr><td>&nbsp;</td><td><div align="center">Ene</div></td><td><div align="center">Feb</div></td><td><div align="center">Mar</div></td><td><div align="center">Abr</div></td><td><div align="center">May</div></td><td><div align="center">Jun</div></td><td><div align="center">Jul</div></td><td><div align="center">Ago</div></td><td><div align="center">Sep</div></td><td><div align="center">Oct</div></td><td><div align="center">Nov</div></td><td><div align="center">Dic</div></td><td>Fuente</td></tr><tr><td>&nbsp;</td><td colspan="13"><hr size="1" noshade></td></tr>';

	var datos1='<tr><td>Ho</td>',datos2='<tr><td>Ta</td>',datos3='<tr><td>Tr</td>';
	
	for(mes=1;mes<=12;mes++)
		datos1+='<td><div align="center">'+H[document.forms["frmFC"].cboUbi.selectedIndex][mes-1]+'</div></td>';
	datos1+='<td>'+radval[document.forms["frmFC"].cboRad.selectedIndex]+'</tr>';
	
	for(mes=1;mes<=12;mes++)
		datos2+='<td><div align="center">'+Ta[document.forms["frmFC"].cboUbi.selectedIndex][mes-1]+'</div></td>';
	datos2+='<td>'+taval[document.forms["frmFC"].cboTa.selectedIndex]+'</tr>';
	
	for(mes=1;mes<=12;mes++)
		datos3+='<td><div align="center">'+Tr[document.forms["frmFC"].cboUbi.selectedIndex][mes-1]+'</div></td>';
	datos3+='<td>'+trval[document.forms["frmFC"].cboTr.selectedIndex]+'</tr><tr><td>&nbsp;</td><td colspan="13"><hr size="1" noshade></td></tr>';

	var hfin='</table>Ho: radiaci&oacute;n solar diaria media sobre superficie horizontal  (MJ/m²).<br>Ta: temperatura ambiente diaria media durante las horas de sol (°C).<br>Tr: temperatura diaria media del agua de red (°C).<p><form><div align="center"><input type="button" value="Cerrar" onClick="window.close()"/></form></body></html>';

	var options="width=600,height=330,letf=100,top=100,toolbar=no,directories=no,status=no,scrollbars=yes,resizable=yes,menubar=no";

	win_datos=window.open("","w_datos",options);
	
	win_datos.document.open();
	win_datos.document.write(hini+meses+datos1+datos2+datos3+hfin);
	win_datos.document.close();
	win_datos.focus();
}

function fun_init()
{
	for(i=1;i<=12;i++)
		document.forms["frmFC"].elements["graf"+i].height=0;
	/*
	alert('Herramienta para el cálculo de la fracción solar en sistemas de A.C.S.\nsegún el método "f-chart" simplificado, tal y como se recomienda en el\nPliego de Condiciones Técnicas del IDAE.\n\nLos parámetros característicos de los captadores mostrados por defecto son\neditables. Para cualquier modificación o ampliación de la lista de captadores,\nrogamos lo comuniquen al e-mail: sun@censolar.org');
	*/	  
		  
	fun_calcular();

	window.defaultStatus="Copyright © 2005 Censolar";
	
	fun_info();
}

function fun_close()
{
	if(win_datos.closed==false)
		win_datos.close();
	if(win_info.closed==false)
		win_info.close();
}
	
function fun_info()
{
	var hini='<html><head><title>Información sobre la aplicación</title></head><body><p>';
	
	var texto='Herramienta para el cálculo de la fracción solar en sistemas de A.C.S.<br>según el método "f-chart" simplificado, tal y como se recomienda en el<br>Pliego de Condiciones Técnicas del IDAE.<br><br>Los parámetros característicos de los captadores mostrados por defecto son<br>editables. Para cualquier modificación o ampliación de la lista de captadores<br>rogamos lo comuniquen al e-mail: <a href="mailto:sun@censolar.org">sun@censolar.org</a><p><form><div align="center"><input type="button" value="Cerrar" onClick="window.close()"/></form>';

	var hfin='</body></html>';
	
	var options="width=500,height=210,left=200,top=200,toolbar=no,directories=no,status=no,scrollbars=yes,resizable=yes,menubar=no";

	win_info=window.open("","w_info",options);
	
	win_info.document.open();
	win_info.document.write(hini+texto+hfin);
	win_info.document.bgColor="E3E3E3";
	win_info.document.close();
	win_info.focus();
}
/*
function fun_graf()
{
	var hini='<html><head><title>Gráfico de la fracción solar</title></head><body><table id="idtabla" border="0" cellpadding="0" cellspacing="4" width="100%">';
	
	var meses='<tr><td><div align="center">ENE</div></td><td><div align="center">FEB</div></td><td><div align="center">MAR</div></td><td><div align="center">ABR</div></td><td><div align="center">MAY</div></td><td><div align="center">JUN</div></td><td><div align="center">JUL</div></td><td><div align="center">AGO</div></td><td><div align="center">SEP</div></td><td><div align="center">OCT</div></td><td><div align="center">NOV</div></td><td><div align="center">DIC</div></td></tr>';

	var graf='<tr valign="bottom">';
	
	for(mes=1;mes<=12;mes++)
	{
		if(FS[mes-1]<=1)
			graf+='<td><div align="center"><img src="graf1.gif" width="15" height='+200*FS[mes-1]+'</div></td>';
		else
			graf+='<td><div align="center"><img src="graf1.gif" width="15" height="200"</div></td>';
	}
	graf+='</tr>';

	var hfin='</table></p></body></html>';
		
		var options="width=500,height=350,toolbar=no,directories=no,status=no,scrollbars=yes,resizable=yes,menubar=no";

	var webgraf=window.open("","webgraf",options);
	
	webgraf.document.open();
	webgraf.document.write(hini+graf+meses+hfin);
	webgraf.document.close();
	webgraf.focus();
	
	document.forms["frmFC"].graf1.height="200";
}
*/