sS hParagraphsFromEmptyLines(S s) {
  ret concatMap_strings(func(S s) -> S { p(s) }, splitAtEmptyLines(s));
}