X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Flfsx_lfsx.ma;h=a6ef10ba90c933849610958fc39b026fc0335f88;hb=6167cca50de37eba76a062537b24f7caef5b34f2;hp=24dcd4c1f160514bec29ac8e273ce33aaebef480;hpb=6d49221c1fefe6a2c5bddb3db24d3698414a700f;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfsx_lfsx.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfsx_lfsx.ma
index 24dcd4c1f..a6ef10ba9 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfsx_lfsx.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfsx_lfsx.ma
@@ -22,7 +22,7 @@ include "basic_2/rt_computation/lfsx.ma".
 
 (* Basic_2A1: uses: lsx_lleq_trans *)
 lemma lfsx_lfdeq_trans: ∀h,o,G,L1,T. G ⊢ ⬈*[h, o, T] 𝐒⦃L1⦄ →
-                        ∀L2. L1 ≡[h, o, T] L2 → G ⊢ ⬈*[h, o, T] 𝐒⦃L2⦄.
+                        ∀L2. L1 ≛[h, o, T] L2 → G ⊢ ⬈*[h, o, T] 𝐒⦃L2⦄.
 #h #o #G #L1 #T #H @(lfsx_ind … H) -L1
 #L1 #_ #IHL1 #L2 #HL12 @lfsx_intro
 #L #HL2 #HnL2 elim (lfdeq_lfpx_trans … HL2 … HL12) -HL2