patches/lib/list/equal.pd

#N canvas 0 30 1022 568 12;
#X obj 153 15 inlet;
#X obj 120 535 outlet;
#X obj 288 28 inlet;
#X obj 197 191 map;
#X obj 134 320 reduce;
#X obj 286 128 list length;
#X obj 409 129 list length;
#X obj 323 202 ==;
#X msg 65 325 0;
#X obj 141 93 t b a a;
#X obj 270 473 f;
#X obj 234 435 bang;
#X text 142 388 check if there's any non-equal elements;
#X obj 98 389 find;
#X obj 202 262 eq;
#X text 388 250 DOES NOT WORK YET FOR LISTS;
#X text 391 302 mostly works \, but sometimes fails...;
#X msg 102 463 0;
#X connect 0 0 9 0;
#X connect 2 0 3 1;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 3 1 14 0;
#X connect 3 2 14 1;
#X connect 4 0 13 1;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 10 1;
#X connect 8 0 13 0;
#X connect 9 0 8 0;
#X connect 9 1 3 0;
#X connect 9 2 5 0;
#X connect 10 0 1 0;
#X connect 11 0 10 0;
#X connect 13 0 11 0;
#X connect 13 1 17 0;
#X connect 14 0 4 1;
#X connect 17 0 1 0;