Module type Async_smtp_command__Common.Command.Let_syntax.Let_syntax.Open_on_rhs.S

type +'a t
val return : 'a ‑> 'a t
val apply : ('a ‑> 'b) t ‑> 'a t ‑> 'b t
val map : 'a t ‑> f:('a ‑> 'b) ‑> 'b t
val map2 : 'a t ‑> 'b t ‑> f:('a ‑> 'b ‑> 'c) ‑> 'c t
val map3 : 'a t ‑> 'b t ‑> 'c t ‑> f:('a ‑> 'b ‑> 'c ‑> 'd) ‑> 'd t
val all : 'a t list ‑> 'a list t
val all_unit : unit t list ‑> unit t
val all_ignore : unit t list ‑> unit t
val both : 'a t ‑> 'b t ‑> ('a * 'b) t
module Applicative_infix : sig ... end
val (<*>) : ('a ‑> 'b) t ‑> 'a t ‑> 'b t
val (<*) : 'a t ‑> unit t ‑> 'a t
val (*>) : unit t ‑> 'a t ‑> 'a t
val help : string Core__.Import.Lazy.t t
val path : string list t
val args : string list t
val flag : ?⁠aliases:string list ‑> ?⁠full_flag_required:unit ‑> string ‑> 'a Core__Command.Flag.t ‑> doc:string ‑> 'a t
val flag_optional_with_default_doc : ?⁠aliases:string list ‑> ?⁠full_flag_required:unit ‑> string ‑> 'a Core__Command.Arg_type.t ‑> ('a ‑> Core__.Import.Sexp.t) ‑> default:'a ‑> doc:string ‑> 'a t
val anon : 'a Core__Command.Anons.t ‑> 'a t
val choose_one : 'a option t list ‑> if_nothing_chosen:[ `Default_to of 'a | `Raise ] ‑> 'a t