История изменений
Исправление qnikst, (текущая версия) :
на держи, мне спать пора
λ> :t Data.Foldable.foldlM (\x y -> do t <- pr y ; return $ if t then y:x else x)
Data.Foldable.foldlM (\x y -> do t <- pr y ; return $ if t then y:x else x)
:: Foldable t => [a] -> t a -> IO [a]
pr:: a -> IO Bool
Исходная версия qnikst, :
на держи, мне спать пора
λ> :t Data.Foldable.foldlM (\x y -> do t <- pr y ; return $ if t then y:x else x)
Data.Foldable.foldlM (\x y -> do t <- pr y ; return $ if t then y:x else x)
:: Foldable t => [a] -> t a -> IO [a]