type code_block = {info_string : string option;code : string list;
}type list_type = | Unordered| Ordered
type id = [ | `Auto of string| `Id of string
]type heading = {level : int;inline : Inline.t;id : id option;
}module Table : sig ... endtype t = | Blank_line| Blocks of t list| Code_block of code_block| Heading of heading| Html_block of string list| Unordered_list of t list| Ordered_list of t list| Paragraph of Inline.t| Table of Table.t