sig   val string :     ?default:string EDSL.t ->     doc:string -> string list -> string EDSL.t EDSL.Command_line.option_spec   val flag :     ?default:bool EDSL.t ->     doc:string -> string list -> bool EDSL.t EDSL.Command_line.option_spec   val ( & ) :     'a EDSL.Command_line.option_spec ->     ('b, 'c) EDSL.Command_line.cli_options ->     ('a -> 'b, 'c) EDSL.Command_line.cli_options   val usage : string -> ('a, 'a) EDSL.Command_line.cli_options end