Size: a a a
λ
Т8
B
takeWhile _ [] = []
takeWhile p (x : xs) =
if p x
then x : takeWhile p xs
else []AZ
import Data.Foldable
main =
let is = iterate (\i -> i*(i+2)) 5
xs = [x | i <- is, let x = i - 1, x < 300]
in traverse_ print xsλ
AZ
λ
import Data.Foldable
main =
let is = iterate (\i -> i*(i+2)) 5
xs = [x | i <- is, let x = i - 1, x < 300]
in traverse_ print xsAZ
AZ
Т8
import Data.Foldable
main =
let is = iterate (\i -> i*(i+2)) 5
xs = [x | i <- is, let x = i - 1, x < 300]
in traverse_ print xsAZ
if это функция. Она всегда возвращает значение. Ну и так далееB
λ
iterate f x = x : iterate f (f x)как Алекс выше сказал — в хаскеле циклов нет
λ
Т8
if это функция. Она всегда возвращает значение. Ну и так далееТ8
Т8
λ
λ
AZ