Update of /cvsroot/pure-data/abstractions/footils/list-abs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12877
Added Files: list-dotprod-help.pd list-dotprod.pd Log Message: added dotproduct calculator
--- NEW FILE: list-dotprod.pd --- #N canvas 0 0 750 558 10; #X obj 59 31 inlet; #X obj 280 39 inlet; #X obj 59 469 outlet; #X obj 78 138 list-drip; #X obj 257 231 list; #X obj 171 259 list-dripslow; #X obj 78 258 route float; #X obj 171 286 route float; #X obj 137 87 s $0-reset; #X obj 108 359 r $0-reset; #X obj 59 58 t b a b b; #X text 305 153 list-dotprod; #X text 325 174 dot-product of two lists: res = sum(Xi*Yi); #X obj 108 409 f 0; #X obj 108 384 0; #X obj 59 436 f; #X obj 78 408 +; #X obj 78 322 *; #X obj 78 162 t a b; #X connect 0 0 10 0; #X connect 1 0 4 1; #X connect 3 0 18 0; #X connect 4 0 5 1; #X connect 5 0 7 0; #X connect 6 0 17 0; #X connect 7 0 17 1; #X connect 9 0 14 0; #X connect 10 0 15 0; #X connect 10 1 3 0; #X connect 10 2 4 0; #X connect 10 3 8 0; #X connect 13 0 16 1; #X connect 14 0 13 0; #X connect 15 0 2 0; #X connect 16 0 13 0; #X connect 16 0 15 1; #X connect 17 0 16 0; #X connect 18 0 6 0; #X connect 18 1 5 0;
--- NEW FILE: list-dotprod-help.pd --- #N canvas 100 183 484 314 10; #X obj 59 150 list-dotprod; #X msg 138 118 3 1; #X text 40 32 list-dotprod; #X text 60 53 dot-product of two lists: res = sum(Xi*Yi); #X obj 290 188 list-mult; #X obj 290 215 list-accum; #X msg 348 160 3 1; #X floatatom 59 179 5 0 0 0 - - -; #X floatatom 290 240 5 0 0 0 - - -; #X text 240 137 a bit faster , but the same as; #X msg 59 119 2 4; #X msg 290 161 2 4; #X text 57 209 2*3 + 4*1 = 10; #X connect 0 0 7 0; #X connect 1 0 0 1; #X connect 4 0 5 0; #X connect 5 0 8 0; #X connect 6 0 4 1; #X connect 10 0 0 0; #X connect 11 0 4 0;