From 787dc13c837f0955fbd85b8f26a05d720d361333 Mon Sep 17 00:00:00 2001 From: Shinya Sato Date: Sun, 24 Oct 2021 23:04:45 +0900 Subject: Upload the comparison directory --- comparison/Haskell/ack3-11.hs | 9 +++++++++ 1 file changed, 9 insertions(+) create mode 100644 comparison/Haskell/ack3-11.hs (limited to 'comparison/Haskell/ack3-11.hs') diff --git a/comparison/Haskell/ack3-11.hs b/comparison/Haskell/ack3-11.hs new file mode 100644 index 0000000..7c8f350 --- /dev/null +++ b/comparison/Haskell/ack3-11.hs @@ -0,0 +1,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) + + + -- cgit v1.2.3