X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Flpxs_lpx.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Flpxs_lpx.ma;h=d43fd613f80a260aa78e36addbca7e3e4fd91b52;hb=75f395f0febd02de8e0f881d918a8812b1425c8d;hp=d4a602932d4ee3d39ce851f38f2bb2b587c0347e;hpb=d59f344b1e4b377e2f06abd9f8856d686d21b222;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_lpx.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_lpx.ma index d4a602932..d43fd613f 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_lpx.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_lpx.ma @@ -23,9 +23,9 @@ include "basic_2/rt_computation/cpxs_lpx.ma". (* Basic_2A1: was: lpxs_strap1 *) lemma lpxs_step_dx: ∀h,G,L1,L. ⦃G, L1⦄ ⊢ ⬈*[h] L → ∀L2. ⦃G, L⦄ ⊢ ⬈[h] L2 → ⦃G, L1⦄ ⊢ ⬈*[h] L2. -/3 width=3 by lpx_cpxs_trans, lex_ltc_step_dx/ qed-. +/3 width=3 by lpx_cpxs_trans, lex_CTC_step_dx/ qed-. (* Basic_2A1: was: lpxs_strap2 *) lemma lpxs_step_sn: ∀h,G,L1,L. ⦃G, L1⦄ ⊢ ⬈[h] L → ∀L2. ⦃G, L⦄ ⊢ ⬈*[h] L2 → ⦃G, L1⦄ ⊢ ⬈*[h] L2. -/3 width=3 by lpx_cpxs_trans, lex_ltc_step_sn/ qed-. +/3 width=3 by lpx_cpxs_trans, lex_CTC_step_sn/ qed-.