static <A> long longMultiSet_l(Map<A, Long> map) {
  long x = 0;
  for (Long l : values(map)) x += l;
  ret x;
}