#N struct \$0-slider float x float y float color float cline float
h;
#N canvas 201 303 461 218 10;
#N canvas 415 406 450 300 \$0-slider 0;
#X text 39 70 color: color of polygon;
#X text 39 90 h: height of polygon;
#X obj 39 31 struct \$0-slider float x float y float color float cline
float h;
#X obj 47 172 filledpolygon color cline 4 0 0 10 0 10 h 0 h;
#X restore 304 4 pd \$0-slider;
#N canvas 0 0 450 300 \$0-showme 0;
#X scalar \$0-slider 20 0 20 75 0 \;;
#X scalar \$0-slider 80 0 80 135 0 \;;
#X scalar \$0-slider 60 0 60 115 105.75 \;;
#X scalar \$0-slider 40 0 40 95 67.4788 \;;
#X coords -1 140 200 -1 200 140 1;
#X restore 22 23 pd \$0-showme;
#X floatatom 330 87 5 0 10 2 how-many? - #0-howmany;
#X obj 332 44 bng 15 250 50 0 \$0-clear empty clear 0 -6 0 8 -262144
-1 -1;
#X obj 332 124 bng 15 250 50 0 \$0-do-create empty create 0 -6 0 8
-262144 -1 -1;
#N canvas 394 123 886 578 mechanics 0;
#X msg 462 91 \; \$1 clear;
#X obj 462 65 symbol;
#X obj 462 38 r \$0-clear;
#X text 462 12 clear show-canvas:;
#X obj 540 39 r \$0-show-cnv;
#X obj 369 420 pointer;
#X text 431 367 go to (and output) "head" of the list;
#X msg 297 408 next;
#X obj 391 252 makefilename pd-%d-showme;
#X msg 369 396 traverse \$1 \, bang;
#X obj 392 233 float \$0;
#X obj 179 479 append \$0-slider x color cline;
#X obj 392 206 loadbang;
#X obj 179 216 f;
#X obj 180 249 until;
#X obj 180 295 i 0;
#X obj 220 140 t b b b b;
#X obj 219 295 + 20;
#X msg 239 268 0;
#X obj 287 446 + 55;
#X obj 391 276 s \$0-show-cnv;
#X obj 406 344 r \$0-show-cnv;
#X obj 258 224 s \$0-clear;
#X obj 118 149 r \$0-howmany;
#X obj 221 115 r \$0-do-create;
#X obj 369 367 symbol;
#X obj 187 379 t f f f b b;
#X msg 290 375 bang;
#X obj 131 429 print;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 4 0 1 1;
#X connect 5 0 11 3;
#X connect 7 0 5 0;
#X connect 8 0 20 0;
#X connect 9 0 5 0;
#X connect 10 0 8 0;
#X connect 12 0 10 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 17 0;
#X connect 15 0 26 0;
#X connect 16 0 13 0;
#X connect 16 1 18 0;
#X connect 16 2 22 0;
#X connect 16 3 10 0;
#X connect 17 0 15 1;
#X connect 18 0 15 1;
#X connect 19 0 11 2;
#X connect 21 0 25 1;
#X connect 23 0 13 1;
#X connect 24 0 16 0;
#X connect 25 0 9 0;
#X connect 26 0 11 0;
#X connect 26 0 28 0;
#X connect 26 1 11 1;
#X connect 26 2 19 0;
#X connect 26 3 7 0;
#X connect 26 4 27 0;
#X connect 27 0 25 0;
#X restore 200 3 pd mechanics;
#X coords 0 150 320 0 320 170 1;