shithub: riscv

ref: 031f5756aba3d07939a7eee6b2adf02f0a2d1d8d
dir: /sys/lib/troff/font/devutf/charlib/RC/

View raw version 
/build_RC {
    pop
    size 4 div /side exch def
    currentpoint
    newpath
    moveto
    0 side 1.5 mul rmoveto
    0 side rlineto
    side 2.5 mul 0 rlineto
    0 side neg rlineto
    closepath
    fill
} def