#N canvas 1055 362 600 497 10;
#X obj 239 206 array set copy_list;
#X obj 223 306 array min copy_list;
#X obj 223 282 until;
#X msg 334 330 1e+12 \$1;
#X obj 334 352 unpack;
#X obj 334 376 array set copy_list;
#X obj 223 406 array set sorted_list;
#X obj 43 49 array define sorted_list;
#X obj 274 182 array size copy_list;
#X obj 255 106 list length;
#X obj 294 154 array size sorted_list;
#X obj 255 128 t f f f;
#X obj 43 29 array define copy_list;
#X obj 223 242 f;
#X obj 223 328 t f b;
#X obj 250 353 f;
#X obj 280 353 + 1;
#X msg 265 328 0;
#X obj 208 29 inlet;
#X obj 208 436 array get sorted_list;
#X obj 208 60 t b b l l b;
#X obj 208 458 outlet;
#X connect 1 0 14 0;
#X connect 1 1 3 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 5 1;
#X connect 9 0 11 0;
#X connect 11 0 13 1;
#X connect 11 1 8 0;
#X connect 11 2 10 0;
#X connect 13 0 2 0;
#X connect 14 0 6 0;
#X connect 14 1 15 0;
#X connect 15 0 16 0;
#X connect 15 0 6 1;
#X connect 16 0 15 1;
#X connect 17 0 15 1;
#X connect 18 0 20 0;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 20 1 13 0;
#X connect 20 2 0 0;
#X connect 20 3 9 0;
#X connect 20 4 17 0;
