ack3-11.hs « Haskell « comparison - inpla.git - A fork of Inpla, a multi-threaded parallel interpreter of interaction nets

about summary refs log tree commit diff

path: root/comparison/Haskell/ack3-11.hs

blob: 45b28530f49fb6ef51d95e606634cd4d3d73368e (plain) (blame)

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)