diff options
Diffstat (limited to 'generics/invertor.pd')
| -rw-r--r-- | generics/invertor.pd | 39 |
1 files changed, 24 insertions, 15 deletions
diff --git a/generics/invertor.pd b/generics/invertor.pd index 87b6a96..ee2734a 100644 --- a/generics/invertor.pd +++ b/generics/invertor.pd @@ -1,21 +1,30 @@ -#N canvas 282 67 620 168 10; -#X obj 18 117 -; +#N canvas 336 387 602 199 10; +#X obj 18 137 -; #X obj 18 19 inlet a; #X obj 71 19 inlet b; #X obj 18 65 \$1; -#X text 184 25 (a \$1 b) \$2 b - a = 0; -#X text 185 40 when the invertor is 0 the rule is respected.; -#X text 185 63 see invertible-test.pd; -#X text 184 11 invertibility rule for operator \$1 with right-inverse -\$2 is:; +#X text 184 45 (a \$1 b) \$2 b - a = 0; +#X text 185 60 when the invertor is 0 the rule is respected.; +#X text 185 83 see invertible-test.pd; #X obj 18 91 \$2; #X obj 18 39 t b a; -#X obj 18 136 outlet (ab)/b-a; -#X connect 0 0 10 0; -#X connect 1 0 9 0; +#X obj 18 156 outlet (ab)/b-a; +#X text 19 174 invertor; +#X text 129 174 antiinvertor; +#X obj 128 137 +; +#X obj 18 115 t a a; +#X obj 128 156 outlet (ab)/b+a; +#X text 184 11 invertibility rule for operator \$1 with (presumed) +right-inverse \$2 is:; +#X connect 0 0 9 0; +#X connect 1 0 8 0; #X connect 2 0 3 1; -#X connect 2 0 8 1; -#X connect 3 0 8 0; -#X connect 8 0 0 0; -#X connect 9 0 3 0; -#X connect 9 1 0 1; +#X connect 2 0 7 1; +#X connect 3 0 7 0; +#X connect 7 0 13 0; +#X connect 8 0 3 0; +#X connect 8 1 0 1; +#X connect 8 1 12 1; +#X connect 12 0 14 0; +#X connect 13 0 0 0; +#X connect 13 1 12 0; |