Eager_deferred.Infixinclude Core_kernel.Monad.Infix with type 'a t := 'a Async_kernel.Deferred.tval (>>=) :
'a Async_kernel.Deferred.t ->
('a -> 'b Async_kernel.Deferred.t) ->
'b Async_kernel.Deferred.tval (>>|) :
'a Async_kernel.Deferred.t ->
('a -> 'b) ->
'b Async_kernel.Deferred.tval (>>>) : 'a Async_kernel.Deferred.t -> ('a -> unit) -> unit