support for measurement units

src/russian/NounRus.gf

@@ -241,4 +241,16 @@ lin
     preferShort=PreferFull
     } ;
 
+  QuantityNP n m = {
+    s = \\cas => preOrPost m.isPre m.s n.s;
+    pron=False ;
+    a=Ag (gennum Masc (numSizeNumber n.size)) P3
+    } ;
+
+  QuantityFloatNP n1 n2 m = {
+    s = \\cas => preOrPost m.isPre m.s (n1.s ++ BIND ++ "." ++ BIND ++ n2.s) ;
+    pron=False ;
+    a=Ag GPl P3
+    } ;
+
 }

src/russian/ParadigmsRus.gf

@@ -597,4 +597,7 @@ oper
       Second | SecondA => (Z.sg1StemFromVerb sg1) + "ит" ;
       _ => (Z.sg1StemFromVerb sg1) + "ет"
       } in (guessVerbForms asp Transitive inf sg1 sg3) ** {lock_V=<>} ;
+
+  mkMU : Str -> MU = \s -> lin MU {s=s; isPre=False} ;
+
 }