а

Size: a a a
а
а
AZ
filter (< 300) [1 ..]
зависает let is = iterate (\i -> i*(i+2)) 5
xs = takeWhile (<300) $ subtract 1 <$> is
in traverse_ print xs
λ
let is = iterate (\i -> i*(i+2)) 5
xs = takeWhile (<300) $ subtract 1 <$> is
in traverse_ print xs
AZ
λ
do
i <- is
let x = i - 1
guard $ x < 300
pure x
AZ
AZ
λ
V
Т8
V
V
Т8
V
V
С
Т8
V
V