X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_after_nat_uni_tls.ma;h=55ddd62879eaced0f0e70c7f5ea444e58a7fe2de;hb=8f1a123e61ff079b1f9ad63cc915470ec7e6abf3;hp=82141bc33d42176fc38429d1538d045a54713e55;hpb=f8b4eb67c2437f7b5174d7dca46e102e0ac0d19d;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_nat_uni_tls.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_nat_uni_tls.ma
index 82141bc33..55ddd6287 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_nat_uni_tls.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_nat_uni_tls.ma
@@ -23,7 +23,7 @@ include "ground/relocation/pr_after_isi.ma".
 
 (*** after_uni_dx *)
 lemma pr_after_nat_uni (l2) (l1):
-      ∀f2. @↑❪l1, f2❫ ≘ l2 →
+      ∀f2. ＠§❨l1, f2❩ ≘ l2 →
       ∀f. f2 ⊚ 𝐮❨l1❩ ≘ f → 𝐮❨l2❩ ⊚ ⫰*[l2] f2 ≘ f.
 #l2 @(nat_ind_succ … l2) -l2
 [ #l1 #f2 #Hf2 #f #Hf
@@ -44,7 +44,7 @@ qed.
 
 (*** after_uni_sn *)
 lemma pr_nat_after_uni_tls (l2) (l1):
-      ∀f2. @↑❪l1, f2❫ ≘ l2 →
+      ∀f2. ＠§❨l1, f2❩ ≘ l2 →
       ∀f. 𝐮❨l2❩ ⊚ ⫰*[l2] f2 ≘ f → f2 ⊚ 𝐮❨l1❩ ≘ f.
 #l2 @(nat_ind_succ … l2) -l2
 [ #l1 #f2 #Hf2 #f #Hf