iterate関数
https://hackage.haskell.org/package/base-4.18.0.0/docs/Prelude.html#v:iterate
例
code:hs
>> take 10 $ iterate not True
[True,False,True,False...
>> take 10 $ iterate (+3) 42
[42,45,48,51,54,57,60,63...