static L<S> splitAtUnderscoreAndCamelCase(S s) {
  ret concatMap splitCamelCase(splitAtUnderscore(s));
}