Update of /cvsroot/pure-data/abstractions/footils/list-abs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16759
Modified Files: list-math.pd Log Message: list-math now uses list-map
Index: list-math.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-math.pd,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** list-math.pd 13 Sep 2006 18:40:41 -0000 1.4 --- list-math.pd 24 Apr 2007 19:08:42 -0000 1.5 *************** *** 1,40 **** ! #N canvas 424 89 624 640 10; ! #X msg 119 113 1 2 3 4 a b c; ! #X text 251 117 <- click to test; ! #X obj 196 386 list; ! #X obj 77 499 list; ! #X obj 100 271 route float; ! #X obj 100 385 list prepend; ! #X floatatom 248 273 5 0 0 0 - - -; ! #X obj 78 150 t b a b; ! #X text 254 314 Do math only on float elements; ! #X text 260 177 clear result list; ! #X text 175 242 "Drip" (serialize) the list; ! #X text 258 389 Repack the list (think of the counter); ! #X text 124 496 Final result is built here; ! #X obj 78 81 inlet; ! #X obj 100 307 expr $f1 $1 $f2; ! #X obj 200 273 inlet; ! #X obj 77 530 outlet; ! #X text 182 32 Use as "list-math operator" where operator is some binary operator , expr can understand.; ! #X obj 290 266 loadbang; ! #X obj 290 287 f $2; ! #X obj 100 242 list-drip; ! #X connect 0 0 7 0; ! #X connect 2 0 5 1; ! #X connect 3 0 16 0; ! #X connect 4 0 14 0; ! #X connect 4 1 5 0; ! #X connect 5 0 2 0; ! #X connect 5 0 3 1; ! #X connect 6 0 14 1; ! #X connect 7 0 3 0; ! #X connect 7 1 20 0; ! #X connect 7 2 5 1; ! #X connect 13 0 7 0; ! #X connect 14 0 5 0; ! #X connect 15 0 14 1; ! #X connect 18 0 19 0; ! #X connect 19 0 14 1; ! #X connect 20 0 4 0; --- 1,16 ---- ! #N canvas 424 89 462 324 10; ! #X obj 55 58 inlet; ! #X obj 55 235 outlet; ! #X text 44 16 Use as "list-math operator" where operator is some binary operator , expr can understand.; ! #X obj 55 136 list-map; ! #X obj 152 208 $1 $2; ! #X obj 182 134 inlet; ! #X obj 152 97 route float; ! #X connect 0 0 3 0; ! #X connect 3 0 1 0; ! #X connect 3 1 6 0; ! #X connect 4 0 3 1; ! #X connect 5 0 4 1; ! #X connect 6 0 4 0; ! #X connect 6 1 3 1;