$windowsize = 3;  #Assume 3x3 window size
$datatype = 2;    #Assume files are floats
$projid = 3;      #Assume NDFD projection

function GetMedian($instr)
{
	$results = explode(",",$instr);
	$numvals = sizeof($results)-1;
	sort($results);
	$middle = ($numvals / 2) + 1;
	return $results[$middle];
}
# Store the dates and times in MetaDates and MetaTimes
# Open and read the metadata file
$MetaDates = array(7);
$MetaTimes = array(7);

$metfile = "./output/meta.out";
$handle = fopen($metfile,'r');

for($i=1;$i<=7;$i++)
{

	$metadata = fgets($handle);
	$metaexpl = preg_split('/\s+/',$metadata);
	if($i == 1)
	{
		$MyDate = 1; $MyTime = 2;
	}
	else
	{
		$MyDate = 2; $MyTime = 3;
	}
	$MetaDates[$i] = $metaexpl[$MyDate];
	$MetaTimes[$i] = $metaexpl[$MyTime];
	$currday = $i-1;
	#print "$currday $MetaDates[$i] $MetaTimes[$i]<br>";
}
fclose($handle);

$ERCFiles = array("erc-021n.out","erc-121n.out","erc-221n.out","erc-318n.out","erc-418n.out","erc-518n.out","erc-618n.out");

$FM100Files = array("mc100-021n.out","mc100-121n.out","mc100-221n.out","mc100-318n.out","mc100-418n.out","mc100-518n.out","mc100-618n.out");

$FM1000Files = array("mc1000-021n.out","mc1000-121n.out","mc1000-221n.out","mc1000-318n.out","mc1000-418n.out","mc1000-518n.out","mc1000-618n.out");
if($outtype = "html")
{
printf("<table cellpadding=8 cellspacing=2><th align=left>Date</th> <th align=left>Time</th> <th align=left>ERC</th> <th align=left>FM100</th> <th align=left>FM1000</th>\r");
}
for($i=0;$i<7;$i++)
{
	$ERCFile = $ERCFiles[$i];
	$FM100File = $FM100Files[$i];
	$FM1000File = $FM1000Files[$i];
	$datadir = "./output";
	$cmd = "/var/www/html/data/geog_to_val $lon $lat $datadir/$ERCFile $projid $datatype $windowsize";
	$results = exec($cmd,$vals);
	$ERCMedian = GetMedian($results);
	$cmd = "/var/www/html/data/geog_to_val $lon $lat $datadir/$FM100File $projid $datatype $windowsize";
	$results = exec($cmd,$vals);
	$FM100Median = GetMedian($results);

	$cmd = "/var/www/html/data/geog_to_val $lon $lat $datadir/$FM1000File $projid $datatype $windowsize";
	$results = exec($cmd,$vals);
	$FM1000Median = GetMedian($results);
	if($outtype = "html"){
		printf("<tr><td>%s</td><td> %s</td><td> %.1f</td><td> %.1f</td><td> %.1f</td></tr>\r",$MetaDates[$i+1],$MetaTimes[$i+1], $ERCMedian, $FM100Median, $FM1000Median );
	}
}
printf("</table>");
?>
</body>
</html>