complete RGL implementation for Mongolian by Nyamsuren Erdenebadrakh

This commit is contained in:
nyamaakaa
2015-03-13 13:40:22 +00:00
parent 4ff30e6771
commit 053f2377b2
39 changed files with 54028 additions and 0 deletions

View File

@@ -0,0 +1,31 @@
--# -path=.:../abstract:../common:../../prelude
concrete AdverbMon of Adverb = CatMon ** open ResMon, Prelude in {
flags coding=utf8 ;
lin
PositAdvAdj a = a ;
ComparAdvAdj cadv a np = {
s = (appCompl cadv.c2 np.s) ++ cadv.s ++ a.s
} ;
ComparAdvAdjS cadv a s = {
s = s.s ! (Part Object) ++ cadv.c2.s ++ cadv.s ++ a.s
} ;
PrepNP prep np = {s = np.s ! prep.rc ++ prep.s} ;
AdAdv = cc2 ;
PositAdAAdj a = a ;
SubjS subj s = {s = subj.s ++ s.s ! Sub Condl} ;
AdnCAdv cadv = {
s = cadv.s ++ cadv.c2.s
} ;
}