static L<S> antonymsFromSynonymDotCom(S word) {
  S url = "http://www.synonym.com/synonyms/" + urlencode(lower(word));
  S html = loadPageWithUserAgent(url, "Mac Safari");
  L<S> tok = htmlTok(html);
  ret multiSetByPopularity(asMultiSet(splitAtSpace(joinWithSpace(map(func(L<S> tok) -> S { dropPrefixTrim("Antonyms:", tok_html_noTags(tok)) },
    findContainerTagWithParamsDeep(tok, "ul", "class" := "antonyms"))))));
}