#N canvas 420 190 744 496 10;
#X text 431 386 2008 Jack/RYBN;
#X msg 85 77 10;
#X text 188 249 Descendent;
#X text 175 227 Ascendent (default);
#X msg 85 340 44 39 27 10 10 8 5 -4 -14 -36;
#X text 123 76 <- generate a random list with 10 elements;
#X obj 85 311 prepent set;
#X msg 85 151 -36 5 44 8 39 -14 10 -4 27 10;
#X text 62 27 [list-sort] : sort a list of numbers. Elements of other
type (symbols \, ...) are removed from the list.;
#N canvas 0 0 450 300 mklist 0;
#X obj 109 146 random 100;
#X obj 109 124 until;
#X msg 215 150 set;
#X msg 109 188 add2 \$1;
#X obj 86 94 t b f b;
#X obj 109 167 - 50;
#X obj 86 63 inlet;
#X obj 86 237 outlet;
#X connect 0 0 5 0;
#X connect 1 0 0 0;
#X connect 2 0 7 0;
#X connect 3 0 7 0;
#X connect 4 0 7 0;
#X connect 4 1 1 0;
#X connect 4 2 2 0;
#X connect 5 0 3 0;
#X connect 6 0 4 0;
#X restore 85 116 pd mklist;
#X msg 371 338 44 39 27 10 10 8 5 -4 -14 -36;
#X obj 371 309 prepent set;
#X msg 145 228 asc;
#X msg 153 249 desc;
#X obj 466 192 hradio 15 1 0 2 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X obj 85 283 list-sort;
#X text 485 217 Arg can be "asc"/0 or "desc"/1;
#X obj 371 221 list-sort desc;
#X connect 1 0 9 0;
#X connect 6 0 4 0;
#X connect 7 0 15 0;
#X connect 7 0 17 0;
#X connect 9 0 7 0;
#X connect 11 0 10 0;
#X connect 12 0 15 1;
#X connect 13 0 15 1;
#X connect 14 0 17 1;
#X connect 15 0 6 0;
#X connect 17 0 11 0;
