simplified Det structure in exper

This commit is contained in:
aarne
2008-04-20 10:39:07 +00:00
parent c4ae27bb53
commit 65f8120498
4 changed files with 32 additions and 25 deletions

View File

@@ -39,6 +39,18 @@ concrete BackwardEng of Backward = CatEng ** open ResEng in {
NumInt n = {s = n.s ; n = Pl} ;
OrdInt n = {s = n.s ++ "th"} ; --- DEPRECATED
DetSg quant ord = {
s = quant.s ! Sg ++ ord.s ;
n = Sg
} ;
DetPl quant num ord = {
s = quant.s ! num.n ++ num.s ++ ord.s ;
n = num.n
} ;
NoNum = {s = []; n = Pl } ;
-- from Structural 19/4/2008
that_NP = regNP "that" Sg ;