updated and tested Mathematical

This commit is contained in:
aarne
2006-02-21 17:31:54 +00:00
parent f3fa5bdd92
commit 05d13ef582
16 changed files with 84 additions and 26 deletions

View File

@@ -4,21 +4,22 @@ incomplete concrete SymbolRomance of Symbol =
lin
SymbPN i = {s = i.s ; g = Masc} ;
IntPN i = {s = i.s ; g = Masc} ;
FloatPN i = {s = i.s ; g = Masc} ;
{-
CNIntNP cn i = {
s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s) ;
a = agrP3 cn.g Sg
s = \\c => cn.s ! Sg ++ i.s ;
a = agrP3 cn.g Sg ;
hasClit = False
} ;
CNSymbNP det cn xs = let g = cn.g in {
s = \\c => det.s ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ;
a = agrP3 g det.n
s = \\c => det.s ! g ! npform2case c ++ cn.s ! det.n ++ xs.s ;
a = agrP3 g det.n ;
hasClit = False
} ;
-}
lincat
Symb, SymbList = SS ;
Symb, [Symb] = SS ;
lin