msyds/comp-syntax-gu-mlt
1
0
Fork 0
forked from GitHub/comp-syntax-gu-mlt
Code Pull Requests Activity

wip: noun morphology

Browse Source
This commit is contained in:
Madeleine Sydney Slaga
2026-02-12 18:46:56 -07:00
parent 16fb8b3645
commit 54c02b4be4
2 changed files with 20 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
lab1/grammar/korean/MicroResKor.gf
View File

@@ -1,9 +1,10 @@
resource MicroResKor = open Prelude, HangulJamo in {
param
VForm = VLemma | VPresent | VPast | VAdnomial ;
NForm = NBare | NTopic | NSubject | NObject | NPluralSubject | NPluralTopic ;
oper
Noun : Type = {s : Str} ;
Noun : Type = {s : NForm => Str} ;
Verb : Type = {s : VForm => Str} ;
Verb2 : Type = Verb ;
Adjective : Type = Verb ;
@@ -31,4 +32,16 @@ resource MicroResKor = open Prelude, HangulJamo in {
regVerb : (lemma : Str) -> Verb = reg False ;
regAdjective : (lemma : Str) -> Adjective = reg True ;
noun : (bare : Str) -> Noun
= \bare -> {
s = table {
NBare => bare ;
NTopic => bare + vc_allomorph bare "는" "은" ;
NSubject => bare + vc_allomorph bare "이" "가" ;
NObject => bare + vc_allomorph bare "를" "을" ;
NPluralTopic => bare + "들은" ;
NPluralSubject => bare + "들이"
}
} ;
}