X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_after_pat_tls.ma;h=67bc5183b18a859efed18298e1139ead6d6882b0;hb=b1c5b3370653db6e495bbf6b3799cba592746cdd;hp=02f2aee668dc72d7b1b79435a58dab3943e3f566;hpb=11093619476326238c2ef9d2dfe9150b8c9bc920;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_pat_tls.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_pat_tls.ma
index 02f2aee66..67bc5183b 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_pat_tls.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_after_pat_tls.ma
@@ -23,7 +23,7 @@ include "ground/relocation/pr_after.ma".
 (* Note: this requires ↑ on first n *)
 (*** after_tls *)
 lemma pr_after_tls_sn_tls (n):
-      ∀f1,f2,f. @❨𝟏, f1❩ ≘ ↑n →
+      ∀f1,f2,f. ＠⧣❨𝟏, f1❩ ≘ ↑n →
       f1 ⊚ f2 ≘ f → ⫰*[n]f1 ⊚ f2 ≘ ⫰*[n]f.
 #n @(nat_ind_succ … n) -n //
 #n #IH #f1 #f2 #f #Hf1 #Hf