From 4485ace1fb977d3ec6fdff766bf3f29304df0d0c Mon Sep 17 00:00:00 2001
From: "N.N." <matju@users.sourceforge.net>
Date: Sat, 31 Dec 2005 16:23:03 +0000
Subject: .

svn path=/trunk/abstractions/pureunity/; revision=4326
---
 generics/associative-test.pd | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100644 generics/associative-test.pd

(limited to 'generics/associative-test.pd')

diff --git a/generics/associative-test.pd b/generics/associative-test.pd
new file mode 100644
index 0000000..14de122
--- /dev/null
+++ b/generics/associative-test.pd
@@ -0,0 +1,30 @@
+#N canvas 736 151 452 362 10;
+#X obj 40 15 inlet bang;
+#X obj 40 112 abs;
+#X obj 119 112 abs;
+#X obj 40 131 /;
+#X obj 40 150 t a a;
+#X obj 40 188 pack 0 0;
+#X obj 40 226 outlet;
+#X text 167 24 with tolerance 0;
+#X obj 40 169 <= 0;
+#X text 167 9 This test verifies that (1+2)+3=1+(2+3);
+#X msg 40 34 1 2 3;
+#X obj 40 93 associator +;
+#X obj 40 74 unpack 0 0 0;
+#X msg 40 207 list associative1 \$1 \$2 -;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 8 0;
+#X connect 4 1 5 1;
+#X connect 5 0 13 0;
+#X connect 8 0 5 0;
+#X connect 10 0 12 0;
+#X connect 11 0 1 0;
+#X connect 11 1 2 0;
+#X connect 12 0 11 0;
+#X connect 12 1 11 1;
+#X connect 12 2 11 2;
+#X connect 13 0 6 0;
-- 
cgit v1.2.1