sig   type t = {     indent : unit -> unit;     dedent : unit -> unit;     format_usage : string -> string;     format_heading : string -> string;     format_description : string -> string;     format_option :       char list * string list -> string list -> string option -> string;   }   val indented_formatter :     ?level:int Pervasives.ref ->     ?indent:int Pervasives.ref ->     ?indent_increment:int ->     ?max_help_position:int ->     ?width:int -> ?short_first:bool -> unit -> OptParse.Formatter.t   val titled_formatter :     ?level:int Pervasives.ref ->     ?indent:int Pervasives.ref ->     ?indent_increment:int ->     ?max_help_position:int ->     ?width:int -> ?short_first:bool -> unit -> OptParse.Formatter.t   val wrap :     ?initial_indent:int ->     ?subsequent_indent:int -> string -> int -> string list   val fill :     ?initial_indent:int -> ?subsequent_indent:int -> string -> int -> string end