GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-18 07:40:16 -06:00
Code Issues Packages Projects Releases Wiki Activity

German resource grammar: major changes.

Browse Source
This commit is contained in:
scharolta_siencnik
2015-07-23 15:50:05 +00:00
parent d0e379b825
commit dc143dcb02
18 changed files with 447 additions and 256 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/german/QuestionGer.gf
View File

@@ -49,7 +49,7 @@ concrete QuestionGer of Question = CatGer ** open ResGer in {
QuestIComp icomp np = {
s = \\m,t,a,p =>
let
vp = predV sein_V ;
vp = predV sein_V ** {ext = icomp.ext};
cls = (mkClause (np.s ! NPC Nom) np.a vp).s ! m ! t ! a ! p ;
why = icomp.s ! np.a
in table {
@@ -95,9 +95,9 @@ concrete QuestionGer of Question = CatGer ** open ResGer in {
AdvIAdv i a = {s = i.s ++ a.s} ;
CompIAdv a = {s = \\_ => a.s} ;
CompIAdv a = {s = \\_ => a.s ; ext = ""} ;
CompIP ip = {s = \\_ => ip.s ! Nom} ;
CompIP ip = {s = \\_ => ip.s ! Nom ; ext = "" } ;
}