mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-24 03:52:50 -06:00
28 lines
762 B
Plaintext
28 lines
762 B
Plaintext
|
|
concrete FragmentSwedish of FragmentAbstract = open FragmentResource in {
|
|
|
|
lincat
|
|
|
|
S = { s : Order => Str };
|
|
VP = { s1 : Str; s2 : Str };
|
|
N = { s : Num => Str; g : Gen };
|
|
D = { s : Gen => Str; n : Num };
|
|
|
|
lin
|
|
|
|
s_p x y = { s = table { Indir => y.s1 ++ x.s ++ y.s2;
|
|
Top => y.s2 ++ y.s1 ++ x.s;
|
|
_ => x.s ++ y.s1 ++ y.s2 } };
|
|
np_d x y = { s = x.s!y.g ++ y.s!x.n };
|
|
np_p x = { s = x.s!Pl };
|
|
vp_t x y = { s1 = x.s; s2 = y.s };
|
|
d_a = { s = table { Utr => "en"; Neu => "ett" }; n = Sg };
|
|
d_m = { s = table { _ => "maanga" }; n = Pl };
|
|
n_c = { s = table { _ => "lejon" }; g = Neu };
|
|
n_f = { s = table { Sg => "fisk"; Pl => "fiskar" }; g = Utr };
|
|
v_e = { s = "aeter" };
|
|
v_h = { s = "jagar" };
|
|
|
|
}
|
|
|