core/list-sample.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

#N canvas 754 395 450 300 10;
#X declare -lib list-abs -lib zexy;
#X obj 47 189 list-idx;
#X obj 26 8 inlet;
#X obj 107 116 list length;
#X obj 92 160 urn;
#X obj 234 18 inlet;
#X obj 47 58 \$1;
#X obj 47 112 list;
#X obj 47 86 until;
#X obj 47 133 t a b;
#X obj 47 221 list-extend;
#X obj 200 116 t b;
#X obj 26 274 outlet;
#X obj 26 245 list;
#X obj 26 33 t b b a a b;
#X obj 241 65 import list-abs zexy;
#X connect 0 0 9 0;
#X connect 1 0 13 0;
#X connect 2 0 3 1;
#X connect 3 0 0 1;
#X connect 4 0 5 1;
#X connect 5 0 7 0;
#X connect 6 0 8 0;
#X connect 7 0 6 0;
#X connect 8 0 0 0;
#X connect 8 1 3 0;
#X connect 9 0 12 1;
#X connect 10 0 9 1;
#X connect 12 0 11 0;
#X connect 13 0 12 0;
#X connect 13 1 5 0;
#X connect 13 2 6 1;
#X connect 13 3 2 0;
#X connect 13 4 10 0;