X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fcsuba%2Fclear.ma;h=06b1cc258bddaa67cbde7a9c4cf16709a0bf4033;hb=c7b50fec51b9a25d5bc536f44e54179fd53efb44;hp=2350fd1e861ca2fb209de94da6be55ea684cb334;hpb=88a68a9c334646bc17314d5327cd3b790202acd6;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_1/csuba/clear.ma b/matita/matita/contribs/lambdadelta/basic_1/csuba/clear.ma
index 2350fd1e8..06b1cc258 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/csuba/clear.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/csuba/clear.ma
@@ -14,11 +14,11 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/csuba/defs.ma".
+include "basic_1/csuba/fwd.ma".
 
-include "Basic-1/clear/fwd.ma".
+include "basic_1/clear/fwd.ma".
 
-theorem csuba_clear_conf:
+lemma csuba_clear_conf:
  \forall (g: G).(\forall (c1: C).(\forall (c2: C).((csuba g c1 c2) \to 
 (\forall (e1: C).((clear c1 e1) \to (ex2 C (\lambda (e2: C).(csuba g e1 e2)) 
 (\lambda (e2: C).(clear c2 e2))))))))
@@ -68,11 +68,8 @@ e2)))) (ex_intro2 C (\lambda (e2: C).(csuba g (CHead c3 (Bind Abst) t) e2))
 (\lambda (e2: C).(clear (CHead c4 (Bind Abbr) u) e2)) (CHead c4 (Bind Abbr) 
 u) (csuba_abst g c3 c4 H0 t a H2 u H3) (clear_bind Abbr c4 u)) e1 
 (clear_gen_bind Abst c3 e1 t H4))))))))))))) c1 c2 H)))).
-(* COMMENTS
-Initial nodes: 937
-END *)
 
-theorem csuba_clear_trans:
+lemma csuba_clear_trans:
  \forall (g: G).(\forall (c1: C).(\forall (c2: C).((csuba g c2 c1) \to 
 (\forall (e1: C).((clear c1 e1) \to (ex2 C (\lambda (e2: C).(csuba g e2 e1)) 
 (\lambda (e2: C).(clear c2 e2))))))))
@@ -122,7 +119,4 @@ e2)))) (ex_intro2 C (\lambda (e2: C).(csuba g e2 (CHead c4 (Bind Abbr) u)))
 (\lambda (e2: C).(clear (CHead c3 (Bind Abst) t) e2)) (CHead c3 (Bind Abst) 
 t) (csuba_abst g c3 c4 H0 t a H2 u H3) (clear_bind Abst c3 t)) e1 
 (clear_gen_bind Abbr c4 e1 u H4))))))))))))) c2 c1 H)))).
-(* COMMENTS
-Initial nodes: 937
-END *)