X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Ffpbg_fqup.ma;h=7acceab10134ebc9ccb84d48159e62d9254fa6f8;hp=71451e88698309a1a512ffe9b23f0476d49d7b0f;hb=b118146b97959e6a6dde18fdd014b8e1e676a2d1;hpb=613d8642b1154dde0c026cbdcd96568910198251 diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/fpbg_fqup.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/fpbg_fqup.ma index 71451e886..7acceab10 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/fpbg_fqup.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/fpbg_fqup.ma @@ -21,8 +21,8 @@ include "basic_2/rt_computation/fpbg.ma". lemma fpbg_teqx_div: ∀G1,G2,L1,L2,T1,T. ❪G1,L1,T1❫ > ❪G2,L2,T❫ → - ∀T2. T2 ≛ T → ❪G1,L1,T1❫ > ❪G2,L2,T2❫. -/4 width=5 by fpbg_feqx_trans, teqx_feqx, teqx_sym/ qed-. + ∀T2. T2 ≅ T → ❪G1,L1,T1❫ > ❪G2,L2,T2❫. +/4 width=5 by fpbg_feqx_trans, teqg_feqg, teqx_sym/ qed-. (* Properties with plus-iterated structural successor for closures **********)