[PD-cvs] abstractions/footils/list-abs list-add-help.pd, NONE, 1.1 list-add.pd, NONE, 1.1 list-clip-help.pd, NONE, 1.1 list-clip.pd, NONE, 1.1 list-emath-help.pd, NONE, 1.1 list-emath.pd, NONE, 1.1 list-mult-help.pd, NONE, 1.1 list-mult.pd, NONE, 1.1 list-sub-help.pd, NONE, 1.1 list-sub.pd, NONE, 1.1 README, 1.6, 1.7 list-math.pd, 1.1, 1.2

Frank Barknecht fbar at users.sourceforge.net
Mon Nov 14 10:54:37 CET 2005


Update of /cvsroot/pure-data/abstractions/footils/list-abs
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14314

Modified Files:
	README list-math.pd 
Added Files:
	list-add-help.pd list-add.pd list-clip-help.pd list-clip.pd 
	list-emath-help.pd list-emath.pd list-mult-help.pd 
	list-mult.pd list-sub-help.pd list-sub.pd 
Log Message:
new list-ops: list-clip and list-emath for element-wise math on lists

--- NEW FILE: list-add-help.pd ---
#N canvas 336 250 450 300 10;
#X msg 145 116 5 5 5 NOPE 5;
#X obj 145 217 print;
#X msg 196 140 1 2 3 0 -1;
#X text 108 67 Substract two lists element by element;
#X obj 145 177 list-add;
#X connect 0 0 4 0;
#X connect 2 0 4 1;
#X connect 4 0 1 0;

--- NEW FILE: list-emath.pd ---
#N canvas 256 135 500 518 10;
#X obj 59 31 inlet;
#X obj 287 28 inlet;
#X obj 59 437 outlet;
#X obj 78 138 list-drip;
#X obj 264 131 list;
#X obj 178 234 list-dripslow;
#X obj 78 287 route float;
#X obj 178 261 route float;
#X obj 78 162 t a b b;
#X obj 78 379 list prepend;
#X obj 176 379 t a;
#X obj 59 404 list;
#X obj 136 57 s \$0-reset;
#X obj 157 343 r \$0-reset;
#X obj 59 58 t b a b b;
#X obj 341 49 loadbang;
#X obj 341 99 select + - * /;
#X msg 341 129 0;
#X msg 387 128 1;
#X obj 341 76 symbol \$1;
#X obj 325 232 f;
#X obj 78 322 expr $f1 \$1 $f2;
#X connect 0 0 14 0;
#X connect 1 0 4 1;
#X connect 3 0 8 0;
#X connect 4 0 5 1;
#X connect 5 0 7 0;
#X connect 6 0 21 0;
#X connect 6 1 9 0;
#X connect 7 0 21 1;
#X connect 8 0 6 0;
#X connect 8 1 5 0;
#X connect 8 2 20 0;
#X connect 9 0 10 0;
#X connect 9 0 11 1;
#X connect 10 0 9 1;
#X connect 11 0 2 0;
#X connect 13 0 9 1;
#X connect 14 0 11 0;
#X connect 14 1 3 0;
#X connect 14 2 4 0;
#X connect 14 3 12 0;
#X connect 15 0 19 0;
#X connect 16 0 17 0;
#X connect 16 1 17 0;
#X connect 16 2 18 0;
#X connect 16 3 18 0;
#X connect 17 0 20 1;
#X connect 18 0 20 1;
#X connect 19 0 16 0;
#X connect 20 0 21 1;
#X connect 21 0 9 0;

--- NEW FILE: list-add.pd ---
#N canvas 256 135 500 518 10;
#X obj 59 31 inlet;
#X obj 138 34 inlet;
#X obj 59 117 outlet;
#X obj 59 85 list-emath +;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 3 0 2 0;

--- NEW FILE: list-clip-help.pd ---
#N canvas 0 0 450 300 10;
#X obj 122 170 list-clip 2 8;
#X obj 122 204 print;
#X text 101 47 list-clip:;
#X obj 189 49 clip;
#X text 231 50 for lists;
#X msg 122 102 1 2 3 SYMBOL 4 5 6 7 8 9 10;
#X floatatom 165 144 5 0 0 0 - - -;
#X floatatom 208 145 5 0 0 0 - - -;
#X connect 0 0 1 0;
#X connect 5 0 0 0;
#X connect 6 0 0 1;
#X connect 7 0 0 2;

--- NEW FILE: list-mult.pd ---
#N canvas 256 135 500 518 10;
#X obj 59 31 inlet;
#X obj 138 34 inlet;
#X obj 59 117 outlet;
#X obj 59 84 list-emath *;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 3 0 2 0;

