#N struct test float x float y float test;
#N struct no-test float x float y float no-test;
#N canvas 364 241 723 363 10;
#N canvas 0 0 450 300 score 0;
#X scalar test 80 63 78 \;;
#X scalar test 82 104 91 \;;
#X scalar no-test 92 97 29 \;;
#X scalar no-test 129 48 62 \;;
#X scalar no-test 163 188 1 \;;
#X scalar test 194 89 35 \;;
#X restore 598 111 pd score;
#N canvas 141 232 632 393 test 0;
#X obj 448 287 pointer;
#X obj 356 240 until;
#X msg 330 287 12;
#X msg 448 260 traverse pd-score \, bang;
#X obj 376 213 t f b;
#X msg 376 190 3;
#X obj 154 89 struct test float x float y float test;
#X obj 137 126 drawnumber test 0 0 900 test=;
#X obj 327 309 append test x test;
#X obj 348 261 t b b;
#X obj 372 282 random 100;
#X connect 0 0 8 2;
#X connect 1 0 9 0;
#X connect 2 0 8 0;
#X connect 3 0 0 0;
#X connect 4 0 1 0;
#X connect 4 1 3 0;
#X connect 5 0 4 0;
#X connect 9 0 2 0;
#X connect 9 1 10 0;
#X connect 10 0 8 1;
#X restore 599 140 pd test;
#N canvas 0 0 749 502 no-test 0;
#X obj 154 89 struct no-test float x float y float no-test;
#X obj 41 130 drawnumber no-test 0 0 0 notest=;
#X obj 423 273 pointer;
#X obj 331 226 until;
#X msg 305 273 12;
#X msg 423 246 traverse pd-score \, bang;
#X obj 351 199 t f b;
#X obj 323 247 t b b;
#X obj 302 295 append no-test x no-test;
#X msg 350 174 3;
#X obj 346 268 random 100;
#X connect 2 0 8 2;
#X connect 3 0 7 0;
#X connect 4 0 8 0;
#X connect 5 0 2 0;
#X connect 6 0 3 0;
#X connect 6 1 5 0;
#X connect 7 0 4 0;
#X connect 7 1 10 0;
#X connect 9 0 6 0;
#X connect 10 0 8 1;
#X restore 600 164 pd no-test;
#X msg 81 134 next;
#X obj 450 195 print NO-EOL;
#X obj 188 192 print EOL;
#X msg 81 103 bang;
#X msg 322 141 next;
#X msg 322 110 bang;
#X text 65 47 pointer messages;
#X msg 188 101 score;
#X text 158 77 subpatch to traverse - without "pd-"!;
#X msg 450 108 score;
#X obj 81 161 ds-traverse test;
#X obj 322 168 ds-traverse no-test;
#X msg 595 62 sort;
#X obj 595 85 s pd-score;
#X obj 81 262 get test test;
#X floatatom 81 286 5 0 0 0 - - -;
#X floatatom 322 287 5 0 0 0 - - -;
#X obj 322 266 get no-test no-test;
#X obj 81 307 print TEST;
#X obj 322 306 print NO-TEST;
#X connect 3 0 13 0;
#X connect 6 0 13 0;
#X connect 7 0 14 0;
#X connect 8 0 14 0;
#X connect 10 0 13 1;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 13 1 5 0;
#X connect 14 0 20 0;
#X connect 14 1 4 0;
#X connect 15 0 16 0;
#X connect 17 0 18 0;
#X connect 18 0 21 0;
#X connect 19 0 22 0;
#X connect 20 0 19 0;