/************************************************************
;                                                           *
;  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 A1,A2,A3,A4,A5,A6,A7,A8;
	double A9,B10,B11,B12,B13,B14,B15,B16;
	double B17,B18,B19,C20,C21,C22,C23,C24;
	double C25,C26,C27,C28,C29,C30;
	double T1002,T1003,T1050,T1112,T1159,T1207;
	A1 = (double)c[i][1];
	A2 = (double)c[i][2];
	A3 = (double)c[i][3];
	A4 = (double)c[i][4];
	A5 = (double)c[i][5];
	A6 = (double)c[i][6];
	A7 = (double)c[i][7];
	A8 = (double)c[i][8];
	A9 = (double)c[i][9];
	B10 = (double)c[i][10];
	B11 = (double)c[i][11];
	B12 = (double)c[i][12];
	B13 = (double)c[i][13];
	B14 = (double)c[i][14];
	B15 = (double)c[i][15];
	B16 = (double)c[i][16];
	B17 = (double)c[i][17];
	B18 = (double)c[i][18];
	B19 = (double)c[i][19];
	C20 = (double)c[i][20];
	C21 = (double)c[i][21];
	C22 = (double)c[i][22];
	C23 = (double)c[i][23];
	C24 = (double)c[i][24];
	C25 = (double)c[i][25];
	C26 = (double)c[i][26];
	C27 = (double)c[i][27];
	C28 = (double)c[i][28];
	C29 = (double)c[i][29];
	C30 = (double)c[i][30];
	T1003 = avep(31, A1, (1 - A1), A2, (1 - A3), A4, (1 - A5), A6, (1 - A7), A8, (1 - A9), B10, (1 - B11), B12, (1 - B13), B14, (1 - B15), B16, (1 - B17), B18, (1 - B19), C20, (1 - C21), C22, (1 - C23), C24, (1 - C25), C26, (1 - C27), C28, (1 - C29), C30);
	T1050 = avep(31, A1, (1 - A1), (1 - A2), (1 - A3), (1 - A4), (1 - A5), (1 - A6), (1 - A7), (1 - A8), (1 - A9), (1 - B10), (1 - B11), (1 - B12), (1 - B13), (1 - B14), (1 - B15), (1 - B16), (1 - B17), (1 - B18), (1 - B19), (1 - C20), (1 - C21), (1 - C22), (1 - C23), (1 - C24), (1 - C25), (1 - C26), (1 - C27), (1 - C28), (1 - C29), (1 - C30));
	T1112 = avep(31, A1, (1 - A1), (1 - A2), (1 - A3), (1 - A4), (1 - A5), (1 - A6), (1 - A7), (1 - A8), (1 - A9), (1 - B10), (1 - B11), (1 - B12), (1 - B13), (1 - B14), (1 - B15), B16, B17, B18, B19, C20, C21, C22, C23, C24, C25, C26, C27, C28, C29, C30);
	T1159 = avep(31, A1, (1 - A1), A2, A3, A4, A5, A6, A7, A8, A9, B10, B11, B12, B13, B14, B15, (1 - B16), (1 - B17), (1 - B18), (1 - B19), (1 - C20), (1 - C21), (1 - C22), (1 - C23), (1 - C24), (1 - C25), (1 - C26), (1 - C27), (1 - C28), (1 - C29), (1 - C30));
	T1207 = avep(30, A1, A2, A3, A4, A5, A6, A7, A8, A9, B10, B11, B12, B13, B14, B15, B16, B17, B18, B19, C20, C21, C22, C23, C24, C25, C26, C27, C28, C29, C30);
	T1002 = maxx(5, T1003, T1050, T1112, T1159, T1207);
	return(T1002);
};