// return a fancy litorderedmap
static <A, B> Map<A, B> orderMapByDescendingValue(final Map<A, B> map) {
  L<A> l = new ArrayList(map.keySet());
  sort(l, mapComparatorDesc(map));
  Map<A, B> map2 = litorderedmap();
  for (A a : l)
    map2.put(a, map.get(a));
  ret map2;
}