#N canvas 1 53 652 617 10;
#X declare -lib zexy;
#X obj 404 50 import zexy;
#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 1 0 12 0;
#X connect 2 0 6 0;
#X connect 2 0 7 1;
#X connect 2 2 7 1;
#X connect 3 0 4 0;
#X connect 5 1 3 0;
#X connect 6 0 5 0;
#X connect 7 0 2 0;
#X connect 8 0 5 1;
#X connect 11 0 2 1;
#X connect 11 0 8 0;
#X connect 12 0 14 0;
#X connect 12 1 11 0;
#X connect 14 0 7 0;