]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubsv.ma
notational change for lsubr:
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / dynamic / lsubsv.ma
index 8df6fb7108c6cb26903451744c15d2422248aa00..fe0359314871b2f07743b23b78d6888de208e2c8 100644 (file)
@@ -101,11 +101,11 @@ lemma lsubsv_fwd_lsubss: ∀h,g,L1,L2. h ⊢ L1 ¡⊑[g] L2 → h ⊢ L1 •⊑[
 #h #g #L1 #L2 #H elim H -L1 -L2 // /2 width=1/ /2 width=6/
 qed-.
 
-lemma lsubsv_fwd_lsubr1: â\88\80h,g,L1,L2. h â\8a¢ L1 Â¡â\8a\91[g] L2 â\86\92 L1 â\89¼[0, |L1|] L2.
+lemma lsubsv_fwd_lsubr1: â\88\80h,g,L1,L2. h â\8a¢ L1 Â¡â\8a\91[g] L2 â\86\92 L1 â\8a\91[0, |L1|] L2.
 /3 width=3 by lsubsv_fwd_lsubss, lsubss_fwd_lsubr1/
 qed-.
 
-lemma lsubsv_fwd_lsubr2: â\88\80h,g,L1,L2. h â\8a¢ L1 Â¡â\8a\91[g] L2 â\86\92 L1 â\89¼[0, |L2|] L2.
+lemma lsubsv_fwd_lsubr2: â\88\80h,g,L1,L2. h â\8a¢ L1 Â¡â\8a\91[g] L2 â\86\92 L1 â\8a\91[0, |L2|] L2.
 /3 width=3 by lsubsv_fwd_lsubss, lsubss_fwd_lsubr2/
 qed-.