-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathpdkl-eltsub.pd
60 lines (60 loc) · 1.54 KB
/
pdkl-eltsub.pd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
#N canvas 635 254 1172 695 12;
#X obj 565 89 inlet;
#X text 610 76 elt to replace;
#X obj 565 114 list split 1;
#X obj 727 95 inlet;
#X text 775 91 list to replace elt with;
#X obj 311 91 inlet;
#X text 377 83 input list;
#X obj 311 216 t a a;
#X obj 389 298 sel 1 0;
#X text 519 305 replace if elts match;
#X obj 359 331 t b b;
#X msg 365 368 0;
#X msg 433 356 1;
#X text 525 327 else let original through;
#X obj 310 410 spigot 0;
#X obj 311 125 t l b b;
#X text 373 111 clear accumulator first;
#X text 362 169 when done \, flush;
#X obj 309 511 outlet;
#X text 16 21 pdkl-sub;
#X text 14 51 sub out matching elements of a list;
#X text 12 125 ARGS:;
#X text 8 245 INLETS:;
#X text 12 270 input/replacee/replacer;
#X text 9 325 OUTLET:;
#X text 7 350 output;
#X text 994 19 derek kwan 2017;
#X text 994 39 pdklist;
#X text 992 60 gpl v 3;
#X obj 527 206 list append \$1;
#X obj 437 402 list append \$2;
#X text 10 153 replacee/replacer;
#X text 12 173 (note: as of right now \,;
#X text 12 197 second arg only takes one elt);
#X obj 309 486 pdkl-fill;
#X obj 311 191 pdkl-drip;
#X obj 389 273 pdkl-eltcmp;
#X connect 0 0 2 0;
#X connect 2 0 29 1;
#X connect 3 0 30 1;
#X connect 5 0 15 0;
#X connect 7 0 14 0;
#X connect 7 1 36 0;
#X connect 8 0 10 0;
#X connect 8 1 12 0;
#X connect 10 0 30 0;
#X connect 10 1 11 0;
#X connect 11 0 14 1;
#X connect 12 0 14 1;
#X connect 14 0 34 0;
#X connect 15 0 35 0;
#X connect 15 1 29 0;
#X connect 15 2 34 2;
#X connect 29 0 36 1;
#X connect 30 0 34 0;
#X connect 34 0 18 0;
#X connect 35 0 7 0;
#X connect 35 2 34 1;
#X connect 36 0 8 0;