GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-29 22:42:52 -06:00
Code Issues Packages Projects Releases Wiki Activity

Changed test.tr to run a fibNat test.

Browse Source
This commit is contained in:
bringert
2005-12-05 16:52:56 +00:00
parent 224d2451d7
commit 98b8d8d081
2 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
transfer/examples/fib.tr
View File

@@ -9,4 +9,4 @@ 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 (fibNat (Succ n)) (fibNat n)
fibNat (Succ (Succ n)) = plus Nat add_Nat (fibNat (Succ n)) (fibNat n)