8 lines
145 B
Text
8 lines
145 B
Text
/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
|