add Idet to Malay RGL

This commit is contained in:
Meowyam
2023-05-26 15:03:11 +08:00
parent d6129a26e5
commit 83aadfaaf9
3 changed files with 14 additions and 4 deletions

View File

@@ -59,6 +59,7 @@ concrete AdjectiveMay of Adjective = CatMay ** open ResMay, Prelude in {
-- : AdA -> AP -> AP ;
-- AdAP ada ap = ap ** { } ;
-- It can also be postmodified by an adverb, typically a prepositional phrase.

View File

@@ -13,7 +13,7 @@ concrete NounMay of Noun = CatMay ** open ResMay, Prelude in {
-- TODO classifier is necessary if numeral comes after noun. See Mintz p. 298.
-- ++ if_then_Str (isNum det.n) "buah" [] -- TODO store classifier in CN
++ case det.poss of {
Bare => cn.s ! NF (toNum det.n) poss ;
Bare => cn.s ! NF (toNum det.n) det.poss ;
_ => cn.s ! NF (toNum det.n) det.poss -- TODO check if this make sense
} ++ det.s ++ cn.heavyMod ;
} ;

View File

@@ -8,9 +8,18 @@ concrete QuestionMay of Question = CatMay ** open
-- determiners, with or without a noun.
lin
-- : IDet -> CN -> IP ; -- which five songs
IdetCN idet cn = NM.DetCN idet cn ** {
sp = \\nf => idet.sp ! nf ++ cn.s ! nf
} ;
-- IdetCN idet cn = NM.DetCN idet cn ** {
-- sp = \\nf => idet.sp ! nf ++ cn.s ! nf
-- } ;
IdetCN idet cn = emptyNP ** {
s = \\poss =>
idet.pr
++ case idet.poss of {
Bare => cn.s ! NF (toNum idet.n) idet.poss ;
_ => cn.s ! NF (toNum idet.n) idet.poss -- TODO check if this make sense
} ++ idet.s ++ cn.heavyMod ;
sp = \\nf => idet.sp ! nf ++ cn.s ! nf;
} ;
-- : IDet -> IP ; -- which five
IdetIP idet = NM.DetNP idet ** {sp = idet.sp};