]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_1/sn3/nf2.ma
legacy_1, ground_1, and basic_1 recommitted without anticipation
[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / sn3 / nf2.ma
index 824428084442b9d8341b2f97ac85657bd3664ccd..fc3f7c09ef0b35d1881f7e548d116a1445a3126a 100644 (file)
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/sn3/defs.ma".
+include "basic_1/sn3/fwd.ma".
 
-include "Basic-1/nf2/dec.ma".
+include "basic_1/nf2/dec.ma".
 
-include "Basic-1/nf2/pr3.ma".
+include "basic_1/nf2/pr3.ma".
 
 theorem sn3_nf2:
  \forall (c: C).(\forall (t: T).((nf2 c t) \to (sn3 c t)))
@@ -30,9 +30,6 @@ H1 H) in (let H2 \def (eq_ind_r T t2 (\lambda (t0: T).(pr3 c t t0)) H1 t H_y)
 in (let H3 \def (eq_ind_r T t2 (\lambda (t0: T).((eq T t t0) \to (\forall (P: 
 Prop).P))) H0 t H_y) in (eq_ind T t (\lambda (t0: T).(sn3 c t0)) (H3 
 (refl_equal T t) (sn3 c t)) t2 H_y)))))))))).
-(* COMMENTS
-Initial nodes: 129
-END *)
 
 theorem nf2_sn3:
  \forall (c: C).(\forall (t: T).((sn3 c t) \to (ex2 T (\lambda (u: T).(pr3 c 
@@ -60,7 +57,4 @@ u)) (\lambda (u: T).(nf2 c u))) (\lambda (x0: T).(\lambda (H7: (pr3 c x
 x0)).(\lambda (H8: (nf2 c x0)).(ex_intro2 T (\lambda (u: T).(pr3 c t1 u)) 
 (\lambda (u: T).(nf2 c u)) x0 (pr3_sing c x t1 H5 x0 H7) H8)))) H6)))))) H3)) 
 H2)))))) t H))).
-(* COMMENTS
-Initial nodes: 443
-END *)