msyds/gf-rgl
1
0 Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

fixed genitive es/en in German adjectives and determiners

Browse Source
This commit is contained in:
aarneranta committed 2020-04-14 16:32:17 +02:00
1 parent 08b6910eb8
commit 1f030252a1
4 files changed
+34 -10
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/german/NounGer.gf
+1 -1
View File
@@ -157,7 +157,7 @@ concrete NounGer of Noun = CatGer ** open ResGer, MorphoGer, Prelude in {
sp = table {
True => \\_,_,c => usePrepC c (\k -> []) ;
False => table {
Sg => \\g,c => usePrepC c (\k -> (detLikeAdj False Sg "ein").s ! g ! NPC k) ;
Sg => \\g,c => usePrepC c (\k -> (detUnlikeAdj False Sg "ein").s ! g ! NPC k) ;
Pl => \\_,c => usePrepC c (\k -> caselist "einige" "einige" "einigen" "einiger" ! k)
}
} ;