update in ground

[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / pr_after_nat_uni_tls.ma

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 3ef1f5096bd4ae40e8ccff9a68e917f9e78798ae..55ddd62879eaced0f0e70c7f5ea444e58a7fe2de 100644 (file)
--- 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