aboutsummaryrefslogtreecommitdiff
path: root/desiredata/extra/pureunity/invertor.pd
blob: 4ee5454883010652ba4ce770f279c5813168a26f (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
#N canvas 336 387 602 199 10;
#X text 185 60 when the invertor is 0 the rule is respected.;
#X text 185 83 see invertible-test.pd;
#X text 19 174 invertor;
#X text 149 174 antiinvertor;
#X text 184 11 invertibility rule for operator \$2 with (presumed)
right-inverse \$3 is:;
#X text 184 45 (a \$2 b) \$3 b - a = 0;
#X obj 18 19 inlet.\$1 a;
#X obj 101 19 inlet.\$1 b;
#X obj 18 39 taa.\$1;
#X obj 18 65 op2.\$1 \$2;
#X obj 18 91 op2.\$1 \$3;
#X obj 18 115 taa.\$1;
#X obj 18 137 op2.\$1 -;
#X obj 18 156 outlet.\$1 (ab)/b-a;
#X obj 148 156 outlet.\$1 (ab)/b+a;
#X obj 148 137 op2.\$1 +;
#X connect 6 0 8 0;
#X connect 7 0 9 1;
#X connect 7 0 10 1;
#X connect 8 0 9 0;
#X connect 8 1 12 1;
#X connect 8 1 15 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 1 15 0;
#X connect 12 0 13 0;
#X connect 15 0 14 0;