summaryrefslogtreecommitdiff
path: root/grammars/ljung/thesis/FragmentNumber.gf
diff options
context:
space:
mode:
Diffstat (limited to 'grammars/ljung/thesis/FragmentNumber.gf')
-rw-r--r--grammars/ljung/thesis/FragmentNumber.gf26
1 files changed, 26 insertions, 0 deletions
diff --git a/grammars/ljung/thesis/FragmentNumber.gf b/grammars/ljung/thesis/FragmentNumber.gf
new file mode 100644
index 000000000..9dd05adb2
--- /dev/null
+++ b/grammars/ljung/thesis/FragmentNumber.gf
@@ -0,0 +1,26 @@
+
+concrete FragmentNumber of FragmentAbstract = open FragmentResource in {
+
+lincat
+
+N = { s : Num => Str };
+V = { s : Num => Str };
+VP = { s : Num => Str };
+
+D = { s : Str; n : Num };
+NP = { s : Str; n : Num };
+
+lin
+
+s_p x y = { s = x.s ++ y.s!x.n };
+np_d x y = { s = x.s ++ y.s!x.n; n = x.n };
+np_p x = { s = x.s!Pl; n = Pl };
+vp_t x y = { s = table { z => x.s!z ++ y.s } };
+d_a = { s = "a"; n = Sg };
+d_m = { s = "many"; n = Pl };
+n_c = { s = table { Sg => "lion"; Pl => "lions" } };
+n_f = { s = table { _ => "fish" } };
+v_e = { s = table { Sg => "eats" ; Pl => "eat" } };
+
+}
+