X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_equivalence%2Fcpcs_csx.ma;h=465871f60915c5c67dfc7dc35f2dd4eb94cec5db;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=849ebebf036b14d5a2ad887d311cefe360ab320f;hpb=ca7327c20c6031829fade8bb84a3a1bb66113f54;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_equivalence/cpcs_csx.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_equivalence/cpcs_csx.ma
index 849ebebf0..465871f60 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_equivalence/cpcs_csx.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_equivalence/cpcs_csx.ma
@@ -22,7 +22,7 @@ include "basic_2/rt_equivalence/cpcs_cprs.ma".
 
 (* Basic_1: was: cpcs_dec *)
 lemma csx_cpcs_dec (h) (G) (L):
-      ∀T1. ❪G,L❫ ⊢ ⬈*[h] 𝐒❪T1❫ → ∀T2. ❪G,L❫ ⊢ ⬈*[h] 𝐒❪T2❫ →
+      ∀T1. ❪G,L❫ ⊢ ⬈*𝐒[h] T1 → ∀T2. ❪G,L❫ ⊢ ⬈*𝐒[h] T2 →
       Decidable … (❪G,L❫ ⊢ T1 ⬌*[h] T2).
 #h #G #L #T1 #HT1 #T2 #HT2
 elim (cprre_total_csx … HT1) -HT1 #U1 #HTU1