val ($) : ('a -> 'b) t -> 'a t -> 'b tval app : ('a -> 'b) t -> 'a t -> 'b tval map : ('a -> 'b) -> 'a t -> 'b tval product : 'a t -> 'b t -> ('a * 'b) tval term_result : ?usage:bool -> ('a, [ `Msg of string ]) result t -> 'a tval term_result' : ?usage:bool -> ('a, string) result t -> 'a tval cli_parse_result : ('a, [ `Msg of string ]) result t -> 'a tval cli_parse_result' : ('a, string) result t -> 'a tval choice_names : string list tval with_used_args : 'a t -> ('a * string list) ttype !'a ret = [ | `Error of bool * string| `Help of Manpage.format * string option| `Ok of 'a
]val ret : 'a ret t -> 'a tval exit_info : ?docs:string -> ?doc:string -> ?max:int -> int -> exit_infoval env_info : ?docs:string -> ?doc:string -> string -> env_infoval name : info -> stringtype !'a result = [ | `Error of [ `Exn | `Parse | `Term ]| `Help| `Ok of 'a| `Version
]val eval_peek_opts :
?version_opt:bool ->
?env:(string -> string option) ->
?argv:string array ->
'a t ->
'a option * 'a resultval exit_status_success : intval exit_status_cli_error : intval exit_status_internal_error : intval exit_status_of_result : ?term_err:int -> unit result -> intval exit_status_of_status_result : ?term_err:int -> int result -> intval exit : ?term_err:int -> unit result -> unitval exit_status : ?term_err:int -> int result -> unit