X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_pat_uni.ma;h=f284a8acdf677220bf1d9baa8051d7f7c30600b5;hb=df1bcd1387439133c0c33f597a5f8b2331c07772;hp=387430d9252ad407bf161df7891c8f5eac09a697;hpb=f8b4eb67c2437f7b5174d7dca46e102e0ac0d19d;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_uni.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_uni.ma index 387430d92..f284a8acd 100644 --- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_uni.ma +++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_uni.ma @@ -22,7 +22,7 @@ include "ground/relocation/pr_pat_pat_id.ma". (*** at_uni *) lemma pr_pat_uni (n) (i): - @❪i,𝐮❨n❩❫ ≘ i+n. + @⧣❨i,𝐮❨n❩❩ ≘ i+n. #n @(nat_ind_succ … n) -n /2 width=5 by pr_pat_next/ qed. @@ -31,5 +31,5 @@ qed. (*** at_inv_uni *) lemma pr_pat_inv_uni (n) (i) (j): - @❪i,𝐮❨n❩❫ ≘ j → j = i+n. + @⧣❨i,𝐮❨n❩❩ ≘ j → j = i+n. /2 width=4 by pr_pat_mono/ qed-.