summaryrefslogtreecommitdiff
path: root/examples/test/paraphrase/Nat.gf
diff options
context:
space:
mode:
authorkrasimir <krasimir@chalmers.se>2009-05-20 11:25:00 +0000
committerkrasimir <krasimir@chalmers.se>2009-05-20 11:25:00 +0000
commit352ac74b0ff4fb616a9f40332b4c60d6c8953564 (patch)
tree3d0a8d373e29f34544d4b35e11e419b19c1a9688 /examples/test/paraphrase/Nat.gf
parentb6ce113041d7dc26021591f050bc11a358091594 (diff)
examples/test is moved to testsuite
Diffstat (limited to 'examples/test/paraphrase/Nat.gf')
-rw-r--r--examples/test/paraphrase/Nat.gf29
1 files changed, 0 insertions, 29 deletions
diff --git a/examples/test/paraphrase/Nat.gf b/examples/test/paraphrase/Nat.gf
deleted file mode 100644
index 7caa0fc93..000000000
--- a/examples/test/paraphrase/Nat.gf
+++ /dev/null
@@ -1,29 +0,0 @@
-abstract Nat = {
-
-cat Nat ;
-
-data
- Zero : Nat ;
- Succ : Nat -> Nat ;
-
-fun one : Nat ;
-def one = Succ Zero ;
-
-fun plus : Nat -> Nat -> Nat ;
-def plus x Zero = x ;
-def plus x (Succ y) = Succ (plus x y) ;
-
-fun twice : Nat -> Nat ;
-def twice x = plus x x ;
-
-fun times : Nat -> Nat -> Nat ;
-def times x Zero = Zero ;
-def times x (Succ y) = plus (times x y) x ;
-
-fun four : Nat ;
-def four = twice (twice one) ;
-
-fun exp : Nat -> Nat ;
-def exp Zero = one ;
-def exp (Succ x) = twice (exp x) ;
-}