S3_to_S2 (base.Base.Applicative.S3_to

Parameters

module X : S3

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