SSubjS in Scandinavian and Dut

This commit is contained in:
aarne
2012-06-08 08:51:03 +00:00
parent 1838781123
commit e7f272f4fe
3 changed files with 5 additions and 1 deletions

View File

@@ -59,7 +59,7 @@ concrete SentenceEng of Sentence = CatEng ** open Prelude, ResEng in {
AdvS a s = {s = a.s ++ s.s} ;
ExtAdvS a s = {s = a.s ++ "," ++ s.s} ;
SSubjS a s b = {s = a.s ++ s.s ++ b.s} ;
SSubjS a s b = {s = a.s ++ "," ++ s.s ++ b.s} ;
RelS s r = {s = s.s ++ "," ++ r.s ! agrP3 Sg} ;