first draft of a Belarusian grammar

src/belarusian/NamesBel.gf

@@ -0,0 +1,19 @@
+concrete NamesBel of Names = CatBel ** open ResBel, ParadigmsBel in {
+
+lin
+  GivenName gn = mkSimpleNP gn.s gn.g Sg P3 ;
+  MaleSurname sn = mkSimpleNP sn.s Masc Sg P3 ;
+  FemaleSurname sn = mkSimpleNP sn.s Fem Sg P3 ;
+  PlSurname sn = mkSimpleNP sn.s Masc Pl P3 ;
+  FullName gn sn = mkSimpleNP (gn.s ++ sn.s) gn.g Sg P3 ;
+
+  UseLN ln = {s = ln.s; a = {g=ln.g; n=ln.n; p=P3}} ;
+  PlainLN ln = {s = ln.s; a = {g=ln.g; n=ln.n; p=P3}} ;
+  InLN ln = {s = "у" ++ ln.s ! Loc} ;
+  AdjLN ap ln = {
+    s = \\c => ap.s ! c ! genNum ln.g ln.n ++ ln.s ! c ;
+    g = ln.g ;
+    n = ln.n
+  } ;
+
+}