Norwegian

This commit is contained in:
aarne
2005-01-20 14:03:48 +00:00
parent a794f9148e
commit 29cc3bc26d
8 changed files with 46 additions and 15 deletions

View File

@@ -19,7 +19,7 @@ interface TypesScand = {
-- Their parameter values are atomic.
param
Gender = Utr | Neutr ;
Gender ;
Number = Sg | Pl ;
Species = Indef | Def ;
Case = Nom | Gen ;
@@ -46,6 +46,8 @@ param SubstForm = SF Number Species Case ;
oper Subst : Type = {s : SubstForm => Str ; h1 : Gender} ;
neutrum, utrum : Gender ;
--3 Adjectives
--
-- Adjectives are a very complex class, and the full table has as many as
@@ -84,7 +86,7 @@ param
oper
Adj : Type = {s : AdjForm => Str} ;
adverbForm : AdjFormPos = Strong (ASg Neutr) ;
adverbForm : AdjFormPos = Strong (ASg neutrum) ;
--3 Verbs
--