use SOFT_BIND in front of comma

This commit is contained in:
Krasimir Angelov
2023-10-10 09:32:56 +02:00
parent ca7d7d8fde
commit e22bb13eda
2 changed files with 3 additions and 3 deletions
+2 -2
View File
@@ -175,12 +175,12 @@ incomplete concrete SentenceRomance of Sentence =
} ;
AdvS a s = {s = \\o => a.s ++ s.s ! o} ;
ExtAdvS a s = {s = \\o => a.s ++ "," ++ s.s ! o} ;
ExtAdvS a s = {s = \\o => a.s ++ SOFT_BIND ++ "," ++ s.s ! o} ;
SSubjS a s b = {s = \\m => a.s ! m ++ s.s ++ b.s ! s.m} ;
RelS s r = {
s = \\o => s.s ! o ++ "," ++ partQIndir ++ r.s ! Indic ! agrP3 Masc Sg
s = \\o => s.s ! o ++ SOFT_BIND ++ "," ++ partQIndir ++ r.s ! Indic ! agrP3 Masc Sg
} ;
}