Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/PreludeList/Iterate.hs
module Prelude where iterate :: (a -> a) -> a -> [a] iterate f x = x : iterate f (f x)
