Module Deferred1.Infix

include Monad_infix
val (>>=) : 'a Async_kernel__.Types.Deferred.t -> ('a -> 'b Async_kernel__.Types.Deferred.t) -> 'b Async_kernel__.Types.Deferred.t
val (>>|) : 'a Async_kernel__.Types.Deferred.t -> ('a -> 'b) -> 'b Async_kernel__.Types.Deferred.t
val (>>>) : 'a t -> ('a -> unit) -> unit
val ppx_both : 'a t -> 'b t -> ('a * 'b) t