#N canvas 609 51 652 617 10;
#X obj 88 37 inlet;
#X obj 117 321 list split 5;
#X obj 159 490 list split 1;
#X obj 159 550 outlet;
#X obj 127 461 list split;
#X obj 126 371 sort;
#X obj 117 237 list append;
#X obj 290 316 expr rint(($f1+1)/2)-1;
#X text 329 585 )c( Alexandre Quessy 2006;
#X text 214 547 median;
#X obj 213 157 length;
#X obj 175 93 t l l;
#X text 86 12 inlet 1 : list of floats;
#X obj 141 140 drip;
#X connect 0 0 11 0;
#X connect 1 0 5 0;
#X connect 1 0 6 1;
#X connect 1 2 6 1;
#X connect 2 0 3 0;
#X connect 4 1 2 0;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 7 0 4 1;
#X connect 10 0 1 1;
#X connect 10 0 7 0;
#X connect 11 0 13 0;
#X connect 11 1 10 0;
#X connect 13 0 6 0;