X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_transition%2Flpx_length.ma;h=2332d68aa113722ecf8ca76a2d8957376a1133ff;hb=bd53c4e895203eb049e75434f638f26b5a161a2b;hp=1c8a2b9b69dc599a95b8dbaa74dc46d9047c7f89;hpb=05b047be6817f430c8c72fd9b0902df8bb9f579e;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpx_length.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpx_length.ma index 1c8a2b9b6..2332d68aa 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpx_length.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpx_length.ma @@ -12,12 +12,12 @@ (* *) (**************************************************************************) -include "basic_2/relocation/lex_length.ma". +include "static_2/relocation/lex_length.ma". include "basic_2/rt_transition/lpx.ma". (* UNBOUND PARALLEL RT-TRANSITION FOR FULL LOCAL ENVIRONMENTS ***************) (* Forward lemmas with length for local environments ************************) -lemma lpx_fwd_length (h) (G): ∀L1,L2. ⦃G, L1⦄ ⊢ ⬈[h] L2 → |L1| = |L2|. +lemma lpx_fwd_length (h) (G): ∀L1,L2. ❪G,L1❫ ⊢ ⬈[h] L2 → |L1| = |L2|. /2 width=2 by lex_fwd_length/ qed-.