static S asciiHeading(S title) {
  ret "\n" + title + "\n" + rep(l(title), '-');
}