sS wordNet_pretty(S query) {
  L<WordNet> l = wordNet(query);
  if (empty(l)) ret "No results";
  ret lines_rtrim(map(l, e -> e.word
    + (empty(e.synonyms) ? "" : " (also: " + joinWithComma(e.synonyms) + ")")
    + ": " + e.description
    + addPrefixIfNempty("\n  examples: ", e.examples)));
}