X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fi_static%2Ftc_lfxs_tc_lfxs.ma;h=dbcc54a3a8fe33aee2e90b93b734881dfedcb20c;hb=f7296f9cf2ee73465a374942c46b138f35c42ccb;hp=87f279a9b26d612696ef4a7059e6ae61af03aa06;hpb=9323611e3819c1382b872a7ada00264991f36217;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/i_static/tc_lfxs_tc_lfxs.ma b/matita/matita/contribs/lambdadelta/basic_2/i_static/tc_lfxs_tc_lfxs.ma index 87f279a9b..dbcc54a3a 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/i_static/tc_lfxs_tc_lfxs.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/i_static/tc_lfxs_tc_lfxs.ma @@ -12,14 +12,14 @@ (* *) (**************************************************************************) -include "basic_2/static/lfxs_lfxs.ma". +include "basic_2/static/lfxs_fsle.ma". include "basic_2/i_static/tc_lfxs.ma". (* ITERATED EXTENSION ON REFERRED ENTRIES OF A CONTEXT-SENSITIVE REALTION ***) (* Advanced properties ******************************************************) -lemma tc_lfxs_sym: ∀R. lfxs_fle_compatible R → +lemma tc_lfxs_sym: ∀R. lfxs_fsge_compatible R → (∀L1,L2,T1,T2. R L1 T1 T2 → R L2 T2 T1) → ∀T. symmetric … (tc_lfxs R T). #R #H1R #H2R #T #L1 #L2 #H elim H -L2