sig
  type t = Markdown.text
  val syntax : Syntax.t
  val of_json : json -> t
  val to_json : t -> json
end