static <A> L<L<A>> doublemap(L<L<A>> l, final O f) {
  ret map(l, func(L<A> x) { map(x, f) });
}