GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 08:58:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Kor) Small cleanup + new words

Browse Source
This commit is contained in:
Inari Listenmaa
2020-04-07 21:30:43 +02:00
parent d9d2b907d1
commit fc8987e557
4 changed files with 6 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/korean/Hangul.gf
View File

@@ -183,6 +183,7 @@ oper
"기" | "끼" | "니" | "디" | "띠" | "리" | "미" | "비" | "삐" | "시" | "씨" | "이" | "지" | "찌" | "치" | "키" | "티" | "피" | "히" ) ;
a : pattern Str = #("가" | "까" | "나" | "다" | "따" | "라" | "마" | "바" | "빠" | "사" | "싸" | "아" | "자" | "짜" | "차" | "카" | "타" | "파" | "하") ;
e : pattern Str = #("게" | "께" | "네" | "데" | "떼" | "레" | "메" | "베" | "뻬" | "세" | "쎄" | "에" | "제" | "쩨" | "체" | "케" | "테" | "페" | "헤") ;
eo : pattern Str = #("거" | "꺼" | "너" | "더" | "떠" | "러" | "머" | "버" | "뻐" | "서" | "써" | "어" | "저" | "쩌" | "처" | "커" | "터" | "퍼" | "허") ;
eu : pattern Str = #("그" | "끄" | "느" | "드" | "뜨" | "르" | "므" | "브" | "쁘" | "스" | "쓰" | "으" | "즈" | "쯔" | "츠" | "크" | "트" | "프" | "흐") ;
i : pattern Str = #("기" | "끼" | "니" | "디" | "띠" | "리" | "미" | "비" | "삐" | "시" | "씨" | "이" | "지" | "찌" | "치" | "키" | "티" | "피" | "히") ;

6
src/korean/LexiconKor.gf
View File

@@ -1,5 +1,5 @@
concrete LexiconKor of Lexicon = CatKor **
open ParadigmsKor, ResKor in {
open ParadigmsKor, ResKor, StructuralKor in {
----
-- A
@@ -223,7 +223,7 @@ lin like_V2 = mkV2 (mkV "좋아" do_V) topic object ;
-- M
lin man_N = mkN "남자" ;
-- lin married_A2 = mkA "" ;
lin married_A2 = mkA2 (mkA "결혼했다" "결혼했어요" "결혼했습니다" "결혼한") with_Prep ; -- TODO check: forced past tense
-- lin meat_N = mkN "" ;
lin milk_N = mkN "우유" ;
-- lin moon_N = mkN "" ;
@@ -279,7 +279,7 @@ lin person_N = mkN "사람" ;
-- lin read_V2 = mkV2 "" ;
-- lin ready_A = mkA "" ;
-- lin reason_N = mkN "" ;
lin red_A = mkA "빨갛다" ;
lin red_A = mkA "빨갛다" "빨개요" "빨갛습니다" "빨간" ;
-- lin religion_N = mkN "" ;
-- lin restaurant_N = mkN "" ;
-- lin river_N = mkN "" ;

2
src/korean/ResKor.gf
View File

@@ -300,12 +300,10 @@ oper
Complement : Type = {
s : VForm => Str ;
-- compar : Str ; -- comparative is discontinuous
} ;
emptyComp : Complement = {
s = \\_ => [] ;
-- compar : Str ;
} ;
BaseVP : Type = {

4
src/korean/StructuralKor.gf
View File

@@ -69,7 +69,7 @@ lin only_Predet = {s = \\_ => "만" ; p = Consonant} ;
--lin every_Det = ;
lin few_Det = mkDet "조금" Pl ;
lin few_Det = mkDet "조금의" Pl ;
lin many_Det = mkDet "많은" Pl ;
-- lin much_Det = ;
@@ -115,7 +115,7 @@ lin possess_Prep = mkPrep "의" ;
-- lin through_Prep = mkPrep ;
lin to_Prep = mkPrep "에";
-- lin under_Prep = mkPrep "" ;
-- lin with_Prep = mkPrep "" ;
lin with_Prep = mkPrep "와" "과" ;
-- lin without_Prep = mkPrep "" ;