German preposition contractions

This commit is contained in:
aarne
2010-05-26 09:37:17 +00:00
parent 4089242edb
commit c7ff8114b4
17 changed files with 166 additions and 104 deletions

View File

@@ -9,7 +9,7 @@ concrete IdiomGer of Idiom = CatGer **
CleftNP np rs = mkClause "es" (agrP3 Sg)
(insertExtrapos (rs.s ! gennum (genderAgr np.a) (numberAgr np.a)) ----
(insertObj (\\_ => np.s ! rs.c) (predV MorphoGer.sein_V))) ;
(insertObj (\\_ => np.s ! NPC rs.c) (predV MorphoGer.sein_V))) ;
CleftAdv ad s = mkClause "es" (agrP3 Sg)
(insertExtrapos (conjThat ++ s.s ! Sub)
@@ -41,7 +41,7 @@ concrete IdiomGer of Idiom = CatGer **
} ;
ImpP3 np vp = {
s = (mkClause (np.s ! Nom) np.a vp).s !
s = (mkClause (np.s ! NPC Nom) np.a vp).s !
MConjunct ! Pres ! Simul ! Pos ! Inv
} ;