--- NEW FILE: list-emath-help.pd ---
#N canvas 380 217 603 436 10;
#X obj 87 209 print add;
#X msg 87 138 5 5 5 5 x;
#X text 79 22 list-emath: Do math on lists element by element;
#X msg 350 141 0 1 2 3 4;
#X msg 271 140 5 5 5 5 x;
#X msg 88 256 5 5 5 5 x;
#X msg 269 262 5 5 5 5 x;
#X obj 271 211 print mult;
#X obj 88 327 print sub;
#X obj 269 333 print div;
#X obj 269 294 list-emath /;
#X obj 87 171 list-emath +;
#X obj 271 173 list-emath *;
#X obj 88 289 list-emath -;
#X msg 348 263 0 1 x 3 4;
#X msg 167 257 0 1 2 x 4;
#X msg 166 139 0 1 2 x 4;
#X text 80 55 Non-floats in second list will be replaced by 0 for +
and - \, and by 1 for * and /.;
#X msg 430 262 0 0 0 0 0;
#X text 428 243 Just say no!;
#X text 80 91 Symbols in first list will pass unchanged.;
#X text 83 376 Also see list-add \, list-mult \, list-sub for shortcuts.
;
#X connect 1 0 11 0;
#X connect 3 0 12 1;
#X connect 4 0 12 0;
#X connect 5 0 13 0;
#X connect 6 0 10 0;
#X connect 10 0 9 0;
#X connect 11 0 0 0;
#X connect 12 0 7 0;
#X connect 13 0 8 0;
#X connect 14 0 10 1;
#X connect 15 0 13 1;
#X connect 16 0 11 1;
#X connect 18 0 10 1;

--- NEW FILE: list-mult-help.pd ---
#N canvas 336 250 450 300 10;
#X msg 145 116 5 5 5 NOPE 5;
#X obj 145 217 print;
#X msg 203 139 1 2 3 0 -1;
#X text 108 67 Substract two lists element by element;
#X obj 145 177 list-mult;
#X connect 0 0 4 0;
#X connect 2 0 4 1;
#X connect 4 0 1 0;

--- NEW FILE: list-clip.pd ---
#N canvas 220 202 450 335 10;
#X obj 109 49 inlet;
#X obj 141 155 inlet;
#X obj 174 171 inlet;
#X obj 109 201 clip \$1 \$2;
#X obj 109 136 route float;
#X obj 109 100 list-drip;
#X obj 109 249 list prepend;
#X obj 200 249 t a;
#X obj 86 298 outlet;
#X obj 86 274 list;
#X obj 109 75 t a b;
#X connect 0 0 10 0;
#X connect 1 0 3 1;
#X connect 2 0 3 2;
#X connect 3 0 6 0;
#X connect 4 0 3 0;
#X connect 4 1 6 0;
#X connect 5 0 4 0;
#X connect 5 1 9 0;
#X connect 6 0 7 0;
#X connect 6 0 9 1;
#X connect 7 0 6 1;
#X connect 9 0 8 0;
#X connect 10 0 5 0;
#X connect 10 1 6 1;

Index: README
===================================================================
RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/README,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** README	8 Nov 2005 09:15:45 -0000	1.6
--- README	14 Nov 2005 09:54:35 -0000	1.7
***************
*** 9,16 ****
--- 9,25 ----
    change floats in a lists to their absolute values.
  
+ list-add.pd
+ 
+   Add the floats in two lists element by element.
+ 
  list-accum.pd
  
    sum all floats in a list.
  
+ list-clip.pd
+ 
+   restrict the floats in a list between two borders. Applies [clip] on list
+   floats.
+ 
  list-delete.pd
  
***************
*** 34,37 ****
--- 43,52 ----
    serialize a list on demand: each bang will output the next element.
  
+ list-emath.pd
+ 
+   do elementwise math operations on list. Like list-math, but for two lists
+   instead of list and scalar. Also see list-mult, list-sub and list-add, which
+   are wrappers around list-emath.
+ 
  list-equalize.pd
  
***************
*** 69,72 ****
--- 84,91 ----
    find minimum and maximum float in a list.
  
+ list-mult.pd
+ 
+   multiply the floats in two lists element by element.
+ 
  list-normalize.pd
  
***************
*** 91,94 ****
--- 110,117 ----
    can be used as a drop-in replacement.
  
+ list-sub.pd
+ 
+   substract the floats in two lists element by element.
+ 
  sroute.pd
  

--- NEW FILE: list-sub.pd ---
#N canvas 256 135 500 518 10;
#X obj 59 31 inlet;
#X obj 138 34 inlet;
#X obj 59 117 outlet;
#X obj 59 85 list-emath -;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 3 0 2 0;

Index: list-math.pd
===================================================================
RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-math.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** list-math.pd	1 Nov 2005 12:41:16 -0000	1.1
--- list-math.pd	14 Nov 2005 09:54:35 -0000	1.2
***************
*** 45,48 ****
--- 45,50 ----
  #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 connect 0 0 8 0;
  #X connect 2 0 5 1;
***************
*** 61,62 ****
--- 63,66 ----
  #X connect 17 0 5 0;
  #X connect 18 0 17 1;
+ #X connect 21 0 22 0;
+ #X connect 22 0 17 1;

--- NEW FILE: list-sub-help.pd ---
#N canvas 336 250 450 300 10;
#X obj 145 177 list-sub;
#X msg 145 116 5 5 5 NOPE 5;
#X obj 145 217 print;
#X msg 196 141 1 2 3 0 -1;
#X text 108 67 Substract two lists element by element;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 3 0 0 1;





More information about the Pd-cvs mailing list