another optimization of Romance VP. Effect on Fre over 50% in compilation and parse speed. Somewhat smaller on Spa,Ita,Cat.

src/french/DiffFre.gf

@@ -61,15 +61,15 @@ instance DiffFre of DiffRomance - [
       _ => copula.s
       } ;
 
-    partAgr : VType -> VPAgr = \vtyp -> case vtyp of {
-      VTyp VHabere _ => vpAgrNone ;
-      _ => VPAgrSubj
-      } ;
-
     vpAgrClit : Agr -> VPAgr = \a0 ->
       let a = complAgr a0 in
       VPAgrClit a.g a.n ;
 
+    partAgr   : VType -> Bool = \vtyp -> case vtyp of { -- works for all except Spa
+      VTyp VHabere _ => False ;
+      _ => True
+      } ;
+
 ----    pronArg = pronArgGen Neg ; --- takes more space and time
 
     pronArg : Number -> Person -> CAgr -> CAgr -> Str * Str * Bool =