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

added AdvVPSlash and AdVVPSlash to VerbGer and an extended version of PPartNP which uses VPSlash in ParseEngGer. I guess the definitions so they might not be quite correct

Browse Source
This commit is contained in:
kr.angelov
2012-09-27 11:44:25 +00:00
parent 3845564625
commit 6b7f1d2c6c
2 changed files with 10 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lib/src/german/ParseEngGer.gf
View File

@@ -34,6 +34,13 @@ lin
insertObj vpi.p1 ( insertObj vpi.p1 (
predVGen v.isAux v)))) ; predVGen v.isAux v)))) ;
PPartNP np sl = heavyNP { -- guessed by KA, some fields in sl are ignored!!
s = \\c => np.s ! c ++
sl.s.s ! VPastPart APred ++
(sl.nn ! np.a).p1 ++ (sl.nn ! np.a).p2 ++ sl.a2;
a = np.a
} ;
{- {-
lin lin
myself_NP = mkNP (mkPronoun "itse" "itsen" "itseä" "itsenä" "itseen" Sg P1) ; myself_NP = mkNP (mkPronoun "itse" "itsen" "itseä" "itsenä" "itseen" Sg P1) ;

3
lib/src/german/VerbGer.gf
View File

@@ -80,6 +80,9 @@ concrete VerbGer of Verb = CatGer ** open Prelude, ResGer, Coordination in {
AdvVP vp adv = insertAdv adv.s vp ; AdvVP vp adv = insertAdv adv.s vp ;
AdVVP adv vp = insertAdv adv.s vp ; -- not AdV 27/5/2012: nicht immer AdVVP adv vp = insertAdv adv.s vp ; -- not AdV 27/5/2012: nicht immer
AdvVPSlash vp adv = insertAdv adv.s vp ** {c2 = vp.c2} ;
AdVVPSlash adv vp = insertAdv adv.s vp ** {c2 = vp.c2} ;
ReflVP vp = insertObj (\\a => appPrep vp.c2 ReflVP vp = insertObj (\\a => appPrep vp.c2
(\\k => usePrepC k (\c -> reflPron ! a ! c))) vp ; (\\k => usePrepC k (\c -> reflPron ! a ! c))) vp ;