added new function-tests

svn path=/trunk/externals/iem/iemmatrix/; revision=3727

3 files changed, 97 insertions, 0 deletions

diff --git a/tests/mtx_bitor/01_function.pd b/tests/mtx_bitor/01_function.pd
new file mode 100644
index 0000000..97edbfb
--- /dev/null
+++ b/tests/mtx_bitor/01_function.pd
@@ -0,0 +1,29 @@
+#N canvas 430 -36 508 466 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X obj 122 296 *;
+#X obj 122 203 unpack 0 0 0 0;
+#X msg 122 183 \$3 \$4 \$5 \$6;
+#X obj 184 296 *;
+#X obj 122 350 *;
+#X obj 122 161 mtx_bitor 3;
+#X obj 122 255 == 3;
+#X obj 153 255 == 3;
+#X obj 184 255 == 3;
+#X msg 122 140 matrix 2 2 0 1 2 6;
+#X obj 215 255 == 7;
+#X connect 0 0 11 0;
+#X connect 2 0 6 0;
+#X connect 3 0 8 0;
+#X connect 3 1 9 0;
+#X connect 3 2 10 0;
+#X connect 3 3 12 0;
+#X connect 4 0 3 0;
+#X connect 5 0 6 1;
+#X connect 6 0 1 0;
+#X connect 7 0 4 0;
+#X connect 8 0 2 0;
+#X connect 9 0 2 1;
+#X connect 10 0 5 0;
+#X connect 11 0 7 0;
+#X connect 12 0 5 1;
diff --git a/tests/mtx_bitor/02_function.pd b/tests/mtx_bitor/02_function.pd
new file mode 100644
index 0000000..3420224
--- /dev/null
+++ b/tests/mtx_bitor/02_function.pd
@@ -0,0 +1,34 @@
+#N canvas 597 228 508 466 10;
+#X obj 122 37 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X obj 122 296 *;
+#X obj 122 255 == 0;
+#X msg 122 183 \$3 \$4 \$5 \$6;
+#X obj 122 203 unpack 0 0 0 0;
+#X obj 184 296 *;
+#X obj 122 327 *;
+#X obj 122 65 t b b;
+#X msg 122 110 matrix 2 2 0 1 0 2;
+#X obj 215 255 == 2;
+#X obj 122 161 mtx_bitor;
+#X obj 153 255 == 3;
+#X obj 184 255 == 1;
+#X msg 166 134 matrix 2 2 0 3 1 2;
+#X connect 0 0 8 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 0;
+#X connect 4 0 5 0;
+#X connect 5 0 3 0;
+#X connect 5 1 12 0;
+#X connect 5 2 13 0;
+#X connect 5 3 10 0;
+#X connect 6 0 7 1;
+#X connect 7 0 1 0;
+#X connect 8 0 9 0;
+#X connect 8 1 14 0;
+#X connect 9 0 11 0;
+#X connect 10 0 6 1;
+#X connect 11 0 4 0;
+#X connect 12 0 2 1;
+#X connect 13 0 6 0;
+#X connect 14 0 11 1;
diff --git a/tests/mtx_bitor/03_function.pd b/tests/mtx_bitor/03_function.pd
new file mode 100644
index 0000000..a4780c2
--- /dev/null
+++ b/tests/mtx_bitor/03_function.pd
@@ -0,0 +1,34 @@
+#N canvas -33 350 508 466 10;
+#X obj 122 37 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X obj 122 296 *;
+#X msg 122 183 \$3 \$4 \$5 \$6;
+#X obj 122 203 unpack 0 0 0 0;
+#X obj 184 296 *;
+#X obj 122 327 *;
+#X obj 122 65 t b b;
+#X msg 166 134 matrix 2 2 19 4 0 -7;
+#X msg 122 110 matrix 2 2 3 1 2 3;
+#X obj 122 161 mtx_|;
+#X obj 122 255 == 19;
+#X obj 153 255 == 5;
+#X obj 184 255 == 2;
+#X obj 215 255 == -5;
+#X connect 0 0 7 0;
+#X connect 2 0 6 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 0;
+#X connect 4 1 12 0;
+#X connect 4 2 13 0;
+#X connect 4 3 14 0;
+#X connect 5 0 6 1;
+#X connect 6 0 1 0;
+#X connect 7 0 9 0;
+#X connect 7 1 8 0;
+#X connect 8 0 10 1;
+#X connect 9 0 10 0;
+#X connect 10 0 3 0;
+#X connect 11 0 2 0;
+#X connect 12 0 2 1;
+#X connect 13 0 5 0;
+#X connect 14 0 5 1;