From 51da7e3c0f5e743f3508fa3e6b645f2ccacb81ab Mon Sep 17 00:00:00 2001
From: peb <unknown>
Date: Thu, 29 Apr 2004 08:11:20 +0000
Subject: 29/4-04, peb: added directory 'testConversions' with a simple grammar

              for testing grammar conversions
---
 grammars/testConversions/SimpleSwe.gf | 57 +++++++++++++++++++++++++++++++++++
 1 file changed, 57 insertions(+)
 create mode 100644 grammars/testConversions/SimpleSwe.gf

(limited to 'grammars/testConversions/SimpleSwe.gf')

diff --git a/grammars/testConversions/SimpleSwe.gf b/grammars/testConversions/SimpleSwe.gf
new file mode 100644
index 000000000..36ca77ee0
--- /dev/null
+++ b/grammars/testConversions/SimpleSwe.gf
@@ -0,0 +1,57 @@
+
+concrete SimpleSwe of SimpleAbs = open SimpleSweRes in {
+
+lincat
+S  = {s : Str};
+VP = {s : Str};
+NP = {s : Str};
+V  = {s : Str};
+N  = {s : Num => Str ; g : Gen};
+D  = {s : Gen => Str ; n : Num};
+
+lin 
+cyclic x   = x;
+mkS    x y = {s = x.s ++ y.s};
+mkVP   x y = {s = x.s ++ y.s};
+mkNP1  x y = {s = x.s ! y.g ++ y.s ! x.n};
+mkNP2  x   = {s = x.s ! Pl};
+
+robin = {s = "Robin"};
+dog   = {s = table {Sg => "hund" ; Pl => "hundar"} ; g = Utr};
+child = {s = table {_ => "barn"} ; g = Neu};
+love  = {s = "älskar"};
+hate  = {s = "hatar"};
+one   = {s = table {Utr => "en" ; Neu => "ett"} ; n = Sg};
+all   = {s = table {_ => "alla"} ; n = Pl};
+
+}
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-- 
cgit v1.2.3