]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/pc3/fwd.ma
uri renaming and new nodes count
[helm.git] / helm / software / matita / contribs / LAMBDA-TYPES / Basic-1 / pc3 / fwd.ma
index 7dc245d1c5ecd82a63ebb4bf44646c07380e8f5a..c89e4563c37b4ac1e52aaa5f5b9b65f08a794431 100644 (file)
@@ -14,9 +14,9 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "LambdaDelta-1/pc3/props.ma".
+include "Basic-1/pc3/props.ma".
 
-include "LambdaDelta-1/pr3/fwd.ma".
+include "Basic-1/pr3/fwd.ma".
 
 theorem pc3_gen_sort:
  \forall (c: C).(\forall (m: nat).(\forall (n: nat).((pc3 c (TSort m) (TSort 
@@ -31,6 +31,9 @@ H2) (TSort m) (pr3_gen_sort c x m H1)) in (let H4 \def (f_equal T nat
 (\lambda (e: T).(match e in T return (\lambda (_: T).nat) with [(TSort n0) 
 \Rightarrow n0 | (TLRef _) \Rightarrow m | (THead _ _ _) \Rightarrow m])) 
 (TSort m) (TSort n) H3) in H4))))) H0))))).
+(* COMMENTS
+Initial nodes: 153
+END *)
 
 theorem pc3_gen_abst:
  \forall (c: C).(\forall (u1: T).(\forall (u2: T).(\forall (t1: T).(\forall 
@@ -74,6 +77,9 @@ H15 \def (eq_ind T x3 (\lambda (t: T).(\forall (b: B).(\forall (u: T).(pr3
 B).(\forall (u: T).(pc3 (CHead c (Bind b) u) t1 t2))) (pc3_pr3_t c u1 x0 H16 
 u2 H5) (\lambda (b: B).(\lambda (u: T).(pc3_pr3_t (CHead c (Bind b) u) t1 x1 
 (H15 b u) t2 (H6 b u))))))))) H12)))))))) H7))))))) H3))))) H0))))))).
+(* COMMENTS
+Initial nodes: 715
+END *)
 
 theorem pc3_gen_abst_shift:
  \forall (c: C).(\forall (u: T).(\forall (t1: T).(\forall (t2: T).((pc3 c 
@@ -87,6 +93,9 @@ Abst) u) t1 t2)))))
 (CHead c (Bind Abst) u) t1 t2) (\lambda (_: (pc3 c u u)).(\lambda (H2: 
 ((\forall (b: B).(\forall (u0: T).(pc3 (CHead c (Bind b) u0) t1 t2))))).(H2 
 Abst u))) H0))))))).
+(* COMMENTS
+Initial nodes: 129
+END *)
 
 theorem pc3_gen_lift:
  \forall (c: C).(\forall (t1: T).(\forall (t2: T).(\forall (h: nat).(\forall 
@@ -108,6 +117,9 @@ h d x1))).(\lambda (H9: (pr3 e t1 x1)).(let H10 \def (eq_ind T x (\lambda (t:
 T).(eq T t (lift h d x0))) H5 (lift h d x1) H8) in (let H11 \def (eq_ind T x1 
 (\lambda (t: T).(pr3 e t1 t)) H9 x0 (lift_inj x1 x0 h d H10)) in (pc3_pr3_t e 
 t1 x0 H11 t2 H6)))))) H7))))) H4))))) H1))))))))).
+(* COMMENTS
+Initial nodes: 363
+END *)
 
 theorem pc3_gen_not_abst:
  \forall (b: B).((not (eq B b Abst)) \to (\forall (c: C).(\forall (t1: 
@@ -232,6 +244,9 @@ Abst) u2 t2)) (pr3_lift (CHead c (Bind Void) u1) c (S O) O (drop_drop (Bind
 Void) O c c (drop_refl c) u1) (THead (Bind Abst) u2 t2) (THead (Bind Abst) x0 
 x1) (pr3_head_12 c u2 x0 H8 (Bind Abst) t2 x1 (H9 Abst x0)))))))))) H6))) 
 H4))))) H1))))))))) b).
+(* COMMENTS
+Initial nodes: 2427
+END *)
 
 theorem pc3_gen_lift_abst:
  \forall (c: C).(\forall (t: T).(\forall (t2: T).(\forall (u2: T).(\forall 
@@ -287,6 +302,9 @@ T).(pr3 e t t0)) H6 (THead (Bind Abst) x3 x4) H12) in (ex3_2_intro T T
 T).(\lambda (t1: T).(\forall (b: B).(\forall (u: T).(pr3 (CHead c (Bind b) u) 
 t2 (lift h (S d) t1)))))) x3 x4 H17 H16 H15))))))))) (lift_gen_bind Abst x1 
 x2 x0 h d H11)))))))) H7))))) H4))))) H1)))))))))).
+(* COMMENTS
+Initial nodes: 973
+END *)
 
 theorem pc3_gen_sort_abst:
  \forall (c: C).(\forall (u: T).(\forall (t: T).(\forall (n: nat).((pc3 c 
@@ -309,4 +327,7 @@ T (THead (Bind Abst) x0 x1) (\lambda (ee: T).(match ee in T return (\lambda
 (_: T).Prop) with [(TSort _) \Rightarrow False | (TLRef _) \Rightarrow False 
 | (THead _ _ _) \Rightarrow True])) I (TSort n) H7) in (False_ind P 
 H8)))))))) H3))))) H0))))))).
+(* COMMENTS
+Initial nodes: 303
+END *)