]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_1/pc3/subst1.ma
update in basic_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / pc3 / subst1.ma
index 3af245b3ae7ca979e411cee7c6d34d3edcc1b347..1df35129b7e4e61eea5d4032d87389c2998593a7 100644 (file)
 
 (* 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 *)