X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Freduction%2Fcix_append.ma;h=27bc414dc1d3eabaab08c2b718a5a19cc995160b;hb=29973426e0227ee48368d1c24dc0c17bf2baef77;hp=3e1d06076ce043f9bd50b49251b7a1953439ec5e;hpb=f95f6cb21b86f3dad114b21f687aa5df36088064;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_append.ma b/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_append.ma index 3e1d06076..27bc414dc 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_append.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_append.ma @@ -19,8 +19,8 @@ include "basic_2/reduction/cix.ma". (* Advanced inversion lemmas ************************************************) -lemma cix_inv_append_sn: ∀h,g,L,K,T. ⦃h, K @@ L⦄ ⊢ 𝐈[g]⦃T⦄ → ⦃h, L⦄ ⊢ 𝐈[g]⦃T⦄. +lemma cix_inv_append_sn: ∀h,g,L,K,T. ⦃h, K @@ L⦄ ⊢ 𝐈[h, g]⦃T⦄ → ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄. /3 width=1/ qed-. -lemma cix_inv_tix: ∀h,g,L,T. ⦃h, L⦄ ⊢ 𝐈[g]⦃T⦄ → ⦃h, ⋆⦄ ⊢ 𝐈[g]⦃T⦄. +lemma cix_inv_tix: ∀h,g,L,T. ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄ → ⦃h, ⋆⦄ ⊢ 𝐈[h, g]⦃T⦄. /3 width=1/ qed-.