]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/reduction/cnr_cir.ma
partial commit: just the components before "static" ...
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / reduction / cnr_cir.ma
index 50f30ab606fff7b7cd6fc1681181d2708b6ee2f5..269cd6561d1e528124a3a899b8a1d9284b5442cb 100644 (file)
@@ -19,10 +19,10 @@ include "basic_2/reduction/cnr_crr.ma".
 
 (* Main properties on context-sensitive irreducible terms *******************)
 
-theorem cir_cnr: ∀L,T. L ⊢ 𝐈⦃T⦄ → L ⊢ 𝐍⦃T⦄.
+theorem cir_cnr: ∀L,T. ⦃G, L⦄ ⊢ 𝐈⦃T⦄ → ⦃G, L⦄ ⊢ 𝐍⦃T⦄.
 /2 width=3 by cpr_fwd_cir/ qed.
 
 (* Main inversion lemmas on context-sensitive irreducible terms *************)
 
-theorem cnr_inv_cir: ∀L,T. L ⊢ 𝐍⦃T⦄ → L ⊢ 𝐈⦃T⦄.
+theorem cnr_inv_cir: ∀L,T. ⦃G, L⦄ ⊢ 𝐍⦃T⦄ → ⦃G, L⦄ ⊢ 𝐈⦃T⦄.
 /2 width=4 by cnr_inv_crr/ qed-.