Move transfer into the GF repo.

This commit is contained in:
bringert
2005-11-25 16:36:19 +00:00
parent 66c1c31960
commit 2a59fffd45
42 changed files with 7400 additions and 0 deletions

11
transfer/examples/fib.tr Normal file
View File

@@ -0,0 +1,11 @@
import nat ;
fib : Int -> Int ;
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 (fibNat (Succ n)) (fibNat n) ;