module Infix: sig .. end
sig
end
include Monad.Infix
val (>>>) : 'a Deferred.t -> ('a -> unit) -> unit
'a Deferred.t -> ('a -> unit) -> unit