(Kor) use Polite as imperative—not perfect but…

…works for some situations, improvements are welcome.
2026-06-28 20:36:29 -06:00 · 2023-05-29 17:06:54 +02:00
parent a429a9bb9c
commit bd6faa569e
4 changed files with 8 additions and 12 deletions
@@ -8,11 +8,11 @@ concrete PhraseKor of Phrase = CatKor ** open Prelude, ResKor in {
    UttIAdv iadv = iadv ;
    UttAdv adv = adv ;
    UttInterj i = i ;
-{-
-    UttImpSg pol imp =
-    UttImpPl pol imp =
+
+    UttImpSg pol imp = {s = imp.s ! pol.p} ;
+    UttImpPl,
    UttImpPol = UttImpSg ;
-    -}
+
    UttIP ip = {s = ip.s ! Bare} ;

    UttNP np = {s = np.s ! Bare} ;