SymbPN and SymbCN in resources

This commit is contained in:
aarne
2004-06-03 19:31:39 +00:00
parent ea15514395
commit 10976cb7f5
13 changed files with 49 additions and 8 deletions

View File

@@ -104,6 +104,11 @@ lin
UseInt i = {s = table {Nom => i.s ; Gen => i.s ++ "'s"}} ; ---
NoNum = noNum ;
SymbPN i = {s = table {Nom => i.s ; Gen => i.s ++ "'s"}} ; ---
SymbCN cn s =
{s = \\n,c => cn.s ! n ! c ++ s.s ;
g = cn.g} ;
PredVP = predVerbPhrase ;
PosVG = predVerbGroup True ;
NegVG = predVerbGroup False ;

View File

@@ -81,6 +81,7 @@ oper
mkFunCN : CN -> Preposition -> Fun ;
funOfCN : CN -> Fun ;
--2 Adjectives
-- Non-comparison one-place adjectives just have one form.