From 23884bce9f06cd5d947a4a56ee2fe187125e4cf5 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Sat, 31 Dec 2005 17:15:15 +0000 Subject: . svn path=/trunk/abstractions/pureunity/; revision=4329 --- generics/invertible-test.pd | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 generics/invertible-test.pd (limited to 'generics/invertible-test.pd') diff --git a/generics/invertible-test.pd b/generics/invertible-test.pd new file mode 100644 index 0000000..c488895 --- /dev/null +++ b/generics/invertible-test.pd @@ -0,0 +1,28 @@ +#N canvas 665 86 452 291 10; +#X obj 40 15 inlet bang; +#X obj 40 79 unpack 0 0; +#X obj 33 122 abs; +#X obj 33 151 /; +#X msg 40 34 1 3; +#X obj 33 170 t a a; +#X obj 33 208 pack 0 0; +#X obj 33 246 outlet; +#X text 217 24 with tolerance 0; +#X obj 33 189 <= 0; +#X obj 112 122 abs; +#X obj 33 103 invertor + -; +#X text 215 9 This test verifies that 1+3-3=1; +#X msg 33 227 list invertible1 \$1 \$2 -; +#X connect 0 0 4 0; +#X connect 1 0 11 0; +#X connect 1 1 11 1; +#X connect 2 0 3 0; +#X connect 3 0 5 0; +#X connect 4 0 1 0; +#X connect 5 0 9 0; +#X connect 5 1 6 1; +#X connect 6 0 13 0; +#X connect 9 0 6 0; +#X connect 10 0 3 1; +#X connect 11 0 2 0; +#X connect 13 0 7 0; -- cgit v1.2.1