include Monad_infixval (>>=) : 'a Async_kernel__.Types.Deferred.t ‑> ('a ‑> 'b Async_kernel__.Types.Deferred.t) ‑> 'b Async_kernel__.Types.Deferred.tval (>>|) : 'a Async_kernel__.Types.Deferred.t ‑> ('a ‑> 'b) ‑> 'b Async_kernel__.Types.Deferred.tval (>>>) : 'a t ‑> ('a ‑> unit) ‑> unit