forked from GitHub/gf-rgl
(Kor) Add explicit plural for all nouns
This commit is contained in:
@@ -10,8 +10,8 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
|
||||
DetCN det cn = cn ** {s =
|
||||
\\c =>
|
||||
let cns : Str = case det.n of {
|
||||
-- Pl => cn.s ! Bare ++ BIND ++ plural ! c ;
|
||||
_Sg => cn.s ! c } ;
|
||||
Pl => cn.s ! Bare ++ BIND ++ plural ! c ;
|
||||
Sg => cn.s ! c } ;
|
||||
dets : Str = det.s ! cn.c.origin ;
|
||||
detnum : Str = case det.numtype of {
|
||||
IsNum => dets ++ cn.c.s ;
|
||||
|
||||
Reference in New Issue
Block a user