X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FBase-1%2Fext%2Ftactics.ma;h=09f9fa05f8fd0c98df82f76e2415ffdd43297a26;hb=6329f0f87906d3347c39d2ba2f5ec2b2124f17a2;hp=c23428942b1c7c19adcf316e7bad16661a8510be;hpb=783fbc6eb42d5db260d93d8d213a7d5c035e99e3;p=helm.git

diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/ext/tactics.ma b/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/ext/tactics.ma
index c23428942..09f9fa05f 100644
--- a/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/ext/tactics.ma
+++ b/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/ext/tactics.ma
@@ -14,17 +14,18 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-
+set "baseuri" "cic:/matita/LAMBDA-TYPES/Base-1/ext/tactics".
 
 include "preamble.ma".
 
 theorem insert_eq:
  \forall (S: Set).(\forall (x: S).(\forall (P: ((S \to Prop))).(\forall (G: 
-Prop).(((\forall (y: S).((P y) \to ((eq S y x) \to G)))) \to ((P x) \to G)))))
+((S \to Prop))).(((\forall (y: S).((P y) \to ((eq S y x) \to (G y))))) \to 
+((P x) \to (G x))))))
 \def
  \lambda (S: Set).(\lambda (x: S).(\lambda (P: ((S \to Prop))).(\lambda (G: 
-Prop).(\lambda (H: ((\forall (y: S).((P y) \to ((eq S y x) \to 
-G))))).(\lambda (H0: (P x)).(H x H0 (refl_equal S x))))))).
+((S \to Prop))).(\lambda (H: ((\forall (y: S).((P y) \to ((eq S y x) \to (G 
+y)))))).(\lambda (H0: (P x)).(H x H0 (refl_equal S x))))))).
 
 theorem unintro:
  \forall (A: Set).(\forall (a: A).(\forall (P: ((A \to Prop))).(((\forall (x: