GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-20 16:42:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

completed German in 1.4

Browse Source
This commit is contained in:
aarne
2008-06-04 12:09:14 +00:00
parent 0797d5940a
commit 869e0563d1
7 changed files with 158 additions and 69 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
lib/resource-1.4/german/SentenceGer.gf
View File

@@ -22,16 +22,12 @@ concrete SentenceGer of Sentence = CatGer ** open ResGer, Prelude in {
verb.fin ++ ps.p2 ++
vp.n2 ! agr ++ vp.a1 ! pol ++ vp.a2 ++ inf ++ vp.ext
} ;
{- ---b
SlashV2 np v2 =
mkClause (np.s ! Nom) np.a (predV v2) ** {c2 = v2.c2} ;
SlashVVV2 np vv v2 =
mkClause (np.s ! Nom) np.a
(insertInf (v2.prefix ++ v2.s ! VInf (notB vv.isAux))
(predVGen vv.isAux vv)) **
{c2 = v2.c2} ;
-}
SlashVP np vp =
mkClause
(np.s ! Nom) np.a
vp **
{c2 = vp.c2} ;
AdvSlash slash adv = {
s = \\m,t,a,b,o => slash.s ! m ! t ! a ! b ! o ++ adv.s ;
@@ -66,4 +62,6 @@ concrete SentenceGer of Sentence = CatGer ** open ResGer, Prelude in {
AdvS a s = {s = \\o => a.s ++ s.s ! Inv} ;
RelS s r = {s = \\o => s.s ! o ++ "," ++ r.s ! gennum Neutr Sg} ; --- "welches"
}