hmsg for Hajo's editor

This commit is contained in:
aarne
2005-03-10 10:14:10 +00:00
parent 18945ab7fc
commit 441f190dea
5 changed files with 47 additions and 35 deletions

View File

@@ -11,7 +11,15 @@ instance SyntaxSwe of SyntaxScand = TypesSwe **
oper
npMan : NounPhrase = nameNounPhrase (mkProperName "man" (NUtr Masc)) ;
npMan : NounPhrase = {
s = table {
PNom => "man" ;
PAcc => "en" ;
PGen _ => "ens"
} ;
g = Utr ; n = Sg ; p = P3
} ;
npDet : NounPhrase = nameNounPhrase (mkProperName "det" NNeutr) ;
mkAdjForm : Species -> Number -> NounGender -> AdjFormPos = \b,n,g ->