]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_1/csubv/getl.ma
update in basic_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / csubv / getl.ma
index bbba95084b3f1c2a02438e390867ccd95803a78a..f648b2323c41b2238df1d279d7472905037bcb37 100644 (file)
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/csubv/clear.ma".
+include "basic_1/csubv/clear.ma".
 
-include "Basic-1/csubv/drop.ma".
+include "basic_1/csubv/drop.ma".
 
-include "Basic-1/getl/fwd.ma".
+include "basic_1/getl/fwd.ma".
 
-theorem csubv_getl_conf:
+lemma csubv_getl_conf:
  \forall (c1: C).(\forall (c2: C).((csubv c1 c2) \to (\forall (b1: 
 B).(\forall (d1: C).(\forall (v1: T).(\forall (i: nat).((getl i c1 (CHead d1 
 (Bind b1) v1)) \to (ex2_3 B C T (\lambda (_: B).(\lambda (d2: C).(\lambda (_: 
@@ -52,11 +52,8 @@ B C T (\lambda (_: B).(\lambda (d2: C).(\lambda (_: T).(csubv d1 d2))))
 (\lambda (b2: B).(\lambda (d2: C).(\lambda (v2: T).(getl i c2 (CHead d2 (Bind 
 b2) v2))))) x1 x2 x3 H8 (getl_intro i c2 (CHead x2 (Bind x1) x3) x0 H6 
 H9))))))) H7)))))) H4)))))) H1))))))))).
-(* COMMENTS
-Initial nodes: 455
-END *)
 
-theorem csubv_getl_conf_void:
+lemma csubv_getl_conf_void:
  \forall (c1: C).(\forall (c2: C).((csubv c1 c2) \to (\forall (d1: 
 C).(\forall (v1: T).(\forall (i: nat).((getl i c1 (CHead d1 (Bind Void) v1)) 
 \to (ex2_2 C T (\lambda (d2: C).(\lambda (_: T).(csubv d1 d2))) (\lambda (d2: 
@@ -84,7 +81,4 @@ x1)).(\lambda (H9: (clear x0 (CHead x1 (Bind Void) x2))).(ex2_2_intro C T
 (\lambda (d2: C).(\lambda (_: T).(csubv d1 d2))) (\lambda (d2: C).(\lambda 
 (v2: T).(getl i c2 (CHead d2 (Bind Void) v2)))) x1 x2 H8 (getl_intro i c2 
 (CHead x1 (Bind Void) x2) x0 H6 H9)))))) H7)))))) H4)))))) H1)))))))).
-(* COMMENTS
-Initial nodes: 417
-END *)