mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-22 09:32:53 -06:00
German conjunctive
This commit is contained in:
@@ -354,31 +354,8 @@ oper
|
||||
in
|
||||
mkV singen singt sing sang saenge gesungen ;
|
||||
|
||||
prefixV p v =
|
||||
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
|
||||
} ;
|
||||
prefixV p v = MorphoGer.prefixV p v ** {lock_V = v.lock_V} ;
|
||||
|
||||
habenV v =
|
||||
{s = v.s ; prefix = v.prefix ; lock_V = v.lock_V ; aux = VHaben ; vtype = v.vtype} ;
|
||||
seinV v =
|
||||
|
||||
Reference in New Issue
Block a user