GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-23 18:02:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

Norwegian

Browse Source
This commit is contained in:
aarne
2005-01-20 14:03:48 +00:00
parent dac3d508f8
commit 51b45ae690
8 changed files with 46 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
lib/resource/swedish/SyntaxSwe.gf
View File

@@ -105,4 +105,15 @@ instance SyntaxSwe of SyntaxScand = TypesSwe **
pronVems = "vems" ;
pronVad = "vad" ;
--- added with Nor
conjGender : Gender -> Gender -> Gender = \m,n ->
case <m,n> of {
<Utr,Utr> => Utr ;
_ => Neutr
} ;
mkDeterminerSgGender3 : Str -> Str -> Str -> SpeciesP -> Determiner = \en,_,ett ->
mkDeterminerSgGender (table {Utr => en ; Neutr => ett}) ;
}

3
lib/resource/swedish/TypesSwe.gf
View File

@@ -10,6 +10,7 @@
instance TypesSwe of TypesScand = {
param
Gender = Utr | Neutr ;
NounGender = NUtr Sex | NNeutr ;
oper
@@ -17,6 +18,8 @@ oper
sexNoun = \s -> case s of {NUtr x => x ; NNeutr => NoMasc} ;
gen2nounGen = \s -> case s of {Utr => NUtr NoMasc ; Neutr => NNeutr} ;
utrum = Utr ; neutrum = Neutr ;
param
AdjFormPos = Strong GenNum | Weak SexNum ;