started nor paradigms - does not work yet

This commit is contained in:
aarne
2005-03-10 16:44:03 +00:00
parent 794e75c65c
commit 624caf098f
5 changed files with 355 additions and 14 deletions

View File

@@ -11,10 +11,8 @@ instance SyntaxNor of SyntaxScand = TypesNor **
-- When common nouns are extracted from lexicon, the composite noun form is ignored.
npMan : NounPhrase = nameNounPhrase (mkProperName "man" (NUtr Masc)) ;
npDet : NounPhrase = nameNounPhrase (mkProperName "det" NNeutr) ;
mkAdjForm : Species -> Number -> NounGender -> AdjFormPos = \b,n,g ->
case <b,n> of {
<Indef,Sg> => Strong (ASg (genNoun g)) ;
@@ -23,7 +21,7 @@ instance SyntaxNor of SyntaxScand = TypesNor **
} ;
verbFinnas : Verb =
deponentVerb (mkVerb "finne" "finner" "finnes" "fant" "funnet" "finn" ** {s1 = []}) ;
mkVerb "finnes" "finner" "finnes" "fantes" "funnets" "fins" ** {s1 = []} ;
verbVara = mkVerb "være" "er" nonExist "var" "vært" "vær" ** {s1 = []} ;
verbHava = mkVerb "ha" "ha" "has" "hadde" "hatt" "ha" ** {s1 = []} ;