summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/support/charlib/Ao
blob: 2bdc39bed1ba3b394dcb2f447cf16b77c887f6c4 (plain)
1
2
3
4
5
6
7
vardef C.Ao(expr n) =
 save p,q; picture p,q;
 p="A"infont n;
 q=char202 infont n;
 addto p also q
  shifted(xpart(urcorner p-urcorner q)/2,.3*fontsize n);
 p enddef;