1
0
forked from GitHub/gf-core

future tense 'komma att' in scandinavian

This commit is contained in:
malin
2011-11-09 19:23:46 +00:00
parent 18ca88f9ed
commit 1ba9ffcff7
21 changed files with 82 additions and 50 deletions

View File

@@ -1,2 +1,2 @@
concrete CatDan of Cat = CommonX ** CatScand with
concrete CatDan of Cat = CommonX -[Tense, Temp] ** CatScand with
(ResScand = ResDan) ;

View File

@@ -47,6 +47,8 @@ instance DiffDan of DiffScand = open CommonScand, Prelude in {
{part = [] ; isVaere = True} ;
auxFut = "vil" ; -- "skal" in ExtDan
auxFutKommer = "vil" ;
auxFutPart = "" ;
auxCond = "ville" ;
negation : Polarity => Str = table {

View File

@@ -8,7 +8,7 @@ concrete IdiomDan of Idiom = CatDan **
GenericCl vp = mkClause "man" (agrP3 MorphoDan.utrum Sg) vp ;
CleftNP np rs = mkClause "det" (agrP3 MorphoDan.neutrum Sg)
(insertObj (\\_ => np.s ! rs.c ++ rs.s ! np.a) (predV verbBe)) ;
(insertObj (\\_ => np.s ! rs.c ++ rs.s ! np.a ! RNom) (predV verbBe)) ;
CleftAdv ad s = mkClause "det" (agrP3 MorphoDan.neutrum Sg)
(insertObj (\\_ => ad.s ++ s.s ! Sub) (predV verbBe)) ;