/************************************************************
;                                                           *
;  William M. Spears					    *
;  Navy Center for Applied Research in AI                   *
;  Naval Research Laboratory                                *
;                                                           *
;  Permission is hereby granted to copy all or any part of  *
;  this program for free distribution.			    *
;                                                           *
;************************************************************/
#include "header.h"
#include "stuff.h"
double myeval(i)
int i;
{
	double maxx();
	double avep();
	double AB,AC,AD,AE,AF,AG,AH,AI;
	double AJ,BC,BD,BE,BF,BG,BH,BI;
	double BJ,BK,CD,CE,CF,CG,CH,CI;
	double CJ,CK,DE,DF,DG,DH,DI,DJ;
	double DK,EF,EG,EH,EI,EJ,EK,FG;
	double FH,FI,FJ,FK,GH,GI,GJ,GK;
	double HI,HJ,HK,IJ,IK,JK,KA;
	double T1002,T1033,T1034,T1042,T1050,T1058,T1066,T1067;
	double T1077,T1087,T1097,T1107,T1117,T1118,T1130,T1142;
	double T1154,T1166,T1178,T1190,T1191,T1205,T1219,T1233;
	double T1247,T1261,T1275,T1289,T1290,T1306,T1322,T1338;
	double T1354,T1370,T1386,T1402,T1418,T1419,T1437,T1455;
	double T1473,T1491,T1509,T1527,T1545,T1563,T1581,T1582;
	double T1600,T1618,T1636,T1654,T1672,T1690,T1708,T1726;
	double T1744,T1745,T1763,T1781,T1799,T1817,T1835,T1853;
	double T1871,T1889,T1907,T1908,T1926,T1944,T1962,T1980;
	double T1998,T2016,T2034,T2052,T2070,T2071,T2087,T2103;
	double T2119,T2135,T2151,T2167,T2183,T2199,T2200,T2214;
	double T2228,T2242,T2256,T2270,T2284,T2298,T2299,T2311;
	double T2323,T2335,T2347,T2359,T2371,T2372,T2382,T2392;
	double T2402,T2412,T2422,T2423,T2431,T2439,T2447;
	AB = (double)c[i][1];
	AC = (double)c[i][2];
	AD = (double)c[i][3];
	AE = (double)c[i][4];
	AF = (double)c[i][5];
	AG = (double)c[i][6];
	AH = (double)c[i][7];
	AI = (double)c[i][8];
	AJ = (double)c[i][9];
	BC = (double)c[i][10];
	BD = (double)c[i][11];
	BE = (double)c[i][12];
	BF = (double)c[i][13];
	BG = (double)c[i][14];
	BH = (double)c[i][15];
	BI = (double)c[i][16];
	BJ = (double)c[i][17];
	BK = (double)c[i][18];
	CD = (double)c[i][19];
	CE = (double)c[i][20];
	CF = (double)c[i][21];
	CG = (double)c[i][22];
	CH = (double)c[i][23];
	CI = (double)c[i][24];
	CJ = (double)c[i][25];
	CK = (double)c[i][26];
	DE = (double)c[i][27];
	DF = (double)c[i][28];
	DG = (double)c[i][29];
	DH = (double)c[i][30];
	DI = (double)c[i][31];
	DJ = (double)c[i][32];
	DK = (double)c[i][33];
	EF = (double)c[i][34];
	EG = (double)c[i][35];
	EH = (double)c[i][36];
	EI = (double)c[i][37];
	EJ = (double)c[i][38];
	EK = (double)c[i][39];
	FG = (double)c[i][40];
	FH = (double)c[i][41];
	FI = (double)c[i][42];
	FJ = (double)c[i][43];
	FK = (double)c[i][44];
	GH = (double)c[i][45];
	GI = (double)c[i][46];
	GJ = (double)c[i][47];
	GK = (double)c[i][48];
	HI = (double)c[i][49];
	HJ = (double)c[i][50];
	HK = (double)c[i][51];
	IJ = (double)c[i][52];
	IK = (double)c[i][53];
	JK = (double)c[i][54];
	KA = (double)c[i][55];
	T1034 = avep(4, GK, (1 - GJ), (1 - GI), (1 - GH));
	T1042 = avep(4, (1 - GK), GJ, (1 - GI), (1 - GH));
	T1050 = avep(4, (1 - GK), (1 - GJ), GI, (1 - GH));
	T1058 = avep(4, (1 - GK), (1 - GJ), (1 - GI), GH);
	T1033 = maxx(4, T1034, T1042, T1050, T1058);
	T1067 = avep(5, FK, (1 - FJ), (1 - FI), (1 - FH), (1 - FG));
	T1077 = avep(5, (1 - FK), FJ, (1 - FI), (1 - FH), (1 - FG));
	T1087 = avep(5, (1 - FK), (1 - FJ), FI, (1 - FH), (1 - FG));
	T1097 = avep(5, (1 - FK), (1 - FJ), (1 - FI), FH, (1 - FG));
	T1107 = avep(5, (1 - FK), (1 - FJ), (1 - FI), (1 - FH), FG);
	T1066 = maxx(5, T1067, T1077, T1087, T1097, T1107);
	T1118 = avep(6, EK, (1 - EJ), (1 - EI), (1 - EH), (1 - EG), (1 - EF));
	T1130 = avep(6, (1 - EK), EJ, (1 - EI), (1 - EH), (1 - EG), (1 - EF));
	T1142 = avep(6, (1 - EK), (1 - EJ), EI, (1 - EH), (1 - EG), (1 - EF));
	T1154 = avep(6, (1 - EK), (1 - EJ), (1 - EI), EH, (1 - EG), (1 - EF));
	T1166 = avep(6, (1 - EK), (1 - EJ), (1 - EI), (1 - EH), EG, (1 - EF));
	T1178 = avep(6, (1 - EK), (1 - EJ), (1 - EI), (1 - EH), (1 - EG), EF);
	T1117 = maxx(6, T1118, T1130, T1142, T1154, T1166, T1178);
	T1191 = avep(7, DK, (1 - DJ), (1 - DI), (1 - DH), (1 - DG), (1 - DF), (1 - DE));
	T1205 = avep(7, (1 - DK), DJ, (1 - DI), (1 - DH), (1 - DG), (1 - DF), (1 - DE));
	T1219 = avep(7, (1 - DK), (1 - DJ), DI, (1 - DH), (1 - DG), (1 - DF), (1 - DE));
	T1233 = avep(7, (1 - DK), (1 - DJ), (1 - DI), DH, (1 - DG), (1 - DF), (1 - DE));
	T1247 = avep(7, (1 - DK), (1 - DJ), (1 - DI), (1 - DH), DG, (1 - DF), (1 - DE));
	T1261 = avep(7, (1 - DK), (1 - DJ), (1 - DI), (1 - DH), (1 - DG), DF, (1 - DE));
	T1275 = avep(7, (1 - DK), (1 - DJ), (1 - DI), (1 - DH), (1 - DG), (1 - DF), DE);
	T1190 = maxx(7, T1191, T1205, T1219, T1233, T1247, T1261, T1275);
	T1290 = avep(8, CK, (1 - CJ), (1 - CI), (1 - CH), (1 - CG), (1 - CF), (1 - CE), (1 - CD));
	T1306 = avep(8, (1 - CK), CJ, (1 - CI), (1 - CH), (1 - CG), (1 - CF), (1 - CE), (1 - CD));
	T1322 = avep(8, (1 - CK), (1 - CJ), CI, (1 - CH), (1 - CG), (1 - CF), (1 - CE), (1 - CD));
	T1338 = avep(8, (1 - CK), (1 - CJ), (1 - CI), CH, (1 - CG), (1 - CF), (1 - CE), (1 - CD));
	T1354 = avep(8, (1 - CK), (1 - CJ), (1 - CI), (1 - CH), CG, (1 - CF), (1 - CE), (1 - CD));
	T1370 = avep(8, (1 - CK), (1 - CJ), (1 - CI), (1 - CH), (1 - CG), CF, (1 - CE), (1 - CD));
	T1386 = avep(8, (1 - CK), (1 - CJ), (1 - CI), (1 - CH), (1 - CG), (1 - CF), CE, (1 - CD));
	T1402 = avep(8, (1 - CK), (1 - CJ), (1 - CI), (1 - CH), (1 - CG), (1 - CF), (1 - CE), CD);
	T1289 = maxx(8, T1290, T1306, T1322, T1338, T1354, T1370, T1386, T1402);
	T1419 = avep(9, BK, (1 - BJ), (1 - BI), (1 - BH), (1 - BG), (1 - BF), (1 - BE), (1 - BD), (1 - BC));
	T1437 = avep(9, (1 - BK), BJ, (1 - BI), (1 - BH), (1 - BG), (1 - BF), (1 - BE), (1 - BD), (1 - BC));
	T1455 = avep(9, (1 - BK), (1 - BJ), BI, (1 - BH), (1 - BG), (1 - BF), (1 - BE), (1 - BD), (1 - BC));
	T1473 = avep(9, (1 - BK), (1 - BJ), (1 - BI), BH, (1 - BG), (1 - BF), (1 - BE), (1 - BD), (1 - BC));
	T1491 = avep(9, (1 - BK), (1 - BJ), (1 - BI), (1 - BH), BG, (1 - BF), (1 - BE), (1 - BD), (1 - BC));
	T1509 = avep(9, (1 - BK), (1 - BJ), (1 - BI), (1 - BH), (1 - BG), BF, (1 - BE), (1 - BD), (1 - BC));
	T1527 = avep(9, (1 - BK), (1 - BJ), (1 - BI), (1 - BH), (1 - BG), (1 - BF), BE, (1 - BD), (1 - BC));
	T1545 = avep(9, (1 - BK), (1 - BJ), (1 - BI), (1 - BH), (1 - BG), (1 - BF), (1 - BE), BD, (1 - BC));
	T1563 = avep(9, (1 - BK), (1 - BJ), (1 - BI), (1 - BH), (1 - BG), (1 - BF), (1 - BE), (1 - BD), BC);
	T1418 = maxx(9, T1419, T1437, T1455, T1473, T1491, T1509, T1527, T1545, T1563);
	T1582 = avep(9, AJ, (1 - AI), (1 - AH), (1 - AG), (1 - AF), (1 - AE), (1 - AD), (1 - AC), (1 - AB));
	T1600 = avep(9, (1 - AJ), AI, (1 - AH), (1 - AG), (1 - AF), (1 - AE), (1 - AD), (1 - AC), (1 - AB));
	T1618 = avep(9, (1 - AJ), (1 - AI), AH, (1 - AG), (1 - AF), (1 - AE), (1 - AD), (1 - AC), (1 - AB));
	T1636 = avep(9, (1 - AJ), (1 - AI), (1 - AH), AG, (1 - AF), (1 - AE), (1 - AD), (1 - AC), (1 - AB));
	T1654 = avep(9, (1 - AJ), (1 - AI), (1 - AH), (1 - AG), AF, (1 - AE), (1 - AD), (1 - AC), (1 - AB));
	T1672 = avep(9, (1 - AJ), (1 - AI), (1 - AH), (1 - AG), (1 - AF), AE, (1 - AD), (1 - AC), (1 - AB));
	T1690 = avep(9, (1 - AJ), (1 - AI), (1 - AH), (1 - AG), (1 - AF), (1 - AE), AD, (1 - AC), (1 - AB));
	T1708 = avep(9, (1 - AJ), (1 - AI), (1 - AH), (1 - AG), (1 - AF), (1 - AE), (1 - AD), AC, (1 - AB));
	T1726 = avep(9, (1 - AJ), (1 - AI), (1 - AH), (1 - AG), (1 - AF), (1 - AE), (1 - AD), (1 - AC), AB);
	T1581 = maxx(9, T1582, T1600, T1618, T1636, T1654, T1672, T1690, T1708, T1726);
	T1745 = avep(9, JK, (1 - IK), (1 - HK), (1 - GK), (1 - FK), (1 - EK), (1 - DK), (1 - CK), (1 - BK));
	T1763 = avep(9, (1 - JK), IK, (1 - HK), (1 - GK), (1 - FK), (1 - EK), (1 - DK), (1 - CK), (1 - BK));
	T1781 = avep(9, (1 - JK), (1 - IK), HK, (1 - GK), (1 - FK), (1 - EK), (1 - DK), (1 - CK), (1 - BK));
	T1799 = avep(9, (1 - JK), (1 - IK), (1 - HK), GK, (1 - FK), (1 - EK), (1 - DK), (1 - CK), (1 - BK));
	T1817 = avep(9, (1 - JK), (1 - IK), (1 - HK), (1 - GK), FK, (1 - EK), (1 - DK), (1 - CK), (1 - BK));
	T1835 = avep(9, (1 - JK), (1 - IK), (1 - HK), (1 - GK), (1 - FK), EK, (1 - DK), (1 - CK), (1 - BK));
	T1853 = avep(9, (1 - JK), (1 - IK), (1 - HK), (1 - GK), (1 - FK), (1 - EK), DK, (1 - CK), (1 - BK));
	T1871 = avep(9, (1 - JK), (1 - IK), (1 - HK), (1 - GK), (1 - FK), (1 - EK), (1 - DK), CK, (1 - BK));
	T1889 = avep(9, (1 - JK), (1 - IK), (1 - HK), (1 - GK), (1 - FK), (1 - EK), (1 - DK), (1 - CK), BK);
	T1744 = maxx(9, T1745, T1763, T1781, T1799, T1817, T1835, T1853, T1871, T1889);
	T1908 = avep(9, IJ, (1 - HJ), (1 - GJ), (1 - FJ), (1 - EJ), (1 - DJ), (1 - CJ), (1 - BJ), (1 - AJ));
	T1926 = avep(9, (1 - IJ), HJ, (1 - GJ), (1 - FJ), (1 - EJ), (1 - DJ), (1 - CJ), (1 - BJ), (1 - AJ));
	T1944 = avep(9, (1 - IJ), (1 - HJ), GJ, (1 - FJ), (1 - EJ), (1 - DJ), (1 - CJ), (1 - BJ), (1 - AJ));
	T1962 = avep(9, (1 - IJ), (1 - HJ), (1 - GJ), FJ, (1 - EJ), (1 - DJ), (1 - CJ), (1 - BJ), (1 - AJ));
	T1980 = avep(9, (1 - IJ), (1 - HJ), (1 - GJ), (1 - FJ), EJ, (1 - DJ), (1 - CJ), (1 - BJ), (1 - AJ));
	T1998 = avep(9, (1 - IJ), (1 - HJ), (1 - GJ), (1 - FJ), (1 - EJ), DJ, (1 - CJ), (1 - BJ), (1 - AJ));
	T2016 = avep(9, (1 - IJ), (1 - HJ), (1 - GJ), (1 - FJ), (1 - EJ), (1 - DJ), CJ, (1 - BJ), (1 - AJ));
	T2034 = avep(9, (1 - IJ), (1 - HJ), (1 - GJ), (1 - FJ), (1 - EJ), (1 - DJ), (1 - CJ), BJ, (1 - AJ));
	T2052 = avep(9, (1 - IJ), (1 - HJ), (1 - GJ), (1 - FJ), (1 - EJ), (1 - DJ), (1 - CJ), (1 - BJ), AJ);
	T1907 = maxx(9, T1908, T1926, T1944, T1962, T1980, T1998, T2016, T2034, T2052);
	T2071 = avep(8, HI, (1 - GI), (1 - FI), (1 - EI), (1 - DI), (1 - CI), (1 - BI), (1 - AI));
	T2087 = avep(8, (1 - HI), GI, (1 - FI), (1 - EI), (1 - DI), (1 - CI), (1 - BI), (1 - AI));
	T2103 = avep(8, (1 - HI), (1 - GI), FI, (1 - EI), (1 - DI), (1 - CI), (1 - BI), (1 - AI));
	T2119 = avep(8, (1 - HI), (1 - GI), (1 - FI), EI, (1 - DI), (1 - CI), (1 - BI), (1 - AI));
	T2135 = avep(8, (1 - HI), (1 - GI), (1 - FI), (1 - EI), DI, (1 - CI), (1 - BI), (1 - AI));
	T2151 = avep(8, (1 - HI), (1 - GI), (1 - FI), (1 - EI), (1 - DI), CI, (1 - BI), (1 - AI));
	T2167 = avep(8, (1 - HI), (1 - GI), (1 - FI), (1 - EI), (1 - DI), (1 - CI), BI, (1 - AI));
	T2183 = avep(8, (1 - HI), (1 - GI), (1 - FI), (1 - EI), (1 - DI), (1 - CI), (1 - BI), AI);
	T2070 = maxx(8, T2071, T2087, T2103, T2119, T2135, T2151, T2167, T2183);
	T2200 = avep(7, GH, (1 - FH), (1 - EH), (1 - DH), (1 - CH), (1 - BH), (1 - AH));
	T2214 = avep(7, (1 - GH), FH, (1 - EH), (1 - DH), (1 - CH), (1 - BH), (1 - AH));
	T2228 = avep(7, (1 - GH), (1 - FH), EH, (1 - DH), (1 - CH), (1 - BH), (1 - AH));
	T2242 = avep(7, (1 - GH), (1 - FH), (1 - EH), DH, (1 - CH), (1 - BH), (1 - AH));
	T2256 = avep(7, (1 - GH), (1 - FH), (1 - EH), (1 - DH), CH, (1 - BH), (1 - AH));
	T2270 = avep(7, (1 - GH), (1 - FH), (1 - EH), (1 - DH), (1 - CH), BH, (1 - AH));
	T2284 = avep(7, (1 - GH), (1 - FH), (1 - EH), (1 - DH), (1 - CH), (1 - BH), AH);
	T2199 = maxx(7, T2200, T2214, T2228, T2242, T2256, T2270, T2284);
	T2299 = avep(6, FG, (1 - EG), (1 - DG), (1 - CG), (1 - BG), (1 - AG));
	T2311 = avep(6, (1 - FG), EG, (1 - DG), (1 - CG), (1 - BG), (1 - AG));
	T2323 = avep(6, (1 - FG), (1 - EG), DG, (1 - CG), (1 - BG), (1 - AG));
	T2335 = avep(6, (1 - FG), (1 - EG), (1 - DG), CG, (1 - BG), (1 - AG));
	T2347 = avep(6, (1 - FG), (1 - EG), (1 - DG), (1 - CG), BG, (1 - AG));
	T2359 = avep(6, (1 - FG), (1 - EG), (1 - DG), (1 - CG), (1 - BG), AG);
	T2298 = maxx(6, T2299, T2311, T2323, T2335, T2347, T2359);
	T2372 = avep(5, EF, (1 - DF), (1 - CF), (1 - BF), (1 - AF));
	T2382 = avep(5, (1 - EF), DF, (1 - CF), (1 - BF), (1 - AF));
	T2392 = avep(5, (1 - EF), (1 - DF), CF, (1 - BF), (1 - AF));
	T2402 = avep(5, (1 - EF), (1 - DF), (1 - CF), BF, (1 - AF));
	T2412 = avep(5, (1 - EF), (1 - DF), (1 - CF), (1 - BF), AF);
	T2371 = maxx(5, T2372, T2382, T2392, T2402, T2412);
	T2423 = avep(4, DE, (1 - CE), (1 - BE), (1 - AE));
	T2431 = avep(4, (1 - DE), CE, (1 - BE), (1 - AE));
	T2439 = avep(4, (1 - DE), (1 - CE), BE, (1 - AE));
	T2447 = avep(4, (1 - DE), (1 - CE), (1 - BE), AE);
	T2422 = maxx(4, T2423, T2431, T2439, T2447);
	T1002 = avep(21, KA, JK, maxx(2, avep(2, IK, (1 - IJ)), avep(2, (1 - IK), IJ)), maxx(3, avep(3, HK, (1 - HJ), (1 - HI)), avep(3, (1 - HK), HJ, (1 - HI)), avep(3, (1 - HK), (1 - HJ), HI)), T1033, T1066, T1117, T1190, T1289, T1418, T1581, T1744, T1907, T2070, T2199, T2298, T2371, T2422, maxx(3, avep(3, CD, (1 - BD), (1 - AD)), avep(3, (1 - CD), BD, (1 - AD)), avep(3, (1 - CD), (1 - BD), AD)), maxx(2, avep(2, BC, (1 - AC)), avep(2, (1 - BC), AC)), AB);
	return(T1002);
};