sig val md_gen : unit -> Markdown.element list end