From c2a3f0bee5ab25a32af6048670213f94c6a1f572 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Sat, 31 Dec 2005 03:10:39 +0000 Subject: . svn path=/trunk/abstractions/pureunity/; revision=4322 --- generics/commutator.pd | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 generics/commutator.pd (limited to 'generics/commutator.pd') diff --git a/generics/commutator.pd b/generics/commutator.pd new file mode 100644 index 0000000..5dba66a --- /dev/null +++ b/generics/commutator.pd @@ -0,0 +1,33 @@ +#N canvas 394 81 620 407 10; +#X obj 18 84 \$1; +#X obj 52 158 -; +#X obj 68 115 \$1; +#X obj 68 96 f; +#X obj 18 19 inlet a; +#X obj 84 32 inlet b; +#X text 75 134 ba; +#X text 33 103 ab; +#X obj 18 38 t a b a; +#X text 10 158 note: - is float-only; +#X text 218 15 commutativity rule for operator \$1 is: a \$1 b = b +\$1 a; +#X text 218 32 which is also a \$1 b - b \$1 a = 0; +#X text 218 48 the commutator is a \$1 b - b \$1 a; +#X obj 52 177 outlet ab-ba; +#X text 189 112 when \$1 = + this is also known as a "group commutator" +; +#X text 189 132 when \$1 = * this is also known as a "ring commutator" +; +#X text 190 153 however \, this thing i call commutator is more general +; +#X text 189 172 see commutative-test.pd; +#X connect 0 0 1 0; +#X connect 1 0 13 0; +#X connect 2 0 1 1; +#X connect 3 0 2 0; +#X connect 4 0 8 0; +#X connect 5 0 3 1; +#X connect 5 0 0 1; +#X connect 8 0 0 0; +#X connect 8 1 3 0; +#X connect 8 2 2 1; -- cgit v1.2.1