X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_transition%2Fcpx_lfdeq.ma;h=00b3fca8fcdf7db64caeb16a5ec6de69c432c7ba;hb=9323611e3819c1382b872a7ada00264991f36217;hp=3aec365f7623ac1b408b7a41bdfc34cddc03bb97;hpb=c0a8f89161e9887c38eb5cf701f0f0c05a0e527f;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpx_lfdeq.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpx_lfdeq.ma index 3aec365f7..00b3fca8f 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpx_lfdeq.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpx_lfdeq.ma @@ -12,7 +12,7 @@ (* *) (**************************************************************************) -include "basic_2/static/lfdeq.ma". +include "basic_2/static/lfdeq_lfdeq.ma". include "basic_2/rt_transition/cpx_lfxs.ma". (* UNCOUNTED CONTEXT-SENSITIVE PARALLEL RT-TRANSITION FOR TERMS *************) @@ -25,5 +25,5 @@ lemma cpx_lfdeq_conf_sn: ∀h,o,G. s_r_confluent1 … (cpx h G) (lfdeq h o). (* Basic_2A1: was just: cpx_lleq_conf_dx *) lemma cpx_lfdeq_conf_dx: ∀h,o,G,L2,T1,T2. ⦃G, L2⦄ ⊢ T1 ⬈[h] T2 → - ∀L1. L1 ≡[h, o, T1] L2 → L1 ≡[h, o, T2] L2. + ∀L1. L1 ≛[h, o, T1] L2 → L1 ≛[h, o, T2] L2. /4 width=4 by cpx_lfdeq_conf_sn, lfdeq_sym/ qed-.