X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Freduction%2Fcix_append.ma;h=7702f384fc92cb2edfda2e7703f4de030a75b510;hb=2ba2dc23443ad764adab652e06d6f5ed10bd912d;hp=27bc414dc1d3eabaab08c2b718a5a19cc995160b;hpb=29973426e0227ee48368d1c24dc0c17bf2baef77;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 27bc414dc..7702f384f 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⦄ ⊢ 𝐈[h, g]⦃T⦄ → ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄. +lemma cix_inv_append_sn: ∀h,g,G,L,K,T. ⦃G, K @@ L⦄ ⊢ 𝐈[h, g]⦃T⦄ → ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄. /3 width=1/ qed-. -lemma cix_inv_tix: ∀h,g,L,T. ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄ → ⦃h, ⋆⦄ ⊢ 𝐈[h, g]⦃T⦄. +lemma cix_inv_tix: ∀h,g,G,L,T. ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄ → ⦃G, ⋆⦄ ⊢ 𝐈[h, g]⦃T⦄. /3 width=1/ qed-.