diff options
Diffstat (limited to 'generics/distributive-test.pd')
-rw-r--r-- | generics/distributive-test.pd | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/generics/distributive-test.pd b/generics/distributive-test.pd new file mode 100644 index 0000000..8f6692a --- /dev/null +++ b/generics/distributive-test.pd @@ -0,0 +1,32 @@ +#N canvas 665 86 471 430 10; +#X obj 40 15 inlet bang; +#X obj 37 160 /; +#X obj 37 179 t a a; +#X text 157 24 with tolerance 0; +#X obj 37 198 <= 0; +#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 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 14 1; +#X connect 4 0 14 0; +#X connect 6 0 7 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; |