Parameter `Make_applicative_traversals.A`

type 'a t

val return : 'a -> 'a A.t

val map : 'a A.t -> f:('a -> 'b) -> 'b A.t

val both : 'a A.t -> 'b A.t -> ('a * 'b) A.t

val (<*>) : ('a -> 'b) A.t -> 'a A.t -> 'b A.t

same as apply

val (<*) : 'a A.t -> unit A.t -> 'a A.t

val (*>) : unit A.t -> 'a A.t -> 'a A.t

val (>>|) : 'a A.t -> ('a -> 'b) -> 'b A.t

val apply : ('a -> 'b) A.t -> 'a A.t -> 'b A.t

val map2 : 'a A.t -> 'b A.t -> f:('a -> 'b -> 'c) -> 'c A.t

val map3 : 'a A.t -> 'b A.t -> 'c A.t -> f:('a -> 'b -> 'c -> 'd) -> 'd A.t

val all : 'a A.t list -> 'a list A.t

val all_unit : unit A.t list -> unit A.t

module Applicative_infix : sig ... end

val of_thunk : (unit -> 'a A.t) -> 'a A.t

Parameter Make_applicative_traversals.A