add distinction between Attributive vs Predicative (esp for colours)

2026-07-02 03:58:34 -06:00 · 2022-01-03 15:54:05 +08:00
parent 1b02447b44
commit 9a6301691d
11 changed files with 172 additions and 159 deletions
@@ -13,7 +13,7 @@ concrete PhraseChi of Phrase = CatChi ** open Prelude, ResChi in {
    UttIAdv iadv = iadv ;
    UttNP np = np ;
    UttCN cn = cn ;
-    UttAP ap = ap ;
+    UttAP ap = {s = ap.s!Attr}  ;
    UttCard x = x ;
    UttVP vp = ss (infVP vp) ;
    UttAdv adv = adv ;