GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-16 00:09:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

compound word paradigm in Ger

Browse Source
This commit is contained in:
aarne
2013-04-03 12:51:23 +00:00
parent 8fbfe494dc
commit 1ae1265a2f
2 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/french/ExtraRomanceFre.gf
View File

@@ -1,2 +1,2 @@
concrete ExtraRomanceFre of ExtraRomanceAbs = CatFre ** ExtraRomance with
concrete ExtraRomanceFre of ExtraRomanceAbs = CatFre ** ExtraRomance - [ProDrop] with
(ResRomance = ResFre) ;

11
lib/src/german/ParadigmsGer.gf
View File

@@ -81,7 +81,12 @@ mkN : overload {
-- Worst case: give all four singular forms, two plural forms (others + dative),
-- and the gender.
mkN : (x1,_,_,_,_,x6 : Str) -> Gender -> N -- worst case: mann, mann, manne, mannes, männer, männern
mkN : (x1,_,_,_,_,x6 : Str) -> Gender -> N ; -- worst case: mann, mann, manne, mannes, männer, männern
-- compound nouns
mkN : Str -> N -> N ; -- Auto + Fahrer -> Autofahrer
};
@@ -509,7 +514,9 @@ mkV2 : overload {
mkN = overload {
mkN : Str -> N = regN ;
mkN : (x1,x2 : Str) -> Gender -> N = reg2N ;
mkN : (x1,_,_,_,_,x6 : Str) -> Gender -> N = mk6N
mkN : (x1,_,_,_,_,x6 : Str) -> Gender -> N = mk6N ;
mkN : Str -> N -> N -- Auto + Fahrer -> Autofahrer
= \s,x -> lin N {s = \\n,c => s + Predef.toLower (x.s ! n ! c) ; g = x.g} ;
};