在优雅的前奏中是否有任何替代Prelude的迭代函数？

Question

在标准前奏中：

Prelude> :t iterate
iterate :: (a -> a) -> a -> [a]

然而，在优雅的前奏中没有迭代，所以我认为可能有一些更通用的函数来做同样的事情，也许是一个monadic函数。我只是想不通它是什么。有吗？

Answer 1

您始终可以使用ClassyPrelude.repeat和Data.List.scanl重新实现它：

iterate = \f a -> scanl (\a f -> f a) a (repeat f)