X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FBasic-1%2Fcsubst0%2Fprops.ma;h=28b75ec37270c7b2869e9b110745284126404cad;hb=a4cd6a8a1d6a008518c12daca794b9e811c1dee5;hp=2f85df2da37270dace63218e57b1cfe1372d4421;hpb=3531d88e2a19cba027b4b882f8dd74bf37283b9c;p=helm.git diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubst0/props.ma b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubst0/props.ma index 2f85df2da..28b75ec37 100644 --- a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubst0/props.ma +++ b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubst0/props.ma @@ -14,7 +14,7 @@ (* This file was automatically generated: do not edit *********************) -include "LambdaDelta-1/csubst0/defs.ma". +include "Basic-1/csubst0/defs.ma". theorem csubst0_snd_bind: \forall (b: B).(\forall (i: nat).(\forall (v: T).(\forall (u1: T).(\forall @@ -26,6 +26,9 @@ theorem csubst0_snd_bind: b) i) (\lambda (n: nat).(csubst0 n v (CHead c (Bind b) u1) (CHead c (Bind b) u2))) (csubst0_snd (Bind b) i v u1 u2 H c) (S i) (refl_equal nat (S i))))))))). +(* COMMENTS +Initial nodes: 91 +END *) theorem csubst0_fst_bind: \forall (b: B).(\forall (i: nat).(\forall (c1: C).(\forall (c2: C).(\forall @@ -36,6 +39,9 @@ theorem csubst0_fst_bind: (v: T).(\lambda (H: (csubst0 i v c1 c2)).(\lambda (u: T).(eq_ind nat (s (Bind b) i) (\lambda (n: nat).(csubst0 n v (CHead c1 (Bind b) u) (CHead c2 (Bind b) u))) (csubst0_fst (Bind b) i c1 c2 v H u) (S i) (refl_equal nat (S i))))))))). +(* COMMENTS +Initial nodes: 91 +END *) theorem csubst0_both_bind: \forall (b: B).(\forall (i: nat).(\forall (v: T).(\forall (u1: T).(\forall @@ -49,4 +55,7 @@ C).(\lambda (H0: (csubst0 i v c1 c2)).(eq_ind nat (s (Bind b) i) (\lambda (n: nat).(csubst0 n v (CHead c1 (Bind b) u1) (CHead c2 (Bind b) u2))) (csubst0_both (Bind b) i v u1 u2 H c1 c2 H0) (S i) (refl_equal nat (S i))))))))))). +(* COMMENTS +Initial nodes: 107 +END *)