]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/i_static/tc_lfxs_lex.ma
update in basic_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / i_static / tc_lfxs_lex.ma
index ea91a95786b552373552e6218d7d841aa3919619..e38f9f796fcf236ed370ae53c6593127be0d261b 100644 (file)
@@ -13,9 +13,8 @@
 (**************************************************************************)
 
 include "basic_2/relocation/lex_tc.ma".
-include "basic_2/static/lfxs_fsle.ma".
 include "basic_2/static/lfeq_fqup.ma".
-include "basic_2/static/lfeq_lfeq.ma".
+include "basic_2/static/lfeq_fsle.ma".
 include "basic_2/i_static/tc_lfxs_fqup.ma".
 
 (* ITERATED EXTENSION ON REFERRED ENTRIES OF A CONTEXT-SENSITIVE REALTION ***)
@@ -37,7 +36,7 @@ lemma tc_lfxs_lex_lfeq: ∀R. c_reflexive … R →
 
 (* Note: s_rs_transitive_lex_inv_isid could be invoked in the last auto but makes it too slow *)
 lemma tc_lfxs_inv_lex_lfeq: ∀R. c_reflexive … R →
-                            lfxs_fsle_compatible R →
+                            lfxs_fsge_compatible R →
                             s_rs_transitive … R (λ_.lex R) →
                             lfeq_transitive R →
                             ∀L1,L2,T. L1 ⪤**[R, T] L2 →