(Kor) Add allomorphs for conjunctions

This commit is contained in:
Inari Listenmaa
2020-05-21 17:43:01 +02:00
parent 7785afd2c3
commit 737df2e226
9 changed files with 37 additions and 20 deletions
+1 -1
View File
@@ -123,7 +123,7 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
-- } ;
-- : A -> Ord ;
OrdSuperl a = {
OrdSuperl a = a ** {
s = \\vf => "가장" ++ a.s ! vf ;
n = Sg -- ?? is this meaningful?
} ;