]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/rt_computation/lprs_length.ma
update in basic_2 and apps_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / rt_computation / lprs_length.ma
index 060348bf3f237d48517207f735804d52741b361e..8b87da9ab0075b8fb6e94d6d294703629775deb9 100644 (file)
@@ -19,5 +19,5 @@ include "basic_2/rt_computation/lprs.ma".
 
 (* Forward lemmas with length for local environments ************************)
 
-lemma lprs_fwd_length (h) (G): ∀L1,L2. ❪G,L1❫ ⊢ ➡*[h] L2 → |L1| = |L2|.
+lemma lprs_fwd_length (h) (G): ∀L1,L2. ❪G,L1❫ ⊢ ➡*[h,0] L2 → |L1| = |L2|.
 /2 width=2 by lex_fwd_length/ qed-.