Jordi's suggestion in Symbol

This commit is contained in:
aarne
2006-11-23 13:12:42 +00:00
parent 84b49624d4
commit a98411e27f
6 changed files with 30 additions and 1 deletions

View File

@@ -13,6 +13,10 @@ lin
s = \\c => det.s ! cn.isMod ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ;
a = agrP3 g det.n
} ;
CNNumNP cn i = {
s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s ! neutrum) ;
a = agrP3 cn.g Sg
} ;
SymbS sy = {s = \\_ => sy.s} ;