static <A> bool allMultiSetsDisjoint(Iterable<MultiSet<A>> l) {
  new Set<A> seen;
  for (MultiSet<A> set : l)
    for (A a : keys(set))
      if (!seen.add(a)) false;
  true;
}