13 lines
180 B
Plaintext
13 lines
180 B
Plaintext
![]() |
/build_bx {
|
||
|
pop
|
||
|
size 2 div /side exch def
|
||
|
currentpoint
|
||
|
newpath
|
||
|
moveto
|
||
|
0 side rlineto
|
||
|
side 0 rlineto
|
||
|
0 side neg rlineto
|
||
|
closepath
|
||
|
fill
|
||
|
} def
|