PPartNP and AdvNP.

This commit is contained in:
aarne
2006-05-16 22:13:12 +00:00
parent 39f6049f2d
commit ddfd57fe7d
7 changed files with 79 additions and 7 deletions

View File

@@ -27,6 +27,16 @@ incomplete concrete NounScand of Noun =
a = np.a
} ;
PPartNP np v2 = {
s = \\c => np.s ! c ++ v2.s ! (VI (VPtPret (agrAdj np.a.gn DIndef) Nom)) ;
a = np.a
} ;
AdvNP np adv = {
s = \\c => np.s ! c ++ adv.s ;
a = np.a
} ;
DetSg quant ord = {
s = \\b,g => quant.s ! (orB b ord.isDet) ! g ++ ord.s ;
n = Sg ;