static <A> L<A> selectRandomUpTo(L<A> list, int n) {
  ret selectRandom(list, min(n, l(list)));
}