1
0
forked from GitHub/gf-core

subordination in Dutch

This commit is contained in:
aarne
2009-11-08 20:23:21 +00:00
parent fad4c66451
commit ad89cc7cc2
3 changed files with 18 additions and 23 deletions

View File

@@ -1,27 +1,22 @@
concrete AdverbDut of Adverb = CatDut ** open ResDut, Prelude in
{
--{
--
-- lin
-- PositAdvAdj a = {s = a.s ! Posit ! APred} ;
--
concrete AdverbDut of Adverb = CatDut ** open ResDut, Prelude in {
lin
PositAdvAdj a = {s = a.s ! Posit ! APred} ;
-- ComparAdvAdj cadv a np = {
-- s = cadv.s ++ a.s ! Posit ! APred ++ cadv.p ++ np.s ! Nom
-- } ;
-- ComparAdvAdjS cadv a s = {
-- s = cadv.s ++ a.s ! Posit ! APred ++ cadv.p ++ s.s ! Sub
-- } ;
--
-- PrepNP prep np = {s = appPrep prep np.s} ;
--
-- AdAdv = cc2 ;
--
-- SubjS subj s = {s = subj.s ++ s.s ! Sub} ;
--
PrepNP prep np = {s = appPrep prep.s np.s} ;
AdAdv = cc2 ;
SubjS subj s = {s = subj.s ++ s.s ! Sub} ;
-- AdnCAdv cadv = {s = cadv.s ++ conjThan} ;
--
--}
--
-----b AdvSC s = s ;
}

View File

@@ -59,9 +59,9 @@ concrete SentenceDut of Sentence = CatDut ** open ResDut, Prelude in {
-- s = \\o => t.s ++ p.s ++ cl.s ! t.m ! t.t ! t.a ! p.p ! o ;
-- c2 = cl.c2
-- } ;
--
-- AdvS a s = {s = \\o => a.s ++ s.s ! Inv} ;
--
AdvS a s = {s = \\o => a.s ++ s.s ! Inv} ;
-- RelS s r = {s = \\o => s.s ! o ++ "," ++ r.s ! gennum Neutr Sg} ; --- "welches"
--
--}

View File

@@ -1,4 +1,4 @@
concrete StructuralDut of Structural = CatDut **
concrete StructuralDut of Structural = CatDut, Prelude **
open ResDut in
{
@@ -45,7 +45,7 @@ concrete StructuralDut of Structural = CatDut **
-- here_Adv = ss "hier" ;
-- how_IAdv = ss "wie" ;
-- how8many_IDet = detLikeAdj Pl "wieviel" ;
-- if_Subj = ss "wenn" ;
if_Subj = ss "als" ;
-- in8front_Prep = mkPrep "vor" Dat ;
i_Pron = mkPronoun "ik" "me" "m'n" "ik" "mij" "mijn" "mijne" Utr Sg P1 ;
-- in_Prep = mkPrep "in" Dat ;