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=8e9e28a975d4b2d3ce8539d5d2442b97e871a9da;hpb=8ec019202bff90959cf1a7158b309e7f83fa222e;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 8e9e28a97..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-.