X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fpc3%2Fsubst1.ma;h=1df35129b7e4e61eea5d4032d87389c2998593a7;hp=3af245b3ae7ca979e411cee7c6d34d3edcc1b347;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hpb=88a68a9c334646bc17314d5327cd3b790202acd6

diff --git a/matita/matita/contribs/lambdadelta/basic_1/pc3/subst1.ma b/matita/matita/contribs/lambdadelta/basic_1/pc3/subst1.ma
index 3af245b3a..1df35129b 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/pc3/subst1.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/pc3/subst1.ma
@@ -14,11 +14,11 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/pc3/props.ma".
+include "basic_1/pc3/props.ma".
 
-include "Basic-1/pr3/subst1.ma".
+include "basic_1/pr3/subst1.ma".
 
-theorem pc3_gen_cabbr:
+lemma pc3_gen_cabbr:
  \forall (c: C).(\forall (t1: T).(\forall (t2: T).((pc3 c t1 t2) \to (\forall 
 (e: C).(\forall (u: T).(\forall (d: nat).((getl d c (CHead e (Bind Abbr) u)) 
 \to (\forall (a0: C).((csubst1 d u c a0) \to (\forall (a: C).((drop (S O) d 
@@ -42,7 +42,4 @@ a x1 x3)).(let H12 \def (eq_ind T x3 (\lambda (t: T).(pr3 a x1 t)) H11 x0
 (subst1_confluence_lift x x3 u d H10 x0 H8)) in (pc3_pr3_t a x1 x0 H12 x2 
 H9))))) (pr3_gen_cabbr c t1 x H6 e u d H0 a0 H1 a H2 x1 H3))))) 
 (pr3_gen_cabbr c t2 x H7 e u d H0 a0 H1 a H2 x2 H4))))) H5))))))))))))))))).
-(* COMMENTS
-Initial nodes: 405
-END *)