static Area joinAreas(Cl<Shape> l) {
  if (empty(l)) null;
  var it = iterator(l);
  Area a = toArea(it.next());
  while (it.hasNext())
    a = a.add(toArea(it.next()));
  ret a;
}