tests for sources

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

4 files changed, 142 insertions, 0 deletions

diff --git a/tests/mtx_eye/01_function.pd b/tests/mtx_eye/01_function.pd
new file mode 100644
index 0000000..fa1b772
--- /dev/null
+++ b/tests/mtx_eye/01_function.pd
@@ -0,0 +1,29 @@
+#N canvas 385 142 508 466 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X msg 122 214 \$3 \$4 \$5 \$6;
+#X obj 122 161 mtx_eye 2;
+#X obj 122 238 unpack 0 0 0 0;
+#X obj 162 262 == 0;
+#X obj 202 262 == 0;
+#X obj 122 282 *;
+#X obj 122 302 *;
+#X obj 202 282 *;
+#X obj 122 104 t b;
+#X obj 122 262 == 1;
+#X obj 242 262 == 1;
+#X connect 0 0 10 0;
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X connect 4 0 11 0;
+#X connect 4 1 5 0;
+#X connect 4 2 6 0;
+#X connect 4 3 12 0;
+#X connect 5 0 7 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 0;
+#X connect 8 0 1 0;
+#X connect 9 0 8 1;
+#X connect 10 0 3 0;
+#X connect 11 0 7 0;
+#X connect 12 0 9 1;
diff --git a/tests/mtx_eye/02_function.pd b/tests/mtx_eye/02_function.pd
new file mode 100644
index 0000000..6284449
--- /dev/null
+++ b/tests/mtx_eye/02_function.pd
@@ -0,0 +1,41 @@
+#N canvas 385 142 508 466 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X obj 162 262 == 0;
+#X obj 202 262 == 0;
+#X obj 122 282 *;
+#X obj 122 302 *;
+#X obj 202 282 *;
+#X obj 122 104 t b;
+#X obj 122 161 mtx_eye 2 3;
+#X msg 122 214 \$3 \$4 \$5 \$6 \$7 \$8;
+#X obj 122 238 unpack 0 0 0 0 0 0;
+#X obj 322 262 == 0;
+#X obj 282 282 *;
+#X obj 122 324 *;
+#X obj 122 262 == 1;
+#X msg 140 133 bang;
+#X obj 242 262 == 0;
+#X obj 282 262 == 1;
+#X connect 0 0 7 0;
+#X connect 2 0 4 1;
+#X connect 3 0 6 0;
+#X connect 4 0 5 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 1;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 14 0;
+#X connect 10 1 2 0;
+#X connect 10 2 3 0;
+#X connect 10 3 16 0;
+#X connect 10 4 17 0;
+#X connect 10 5 11 0;
+#X connect 11 0 12 1;
+#X connect 12 0 13 1;
+#X connect 13 0 1 0;
+#X connect 14 0 4 0;
+#X connect 15 0 8 0;
+#X connect 16 0 6 1;
+#X connect 17 0 12 0;
diff --git a/tests/mtx_eye/03_function.pd b/tests/mtx_eye/03_function.pd
new file mode 100644
index 0000000..29a2ed1
--- /dev/null
+++ b/tests/mtx_eye/03_function.pd
@@ -0,0 +1,31 @@
+#N canvas 385 142 508 466 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X obj 162 262 == 0;
+#X obj 202 262 == 0;
+#X obj 122 282 *;
+#X obj 122 302 *;
+#X obj 202 282 *;
+#X obj 122 104 t b;
+#X obj 122 238 unpack 0 0 0 0 0 0;
+#X obj 122 161 mtx_eye 7 8;
+#X msg 122 214 \$3 \$4 \$5 \$6;
+#X msg 122 135 2;
+#X obj 122 262 == 1;
+#X obj 242 262 == 1;
+#X connect 0 0 7 0;
+#X connect 2 0 4 1;
+#X connect 3 0 6 0;
+#X connect 4 0 5 0;
+#X connect 5 0 1 0;
+#X connect 6 0 5 1;
+#X connect 7 0 11 0;
+#X connect 8 0 12 0;
+#X connect 8 1 2 0;
+#X connect 8 2 3 0;
+#X connect 8 3 13 0;
+#X connect 9 0 10 0;
+#X connect 10 0 8 0;
+#X connect 11 0 9 0;
+#X connect 12 0 4 0;
+#X connect 13 0 6 1;
diff --git a/tests/mtx_eye/04_function.pd b/tests/mtx_eye/04_function.pd
new file mode 100644
index 0000000..6c815c4
--- /dev/null
+++ b/tests/mtx_eye/04_function.pd
@@ -0,0 +1,41 @@
+#N canvas 385 142 508 466 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X obj 162 262 == 0;
+#X obj 122 282 *;
+#X obj 122 302 *;
+#X obj 202 282 *;
+#X obj 122 104 t b;
+#X msg 122 214 \$3 \$4 \$5 \$6 \$7 \$8;
+#X obj 122 238 unpack 0 0 0 0 0 0;
+#X obj 322 262 == 0;
+#X obj 282 282 *;
+#X obj 122 324 *;
+#X msg 122 135 3 2;
+#X obj 122 161 mtx_eye;
+#X obj 122 262 == 1;
+#X obj 202 262 == 0;
+#X obj 242 262 == 1;
+#X obj 282 262 == 0;
+#X connect 0 0 6 0;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 11 0;
+#X connect 5 0 4 1;
+#X connect 6 0 12 0;
+#X connect 7 0 8 0;
+#X connect 8 0 14 0;
+#X connect 8 1 2 0;
+#X connect 8 2 15 0;
+#X connect 8 3 16 0;
+#X connect 8 4 17 0;
+#X connect 8 5 9 0;
+#X connect 9 0 10 1;
+#X connect 10 0 11 1;
+#X connect 11 0 1 0;
+#X connect 12 0 13 0;
+#X connect 13 0 7 0;
+#X connect 14 0 3 0;
+#X connect 15 0 5 0;
+#X connect 16 0 5 1;
+#X connect 17 0 10 0;