mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 08:58:55 -06:00
(May) Add lexicon + some unit tests
This commit is contained in:
@@ -95,7 +95,7 @@ lin cat_N = mkN "kucing" ;
|
||||
-- lin doctor_N = mkN "" ;
|
||||
lin dog_N = mkN "anjing" ;
|
||||
-- lin door_N = mkN "" ;
|
||||
-- lin drink_V2 = mkV2 "" ;
|
||||
lin drink_V2 = mkV2 "minum" ;
|
||||
-- lin dry_A = mkA "" ;
|
||||
-- lin dull_A = mkA "" ;
|
||||
-- lin dust_N = mkN "" ;
|
||||
@@ -225,7 +225,7 @@ lin learn_V2 = mkV2 (mkV "ajar" Ber) emptyPrep ;
|
||||
-- lin man_N = mkN "" ;
|
||||
-- lin married_A2 = mkA "" ;
|
||||
-- lin meat_N = mkN "" ;
|
||||
-- lin milk_N = mkN "" ;
|
||||
lin milk_N = mkN "susu" ;
|
||||
-- lin moon_N = mkN "" ;
|
||||
-- lin mother_N2 = mkN2 "" ;
|
||||
-- lin mountain_N = mkN "" ;
|
||||
@@ -390,7 +390,7 @@ lin teach_V2 = mkV2 "ajar" ;
|
||||
-- W - Y
|
||||
|
||||
-- lin wait_V2 = mkV2 "" ;
|
||||
lin walk_V = mkV "jalan" ;
|
||||
lin walk_V = mkV "jalan" Ber ;
|
||||
-- lin war_N = mkN "" ;
|
||||
-- lin warm_A = mkA "" ;
|
||||
-- lin wash_V2 = mkV2 "" ;
|
||||
|
||||
@@ -49,9 +49,10 @@ concrete NounMay of Noun = CatMay ** open ResMay, Prelude in {
|
||||
-- } ;
|
||||
|
||||
-- MassNP : CN -> NP ;
|
||||
-- MassNP cn = useN cn ** {
|
||||
-- } ;
|
||||
|
||||
MassNP cn = {
|
||||
s = cn.s ! NF Sg Bare ;
|
||||
p = P3
|
||||
} ;
|
||||
|
||||
--2 Determiners
|
||||
|
||||
|
||||
11
src/malay/unittest/relative.gftest
Normal file
11
src/malay/unittest/relative.gftest
Normal file
@@ -0,0 +1,11 @@
|
||||
Lang: DetCN (DetQuant IndefArt NumSg) (RelCN (UseN cat_N) (UseRCl (TTAnt TPres ASimul) PPos (RelVP IdRP (UseV go_V))))
|
||||
LangEng: a cat that goes
|
||||
LangMay: kucing yang pergi
|
||||
|
||||
Lang: DetCN (DetQuant IndefArt NumSg) (RelCN (UseN cat_N) (UseRCl (TTAnt TPres ASimul) PPos (RelVP IdRP (ComplSlash (SlashV2a drink_V2) (MassNP (UseN milk_N))))))
|
||||
LangEng: a cat that drinks milk
|
||||
LangMay: kucing yang minum susu
|
||||
|
||||
Lang: DetCN (DetQuant DefArt NumSg) (RelCN (UseN cat_N) (UseRCl (TTAnt TPres ASimul) PPos (RelSlash IdRP (SlashPrep (PredVP (DetCN (DetQuant DefArt NumSg) (UseN dog_N)) (UseV walk_V)) with_Prep))))
|
||||
LangEng: the cat that the dog walks with
|
||||
LangMay: kucing yang anjing berjalan dengannya
|
||||
Reference in New Issue
Block a user