#N canvas 862 152 89 147 10;
#X obj 2 16 cnv 15 80 60 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 6 29 bng 15 250 50 0 empty empty mass 0 -6 0 8 -1 -262144 -1
;
#X obj 34 29 bng 15 250 50 0 empty empty fix 0 -6 0 8 -258699 -1 -1
;
#N canvas 355 305 863 719 guts 0;
#X obj 289 340 pointer;
#X msg 289 303 traverse pd-data \, bang;
#X obj 107 89 inlet;
#X obj 214 89 inlet;
#X obj 679 378 + 1;
#X obj 649 318 r \$0-counter-bng;
#X obj 649 420 s \$0-nextmass;
#X obj 182 354 r \$0-nextmass;
#X obj 107 298 s \$0-counter-bng;
#X msg 107 112 0;
#X text 148 89 mobile;
#X text 260 89 fixed mass;
#X msg 214 111 900;
#X obj 649 378 f 0;
#X obj 685 343 loadbang;
#X obj 549 321 r \$0-counter;
#X msg 590 411 set \$1;
#X obj 590 452 s \$0-counter-in;
#X obj 245 334 r \$0-M;
#X obj 553 175 f \$1;
#X obj 553 199 select 0;
#X obj 553 254 s \$0-M;
#X msg 552 224 100;
#X obj 558 152 loadbang;
#X obj 40 316 r \$0-geos;
#X obj 289 278 r \$0-start-traverse;
#X obj 216 405 f 0;
#X obj 40 339 t a b;
#X obj 232 374 r \$0-mfds;
#X obj 270 399 r \$0-msid;
#X obj 105 432 append mass x y mid mob M sid;
#X obj 678 195 loadbang;
#X obj 678 249 s \$0-msid;
#X msg 678 221 0;
#X msg 197 376 \$1;
#X obj 141 172 random 100;
#X obj 227 172 random 100;
#X obj 141 196 + 20;
#X obj 227 194 + 20;
#X obj 107 272 t b a b b b a b;
#X msg 123 356 \$2 \$3;
#X obj 128 150 t f b;
#X obj 107 230 pack 0 0 0;
#X obj 363 90 inlet;
#X text 410 91 another mass: list of "mob \, x \, y";
#X obj 105 477 outlet;
#X text 159 480 last mass created;
#X obj 338 531 append hole x y;
#X obj 438 505 pointer;
#X msg 438 468 traverse pd-data \, bang;
#X obj 438 443 r \$0-start-traverse;
#X msg 338 479 10 10;
#X connect 0 0 30 6;
#X connect 1 0 0 0;
#X connect 2 0 9 0;
#X connect 3 0 12 0;
#X connect 4 0 13 1;
#X connect 5 0 13 0;
#X connect 7 0 30 2;
#X connect 9 0 41 0;
#X connect 12 0 41 0;
#X connect 13 0 4 0;
#X connect 13 0 6 0;
#X connect 13 0 16 0;
#X connect 14 0 13 0;
#X connect 15 0 13 0;
#X connect 16 0 17 0;
#X connect 18 0 30 4;
#X connect 19 0 20 0;
#X connect 20 0 22 0;
#X connect 20 1 21 0;
#X connect 22 0 21 0;
#X connect 23 0 19 0;
#X connect 24 0 27 0;
#X connect 25 0 1 0;
#X connect 26 0 30 3;
#X connect 27 0 30 0;
#X connect 27 1 26 0;
#X connect 28 0 26 1;
#X connect 29 0 30 5;
#X connect 30 0 45 0;
#X connect 31 0 33 0;
#X connect 33 0 32 0;
#X connect 34 0 30 3;
#X connect 35 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 42 1;
#X connect 38 0 42 2;
#X connect 39 0 8 0;
#X connect 39 1 40 0;
#X connect 39 5 34 0;
#X connect 39 6 1 0;
#X connect 40 0 30 0;
#X connect 41 0 42 0;
#X connect 41 1 35 0;
#X connect 41 1 36 0;
#X connect 42 0 39 0;
#X connect 43 0 42 0;
#X connect 48 0 47 2;
#X connect 49 0 48 0;
#X connect 50 0 49 0;
#X connect 51 0 47 0;
#X restore 105 79 pd guts;
#X obj 105 6 inlet;
#X obj 148 5 inlet;
#X obj 25 59 nbx 5 14 -1e+37 1e+37 0 0 \$0-counter \$0-counter-in id
-22 8 0 10 -262144 -1 -1 0 256;
#X obj 2 79 cnv 15 80 60 empty empty empty 10 10 0 10 -195568 -1 0
;
#X obj 26 85 nbx 5 14 -1e+37 1e+37 0 0 \$0-M \$0-M M -12 8 0 10 -225271
-1 -1 100 256;
#N canvas 379 246 663 624 geos 0;
#X obj 93 96 make_rect 100 100 30 30 10 10;
#X obj 123 162 s \$0-geos;
#X obj 93 188 s \$0-counter-bng;
#X obj 48 33 r \$0-make-rect;
#X msg 93 67 bang;
#N canvas 449 480 450 300 1015-geos 0;
#X obj 48 82 bng 24 250 50 0 \$0-make-rect empty make-rect 0 -6 0 8
-24198 -1 -1;
#X floatatom 151 76 5 0 0 0 x0 - #0-x0;
#X floatatom 151 92 5 0 0 0 y0 - #0-y0;
#X floatatom 227 75 5 0 0 0 xgap - #0-xgap;
#X floatatom 227 91 5 0 0 0 ygap - #0-ygap;
#X floatatom 322 74 5 0 0 0 xsteps - #0-xsteps;
#X floatatom 322 90 5 0 0 0 ysteps - #0-ysteps;
#X text 46 18 Add various geometric forms;
#X text 38 46 Rectangle Networks:;
#X text 37 137 Circles:;
#X obj 52 172 bng 24 250 50 0 \$0-make-circ empty make-circ 0 -6 0
8 -24198 -1 -1;
#X floatatom 145 166 5 0 0 0 x0 - #0-x0-circ;
#X floatatom 145 182 5 0 0 0 y0 - #0-y0-circ;
#X floatatom 251 166 5 0 0 0 radius - #0-radius;
#X floatatom 251 184 5 0 0 0 masses_# - #0-masses-circ;
#X text 107 266 All coords as used by data structs.;
#X obj 54 233 hradio 15 1 0 2 \$0-mf \$0-mf Mobile/Fix 0 -6 0 8 -262144
-1 -1 0;
#X obj 91 234 cnv 15 60 15 \$0-mobfix \$0-mobfix mobile 2 6 0 10 -233017
-66577 0;
#X restore 518 165 pd \$0-geos;
#X msg 519 125 \; \$1 vis 1;
#X obj 518 96 makefilename pd-%s;
#X obj 520 68 symbol \$0-geos;
#X msg 516 22 bang;
#X obj 48 66 t b b;
#X obj 78 226 s \$0-start-traverse;
#N canvas 0 0 930 534 1015-sixpack 0;
#X obj 250 282 r \$0-x0;
#X text 452 208 Args;
#X obj 320 310 sixpack --------------------;
#X obj 296 237 r \$0-y0;
#X obj 336 206 r \$0-xgap;
#X obj 376 185 r \$0-ygap;
#X obj 412 164 r \$0-xsteps;
#X obj 448 143 r \$0-ysteps;
#X obj 326 342 outlet;
#X connect 0 0 2 0;
#X connect 2 0 8 0;
#X connect 3 0 2 1;
#X connect 4 0 2 2;
#X connect 5 0 2 3;
#X connect 6 0 2 4;
#X connect 7 0 2 5;
#X restore 291 40 pd \$0-sixpack;
#X obj 93 128 t b a;
#X obj 524 45 r \$0-show-geos;
#X obj 63 322 r \$0-make-circ;
#N canvas 0 0 930 534 1015-fourpack 0;
#X text 452 208 Args;
#X obj 320 310 sixpack --------------------;
#X obj 319 390 outlet;
#X msg 319 349 \$1 \$2 \$3 \$4;
#X obj 252 282 r \$0-x0-circ;
#X obj 296 237 r \$0-y0-circ;
#X obj 376 185 r \$0-masses-circ;
#X obj 336 206 r \$0-radius;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X connect 4 0 1 0;
#X connect 5 0 1 1;
#X connect 6 0 1 3;
#X connect 7 0 1 2;
#X restore 219 327 pd \$0-fourpack;
#X obj 136 441 s \$0-geos;
#X obj 106 467 s \$0-counter-bng;
#X obj 63 345 t b b;
#X obj 93 505 s \$0-start-traverse;
#X obj 106 407 t b a;
#X obj 63 370 make_circ 300 300 100 8;
#X obj 368 266 select 0;
#X msg 368 306 label mobile;
#X obj 368 329 s \$0-mobfix;
#X msg 420 288 label fix;
#X obj 368 236 r \$0-mf;
#X obj 507 332 s \$0-mfds;
#X msg 508 301 0;
#X msg 544 299 900;
#X connect 0 0 13 0;
#X connect 3 0 10 0;
#X connect 4 0 0 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 9 0 8 0;
#X connect 10 0 0 0;
#X connect 10 1 11 0;
#X connect 12 0 0 1;
#X connect 13 0 2 0;
#X connect 13 1 1 0;
#X connect 14 0 8 0;
#X connect 15 0 19 0;
#X connect 16 0 22 1;
#X connect 19 0 22 0;
#X connect 19 1 20 0;
#X connect 21 0 18 0;
#X connect 21 1 17 0;
#X connect 22 0 21 0;
#X connect 23 0 24 0;
#X connect 23 0 29 0;
#X connect 23 1 26 0;
#X connect 23 1 30 0;
#X connect 24 0 25 0;
#X connect 26 0 25 0;
#X connect 27 0 23 0;
#X connect 29 0 28 0;
#X connect 30 0 28 0;
#X restore 106 122 pd geos;
#X obj 59 29 bng 15 250 50 0 \$0-show-geos \$0-show-geos geos 0 -6
0 8 -225271 -1 -1;
#X obj 35 111 nbx 4 14 -1e+37 1e+37 0 0 \$0-msid \$0-msid SID -30 8
0 10 -261681 -1 -1 0 256;
#X obj 200 1 inlet;
#X obj 105 103 outlet;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 3 0 13 0;
#X connect 4 0 3 0;
#X connect 5 0 3 1;
#X connect 12 0 3 2;
#X coords 0 0 1 1 82 130 1;