/usr/web/sources/plan9/sys/lib/troff/font/devutf/charlib/34

Plan 9 from Bell Labs’s /usr/web/sources/plan9/sys/lib/troff/font/devutf/charlib/34


/build_34 {
    pop
    /optsize ptsize def
    /osize size def
    /ofont font def

    optsize 2 div dup R exch R f
    0 size 2 mul 3 div dup neg exch 0 exch rmoveto

    (3) show
    rmoveto
    optsize R f
    (\244) show
    f
    (4) show

    optsize ofont f
} def

(Return to Plan 9 Home Page)