From f5864eb14bca83de6724946e2cfc32198ab96d15 Mon Sep 17 00:00:00 2001 From: joachimschmidt557 Date: Tue, 18 Jun 2019 18:25:29 +0200 Subject: [PATCH] Add fibonacci --- Fib.hs | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 Fib.hs diff --git a/Fib.hs b/Fib.hs new file mode 100644 index 0000000..e764d9a --- /dev/null +++ b/Fib.hs @@ -0,0 +1,8 @@ +fib :: Integer -> Integer +fib 0 = 0 +fib 1 = 1 +fib n = + fib (n-2) + fib (n-1) + +main = + print (fib 10)