Module Applicative.Of_monad

Every monad is Applicative via:

let apply mf mx =
  mf >>= fun f ->
  mx >>| fun x ->
  f x

Parameters

module M : Monad.S

Signature

val return : 'a -> 'a M.t
val map : 'a M.t -> f:( 'a -> 'b ) -> 'b M.t
val both : 'a M.t -> 'b M.t -> ('a * 'b) M.t
val (<*>) : ( 'a -> 'b ) M.t -> 'a M.t -> 'b M.t

same as apply

val (<*) : 'a M.t -> unit M.t -> 'a M.t
val (*>) : unit M.t -> 'a M.t -> 'a M.t
val (>>|) : 'a M.t -> ( 'a -> 'b ) -> 'b M.t
val apply : ( 'a -> 'b ) M.t -> 'a M.t -> 'b M.t
val map2 : 'a M.t -> 'b M.t -> f:( 'a -> 'b -> 'c ) -> 'c M.t
val map3 : 'a M.t -> 'b M.t -> 'c M.t -> f:( 'a -> 'b -> 'c -> 'd ) -> 'd M.t
val all : 'a M.t list -> 'a list M.t
val all_unit : unit M.t list -> unit M.t
module Applicative_infix : sig ... end