// 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, new Comparator<A>() {
    public int compare(A a, A b) {
      ret cmp(map.get(b), map.get(a));
    }
  });
  Map<A, B> map2 = litorderedmap();
  for (A a : l)
    map2.put(a, map.get(a));
  ret map2;
}