summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/support/charlib/ao.x
blob: c87485a9b0ec102adc0ff41e76d995cd83faf381 (plain)
1
2
3
4
5
6
7
8
9
% $Id: ao,v 1.2 2004/09/19 21:47:11 karl Exp $
% Public domain.
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,.05*fontsize n);
 p enddef;