#! /usr/bin/perl -w
# maketab 
#  construct LaTeX table entry from summary results file "summary"
open(S, "summary") || die "no summary file";
while ($one = <S>) {
  @onef = split(" ",$one);
  $tab[0] = $onef[1]; #subdomain count
  $two = <S>;
  @twof = split(" ",$two);
  $tab[4] = $twof[1];
  $tab[5] = $twof[2];
  $tab[6] = $twof[3];
  $tab[8] = $twof[5];
  $tab[9] = $twof[6];
  $tab[10] = $twof[7];
  $three = <S>;
  @threef = split(" ",$three);
  $tab[3] = $threef[2]; #overall fun error
  $tab[7] = $threef[6]; #overall runtime error
  $four = <S>;
  @fourf = split(" ",$four);
  $tab[1] = $fourf[1];
  $tab[2] = $fourf[3];
  print "$tab[0]";
  for ($i=1; $i<=10; $i++) {
    print " & $tab[$i]";
  }
  print "\\\\\n";

}
