diff --git a/lib/src/api/TryMon.gf b/lib/src/api/TryMon.gf
index eb08c78ab..007adc99a 100644
--- a/lib/src/api/TryMon.gf
+++ b/lib/src/api/TryMon.gf
@@ -1,4 +1,4 @@
---# -path=.:../mongolian:../common:../abstract:../prelude
+--# -path=.:../mongolian:../common:../abstract
 
 resource TryMon = SyntaxMon, LexiconMon, ParadigmsMon -[mkAdv, mkDet,mkQuant,mkAdA,mkAdN,mkIDet,mkDet,mkNP,mkNum,mkPConj,mkRP,mkOrd]** 
   open (P = ParadigmsMon) in {
diff --git a/lib/src/mongolian/AllMon.gf b/lib/src/mongolian/AllMon.gf
index bb64aa265..b9255460d 100644
--- a/lib/src/mongolian/AllMon.gf
+++ b/lib/src/mongolian/AllMon.gf
@@ -1,4 +1,4 @@
---# -path=.:../abstract:../common:prelude
+--# -path=.:../abstract:../common
 
 concrete AllMon of AllMonAbs = 
  LangMon,  -- - [bank_N, eye_N, hair_N, hand_N, hat_N, radio_N], -- also in DictMon
diff --git a/lib/src/mongolian/SymbolMon.gf b/lib/src/mongolian/SymbolMon.gf
new file mode 100644
index 000000000..d7e5dc31d
--- /dev/null
+++ b/lib/src/mongolian/SymbolMon.gf
@@ -0,0 +1,54 @@
+--# -path=.:../abstract:../prelude
+
+concrete SymbolMon of Symbol = CatMon ** open Prelude, ResMon in {
+
+  flags coding = utf8;
+{-
+ lin
+  SymbPN i = {s = addGenitiveS i.s ; g = Masc ; t = NonLiving ; h = Pers3_L } ;
+  
+  IntPN i  = {s = addGenitiveS i.s ; g = Masc ; t = NonLiving ; h = Pers3_L } ;
+  
+  FloatPN i = {s = addGenitiveS i.s ; g = Masc ; t = NonLiving ; h = Pers3_L } ;
+  
+  NumPN i = {s = \\_ =>i.s ; g = Masc ; t = NonLiving ; h = Pers3_L } ;
+  
+  CNIntNP cn i = {
+    s = \\c => cn.s ! Sg ! Nom ++ i.s ;
+    a = agrP3 cn.g Sg ;
+    t = NonLiving
+    } ;
+  
+  CNSymbNP det cn xs = {
+    s = \\c => det.s!Sg!Masc ++ cn.s ! det.n ! Nom ++  xs.s ; 
+    a = agrP3 cn.g det.n ;
+    t = NonLiving
+    } ;
+  
+  CNNumNP cn i = {
+    s = \\c => cn.s ! Sg ! Nom ++ i.s ;
+    a = agrP3 cn.g Sg ;
+    t = NonLiving
+    } ;
+
+  SymbS sy = sy ; 
+  SymbNum sy = { s = sy.s ; n = Pl } ;
+  SymbOrd sy = { s = sy.s ++ "ौँ" ; n = Pl} ;
+
+lincat 
+
+  Symb, [Symb] = SS ;
+
+lin
+  MkSymb s = s ;
+
+  BaseSymb = infixSS "र" ;
+  ConsSymb = infixSS "," ;
+
+oper
+    -- Note: this results in a space before 's, but there's
+    -- not mauch we can do about that.
+    addGenitiveS : Str -> Case => Str = \s -> 
+      table {_ => Prelude.glue s "दा" } ;
+-}      
+}