notational change for lsubr:

[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / equivalence / lsubss.ma

diff --git a/matita/matita/contribs/lambdadelta/basic_2/equivalence/lsubss.ma b/matita/matita/contribs/lambdadelta/basic_2/equivalence/lsubss.ma
index ac8f5373cd7163fad79c7ad61cc429f92cc8c92d..364f06adeb2dad43d5e284c2468a8ca8442eae88 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_2/equivalence/lsubss.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/equivalence/lsubss.ma
@@ -94,11 +94,11 @@ lemma lsubss_inv_pair2: ∀h,g,I,L1,K2,W2. h ⊢ L1 •⊑[g] K2. ⓑ{I} W2 →
 
 (* Basic_forward lemmas *****************************************************)
 
-lemma lsubss_fwd_lsubr1: â\88\80h,g,L1,L2. h â\8a¢ L1 â\80¢â\8a\91[g] L2 â\86\92 L1 â\89¼[0, |L1|] L2.
+lemma lsubss_fwd_lsubr1: â\88\80h,g,L1,L2. h â\8a¢ L1 â\80¢â\8a\91[g] L2 â\86\92 L1 â\8a\91[0, |L1|] L2.
 #h #g #L1 #L2 #H elim H -L1 -L2 // /2 width=1/
 qed-.
 
-lemma lsubss_fwd_lsubr2: â\88\80h,g,L1,L2. h â\8a¢ L1 â\80¢â\8a\91[g] L2 â\86\92 L1 â\89¼[0, |L2|] L2.
+lemma lsubss_fwd_lsubr2: â\88\80h,g,L1,L2. h â\8a¢ L1 â\80¢â\8a\91[g] L2 â\86\92 L1 â\8a\91[0, |L2|] L2.
 #h #g #L1 #L2 #H elim H -L1 -L2 // /2 width=1/
 qed-.