type t = {name : string;description : string;mutable items : (string * string) list;
}val create : doc:string -> string -> tval add : t -> doc:string -> string -> unitval print_md : (string -> unit) -> unitval print_string : (string -> unit) -> unit