X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_transition%2Fcnr_teqx.ma;h=0f2f9d709d36979e5c8df2f35a69323fc937d397;hp=8d23d17b33391b42242a3d706a272f306d709fc2;hb=ca7327c20c6031829fade8bb84a3a1bb66113f54;hpb=25c634037771dff0138e5e8e3d4378183ff49b86

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_teqx.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_teqx.ma
index 8d23d17b3..0f2f9d709 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_teqx.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_teqx.ma
@@ -24,8 +24,8 @@ include "basic_2/rt_transition/cnr_drops.ma".
 (* Basic_1: was: nf2_dec *)
 (* Basic_2A1: uses: cnr_dec *)
 lemma cnr_dec_teqx (h) (G) (L):
-      ∀T1. ∨∨ ❪G,L❫ ⊢ ➡[h] 𝐍❪T1❫
-            | ∃∃T2. ❪G,L❫ ⊢ T1 ➡[h] T2 & (T1 ≛ T2 → ⊥).
+      ∀T1. ∨∨ ❪G,L❫ ⊢ ➡𝐍[h,0] T1
+            | ∃∃T2. ❪G,L❫ ⊢ T1 ➡[h,0] T2 & (T1 ≛ T2 → ⊥).
 #h #G #L #T1
 @(fqup_wf_ind_eq (Ⓣ) … G L T1) -G -L -T1 #G0 #L0 #T0 #IH #G #L * *
 [ #s #HG #HL #HT destruct -IH