1 files changed, 12 insertions, 0 deletions
diff --git a/transfer/examples/fib.tra b/transfer/examples/fib.tra
new file mode 100644
index 000000000..43e533b1f
--- /dev/null
+++ b/transfer/examples/fib.tra
@@ -0,0 +1,12 @@
+import nat
+import prelude
+
+fib : Integer -> Integer
+fib 0 = 1
+fib 1 = 1
+fib n = fib (n-1) + fib (n-2)
+
+fibNat : Nat -> Nat
+fibNat Zero = Succ Zero
+fibNat (Succ Zero) = Succ Zero
+fibNat (Succ (Succ n)) = plus Nat add_Nat (fibNat (Succ n)) (fibNat n)
+\ No newline at end of file