#N canvas 14 5 543 376 10; #N canvas 56 267 728 533 mass 0; #X msg 163 395 traverse \$1 \, bang; #X obj 63 350 inlet; #X obj 163 416 pointer; #X obj 166 229 filledcurve 900 0 1 w(0:100)(0:38) w(0:100)(0:92) w(0:100)(0:92) w(0:100)(0:38) w(0:100)(0:92) w(0:100)(0:-38) w(0:100)(0:38) w(0:100)(0:-92) w(0:100)(0:-38) w(0:100)(0:-92) w(0:100)(0:-92) w(0:100)(0:-38) w(0:100)(0:-92) w(0:100)(0:38) w(0:100)(0:-38) w(0:100)(0:92); #X obj 63 371 list split 3; #X obj 169 142 drawpolygon 9 2 w(0:100)(0:38) w(0:100)(0:92) w(0:100)(0:92) w(0:100)(0:38) w(0:100)(0:92) w(0:100)(0:-38) w(0:100)(0:38) w(0:100)(0:-92) w(0:100)(0:-38) w(0:100)(0:-92) w(0:100)(0:-92) w(0:100)(0:-38) w(0:100)(0:-92) w(0:100)(0:38) w(0:100)(0:-38) w(0:100)(0:92); #X obj 169 108 inlet; #X text 533 159 Outline; #X text 540 262 Circle; #X obj 63 445 append circle x y w; #X obj 63 465 outlet; #X text 301 80 Radius?; #X obj 60 49 struct circle float x float y float w float r; #X obj 278 101 drawpolygon 0 2 r(0:100)(0:-100) 0 r(0:100)(0:100) 0 ; #X connect 0 0 2 0; #X connect 1 0 4 0; #X connect 2 0 9 3; #X connect 4 0 9 0; #X connect 4 1 0 0; #X connect 6 0 5 0; #X connect 9 0 10 0; #X restore 220 158 pd mass; #N canvas 622 181 414 406 show 1; #X restore 381 139 pd show; #X msg 379 170 clear; #X obj 379 196 s pd-show; #X obj 264 137 tgl 15 0 empty empty show_outline 0 -6 0 8 -262144 -1 -1 0 1; #X floatatom 135 143 5 0 0 0 radius - -; #X text 219 84 Click me; #X msg 220 105 200 200 80 pd-show; #X obj 140 60 loadbang; #X obj 135 267 set circle w r; #X obj 135 168 t a a; #X text 190 231 cos(360deg/16) =~ 0.92; #X floatatom 84 267 5 0 0 0 width - -; #X obj 135 228 / 0.92; #X connect 0 0 9 2; #X connect 2 0 3 0; #X connect 4 0 0 1; #X connect 5 0 10 0; #X connect 7 0 0 0; #X connect 8 0 7 0; #X connect 10 0 13 0; #X connect 10 1 9 1; #X connect 13 0 9 0; #X connect 13 0 12 0;