sS hParagraphsFromEmptyLines(S s) {
  ret concatMap p(splitAtEmptyLines(s));
}