static L<PairS> allStringSplits(S s) {
  L<PairS> out = emptyList(l(s)-1);
  for (int i = 1; i < l(s); i++)
    addPair(out, substring(s, 0, i), substring(s, i));
  ret out;
}