code: function toMarkdownList(empty, s, f, xs) {
      return isEmpty (xs) ?
        empty :
        Z.reduce (function(s, x) { return s + '  - ' + f (x) + '\n'; }, s, xs);
    }
docs: toMarkdownList :: (String, String, a -> String, Array a) -> String