From ddda4c6cdef058264547e73b6cd909e270de5333 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Sat, 7 Jan 2006 07:18:04 +0000 Subject: . svn path=/trunk/abstractions/pureunity/; revision=4368 --- generics/trichotomy-test.pd | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) create mode 100644 generics/trichotomy-test.pd diff --git a/generics/trichotomy-test.pd b/generics/trichotomy-test.pd new file mode 100644 index 0000000..49aa8e7 --- /dev/null +++ b/generics/trichotomy-test.pd @@ -0,0 +1,32 @@ +#N canvas 174 185 553 302 10; +#X obj 13 21 inlet; +#X obj 13 255 outlet; +#X msg 13 40 1 2 \, 2 2 \, 2 1; +#X msg 38 78 \$2 \$1; +#X obj 13 117 +; +#X obj 13 59 t a a a; +#X obj 13 97 \$3; +#X obj 38 97 \$3; +#X obj 91 100 \$2; +#X obj 38 117 +; +#X obj 13 136 - 1; +#X obj 13 155 t a a; +#X obj 13 174 == 0; +#X obj 13 236 list append trichotomy \$1 \$2; +#X obj 13 217 pack 0 0 -1; +#X connect 0 0 2 0; +#X connect 2 0 5 0; +#X connect 3 0 7 0; +#X connect 4 0 10 0; +#X connect 5 0 6 0; +#X connect 5 1 3 0; +#X connect 5 2 8 0; +#X connect 6 0 4 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 4 1; +#X connect 11 0 12 0; +#X connect 11 1 14 1; +#X connect 12 0 14 0; +#X connect 13 0 1 0; +#X connect 14 0 13 0; -- cgit v1.2.1