sig   type block =       [ `I of string * string       | `Noblank       | `P of string       | `Pre of string       | `S of string ]   type title = string * int * string * string * string   type t = Cmdliner.Manpage.title * Cmdliner.Manpage.block list   val print :     ?subst:(string -> string) ->     [ `Groff | `Pager | `Plain ] ->     Format.formatter -> Cmdliner.Manpage.t -> unit end