module type TRAVERSE = (M : MONAD) sig .. end
(
M
:
MONAD
)
sig
end
type +'a t
+'a
val sequence_m : 'a M.t t -> 'a t M.t
'a M.t t -> 'a t M.t
val fold_m : ('b -> 'a -> 'b M.t) -> 'b -> 'a t -> 'b M.t
('b -> 'a -> 'b M.t) -> 'b -> 'a t -> 'b M.t
val map_m : ('a -> 'b M.t) -> 'a t -> 'b t M.t
('a -> 'b M.t) -> 'a t -> 'b t M.t