Effect.To_monad
module Monad : sig ... end
type (!'a, 'b) handle = ('a -> 'b Monad.t) -> 'a f -> 'b Monad.t
type !'a handler = {
handler : 'b. ('b, 'a) handle;
}
val run : 'a handler -> 'a t -> 'a Monad.t