Plan 9 from Bell Labs’s /usr/web/sources/plan9/sys/lib/troff/font/devutf/charlib/ci
/build_ci { pop size 3 mul 8 div /rad exch def currentpoint newpath rad add exch rad add exch rad 0 360 arc stroke } def