array-abs/array-maxk.pd at main · wbrent/array-abs · GitHub

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
#N canvas 368 72 551 566 12;
#X obj 47 32 inlet;
#N canvas 715 414 375 340 message-parsing 0;
#X obj 39 26 inlet;
#X obj 179 234 outlet;
#X obj 99 234 outlet;
#X obj 179 114 symbol;
#X obj 39 50 route set;
#X connect 0 0 4 0;
#X connect 3 0 1 0;
#X connect 4 0 3 0;
#X connect 4 1 2 0;
#X restore 47 62 pd message-parsing;
#X obj 87 306 until;
#X obj 87 340 f;
#X obj 47 507 outlet;
#X obj 87 380 array get \$0-array-maxk-sorted 0 1;
#X obj 47 471 list store;
#X msg 87 414 append \$1;
#X obj 207 246 array-sort \$0-array-maxk-sorted;
#X msg 207 216 ascend;
#X obj 277 192 symbol \$1;
#X obj 277 216 array-copy \$0-array-maxk-sorted;
#X obj 277 95 array define \$0-array-maxk-sorted;
#X obj 47 86 t b f b b b b b;
#X obj 177 276 array size \$0-array-maxk-sorted;
#X obj 177 300 - 1;
#X obj 117 344 - 1;
#X connect 0 0 1 0;
#X connect 1 0 13 0;
#X connect 1 1 10 1;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 3 0 16 0;
#X connect 5 0 7 0;
#X connect 6 0 4 0;
#X connect 7 0 6 0;
#X connect 9 0 8 0;
#X connect 10 0 11 0;
#X connect 13 0 6 0;
#X connect 13 1 2 0;
#X connect 13 3 6 1;
#X connect 13 4 14 0;
#X connect 13 5 9 0;
#X connect 13 6 10 0;
#X connect 14 0 15 0;
#X connect 15 0 3 1;
#X connect 16 0 3 1;