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

German compund verbs glued in morphology

Browse Source
This commit is contained in:
aarne
2007-03-20 10:35:03 +00:00
parent 205f79efc6
commit 7066c905f6
4 changed files with 100 additions and 57 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
lib/resource-1.0/german/ParadigmsGer.gf
View File

@@ -355,7 +355,30 @@ oper
mkV singen singt sing sang saenge gesungen ;
prefixV p v =
{s = v.s ; prefix = p ; lock_V = v.lock_V ; aux = v.aux ; vtype = v.vtype} ;
let
vs = v.s ;
v1 = MorphoGer.mkV
(vs ! (VInf False))
(vs ! (VFin False (VPresInd Sg P1)))
(vs ! (VFin False (VPresInd Sg P2)))
(vs ! (VFin False (VPresInd Sg P3)))
(vs ! (VFin False (VPresInd Pl P2)))
(vs ! VImper Sg)
(vs ! (VFin False (VImpfInd Sg P1)))
(vs ! (VFin False (VImpfInd Sg P2)))
(vs ! (VFin False (VImpfInd Pl P1)))
(vs ! (VFin False (VImpfInd Pl P2)))
(vs ! (VFin False (VImpfSubj Sg P2)))
(vs ! VPastPart APred)
p
v.aux
in {
s = v1.s ;
prefix = p ;
lock_V = v.lock_V ;
aux = v.aux ;
vtype = v.vtype
} ;
habenV v =
{s = v.s ; prefix = v.prefix ; lock_V = v.lock_V ; aux = VHaben ; vtype = v.vtype} ;
seinV v =