9 lines
146 B
Plaintext
9 lines
146 B
Plaintext
|
/build_ob {
|
||
|
|
pop
|
||
|
|
size 3 mul 16 div /rad exch def
|
||
|
|
currentpoint
|
||
|
|
newpath
|
||
|
|
rad add exch rad add exch rad 0 360 arc
|
||
|
|
stroke
|
||
|
|
} def
|