Module Applicative.S3_to_S2

Parameters

module X : S3

Signature

type ('a, 'd) t = ('a'd, unit) X.t
val return : 'a -> ('a_) t
val map : ('a'e) t -> f:('a -> 'b) -> ('b'e) t
val both : ('a'e) t -> ('b'e) t -> ('a * 'b'e) t
val (<*>) : ('a -> 'b'e) t -> ('a'e) t -> ('b'e) t
val (<*) : ('a'e) t -> (unit, 'e) t -> ('a'e) t
val (*>) : (unit, 'e) t -> ('a'e) t -> ('a'e) t
val (>>|) : ('a'e) t -> ('a -> 'b) -> ('b'e) t
val apply : ('a -> 'b'e) t -> ('a'e) t -> ('b'e) t
val map2 : ('a'e) t -> ('b'e) t -> f:('a -> 'b -> 'c) -> ('c'e) t
val map3 : ('a'e) t -> ('b'e) t -> ('c'e) t -> f:('a -> 'b -> 'c -> 'd) -> ('d'e) t
val all : ('a'e) t list -> ('a list'e) t
val all_unit : (unit, 'e) t list -> (unit, 'e) t
module Applicative_infix : sig ... end