diff options
author | N.N. <matju@users.sourceforge.net> | 2006-01-07 06:57:12 +0000 |
---|---|---|
committer | N.N. <matju@users.sourceforge.net> | 2006-01-07 06:57:12 +0000 |
commit | 9b768ee48c7388f491842fc895dc613fa3076064 (patch) | |
tree | 5fbdee7944ea54b74a9eb32fc5f937ff8d861046 /generics/associative-test.pd | |
parent | 67671a55af958a4461c5986fc553ef3acc5d27d9 (diff) |
using [list append]
svn path=/trunk/abstractions/pureunity/; revision=4367
Diffstat (limited to 'generics/associative-test.pd')
-rw-r--r-- | generics/associative-test.pd | 32 |
1 files changed, 13 insertions, 19 deletions
diff --git a/generics/associative-test.pd b/generics/associative-test.pd index 4e33596..1994c4e 100644 --- a/generics/associative-test.pd +++ b/generics/associative-test.pd @@ -7,32 +7,26 @@ #X text 167 9 This test verifies that (1+2)+3=1+(2+3); #X msg 40 34 1 2 3; #X obj 40 74 unpack 0 0 0; -#X obj 40 236 outlet; -#X obj 104 155 loadbang; -#X obj 104 193 unpack s s s; -#X obj 40 217 pack 0 0 -1 s s s; -#X obj 104 174 3times symbol associative \$1 \$2; +#X obj 40 245 outlet; #X obj 40 131 * 2; #X obj 40 112 \$1.norm; #X obj 147 112 \$1.norm; #X obj 40 93 associator \$1 \$2; +#X obj 40 226 list append associative \$1 \$2; +#X obj 40 207 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 11 1; -#X connect 4 0 11 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 12 0; -#X connect 10 0 11 3; -#X connect 10 1 11 4; -#X connect 10 2 11 5; -#X connect 11 0 8 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 13 0 1 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; |