From 9b768ee48c7388f491842fc895dc613fa3076064 Mon Sep 17 00:00:00 2001
From: "N.N." <matju@users.sourceforge.net>
Date: Sat, 7 Jan 2006 06:57:12 +0000
Subject: using [list append]

svn path=/trunk/abstractions/pureunity/; revision=4367
---
 generics/distributive-test.pd | 35 ++++++++++++++---------------------
 1 file changed, 14 insertions(+), 21 deletions(-)

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

diff --git a/generics/distributive-test.pd b/generics/distributive-test.pd
index 96d5407..8f6692a 100644
--- a/generics/distributive-test.pd
+++ b/generics/distributive-test.pd
@@ -7,33 +7,26 @@
 #X text 156 9 This test verifies that 3*(4+5)=3*4+3*5;
 #X msg 40 34 3 4 5;
 #X obj 40 82 unpack 0 0 0;
-#X obj 37 236 outlet;
-#X obj 101 155 loadbang;
-#X obj 101 174 4times symbol distributive \$1 \$2 \$3;
-#X obj 101 193 unpack s s s s;
-#X obj 37 217 pack 0 0 -1 s s s s;
+#X obj 37 255 outlet;
 #X obj 37 141 * 2;
 #X obj 37 122 \$1.norm;
 #X obj 172 122 \$1.norm;
 #X obj 37 103 distributor \$1 \$2 \$3;
+#X obj 37 236 list append distributive \$1 \$2 \$3;
+#X obj 37 217 pack 0 0 -1;
 #X connect 0 0 6 0;
 #X connect 1 0 2 0;
 #X connect 2 0 4 0;
-#X connect 2 1 12 1;
-#X connect 4 0 12 0;
+#X connect 2 1 14 1;
+#X connect 4 0 14 0;
 #X connect 6 0 7 0;
-#X connect 7 0 16 0;
-#X connect 7 1 16 1;
-#X connect 7 2 16 2;
-#X connect 9 0 10 0;
-#X connect 10 0 11 0;
-#X connect 11 0 12 3;
-#X connect 11 1 12 4;
-#X connect 11 2 12 5;
-#X connect 11 3 12 6;
-#X connect 12 0 8 0;
-#X connect 13 0 1 0;
+#X connect 7 0 12 0;
+#X connect 7 1 12 1;
+#X connect 7 2 12 2;
+#X connect 9 0 1 0;
+#X connect 10 0 9 0;
+#X connect 11 0 1 1;
+#X connect 12 0 10 0;
+#X connect 12 1 11 0;
+#X connect 13 0 8 0;
 #X connect 14 0 13 0;
-#X connect 15 0 1 1;
-#X connect 16 0 14 0;
-#X connect 16 1 15 0;
-- 
cgit v1.2.1