From e1a8039ec9fb3ca4db8b197069425b99ef48a941 Mon Sep 17 00:00:00 2001
From: Franz Zotter <fzotter@users.sourceforge.net>
Date: Thu, 17 Aug 2006 09:21:51 +0000
Subject: added indexing abstractions for row and column indices.

svn path=/trunk/externals/iem/iemmatrix/; revision=5638
---
 abs/mtx_fill_rowcol_grid.pd | 60 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 60 insertions(+)
 create mode 100644 abs/mtx_fill_rowcol_grid.pd

(limited to 'abs/mtx_fill_rowcol_grid.pd')

diff --git a/abs/mtx_fill_rowcol_grid.pd b/abs/mtx_fill_rowcol_grid.pd
new file mode 100644
index 0000000..cdae0f7
--- /dev/null
+++ b/abs/mtx_fill_rowcol_grid.pd
@@ -0,0 +1,60 @@
+#N canvas 200 516 575 378 10;
+#X text 92 2 matrix;
+#X obj 35 335 outlet;
+#X text 381 153 at the given row and col;
+#X text 381 179 grid indices;
+#X obj 35 311 mtx_fill;
+#X obj 35 21 inlet;
+#X text 29 1 matrix;
+#X text 31 -10 fill;
+#X text 89 -10 orig;
+#X text 383 98 fills in elements;
+#X text 384 124 into a matrix;
+#X obj 274 20 inlet;
+#X text 320 20 row_idcs;
+#X obj 274 40 mtx_:;
+#X obj 274 78 mtx_- 1;
+#X obj 258 159 mtx;
+#X obj 258 179 mtx_* 1;
+#X obj 258 199 mtx_repmat;
+#X msg 323 177 1 \$1;
+#X obj 274 59 mtx_transpose;
+#X obj 400 20 inlet;
+#X obj 400 40 mtx_:;
+#X obj 145 182 mtx;
+#X obj 145 203 mtx_repmat;
+#X msg 210 180 \$1 1;
+#X obj 87 20 inlet;
+#X obj 145 283 mtx_+;
+#X obj 400 63 mtx_size;
+#X obj 274 99 mtx_size;
+#X obj 87 63 t a a;
+#X obj 117 89 mtx_size;
+#X obj 168 110 t b b f;
+#X connect 4 0 1 0;
+#X connect 5 0 4 0;
+#X connect 11 0 13 0;
+#X connect 13 0 19 0;
+#X connect 14 0 28 0;
+#X connect 14 0 15 1;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 17 0 26 1;
+#X connect 18 0 17 1;
+#X connect 19 0 14 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 1;
+#X connect 21 0 27 0;
+#X connect 22 0 23 0;
+#X connect 23 0 26 0;
+#X connect 24 0 23 1;
+#X connect 25 0 29 0;
+#X connect 26 0 4 2;
+#X connect 27 0 18 0;
+#X connect 28 0 24 0;
+#X connect 29 0 4 1;
+#X connect 29 1 30 0;
+#X connect 30 1 31 0;
+#X connect 31 0 22 0;
+#X connect 31 1 15 0;
+#X connect 31 2 16 1;
-- 
cgit v1.2.1