mkDet in MakeStructuralEng,Fin

src/english/MakeStructuralEng.gf

@@ -11,5 +11,7 @@ oper
     lin IDet {s = s ; n = n} ;
   mkIQuant : Str -> Str -> IQuant = \s,n ->
     lin IQuant {s = table {Sg => s ; Pl => n}} ;
+  mkDet : Str -> Number -> Det = \s,n ->
+    lin Det (mkDeterminer n s) ;
 
 }

src/finnish/MakeStructuralFin.gf

@@ -10,4 +10,7 @@ oper
   mkIQuant : Str -> IQuant = \s ->
     {s = \\n,c => s ; lock_IQuant = <>} ; ----
 
+  mkDet : N -> Number -> Det = \s,n ->
+    MorphoFin.mkDet n s ;
+    
 }