fixed irreg verbs in DictFre; reject non-verbs in ParadigmsGer (check that infinitive ends -n)

src/german/ParadigmsGer.gf

@@ -579,11 +579,12 @@ mkV2 : overload {
       gabst = verbST gab ;
       gaben = pluralN gab ;
       gabt  = verbT gab
-    in 
-    MorphoGer.mkV 
+    in case geben of {
+      _ + "n" => MorphoGer.mkV 
       geben gebe gibst gibt gebt gib gab gabst gaben gabt gaebe gegeben
       [] VHaben ** {lock_V = <>} ;
-
+      _ => Predef.error (geben + ": invalid infinitive form, should end with 'n'")
+      } ;
   regV fragen = 
     let
       frag    = stemVerb fragen ;