#N struct line float x float y float h; #N struct dot float x float y; #N canvas 270 224 922 587 10; #N canvas 356 382 450 300 line 0; #X obj 63 71 struct line float x float y float h; #X obj 68 143 drawpolygon 900 1 0 0 0 h; #X restore 362 55 pd line; #X obj 148 183 pointer; #N canvas 0 0 968 778 1-data 0; #X scalar line 145 0 200 \;; #X scalar line 0 0 200 \;; #X scalar line 237 0 200 \;; #X scalar line 205 0 200 \;; #X scalar line 323 0 200 \;; #X scalar line 70 0 200 \;; #X scalar line 58 0 200 \;; #X scalar line 12 0 200 \;; #X scalar line 267 0 200 \;; #X scalar line 261 0 200 \;; #X coords 0 0 400 200 400 200 1; #X restore 399 209 pd 1-data; #X msg 148 160 traverse pd-1-data \, bang; #X obj 48 237 append line x h; #X msg 48 216 \$1 200; #N canvas 0 0 450 300 dot 0; #X obj 109 92 struct dot float x float y; #X obj 105 163 drawpolygon 9 5 0 0 0 5; #X restore 428 55 pd dot; #N canvas 0 0 968 778 2-data 0; #X scalar dot 359 157 \;; #X scalar dot 206 55 \;; #X scalar dot 110 78 \;; #X scalar dot 46 102 \;; #X scalar dot 156 40 \;; #X scalar dot 322 97 \;; #X scalar dot 37 183 \;; #X scalar dot 218 133 \;; #X scalar dot 75 38 \;; #X scalar dot 319 136 \;; #X coords 0 0 400 200 400 200 1; #X restore 399 227 pd 2-data; #X obj 146 131 s pd-1-data; #X msg 146 102 clear; #X obj 81 400 until; #X obj 82 372 10; #X obj 181 486 pointer; #X msg 87 543 \$1 \$2; #X msg 181 463 traverse pd-2-data \, bang; #X obj 88 568 append dot x y; #X obj 82 336 t b b b; #X obj 178 428 s pd-2-data; #X msg 178 404 clear; #X obj 41 469 random 400; #X obj 47 495 pack 0 0; #X obj 63 425 t b b; #X obj 84 445 random 200; #X obj 82 293 bng 32 250 50 0 empty empty empty 0 -6 0 8 -62784 -44926 -1; #X obj 49 63 bng 32 250 50 0 empty empty empty 0 -6 0 8 -258699 -260818 -1; #X obj 49 114 t b b b; #X obj 47 190 random 400; #X obj 55 166 until; #X obj 56 138 10; #X text 426 176 Two subpatches \, slightly displaced here for clarity. ; #X connect 1 0 4 2; #X connect 3 0 1 0; #X connect 5 0 4 0; #X connect 9 0 8 0; #X connect 10 0 21 0; #X connect 11 0 10 0; #X connect 12 0 15 2; #X connect 13 0 15 0; #X connect 14 0 12 0; #X connect 16 0 11 0; #X connect 16 1 14 0; #X connect 16 2 18 0; #X connect 18 0 17 0; #X connect 19 0 20 0; #X connect 20 0 13 0; #X connect 21 0 19 0; #X connect 21 1 22 0; #X connect 22 0 20 1; #X connect 23 0 16 0; #X connect 24 0 25 0; #X connect 25 0 28 0; #X connect 25 1 3 0; #X connect 25 2 9 0; #X connect 26 0 5 0; #X connect 27 0 26 0; #X connect 28 0 27 0;