diff options
Diffstat (limited to 'grammars/ljung/thesis/FragmentNumber.gf')
| -rw-r--r-- | grammars/ljung/thesis/FragmentNumber.gf | 26 |
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" } }; + +} + |
