From 294843ad8b2efa314b2d6e719b87fecd036c73f4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?=
 <zmoelnig@users.sourceforge.net>
Date: Tue, 18 Oct 2005 09:16:08 +0000
Subject: test for generic binops

svn path=/trunk/externals/iem/iemmatrix/; revision=3728
---
 tests/mtx_bitleft/03_function.pd | 49 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 49 insertions(+)
 create mode 100644 tests/mtx_bitleft/03_function.pd

(limited to 'tests/mtx_bitleft/03_function.pd')

diff --git a/tests/mtx_bitleft/03_function.pd b/tests/mtx_bitleft/03_function.pd
new file mode 100644
index 0000000..cd90b52
--- /dev/null
+++ b/tests/mtx_bitleft/03_function.pd
@@ -0,0 +1,49 @@
+#N canvas 144 215 431 450 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X msg 122 243 \$3 \$4 \$5 \$6;
+#X obj 122 268 unpack 0 0 0 0;
+#X obj 184 330 *;
+#X obj 122 330 *;
+#X obj 122 356 *;
+#X obj 256 200 unpack 0 0 0 0;
+#X obj 122 307 ==;
+#X obj 153 307 ==;
+#X obj 184 307 ==;
+#X obj 215 307 ==;
+#X msg 122 179 matrix 2 2 \$1 \$2 \$3 \$4;
+#X obj 122 156 t l l;
+#X obj 122 98 t b;
+#X msg 122 132 3 2 1 0;
+#X obj 122 221 mtx_bitleft 1;
+#X obj 256 221 << 1;
+#X obj 297 221 << 1;
+#X obj 338 220 << 1;
+#X obj 379 220 << 1;
+#X connect 0 0 14 0;
+#X connect 2 0 3 0;
+#X connect 3 0 8 0;
+#X connect 3 1 9 0;
+#X connect 3 2 10 0;
+#X connect 3 3 11 0;
+#X connect 4 0 6 1;
+#X connect 5 0 6 0;
+#X connect 6 0 1 0;
+#X connect 7 0 17 0;
+#X connect 7 1 18 0;
+#X connect 7 2 19 0;
+#X connect 7 3 20 0;
+#X connect 8 0 5 0;
+#X connect 9 0 5 1;
+#X connect 10 0 4 0;
+#X connect 11 0 4 1;
+#X connect 12 0 16 0;
+#X connect 13 0 12 0;
+#X connect 13 1 7 0;
+#X connect 14 0 15 0;
+#X connect 15 0 13 0;
+#X connect 16 0 2 0;
+#X connect 17 0 8 1;
+#X connect 18 0 9 1;
+#X connect 19 0 10 1;
+#X connect 20 0 11 1;
-- 
cgit v1.2.1