Update of /cvsroot/pure-data/abstractions/footils/list-abs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19396
Modified Files: list-find-help.pd list-find.pd Log Message: list-find got a second outlet
Index: list-find.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-find.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** list-find.pd 2 Jan 2007 12:13:10 -0000 1.1 --- list-find.pd 2 Jan 2007 12:55:29 -0000 1.2 *************** *** 13,17 **** #X obj 91 293 compare-any; #X obj 91 317 select 1; - #X obj 91 80 t b a b; #N canvas 0 0 450 300 count 0; #X obj 120 148 f 0; --- 13,16 ---- *************** *** 30,44 **** #X connect 6 0 0 0; #X restore 121 245 pd count; #X connect 0 0 3 0; ! #X connect 1 0 12 0; #X connect 2 0 7 1; #X connect 5 0 6 0; #X connect 6 0 10 0; ! #X connect 6 1 13 0; #X connect 7 0 5 0; #X connect 10 0 11 0; #X connect 11 0 0 0; ! #X connect 12 0 7 0; ! #X connect 12 1 10 1; ! #X connect 12 2 13 1; ! #X connect 13 0 0 1; --- 29,60 ---- #X connect 6 0 0 0; #X restore 121 245 pd count; + #X obj 91 80 t b a b b; + #X obj 176 395 outlet; + #X obj 248 351 + 1; + #X obj 176 375 f; + #X obj 219 350 f 1; + #X msg 235 317 1; + #X msg 199 318 0; #X connect 0 0 3 0; ! #X connect 1 0 13 0; #X connect 2 0 7 1; #X connect 5 0 6 0; + #X connect 5 1 16 0; #X connect 6 0 10 0; ! #X connect 6 1 12 0; #X connect 7 0 5 0; #X connect 10 0 11 0; #X connect 11 0 0 0; ! #X connect 11 0 17 0; ! #X connect 12 0 0 1; ! #X connect 13 0 7 0; ! #X connect 13 1 10 1; ! #X connect 13 2 12 1; ! #X connect 13 3 18 0; ! #X connect 13 3 19 0; ! #X connect 15 0 17 1; ! #X connect 16 0 14 0; ! #X connect 17 0 16 1; ! #X connect 17 0 15 0; ! #X connect 18 0 17 1; ! #X connect 19 0 16 1;
Index: list-find-help.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-find-help.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** list-find-help.pd 2 Jan 2007 12:13:10 -0000 1.1 --- list-find-help.pd 2 Jan 2007 12:55:29 -0000 1.2 *************** *** 1,7 **** ! #N canvas 324 167 529 463 10; ! #X floatatom 169 220 5 0 0 0 - - -; ! #X obj 154 299 list-find; ! #X obj 212 253 loadbang; ! #X obj 111 409 print FOUND_AT; #X text 69 21 [list-find]; #N canvas 516 236 450 300 collect 0; --- 1,7 ---- ! #N canvas 124 128 552 533 10; ! #X floatatom 169 259 5 0 0 0 - - -; ! #X obj 154 331 list-find; ! #X obj 212 293 loadbang; ! #X obj 111 449 print FOUND_AT; #X text 69 21 [list-find]; #N canvas 516 236 450 300 collect 0; *************** *** 19,36 **** #X connect 6 0 2 0; #X connect 7 0 6 0; ! #X restore 154 355 pd collect; ! #X obj 154 269 t a b; ! #X msg 169 197 0; ! #X msg 199 197 4; #X text 130 53 Find position(s) of a value in a list.; ! #X text 130 76 Inlet0: value to search; ! #X text 130 95 Inlet1: list to search in.; ! #X msg 154 144 seven; ! #X msg 212 276 0 1 2 3 4 5 6 seven eight 0 0; ! #X msg 154 165 symbol eight; ! #X msg 154 380 7; #X connect 0 0 6 0; #X connect 1 0 3 0; #X connect 1 0 5 0; #X connect 2 0 13 0; #X connect 5 0 15 0; --- 19,42 ---- #X connect 6 0 2 0; #X connect 7 0 6 0; ! #X restore 154 395 pd collect; ! #X obj 154 309 t a b; ! #X msg 169 237 0; ! #X msg 199 237 4; #X text 130 53 Find position(s) of a value in a list.; ! #X text 130 72 Inlet0: value to search; ! #X text 130 91 Inlet1: list to search in.; ! #X msg 154 184 seven; ! #X msg 212 315 0 1 2 3 4 5 6 seven eight 0 0; ! #X msg 154 206 symbol eight; ! #X msg 154 417; ! #X text 130 110 Outlet0: stream of found positions; ! #X floatatom 212 354 5 0 0 1 hits - -; ! #X msg 229 237 100; ! #X text 130 129 Outlet1: after list was completely scanned , report ! number of elements found.; #X connect 0 0 6 0; #X connect 1 0 3 0; #X connect 1 0 5 0; + #X connect 1 1 17 0; #X connect 2 0 13 0; #X connect 5 0 15 0; *************** *** 42,43 **** --- 48,50 ---- #X connect 13 0 1 1; #X connect 14 0 6 0; + #X connect 18 0 0 0;