]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfsx_lfsx.ma
partial update update in basic_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / rt_computation / lfsx_lfsx.ma
index 24dcd4c1f160514bec29ac8e273ce33aaebef480..350d4717d15efb720bc38f1935d7901c877c9974 100644 (file)
 (*                                                                        *)
 (**************************************************************************)
 
-include "basic_2/static/lfdeq_lfdeq.ma".
 include "basic_2/rt_transition/lfpx_lfdeq.ma".
 include "basic_2/rt_computation/lfsx.ma".
 
-(* STRONGLY NORMALIZING LOCAL ENV.S FOR UNCOUNTED PARALLEL RT-TRANSITION ****)
+(* STRONGLY NORMALIZING LOCAL ENV.S FOR UNBOUND PARALLEL RT-TRANSITION ******)
 
 (* Advanced properties ******************************************************)
 
 (* Basic_2A1: uses: lsx_lleq_trans *)
 lemma lfsx_lfdeq_trans: ∀h,o,G,L1,T. G ⊢ ⬈*[h, o, T] 𝐒⦃L1⦄ →
-                        â\88\80L2. L1 â\89¡[h, o, T] L2 → G ⊢ ⬈*[h, o, T] 𝐒⦃L2⦄.
+                        â\88\80L2. L1 â\89\9b[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