renaming

[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / static / ffdeq_fqup.ma

diff --git a/matita/matita/contribs/lambdadelta/basic_2/static/ffdeq_fqup.ma b/matita/matita/contribs/lambdadelta/basic_2/static/ffdeq_fqup.ma
index ab06d6d908558ca076d115d83d1f4fade573a2fc..15baed91f0bb5de366f49bf1ec784e2c7915a626 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_2/static/ffdeq_fqup.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/static/ffdeq_fqup.ma
@@ -17,7 +17,13 @@ include "basic_2/static/ffdeq.ma".
 
 (* DEGREE-BASED EQUIVALENCE FOR CLOSURES ON REFERRED ENTRIES ****************)
 
+(* Properties with degree-based equivalence for terms ***********************)
+
+lemma tdeq_ffdeq: ∀h,o,T1,T2. T1 ≛[h, o] T2 →
+                  ∀G,L. ⦃G, L, T1⦄ ≛[h, o] ⦃G, L, T2⦄.
+/2 width=1 by ffdeq_intro_sn/ qed.
+
 (* Advanced properties ******************************************************)
 
 lemma ffdeq_refl: ∀h,o. tri_reflexive … (ffdeq h o).
-/2 width=1 by ffdeq_intro/ qed.
+/2 width=1 by ffdeq_intro_sn/ qed.