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