@@ -34,8 +34,8 @@ flatten : Monad m => m (m a) -> m a
34flatten = join
34flatten = join
35%deprecate flatten "Please use `join`, which is the standard name."
35%deprecate flatten "Please use `join`, which is the standard name."
37−||| Similar to 'foldl', but uses a function wrapping its result in a 'Monad'.
37+||| Similar to `foldl`, but uses a function wrapping its result in a `Monad`.
38−||| Consequently, the final value is wrapped in the same 'Monad'.
38+||| Consequently, the final value is wrapped in the same `Monad`.
39foldlM : (Foldable t, Monad m) => (funcM: a -> b -> m a) -> (init: a) -> (input: t b) -> m a
39foldlM : (Foldable t, Monad m) => (funcM: a -> b -> m a) -> (init: a) -> (input: t b) -> m a
40foldlM fm a0 = foldl (\ma,b => ma >>= flip fm b) (pure a0)
40foldlM fm a0 = foldl (\ma,b => ma >>= flip fm b) (pure a0)