Chi fixes from René Tobner

2026-07-02 12:08:34 -06:00 · 2015-11-12 15:45:10 +00:00
parent 0aa7066d82
commit c62c881364
2 changed files with 8 additions and 4 deletions
@@ -10,7 +10,11 @@ concrete NounChi of Noun = CatChi ** open ResChi, Prelude in {
    UsePN pn = pn ;
    UsePron p = p ;

-    DetNP det = {s = det.s ++ ge_s} ; ----
+    DetNP det = {s = case det.detType of {
+                   DTFull Pl => det.s ++ xie_s ;
+                   _         => det.s ++ ge_s
+                   } ;
+                } ; ----

    PredetNP pred np = mkNP (pred.s ++ np.s) ; ---- possessive_s ++ np.s) ;