chris@531: #N canvas 464 23 1002 583 10;
chris@531: #X obj 224 202 max;
chris@531: #X obj 265 200 f;
chris@531: #X obj 223 229 change;
chris@531: #X obj 223 251 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
chris@531: -1 -1;
chris@531: #X obj 223 271 f;
chris@531: #X obj 259 323 f;
chris@531: #X obj 187 315 f;
chris@531: #X obj 268 282 t b b;
chris@531: #X obj 183 364 outlet;
chris@531: #X obj 269 379 outlet;
chris@531: #X obj 179 17 inlet;
chris@531: #X obj 225 177 tabread \$1;
chris@531: #X obj 230 88 t f f b;
chris@531: #X text 376 37 Finds a maximum value in an array;
chris@531: #X text 531 112 \$2 arrayLength;
chris@531: #X obj 292 10 inlet;
chris@531: #X text 425 146 inlets:;
chris@531: #X text 473 144 1 bang to find the maximum;
chris@531: #X text 475 157 2 arrayLength;
chris@531: #X text 407 90 creation arguments: \$1 arrayName;
chris@531: #X obj 246 38 \$2;
chris@531: #X obj 202 40 bang;
chris@531: #X obj 230 65 f;
chris@531: #X obj 224 6 loadbang;
chris@531: #X text 444 216 outlets: 1 maximum value;
chris@531: #X text 498 231 2 index of the maximum value;
chris@531: #X msg 276 141 -1e+15;
chris@531: #X obj 222 142 t f f f;
chris@531: #X floatatom 158 266 5 0 0 0 - - -, f 5;
chris@531: #X obj 332 302 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
chris@531: -1 -1;
chris@531: #X obj 288 253 select 127;
chris@531: #X floatatom 301 324 5 0 0 0 - - -, f 5;
chris@531: #X text 362 256 heavy does not support the second inlet of select so
chris@531: I have to hard code 127 in here;
chris@531: #X obj 223 110 countTo;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 0 0 6 1;
chris@531: #X connect 0 0 28 0;
chris@531: #X connect 1 0 0 1;
chris@531: #X connect 2 0 3 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 4 0 5 1;
chris@531: #X connect 4 0 31 0;
chris@531: #X connect 5 0 9 0;
chris@531: #X connect 6 0 8 0;
chris@531: #X connect 7 0 6 0;
chris@531: #X connect 7 1 5 0;
chris@531: #X connect 10 0 21 0;
chris@531: #X connect 11 0 0 0;
chris@531: #X connect 12 0 33 0;
chris@531: #X connect 12 2 26 0;
chris@531: #X connect 15 0 22 1;
chris@531: #X connect 20 0 22 1;
chris@531: #X connect 21 0 22 0;
chris@531: #X connect 22 0 12 0;
chris@531: #X connect 23 0 20 0;
chris@531: #X connect 26 0 0 1;
chris@531: #X connect 27 0 30 0;
chris@531: #X connect 27 1 11 0;
chris@531: #X connect 27 2 4 1;
chris@531: #X connect 30 0 7 0;
chris@531: #X connect 30 0 29 0;
chris@531: #X connect 33 0 27 0;