GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-10 03:32:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

new Afrikaans by L&L Pretorius

Browse Source
This commit is contained in:
aarne
2011-03-12 11:29:42 +00:00
parent afbfbaa73a
commit e6c353425c
19 changed files with 834 additions and 724 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lib/src/afrikaans/NounAfr.gf
View File

@@ -4,7 +4,7 @@ concrete NounAfr of Noun = CatAfr ** open ResAfr, Prelude in {
lin
DetCN det cn = {
s = \\c => det.s ! cn.g ++ cn.s ! det.a ! NF det.n Nom ;
s = \\c => det.s ! cn.g ++ cn.s ! det.a ! NF det.n Nom ; -- kan dalk vereenvoudig (2011-01-14)
a = agrP3 det.n ;
isPron = False
} ;
@@ -69,7 +69,7 @@ concrete NounAfr of Noun = CatAfr ** open ResAfr, Prelude in {
a = Strong
} ;
NumCard n = {s = n.s ! Utr ! Nom ; n = n.n ; isNum = True} ;
NumCard n = {s = n.s ! Neutr ! Nom ; n = n.n ; isNum = True} ;
NumPl = {s = []; n = Pl ; isNum = False} ;
NumSg = {s = []; n = Sg ; isNum = False} ;
@@ -85,8 +85,8 @@ concrete NounAfr of Noun = CatAfr ** open ResAfr, Prelude in {
OrdSuperl a = {s = a.s ! Superl} ;
DefArt = {
s = \\_,n,g => case <n,g> of {<Sg,Neutr> => "het" ; _ => "de"} ;
sp = \\n,g => "die" ;
s = \\_,n,g => case <n,g> of {<Sg,Neutr> => "die" ; _ => "die"} ; --afr
sp = \\n,g => "hulle" ; --afr
a = Weak
} ;
@@ -94,13 +94,13 @@ concrete NounAfr of Noun = CatAfr ** open ResAfr, Prelude in {
s = table {
True => \\_,_ => [] ;
False => table {
Sg => \\g => "een" ;
Sg => \\g => "'n" ; --afr
Pl => \\_ => []
}
} ;
sp = table {
Sg => \\g => "een" ;
Pl => \\_ => "een" ----
Sg => \\g => "'n" ; --afr
Pl => \\_ => "'n" ---- --afr
} ;
a = Strong
} ;