(Som) Fix Preps formed from nouns with possessives

2019-08-27 16:00:14 +02:00
parent e5f597979b
commit d077965a6b
7 changed files with 48 additions and 38 deletions
@@ -127,7 +127,9 @@ lin on_Prep = mkPrep ku ;
 -- lin possess_Prep = mkPrep ;
 -- lin through_Prep = mkPrep ;
 -- lin to_Prep = mkPrep ;
-lin under_Prep = possPrep (nUl "hoos") ;
+lin under_Prep = 
+    let hoos : CatSom.Prep = possPrep (nUl "hoos")
+     in hoos ** {c2 = Ku} ;
 lin with_Prep = mkPrep la ;
 -- lin without_Prep = mkPrep ;