postfix subjunction SSubjS, defined for Eng, Ger, Romance

src/romance/SentenceRomance.gf

@@ -69,6 +69,8 @@ incomplete concrete SentenceRomance of Sentence =
 
     AdvS a s = {s = \\o => a.s ++ "," ++ 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
       } ;