X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_transition%2Fcnu_tdeq.ma;h=f6eb1a8058d11cbeaf579525529ec6e1bca67052;hp=91676f50087d72629872e2b724752154a1dac472;hb=f308429a0fde273605a2330efc63268b4ac36c99;hpb=87f57ddc367303c33e19c83cd8989cd561f3185b

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnu_tdeq.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnu_tdeq.ma
index 91676f500..f6eb1a805 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnu_tdeq.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnu_tdeq.ma
@@ -22,8 +22,8 @@ include "basic_2/rt_transition/cnu_cnr_simple.ma".
 (* Properties with context-free sort-irrelevant equivalence for terms *******)
 
 lemma cnu_dec_tdeq (h) (G) (L):
-      ∀T1. ∨∨ ⦃G, L⦄ ⊢ ⥲[h] 𝐍⦃T1⦄
-            | ∃∃n,T2. ⦃G, L⦄ ⊢ T1 ➡[n,h] T2 & (T1 ≛ T2 → ⊥).
+      ∀T1. ∨∨ ⦃G,L⦄ ⊢ ⥲[h] 𝐍⦃T1⦄
+            | ∃∃n,T2. ⦃G,L⦄ ⊢ T1 ➡[n,h] 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