summaryrefslogtreecommitdiff
path: root/docs/examples/parsing/lambda/test/test-08.kwi
blob: 7166d154f05d8cc8cffab3732c762e789df49703 (plain) (blame)
1
let fix = (\f -> f(fix f)) in (fix (\g n -> if n == 0 then 1 else n*(g(n-1)))) 5