*** empty log message ***

This commit is contained in:
peb
2004-06-02 11:17:15 +00:00
parent 78f88812b8
commit ea15514395
7 changed files with 72 additions and 26 deletions

View File

@@ -8,6 +8,8 @@ NP = {s : Str ; n : Num};
V = {s : Num => Str};
N = {s : Num => Str};
D = {s : Str ; n : Num};
P = {s : Str};
PP = {s : Str};
lin
cyclic x = x;
@@ -15,6 +17,8 @@ mkS x y = {s = x.s ++ y.s ! x.n};
mkVP x y = {s = table {n => x.s ! n ++ y.s}};
mkNP1 x y = {s = x.s ++ y.s ! x.n ; n = x.n};
mkNP2 x = {s = x.s ! Pl ; n = Pl};
mkNP3 x y = {s = x.s ++ y.s; n = x.n};
mkPP x y = {s = x.s ++ y.s};
robin = {s = "Robin" ; n = Sg};
dog = {s = table {Sg => "dog" ; Pl => "dogs"}};
@@ -23,6 +27,7 @@ love = {s = table {Sg => "loves" ; Pl => "love"}};
hate = {s = table {Sg => "hates" ; Pl => "hate"}};
one = {s = "one" ; n = Sg};
all = {s = "all" ; n = Pl};
inside= {s = "in"};
}