1 files changed, 31 insertions, 0 deletions
diff --git a/generics/invertible-test.pd b/generics/invertible-test.pd
new file mode 100644
index 0000000..d08abe9
--- /dev/null
+++ b/generics/invertible-test.pd
@@ -0,0 +1,31 @@
+#N canvas 665 86 452 291 10;
+#X obj 40 15 inlet bang;
+#X obj 40 79 unpack 0 0;
+#X obj 33 160 /;
+#X msg 40 34 1 3;
+#X obj 33 179 t a a;
+#X text 217 24 with tolerance 0;
+#X obj 33 198 <= 0;
+#X text 215 9 This test verifies that 1+3-3=1;
+#X obj 33 255 outlet;
+#X obj 33 141 * 2;
+#X obj 33 122 \$1.norm;
+#X obj 147 123 \$1.norm;
+#X obj 33 103 invertor \$1 \$2 \$3;
+#X obj 33 236 list append invertible \$1 \$2 \$3;
+#X obj 33 217 pack 0 0 -1;
+#X connect 0 0 3 0;
+#X connect 1 0 12 0;
+#X connect 1 1 12 1;
+#X connect 2 0 4 0;
+#X connect 3 0 1 0;
+#X connect 4 0 6 0;
+#X connect 4 1 14 1;
+#X connect 6 0 14 0;
+#X connect 9 0 2 0;
+#X connect 10 0 9 0;
+#X connect 11 0 2 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;