summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/support/charlib/Fi
blob: 6979477afe423efa4d8e0d31cfb1a12077be5b67 (plain)
1
2
3
4
5
6
7
vardef C.Fi(expr n) =
 save p;
 picture p; p="f"infont n;
 for c="f","i":
  addto p also c infont n shifted(xpart urcorner p-fontsize n/20,0);
 endfor
 p enddef;