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=acb4447e3ea90fe82511b2258e9945569d5c3197;hb=47a745462a714af9d65cea7b61af56524bd98fa1;hp=24dcd4c1f160514bec29ac8e273ce33aaebef480;hpb=a09b60bd574adf1a7d3e423023009cb20c79d449;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..acb4447e3 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
@@ -12,7 +12,6 @@
 (*                                                                        *)
 (**************************************************************************)
 
-include "basic_2/static/lfdeq_lfdeq.ma".
 include "basic_2/rt_transition/lfpx_lfdeq.ma".
 include "basic_2/rt_computation/lfsx.ma".
 
@@ -22,7 +21,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