another version of CompoundN

This commit is contained in:
Krasimir Angelov
2025-08-18 19:13:53 +02:00
parent e24e0cc7ce
commit 338c347d7c

View File

@@ -98,10 +98,9 @@ lin ApposNP np1 np2 = np1 ** { -- guessed by KA
lin CompoundN a b = lin N { lin CompoundN a b = lin N {
s = \\n => b.s ! n ++ s = \\n => b.s ! n ++
case b.relType of { case b.relType of {
NRelPrep p => prepCase (CPrep p) ; -- tasa de suicidio NRelPrep p => prepCase (CPrep p) ++ a.s ! Sg ; -- tasa de suicidio
NRelNoPrep => [] -- connessione internet = internet connection NRelNoPrep => a.s ! n -- connessione internet = internet connection
} ++ } ;
a.s ! n ;
g = b.g ; g = b.g ;
relType = b.relType relType = b.relType
} ; } ;