/************************************************************
;                                                           *
;  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,BC,BD;
	double BE,BF,BG,BH,CD,CE,CF,CG;
	double CH,DE,DF,DG,DH,EF,EG,EH;
	double FG,FH,GH,HA;
	double T1002,T1033,T1034,T1042,T1050,T1058,T1066,T1067;
	double T1077,T1087,T1097,T1107,T1117,T1118,T1130,T1142;
	double T1154,T1166,T1178,T1190,T1191,T1203,T1215,T1227;
	double T1239,T1251,T1263,T1264,T1276,T1288,T1300,T1312;
	double T1324,T1336,T1337,T1349,T1361,T1373,T1385,T1397;
	double T1409,T1410,T1420,T1430,T1440,T1450,T1460,T1461;
	double T1469,T1477,T1485;
	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];
	BC = (double)c[i][7];
	BD = (double)c[i][8];
	BE = (double)c[i][9];
	BF = (double)c[i][10];
	BG = (double)c[i][11];
	BH = (double)c[i][12];
	CD = (double)c[i][13];
	CE = (double)c[i][14];
	CF = (double)c[i][15];
	CG = (double)c[i][16];
	CH = (double)c[i][17];
	DE = (double)c[i][18];
	DF = (double)c[i][19];
	DG = (double)c[i][20];
	DH = (double)c[i][21];
	EF = (double)c[i][22];
	EG = (double)c[i][23];
	EH = (double)c[i][24];
	FG = (double)c[i][25];
	FH = (double)c[i][26];
	GH = (double)c[i][27];
	HA = (double)c[i][28];
	T1034 = avep(4, DH, (1 - DG), (1 - DF), (1 - DE));
	T1042 = avep(4, (1 - DH), DG, (1 - DF), (1 - DE));
	T1050 = avep(4, (1 - DH), (1 - DG), DF, (1 - DE));
	T1058 = avep(4, (1 - DH), (1 - DG), (1 - DF), DE);
	T1033 = maxx(4, T1034, T1042, T1050, T1058);
	T1067 = avep(5, CH, (1 - CG), (1 - CF), (1 - CE), (1 - CD));
	T1077 = avep(5, (1 - CH), CG, (1 - CF), (1 - CE), (1 - CD));
	T1087 = avep(5, (1 - CH), (1 - CG), CF, (1 - CE), (1 - CD));
	T1097 = avep(5, (1 - CH), (1 - CG), (1 - CF), CE, (1 - CD));
	T1107 = avep(5, (1 - CH), (1 - CG), (1 - CF), (1 - CE), CD);
	T1066 = maxx(5, T1067, T1077, T1087, T1097, T1107);
	T1118 = avep(6, BH, (1 - BG), (1 - BF), (1 - BE), (1 - BD), (1 - BC));
	T1130 = avep(6, (1 - BH), BG, (1 - BF), (1 - BE), (1 - BD), (1 - BC));
	T1142 = avep(6, (1 - BH), (1 - BG), BF, (1 - BE), (1 - BD), (1 - BC));
	T1154 = avep(6, (1 - BH), (1 - BG), (1 - BF), BE, (1 - BD), (1 - BC));
	T1166 = avep(6, (1 - BH), (1 - BG), (1 - BF), (1 - BE), BD, (1 - BC));
	T1178 = avep(6, (1 - BH), (1 - BG), (1 - BF), (1 - BE), (1 - BD), BC);
	T1117 = maxx(6, T1118, T1130, T1142, T1154, T1166, T1178);
	T1191 = avep(6, AG, (1 - AF), (1 - AE), (1 - AD), (1 - AC), (1 - AB));
	T1203 = avep(6, (1 - AG), AF, (1 - AE), (1 - AD), (1 - AC), (1 - AB));
	T1215 = avep(6, (1 - AG), (1 - AF), AE, (1 - AD), (1 - AC), (1 - AB));
	T1227 = avep(6, (1 - AG), (1 - AF), (1 - AE), AD, (1 - AC), (1 - AB));
	T1239 = avep(6, (1 - AG), (1 - AF), (1 - AE), (1 - AD), AC, (1 - AB));
	T1251 = avep(6, (1 - AG), (1 - AF), (1 - AE), (1 - AD), (1 - AC), AB);
	T1190 = maxx(6, T1191, T1203, T1215, T1227, T1239, T1251);
	T1264 = avep(6, GH, (1 - FH), (1 - EH), (1 - DH), (1 - CH), (1 - BH));
	T1276 = avep(6, (1 - GH), FH, (1 - EH), (1 - DH), (1 - CH), (1 - BH));
	T1288 = avep(6, (1 - GH), (1 - FH), EH, (1 - DH), (1 - CH), (1 - BH));
	T1300 = avep(6, (1 - GH), (1 - FH), (1 - EH), DH, (1 - CH), (1 - BH));
	T1312 = avep(6, (1 - GH), (1 - FH), (1 - EH), (1 - DH), CH, (1 - BH));
	T1324 = avep(6, (1 - GH), (1 - FH), (1 - EH), (1 - DH), (1 - CH), BH);
	T1263 = maxx(6, T1264, T1276, T1288, T1300, T1312, T1324);
	T1337 = avep(6, FG, (1 - EG), (1 - DG), (1 - CG), (1 - BG), (1 - AG));
	T1349 = avep(6, (1 - FG), EG, (1 - DG), (1 - CG), (1 - BG), (1 - AG));
	T1361 = avep(6, (1 - FG), (1 - EG), DG, (1 - CG), (1 - BG), (1 - AG));
	T1373 = avep(6, (1 - FG), (1 - EG), (1 - DG), CG, (1 - BG), (1 - AG));
	T1385 = avep(6, (1 - FG), (1 - EG), (1 - DG), (1 - CG), BG, (1 - AG));
	T1397 = avep(6, (1 - FG), (1 - EG), (1 - DG), (1 - CG), (1 - BG), AG);
	T1336 = maxx(6, T1337, T1349, T1361, T1373, T1385, T1397);
	T1410 = avep(5, EF, (1 - DF), (1 - CF), (1 - BF), (1 - AF));
	T1420 = avep(5, (1 - EF), DF, (1 - CF), (1 - BF), (1 - AF));
	T1430 = avep(5, (1 - EF), (1 - DF), CF, (1 - BF), (1 - AF));
	T1440 = avep(5, (1 - EF), (1 - DF), (1 - CF), BF, (1 - AF));
	T1450 = avep(5, (1 - EF), (1 - DF), (1 - CF), (1 - BF), AF);
	T1409 = maxx(5, T1410, T1420, T1430, T1440, T1450);
	T1461 = avep(4, DE, (1 - CE), (1 - BE), (1 - AE));
	T1469 = avep(4, (1 - DE), CE, (1 - BE), (1 - AE));
	T1477 = avep(4, (1 - DE), (1 - CE), BE, (1 - AE));
	T1485 = avep(4, (1 - DE), (1 - CE), (1 - BE), AE);
	T1460 = maxx(4, T1461, T1469, T1477, T1485);
	T1002 = avep(15, HA, GH, maxx(2, avep(2, FH, (1 - FG)), avep(2, (1 - FH), FG)), maxx(3, avep(3, EH, (1 - EG), (1 - EF)), avep(3, (1 - EH), EG, (1 - EF)), avep(3, (1 - EH), (1 - EG), EF)), T1033, T1066, T1117, T1190, T1263, T1336, T1409, T1460, 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);
};