aboutsummaryrefslogtreecommitdiff
path: root/generics/associator.pd
diff options
context:
space:
mode:
Diffstat (limited to 'generics/associator.pd')
-rw-r--r--generics/associator.pd15
1 files changed, 12 insertions, 3 deletions
diff --git a/generics/associator.pd b/generics/associator.pd
index 020dc12..bbe0f1f 100644
--- a/generics/associator.pd
+++ b/generics/associator.pd
@@ -1,11 +1,11 @@
#N canvas 574 54 580 241 10;
-#X obj 18 162 -;
+#X obj 18 182 -;
#X obj 18 19 inlet a;
#X obj 71 19 inlet b;
#X text 214 11 associativity rule for operator \$1 is:;
#X obj 124 19 inlet c;
#X text 214 25 (a \$1 b) \$1 c - a \$1 (b \$1 c) = 0;
-#X obj 18 181 outlet (ab)c-a(bc);
+#X obj 18 201 outlet (ab)c-a(bc);
#X obj 18 61 unpack 0 0 0;
#X obj 18 42 pack 0 0 0;
#X obj 81 123 \$1;
@@ -14,6 +14,11 @@
#X obj 18 123 \$1;
#X text 215 40 when the associator is 0 the rule is respected.;
#X text 215 63 see associative-test.pd;
+#X obj 148 182 +;
+#X text 16 219 associator;
+#X text 146 219 antiassociator;
+#X obj 18 153 t a a;
+#X obj 148 201 outlet (ab)c+a(bc);
#X connect 0 0 6 0;
#X connect 1 0 8 0;
#X connect 2 0 8 1;
@@ -27,5 +32,9 @@
#X connect 8 0 7 0;
#X connect 9 0 10 1;
#X connect 10 0 0 1;
+#X connect 10 0 15 1;
#X connect 11 0 12 0;
-#X connect 12 0 0 0;
+#X connect 12 0 18 0;
+#X connect 15 0 19 0;
+#X connect 18 0 0 0;
+#X connect 18 1 15 0;