more Scandinavian

This commit is contained in:
aarne
2005-12-07 18:59:35 +00:00
parent f8b9bced8b
commit 36c899e975
10 changed files with 122 additions and 43 deletions

View File

@@ -5,6 +5,8 @@ interface DiffScand = open ResScand, Prelude in {
param
Gender ;
CardOrd = NCard Gender | NOrd AFormSup ; -- sic! (AFormSup)
oper
neutrum, utrum : Gender ;
@@ -28,6 +30,7 @@ interface DiffScand = open ResScand, Prelude in {
artIndef : Gender => Str ;
verbHave : {s : VForm => Str} ;
verbBe : {s : VForm => Str} ;
auxFut : Str ;
auxCond : Str ;
@@ -72,4 +75,8 @@ interface DiffScand = open ResScand, Prelude in {
en2,ea2,eext : Bool = False -- indicate if the field exists
} ;
-- For determiners; mostly two-valued even in Norwegian.
genderForms : (x1,x2 : Str) -> Gender => Str ;
}