aboutsummaryrefslogtreecommitdiff
path: root/comparison/Haskell/ack3-11.hs
blob: 7c8f350cf3243b9b5df1e6f34bcdf529fc4c5ad9 (plain) (blame)
1
2
3
4
5
6
7
8
9
ack 0 n = n+1
ack m 0 = ack (m-1) 1
ack m n = ack (m-1) (ack m (n-1))


main = print $ (ack 3 11)