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

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpt_cpm.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpt_cpm.ma
index bf7dff5d9..aadec180c 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpt_cpm.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpt_cpm.ma
@@ -20,7 +20,7 @@ include "basic_2/rt_transition/cpt_fqu.ma".
 (* Forward lemmas with t-bound rt-transition for terms **********************)
 
 lemma cpt_fwd_cpm (h) (n) (G) (L):
-      ∀T1,T2. ❪G,L❫ ⊢ T1 ⬆[h,n] T2 → ❪G,L❫ ⊢ T1 ➡[n,h] T2.
+      ∀T1,T2. ❪G,L❫ ⊢ T1 ⬆[h,n] T2 → ❪G,L❫ ⊢ T1 ➡[h,n] T2.
 #h #n #G #L #T1 #T2 #H
 @(cpt_ind … H) -n -G -L -T1 -T2
 /3 width=3 by cpm_ee, cpm_cast, cpm_appl, cpm_bind, cpm_lref, cpm_ell, cpm_delta/