X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fstatic%2Fda_lift.ma;h=0e7428fa3fe19ed6571c7c3e757830a71eb95e79;hb=43282d3750af8831c8100c60d75c56fdfb7ff3c9;hp=b2ad8b8828e0b2dfe45567c874a486768fbddab8;hpb=6c985e4e2e7846a2b9abd0c84569f21c24e9ce2f;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/static/da_lift.ma b/matita/matita/contribs/lambdadelta/basic_2/static/da_lift.ma
index b2ad8b882..0e7428fa3 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/static/da_lift.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/static/da_lift.ma
@@ -20,7 +20,7 @@ include "basic_2/static/da.ma".
 (* Properties on relocation *************************************************)
 
 lemma da_lift: ∀h,g,G,L1,T1,l. ⦃G, L1⦄ ⊢ T1 ▪[h, g] l →
-               ∀L2,s,d,e. ⇩[s, d, e] L2 ≡ L1 → ∀T2. ⇧[d, e] T1 ≡ T2 →
+               ∀L2,s,d,e. ⬇[s, d, e] L2 ≡ L1 → ∀T2. ⬆[d, e] T1 ≡ T2 →
                ⦃G, L2⦄ ⊢ T2 ▪[h, g] l.
 #h #g #G #L1 #T1 #l #H elim H -G -L1 -T1 -l
 [ #G #L1 #k #l #Hkl #L2 #s #d #e #_ #X #H
@@ -53,7 +53,7 @@ qed.
 (* Inversion lemmas on relocation *******************************************)
 
 lemma da_inv_lift: ∀h,g,G,L2,T2,l. ⦃G, L2⦄ ⊢ T2 ▪[h, g] l →
-                   ∀L1,s,d,e. ⇩[s, d, e] L2 ≡ L1 → ∀T1. ⇧[d, e] T1 ≡ T2 →
+                   ∀L1,s,d,e. ⬇[s, d, e] L2 ≡ L1 → ∀T1. ⬆[d, e] T1 ≡ T2 →
                    ⦃G, L1⦄ ⊢ T1 ▪[h, g] l.
 #h #g #G #L2 #T2 #l #H elim H -G -L2 -T2 -l
 [ #G #L2 #k #l #Hkl #L1 #s #d #e #_ #X #H