clean-up after Fin infinitives

src/finnish/VerbFin.gf

@@ -79,6 +79,7 @@ concrete VerbFin of Verb = CatFin ** open Prelude, ResFin, StemFin in {
          ) ** {c2 = vp.c2} ; ---- correct ??
 -}
 
+----
  SlashV2VNP = StemFin.slashV2VNP ; ---- compilation to pgf takes too long 6/8/2013 hence a simplified version in stemmed/
 
     AdvVP vp adv = insertAdv (\\_ => adv.s) vp ;

src/finnish/infinitives/Infinitive.gf

@@ -4,7 +4,9 @@ abstract Infinitive =
   Lexicon
     ** {
 
-fun
+flags startcat = Utt ;
+
+data
   PresPartPassSubjVP : VP -> VP ;      -- (minun) on mentävä
   PresPartPassObjVP : VPSlash -> VP ;  -- (oluesta) on pidettävä
 
@@ -54,5 +56,4 @@ fun
 
   
 
-
 }