@sum[$a] += $i;        end {emitp  @sum, "a"          }
