X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_coafter_nat_tls_pushs.ma;h=0dc77fb28e6fad96be997e5af71daa2f90ecf9b7;hb=8f1a123e61ff079b1f9ad63cc915470ec7e6abf3;hp=9445dccd0117302cae679744f88d57e169b03259;hpb=f8b4eb67c2437f7b5174d7dca46e102e0ac0d19d;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_coafter_nat_tls_pushs.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_coafter_nat_tls_pushs.ma
index 9445dccd0..0dc77fb28 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_coafter_nat_tls_pushs.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_coafter_nat_tls_pushs.ma
@@ -23,7 +23,7 @@ include "ground/relocation/pr_coafter.ma".
 
 (*** coafter_fwd_pushs *)
 lemma pr_coafter_des_pushs_dx (n) (m):
-      ∀g2,f1,g. g2 ~⊚ ⫯*[m]f1 ≘ g → @↑❪m, g2❫ ≘ n →
+      ∀g2,f1,g. g2 ~⊚ ⫯*[m]f1 ≘ g → ＠§❨m, g2❩ ≘ n →
       ∃∃f. ⫰*[n]g2 ~⊚ f1 ≘ f & ⫯*[n] f = g.
 #n @(nat_ind_succ … n) -n
 [ #m #g2 #f1 #g #Hg #H