static Area joinAreas(Cl<? extends Shape> l) {
  if (empty(l)) null;
  new Area a;
  for (b : l) a.add(toArea(b));
  ret a;
}