Hello,

Here an abstraction [list-posminmax] to find the position of the minimum
and maximum float in a list of floats.
Can be useful with ann library if you have several outputs and want to
return the position of the highest value (with a [select] after) to
categorize.
I didn't find an equivalent in the list-abs and sfruit.
Is it enough interesting ?
Frank, as usual, if you want to incude it in list-abs, there is no
problem ;)
++

Jack


#N canvas 9 25 450 300 10;
#X obj 156 82 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X floatatom 156 176 5 0 0 0 - - -;
#X floatatom 237 201 5 0 0 0 - - -;
#X text 52 175 pos of the min :;
#X text 132 200 pos of the max :;
#X obj 156 114 list-random 100 1000;
#X obj 156 146 list-posminmax;
#X text 52 22 [list-posminmax] find the position of the minimum and
maximum float in a list of floats.;
#X connect 0 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 1 0;
#X connect 6 1 2 0;
#N canvas 470 94 439 514 10;
#X text 286 408 Jack/RYBN 2010;
#X obj 66 380 f;
#X obj 85 332 f;
#X obj 66 75 t b l b;
#X msg 214 105 0;
#X obj 66 47 inlet;
#X obj 66 400 outlet;
#X obj 85 104 list-drip;
#X obj 170 380 f;
#X obj 185 332 f;
#X obj 170 400 outlet;
#N canvas 0 0 450 300 once 0;
#X obj 110 75 inlet;
#X obj 105 187 spigot 1;
#X obj 110 104 t b f;
#X msg 125 151 0;
#X msg 165 99 1;
#X obj 165 63 inlet;
#X obj 102 219 outlet;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 3 0 1 1;
#X connect 4 0 1 1;
#X connect 5 0 4 0;
#X restore 297 144 pd once;
#X obj 85 127 t f f;
#X obj 115 189 t f;
#X obj 85 303 b;
#X obj 215 189 t f;
#X obj 185 303 b;
#X obj 85 273 change;
#X obj 185 273 change;
#X obj 85 189 min;
#X obj 185 189 max;
#X obj 85 215 t f b;
#X obj 185 215 t f b;
#X obj 112 244 f;
#X obj 152 244 + 1;
#X obj 212 244 f;
#X obj 252 244 + 1;
#X connect 1 0 6 0;
#X connect 2 0 1 1;
#X connect 3 0 1 0;
#X connect 3 0 8 0;
#X connect 3 1 7 0;
#X connect 3 2 4 0;
#X connect 3 2 11 1;
#X connect 4 0 2 1;
#X connect 4 0 9 1;
#X connect 4 0 25 1;
#X connect 4 0 23 1;
#X connect 4 0 1 1;
#X connect 4 0 8 1;
#X connect 5 0 3 0;
#X connect 7 0 12 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 11 0 19 1;
#X connect 11 0 20 1;
#X connect 12 0 19 0;
#X connect 12 0 20 0;
#X connect 12 1 11 0;
#X connect 13 0 19 1;
#X connect 14 0 2 0;
#X connect 15 0 20 1;
#X connect 16 0 9 0;
#X connect 17 0 14 0;
#X connect 18 0 16 0;
#X connect 19 0 13 0;
#X connect 19 0 21 0;
#X connect 20 0 15 0;
#X connect 20 0 22 0;
#X connect 21 0 17 0;
#X connect 21 1 23 0;
#X connect 22 0 18 0;
#X connect 22 1 25 0;
#X connect 23 0 24 0;
#X connect 23 0 2 1;
#X connect 24 0 23 1;
#X connect 25 0 26 0;
#X connect 25 0 9 1;
#X connect 26 0 25 1;
_______________________________________________
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management -> 
http://lists.puredata.info/listinfo/pd-list

Reply via email to