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

German infinitives fixed

Browse Source
This commit is contained in:
aarne
2006-02-08 12:05:14 +00:00
parent a70f2c286c
commit 91c50eae38
3 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/resource-1.0/german/SentenceGer.gf
View File

@@ -14,7 +14,7 @@ concrete SentenceGer of Sentence = CatGer ** open ResGer in {
agr = {n = n ; p = P2} ;
verb = vp.s ! agr ! VPImperat ;
in
verb.fin ++ vp.a1 ! pol ++ verb.inf ++ vp.n2 ! agr ++ vp.a2 ++ vp.ext
verb.fin ++ vp.a1 ! pol ++ verb.inf ++ vp.n2 ! agr ++ vp.a2 ++ vp.inf ++ vp.ext
} ;
SlashV2 np v2 =
@@ -35,7 +35,7 @@ concrete SentenceGer of Sentence = CatGer ** open ResGer in {
EmbedS s = {s = conjThat ++ s.s ! Sub} ;
EmbedQS qs = {s = qs.s ! QIndir} ;
EmbedVP vp = {s = "zu" ++ (vp.s ! agrP3 Sg ! VPInfinit Simul).inf} ; --- agr ---- compl
EmbedVP vp = {s = useInfVP vp} ;
UseCl t a p cl = {s = \\o => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! o} ;
UseQCl t a p cl = {s = \\q => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! q} ;