function checks

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

3 files changed, 179 insertions, 0 deletions

diff --git a/tests/mtx_check/01_function.pd b/tests/mtx_check/01_function.pd
new file mode 100644
index 0000000..35e4ff9
--- /dev/null
+++ b/tests/mtx_check/01_function.pd
@@ -0,0 +1,53 @@
+#N canvas 117 373 642 474 10;
+#X obj 122 68 inlet bang;
+#X obj 122 405 outlet 1==OK;
+#X obj 184 330 *;
+#X obj 122 330 *;
+#X obj 122 356 *;
+#X obj 122 307 ==;
+#X obj 153 307 ==;
+#X obj 184 307 ==;
+#X obj 215 307 ==;
+#X obj 122 156 t l l;
+#X obj 122 98 t b;
+#X msg 122 132 2 2 1 2 -3 0;
+#X msg 122 179 matrix \$1 \$2 \$3 \$4 \$5 \$6;
+#X obj 236 200 unpack 0 0 0 0 0 0;
+#X obj 122 221 mtx_check;
+#X msg 122 243 \$1 \$2 \$3 \$4 \$5 \$6;
+#X obj 122 268 unpack 0 0 0 0 0 0;
+#X obj 244 330 *;
+#X obj 244 307 ==;
+#X obj 275 307 ==;
+#X obj 122 380 *;
+#X connect 0 0 10 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 0;
+#X connect 4 0 20 0;
+#X connect 5 0 3 0;
+#X connect 6 0 3 1;
+#X connect 7 0 2 0;
+#X connect 8 0 2 1;
+#X connect 9 0 12 0;
+#X connect 9 1 13 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X connect 12 0 14 0;
+#X connect 13 0 5 1;
+#X connect 13 1 6 1;
+#X connect 13 2 7 1;
+#X connect 13 3 8 1;
+#X connect 13 4 18 1;
+#X connect 13 5 19 1;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 5 0;
+#X connect 16 1 6 0;
+#X connect 16 2 7 0;
+#X connect 16 3 8 0;
+#X connect 16 4 18 0;
+#X connect 16 5 19 0;
+#X connect 17 0 20 1;
+#X connect 18 0 17 0;
+#X connect 19 0 17 1;
+#X connect 20 0 1 0;
diff --git a/tests/mtx_check/02_function.pd b/tests/mtx_check/02_function.pd
new file mode 100644
index 0000000..bdf84bf
--- /dev/null
+++ b/tests/mtx_check/02_function.pd
@@ -0,0 +1,63 @@
+#N canvas 117 373 642 474 10;
+#X obj 122 68 inlet bang;
+#X obj 122 405 outlet 1==OK;
+#X obj 184 330 *;
+#X obj 122 330 *;
+#X obj 122 356 *;
+#X obj 122 307 ==;
+#X obj 153 307 ==;
+#X obj 184 307 ==;
+#X obj 215 307 ==;
+#X obj 122 156 t l l;
+#X obj 122 98 t b;
+#X msg 122 179 matrix \$1 \$2 \$3 \$4 \$5 \$6;
+#X obj 236 200 unpack 0 0 0 0 0 0;
+#X obj 122 221 mtx_check;
+#X obj 244 330 *;
+#X obj 244 307 ==;
+#X obj 275 307 ==;
+#X obj 122 380 *;
+#X msg 122 132 3 2 1 2 -3 0;
+#X msg 122 243 \$1 \$2 \$3 \$4 \$5 \$6 \$7 \$8;
+#X obj 122 268 unpack 0 0 0 0 0 0 0 0;
+#X obj 304 330 *;
+#X obj 304 307 ==;
+#X obj 335 307 ==;
+#X obj 244 354 *;
+#X connect 0 0 10 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 0;
+#X connect 4 0 17 0;
+#X connect 5 0 3 0;
+#X connect 6 0 3 1;
+#X connect 7 0 2 0;
+#X connect 8 0 2 1;
+#X connect 9 0 11 0;
+#X connect 9 1 12 0;
+#X connect 10 0 18 0;
+#X connect 11 0 13 0;
+#X connect 12 0 5 1;
+#X connect 12 1 6 1;
+#X connect 12 2 7 1;
+#X connect 12 3 8 1;
+#X connect 12 4 15 1;
+#X connect 12 5 16 1;
+#X connect 13 0 19 0;
+#X connect 14 0 24 0;
+#X connect 15 0 14 0;
+#X connect 16 0 14 1;
+#X connect 17 0 1 0;
+#X connect 18 0 9 0;
+#X connect 19 0 20 0;
+#X connect 20 0 5 0;
+#X connect 20 1 6 0;
+#X connect 20 2 7 0;
+#X connect 20 3 8 0;
+#X connect 20 4 15 0;
+#X connect 20 5 16 0;
+#X connect 20 6 22 0;
+#X connect 20 7 23 0;
+#X connect 21 0 24 1;
+#X connect 22 0 21 0;
+#X connect 23 0 21 1;
+#X connect 24 0 17 1;
diff --git a/tests/mtx_check/03_function.pd b/tests/mtx_check/03_function.pd
new file mode 100644
index 0000000..1607120
--- /dev/null
+++ b/tests/mtx_check/03_function.pd
@@ -0,0 +1,63 @@
+#N canvas 117 373 642 474 10;
+#X obj 122 68 inlet bang;
+#X obj 122 405 outlet 1==OK;
+#X obj 184 330 *;
+#X obj 122 330 *;
+#X obj 122 356 *;
+#X obj 122 307 ==;
+#X obj 153 307 ==;
+#X obj 184 307 ==;
+#X obj 215 307 ==;
+#X obj 122 156 t l l;
+#X obj 122 98 t b;
+#X msg 122 179 matrix \$1 \$2 \$3 \$4 \$5 \$6;
+#X obj 236 200 unpack 0 0 0 0 0 0;
+#X obj 122 221 mtx_check;
+#X obj 244 330 *;
+#X obj 244 307 ==;
+#X obj 275 307 ==;
+#X obj 122 380 *;
+#X msg 122 243 \$1 \$2 \$3 \$4 \$5 \$6 \$7 \$8;
+#X obj 122 268 unpack 0 0 0 0 0 0 0 0;
+#X obj 304 330 *;
+#X obj 304 307 ==;
+#X obj 335 307 ==;
+#X obj 244 354 *;
+#X msg 122 132 2 3 1 2 -3 0;
+#X connect 0 0 10 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 0;
+#X connect 4 0 17 0;
+#X connect 5 0 3 0;
+#X connect 6 0 3 1;
+#X connect 7 0 2 0;
+#X connect 8 0 2 1;
+#X connect 9 0 11 0;
+#X connect 9 1 12 0;
+#X connect 10 0 24 0;
+#X connect 11 0 13 0;
+#X connect 12 0 5 1;
+#X connect 12 1 6 1;
+#X connect 12 2 7 1;
+#X connect 12 3 8 1;
+#X connect 12 4 15 1;
+#X connect 12 5 16 1;
+#X connect 13 0 18 0;
+#X connect 14 0 23 0;
+#X connect 15 0 14 0;
+#X connect 16 0 14 1;
+#X connect 17 0 1 0;
+#X connect 18 0 19 0;
+#X connect 19 0 5 0;
+#X connect 19 1 6 0;
+#X connect 19 2 7 0;
+#X connect 19 3 8 0;
+#X connect 19 4 15 0;
+#X connect 19 5 16 0;
+#X connect 19 6 21 0;
+#X connect 19 7 22 0;
+#X connect 20 0 23 1;
+#X connect 21 0 20 0;
+#X connect 22 0 20 1;
+#X connect 23 0 17 1;
+#X connect 24 0 9 0;