update in basic_2

[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / csubc / drop.ma

diff --git a/matita/matita/contribs/lambdadelta/basic_1/csubc/drop.ma b/matita/matita/contribs/lambdadelta/basic_1/csubc/drop.ma
index 195d3649147f132fc0ce3bff467b48fb8e4d1365..a0bb37e961d7171bb606d60a82d49b5c6decff36 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_1/csubc/drop.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/csubc/drop.ma
@@ -14,11 +14,11 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/csubc/fwd.ma".
+include "basic_1/csubc/fwd.ma".
 
-include "Basic-1/sc3/props.ma".
+include "basic_1/sc3/props.ma".
 
-theorem csubc_drop_conf_O:
+lemma csubc_drop_conf_O:
  \forall (g: G).(\forall (c1: C).(\forall (e1: C).(\forall (h: nat).((drop h 
 O c1 e1) \to (\forall (c2: C).((csubc g c1 c2) \to (ex2 C (\lambda (e2: 
 C).(drop h O c2 e2)) (\lambda (e2: C).(csubc g e1 e2)))))))))
@@ -132,11 +132,8 @@ e2))) (\lambda (x: C).(\lambda (H12: (drop n O x1 x)).(\lambda (H13: (csubc g
 e1 x)).(ex_intro2 C (\lambda (e2: C).(drop (S n) O (CHead x1 (Bind x0) x2) 
 e2)) (\lambda (e2: C).(csubc g e1 e2)) x (drop_drop (Bind x0) n x1 x H12 x2) 
 H13)))) H11))))) c2 H5)))))))) H4)) H3)))))))) h))))))) c1)).
-(* COMMENTS
-Initial nodes: 2389
-END *)
 
-theorem drop_csubc_trans:
+lemma drop_csubc_trans:
  \forall (g: G).(\forall (c2: C).(\forall (e2: C).(\forall (d: nat).(\forall 
 (h: nat).((drop h d c2 e2) \to (\forall (e1: C).((csubc g e2 e1) \to (ex2 C 
 (\lambda (c1: C).(drop h d c1 e1)) (\lambda (c1: C).(csubc g c2 c1))))))))))
@@ -301,11 +298,8 @@ n) x1)) c1)) (CHead x (Bind x2) (lift h n x4)) (drop_skip_bind h n x x3 H18
 x2 x4) (csubc_void g c x H19 x2 H13 (lift h (r (Bind Void) n) x1) (lift h n 
 x4)))))) H17))) k H12))) e1 H11)))))))) H10)) H9))) t H4))))))))) 
 (drop_gen_skip_l c e2 t h n k H1)))))))) d))))))) c2)).
-(* COMMENTS
-Initial nodes: 3747
-END *)
 
-theorem csubc_drop_conf_rev:
+lemma csubc_drop_conf_rev:
  \forall (g: G).(\forall (c2: C).(\forall (e2: C).(\forall (d: nat).(\forall 
 (h: nat).((drop h d c2 e2) \to (\forall (e1: C).((csubc g e1 e2) \to (ex2 C 
 (\lambda (c1: C).(drop h d c1 e1)) (\lambda (c1: C).(csubc g c1 c2))))))))))
@@ -469,7 +463,4 @@ x2) (lift h (r (Bind x2) n) x1)))) (CHead x (Bind Void) (lift h n x4))
 (drop_skip_bind h n x x3 H18 Void x4) (csubc_void g x c H19 x2 H13 (lift h n 
 x4) (lift h (r (Bind x2) n) x1)))))) H17))) k H12))) e1 H11)))))))) H10)) 
 H9))) t H4))))))))) (drop_gen_skip_l c e2 t h n k H1)))))))) d))))))) c2)).
-(* COMMENTS
-Initial nodes: 3747
-END *)