aboutsummaryrefslogtreecommitdiff
path: root/generics/distributor.pd
blob: 6217b172106249390f717149e91c993adf1a781e (plain)
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
#N canvas 414 247 580 318 10;
#X text 183 92 see distributive-test.pd;
#X text 183 69 when the distributor is 0 the rule is respected.;
#X text 16 269 distributor;
#X text 180 269 antidistributor;
#X obj 164 19 \$1.inlet c;
#X obj 91 19 \$1.inlet b;
#X obj 18 19 \$1.inlet a;
#X obj 18 251 \$1.outlet a(bc)-(ab+ac);
#X obj 182 251 \$1.outlet a(bc)+(ab+ac);
#X text 182 40 distributivity rule for operator \$3 over operator \$2
is:;
#X text 182 54 a \$3 (b \$2 c) - ((a \$3 b) \$2 (a \$3 c)) = 0;
#X obj 18 169 \$1.do \$3;
#X obj 25 146 \$1.do \$2;
#X obj 124 184 \$1.do \$2;
#X obj 184 184 \$1.do \$3;
#X obj 124 165 \$1.do \$3;
#X obj 182 232 \$1.do +;
#X obj 18 232 \$1.do -;
#X obj 18 193 \$1.taa;
#X obj 18 80 \$1.taa;
#X obj 55 99 \$1.taa;
#X obj 18 61 \$1.packunpack3;
#X connect 4 0 21 2;
#X connect 5 0 21 1;
#X connect 6 0 21 0;
#X connect 11 0 18 0;
#X connect 12 0 11 1;
#X connect 13 0 16 1;
#X connect 13 0 17 1;
#X connect 14 0 13 1;
#X connect 15 0 13 0;
#X connect 16 0 8 0;
#X connect 17 0 7 0;
#X connect 18 0 17 0;
#X connect 18 1 16 0;
#X connect 19 0 11 0;
#X connect 19 1 20 0;
#X connect 20 0 15 0;
#X connect 20 1 14 0;
#X connect 21 0 19 0;
#X connect 21 1 12 0;
#X connect 21 1 15 1;
#X connect 21 2 12 1;
#X connect 21 2 14 1;