GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-07-01 11:38:34 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Kor) Relative clauses

Browse Source
This commit is contained in:
Inari Listenmaa
2020-04-01 18:44:11 +02:00
parent 7b09a6cf8b
commit c23016aaad
4 changed files with 20 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/korean/NounKor.gf
+5 -4
View File
@@ -18,8 +18,8 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
IsDig => glue dets cn.c.s ;
NoNum => dets } ;
in case isNum det of {
True => cns ++ detnum ;
False => detnum ++ cns }
True => cn.rs ++ cns ++ detnum ;
False => cn.rs ++ detnum ++ cns }
} ;
-- : PN -> NP ;
@@ -159,8 +159,9 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
} ;
-- : CN -> RS -> CN ;
-- RelCN cn rs = cn ** {
-- } ;
RelCN cn rs = cn ** {
rs = rs.s
} ;
{-
-- : CN -> Adv -> CN ;