X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Freduction%2Fcnx_cix.ma;h=3e62a5c60bc43a5abde3b69b67382b46207ec301;hb=b5d702735754632652b2659c425dd67d7f92f24b;hp=05f1acedb2529ab13ad1946f8bda61fe82f9b454;hpb=ef49e0e7f5f298c299afdd3cbfdc2404ecb93879;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/reduction/cnx_cix.ma b/matita/matita/contribs/lambdadelta/basic_2/reduction/cnx_cix.ma
index 05f1acedb..3e62a5c60 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/reduction/cnx_cix.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/reduction/cnx_cix.ma
@@ -19,10 +19,10 @@ include "basic_2/reduction/cnx_crx.ma".
 
 (* Main properties on context-sensitive extended irreducible terms **********)
 
-theorem cix_cnr: ∀h,g,L,T. ⦃h, L⦄ ⊢ 𝐈[g]⦃T⦄ → ⦃h, L⦄ ⊢ 𝐍[g]⦃T⦄.
-/2 width=5 by cpx_fwd_cix/ qed.
+theorem cix_cnr: ∀h,g,G,L,T. ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄ → ⦃G, L⦄ ⊢ 𝐍[h, g]⦃T⦄.
+/2 width=6 by cpx_fwd_cix/ qed.
 
 (* Main inversion lemmas on context-sensitive extended irreducible terms ****)
 
-theorem cnr_inv_cix: ∀h,g,L,T. ⦃h, L⦄ ⊢ 𝐍[g]⦃T⦄ → ⦃h, L⦄ ⊢ 𝐈[g]⦃T⦄.
-/2 width=6 by cnx_inv_crx/ qed-.
+theorem cnr_inv_cix: ∀h,g,G,L,T. ⦃G, L⦄ ⊢ 𝐍[h, g]⦃T⦄ → ⦃G, L⦄ ⊢ 𝐈[h, g]⦃T⦄.
+/2 width=7 by cnx_inv_crx/ qed-.