X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_transition%2Flpr_lpx.ma;h=ac7a93d628ea55ba6f92a5c31bd86fa8c7172dc0;hb=3c7b4071a9ac096b02334c1d47468776b948e2de;hp=484ae046f298d997caae47b768aa5cccc29fde76;hpb=05b047be6817f430c8c72fd9b0902df8bb9f579e;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpr_lpx.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpr_lpx.ma index 484ae046f..ac7a93d62 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpr_lpx.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lpr_lpx.ma @@ -18,8 +18,9 @@ include "basic_2/rt_transition/lpr.ma". (* PARALLEL R-TRANSITION FOR FULL LOCAL ENVIRONMENTS ************************) -(* Forward lemmas with unbound parallel rt-transition for ref local envs ****) +(* Forward lemmas with extended parallel rt-transition for ref local envs ***) (* Basic_2A1: was: lpr_lpx *) -lemma lpr_fwd_lpx (h) (G): ∀L1,L2. ⦃G, L1⦄ ⊢ ➡[h] L2 → ⦃G, L1⦄ ⊢ ⬈[h] L2. +lemma lpr_fwd_lpx (h) (G): + ∀L1,L2. ❪G,L1❫ ⊢ ➡[h,0] L2 → ❪G,L1❫ ⊢ ⬈ L2. /3 width=3 by cpm_fwd_cpx, lex_co/ qed-.