module Op: sig .. end
sig
end
val (>>=) : ('s, 'x, 'a) Cf_scmonad.t -> ('a -> ('s, 'x, 'b) Cf_scmonad.t) -> ('s, 'x, 'b) Cf_scmonad.t
('s, 'x, 'a) Cf_scmonad.t -> ('a -> ('s, 'x, 'b) Cf_scmonad.t) -> ('s, 'x, 'b) Cf_scmonad.t
m >>= f
f
m