]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_1/pr3/pr3.ma
update in basic_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / pr3 / pr3.ma
index 935850b1c200c6e47e48e3fd98b8165327f4a80d..d973e0eb29ceea39a2c37335677ee9704230f010 100644 (file)
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/pr3/props.ma".
+include "basic_1/pr3/props.ma".
 
-include "Basic-1/pr2/pr2.ma".
+include "basic_1/pr2/pr2.ma".
 
-theorem pr3_strip:
+lemma pr3_strip:
  \forall (c: C).(\forall (t0: T).(\forall (t1: T).((pr3 c t0 t1) \to (\forall 
 (t2: T).((pr2 c t0 t2) \to (ex2 T (\lambda (t: T).(pr3 c t1 t)) (\lambda (t: 
 T).(pr3 c t2 t))))))))
@@ -41,9 +41,6 @@ x)).(ex2_ind T (\lambda (t: T).(pr3 c t4 t)) (\lambda (t: T).(pr3 c x t))
 (\lambda (t: T).(pr3 c t4 t)) (\lambda (t: T).(pr3 c t5 t)) x0 H6 (pr3_sing c 
 x t5 H4 x0 H7))))) (H2 x H5))))) (pr2_confluence c t3 t5 H3 t2 H0)))))))))) 
 t0 t1 H)))).
-(* COMMENTS
-Initial nodes: 375
-END *)
 
 theorem pr3_confluence:
  \forall (c: C).(\forall (t0: T).(\forall (t1: T).((pr3 c t0 t1) \to (\forall 
@@ -68,7 +65,4 @@ x)).(ex2_ind T (\lambda (t: T).(pr3 c t4 t)) (\lambda (t: T).(pr3 c x t))
 (\lambda (t: T).(pr3 c t4 t)) (\lambda (t: T).(pr3 c t5 t)) x0 H6 (pr3_t x t5 
 c H4 x0 H7))))) (H2 x H5))))) (pr3_strip c t3 t5 H3 t2 H0)))))))))) t0 t1 
 H)))).
-(* COMMENTS
-Initial nodes: 367
-END *)