(Kor) Add param Phono for combining particles with nouns

2020-03-23 14:23:54 +01:00
parent 5322b9d90a
commit 703695b2cb
4 changed files with 8 additions and 4 deletions
@@ -62,7 +62,7 @@ concrete CatKor of Cat = CommonX ** open ResKor, Prelude in {
    NP = ResKor.NounPhrase ;
    Pron = ResKor.Pronoun ; --Pronouns need enough info to turn it into NP or Quant.
    Det = ResKor.Determiner ;
-    Predet = SS ;
+    Predet = {s : Phono => Str ; p : Phono} ;
    Quant = ResKor.Quant ;
    Num = ResKor.Num ;
    Ord = {