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

modified Det structure; integrated scand definites.

Browse Source
This commit is contained in:
aarne
2006-01-12 23:03:25 +00:00
parent ec2cf7c4d4
commit 621ca0c43d
6 changed files with 104 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
lib/resource-1.0/german/NounGer.gf
View File

@@ -10,27 +10,33 @@ concrete NounGer of Noun = CatGer ** open ResGer, Prelude in {
} ;
UsePN pn = pn ** {a = agrP3 Sg} ;
UsePron pron = {
s = \\c => pron.s ! NPCase c ;
a = pron.a
} ;
DetSg pred quant ord =
PredetNP pred np = {
s = \\c => pred.s ! np.a.n ! Masc ! c ++ np.s ! c ; ---- g
a = np.a
} ;
DetSg quant ord =
let
n = Sg ;
a = quant.a
in {
s = \\g,c => pred.s ! n ! g ! c ++ quant.s ! g ! c ++
s = \\g,c => quant.s ! g ! c ++
ord.s ! agrAdj g (adjfCase a c) n c ;
n = n ;
a = a
} ;
DetPl pred quant num ord =
DetPl quant num ord =
let
n = Pl ;
a = quant.a
in {
s = \\g,c => pred.s ! n ! g ! c ++ quant.s ! g ! c ++
s = \\g,c => quant.s ! g ! c ++
num.s ! g ! c ++ ord.s ! agrAdj g (adjfCase a c) n c ;
n = n ;
a = a
@@ -48,7 +54,6 @@ concrete NounGer of Noun = CatGer ** open ResGer, Prelude in {
a = Weak
} ;
NoPredet = {s = \\_,_,_ => []} ;
NoNum = {s = \\_,_ => []} ;
NoOrd = {s = \\_ => []} ;