X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Fjsx_lsubr.ma;h=a821861ed656c54e04152c06d1584cbd71ae7c3a;hp=4e048982b52f16ddfefdbb4ebb2c03701731e49f;hb=3c7b4071a9ac096b02334c1d47468776b948e2de;hpb=2f6f2b7c01d47d23f61dd48d767bcb37aecdcfea

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx_lsubr.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx_lsubr.ma
index 4e048982b..a821861ed 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx_lsubr.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx_lsubr.ma
@@ -15,12 +15,12 @@
 include "static_2/static/lsubr.ma".
 include "basic_2/rt_computation/jsx.ma".
 
-(* COMPATIBILITY OF STRONG NORMALIZATION FOR UNBOUND RT-TRANSITION **********)
+(* COMPATIBILITY OF STRONG NORMALIZATION FOR EXTENDED RT-TRANSITION *********)
 
 (* Forward lemmas with restricted refinement for local environments *********)
 
-lemma jsx_fwd_lsubr (h) (G):
-      ∀L1,L2. G ⊢ L1 ⊒[h] L2 → L1 ⫃ L2.
-#h #G #L1 #L2 #H elim H -L1 -L2
+lemma jsx_fwd_lsubr (G):
+      ∀L1,L2. G ⊢ L1 ⊒ L2 → L1 ⫃ L2.
+#G #L1 #L2 #H elim H -L1 -L2
 /2 width=1 by lsubr_bind, lsubr_unit/
 qed-.