X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fdelayed_updating%2Fsubstitution%2Flift_prototerm_proper.ma;h=7e7236dbd3b6131778a21a8faf6bbdec20a9b11a;hb=7008128d354c6e998a87bc2febe9f86ea714869c;hp=45d65b3ff9c76d975c552913417d9a2c15273518;hpb=d06053844638d88936d711b66fddbcca2a9add1c;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/delayed_updating/substitution/lift_prototerm_proper.ma b/matita/matita/contribs/lambdadelta/delayed_updating/substitution/lift_prototerm_proper.ma
index 45d65b3ff..7e7236dbd 100644
--- a/matita/matita/contribs/lambdadelta/delayed_updating/substitution/lift_prototerm_proper.ma
+++ b/matita/matita/contribs/lambdadelta/delayed_updating/substitution/lift_prototerm_proper.ma
@@ -21,7 +21,7 @@ include "delayed_updating/syntax/prototerm_proper.ma".
 (* Constructions with proper condition for path *****************************)
 
 lemma lift_term_proper (f) (t):
-      t ϵ 𝐏 → ↑[f]t ϵ 𝐏.
+      t ϵ 𝐏 → 🠡[f]t ϵ 𝐏.
 #f #t #Ht #p * #q #Hq #H0 destruct
 @lift_path_proper @Ht -Ht // (**) (* auto fails *)
 qed.
@@ -29,7 +29,7 @@ qed.
 (* Inversions with proper condition for path ********************************)
 
 lemma lift_term_inv_proper (f) (t):
-      ↑[f]t ϵ 𝐏 → t ϵ 𝐏.
+      🠡[f]t ϵ 𝐏 → t ϵ 𝐏.
 #f #t #Ht #p #Hp
 @(lift_path_inv_proper f)
 @Ht -Ht @in_comp_lift_path_term // (**) (* auto fails *)