#N canvas 367 75 578 673 10;
#X obj 226 453 mod 2;
#X obj 226 483 != 0;
#X obj 274 454 mod 3;
#X obj 274 483 != 0;
#X obj 226 517 &&;
#X obj 226 426 t a a;
#N canvas 0 0 450 300 show 0;
#X obj 129 107 list prepend set;
#X obj 129 129 list trim;
#X obj 129 79 inlet;
#X obj 129 154 outlet;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 0 0;
#X restore 70 548 pd show;
#X msg 70 574;
#X text 62 27 [u_listfilter];
#X text 66 58 [u_listfilter] returns a sequence consisting of those
items from the sequence for which the user-defined operation cross-connected
to the rightmost in- and outlet is true.;
#X text 66 112 Everything that is not 0 is considered a TRUE value.
Internally [select 0] is used.;
#X msg 70 213 0 1 2 3 4 5;
#N canvas 0 0 450 300 show 0;
#X obj 129 107 list prepend set;
#X obj 129 129 list trim;
#X obj 129 79 inlet;
#X obj 129 154 outlet;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 0 0;
#X restore 70 306 pd show;
#X msg 70 332;
#X obj 167 266 >= 3;
#X text 67 163 Examples:;
#X text 217 266 remove values smaller than 3 from list;
#X obj 160 212 t b a;
#X floatatom 160 193 5 0 0 0 - - -;
#X text 200 212 "bang" to [u_listfilter] will resend the last list;
#X text 70 362 Calculate some small primes:;
#X msg 70 387 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
23 24;
#X msg 82 526 bang;
#X msg 79 285 bang;
#X obj 70 265 u_listfilter;
#X obj 70 471 u_listfilter;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 25 1;
#X connect 5 0 0 0;
#X connect 5 1 2 0;
#X connect 6 0 7 0;
#X connect 11 0 24 0;
#X connect 12 0 13 0;
#X connect 14 0 24 1;
#X connect 17 0 24 0;
#X connect 17 1 14 1;
#X connect 18 0 17 0;
#X connect 21 0 25 0;
#X connect 22 0 6 0;
#X connect 23 0 12 0;
#X connect 24 0 12 0;
#X connect 24 1 14 0;
#X connect 25 0 6 0;
#X connect 25 1 5 0;
