added QuantityNP and mkMU

src/interlingua/NounIna.gf

@@ -118,4 +118,10 @@ concrete NounIna of Noun = CatIna ** open ResIna, Prelude in {
       isPronoun = np.isPronoun ---- ?? AR
       } ;
 
+    QuantityNP n m = {
+      s = \\c => preOrPost m.isPre m.s (n.s ! NCard) ;
+      a = agrP3 n.n ;
+      isPronoun = False
+    } ;
+
 }

src/interlingua/ParadigmsIna.gf

@@ -254,5 +254,6 @@ oper
   mkInterj : Str -> Interj = \s -> lin Interj {s=s};
   mkVoc : Str -> Voc = variants {} ;
 
+  mkMU : Str -> MU = \s -> lin MU {s=s; isPre=False} ;
 
 } ;