[PD-cvs] externals/iem/iemmatrix/abs mtx_tab.pd,1.4,1.5

[IOhannes m zmölnig]

Update of /cvsroot/pure-data/externals/iem/iemmatrix/abs
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1827/abs

Modified Files:
	mtx_tab.pd 
Log Message:
cleaned up code a bit;
(removed dep on zexy's [relay];
still dependant on zexy's [tabdump]


Index: mtx_tab.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/abs/mtx_tab.pd,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** mtx_tab.pd	29 Aug 2006 09:20:38 -0000	1.4
--- mtx_tab.pd	29 Aug 2006 09:44:47 -0000	1.5
***************
*** 1,81 ****
! #N canvas 98 259 645 400 10;
! #X obj 33 14 inlet;
! #X obj 247 6 inlet;
! #X obj 286 354 s \$1;
! #X obj 286 331 list prepend 0;
! #X obj 247 291 t a a;
! #X obj 286 291 mtx_size;
! #X obj 347 291 *;
! #X msg 336 310 resize \$1;
! #X obj 247 272 relay matrix;
! #X obj 33 55 t a a;
! #X obj 33 348 outlet;
! #X obj 33 34 relay matrix;
! #X obj 112 203 mtx;
! #X obj 112 56 t a b;
! #X obj 142 76 tabdump \$1;
! #X obj 142 96 list prepend matrix;
! #X obj 142 116 list trim;
! #X obj 112 176 spigot;
! #X msg 162 176 0;
! #X msg 190 176 1;
! #X obj 247 310 list split 1;
! #X obj 372 291 + 2;
! #X text 356 13 \$1 ... table name;
! #X text 446 125 part of iemmatrix.;
! #X text 434 151 requires zexy [relay];
! #X text 495 187 see also:;
! #X obj 563 186 mtx;
! #X text 209 35 mtx_tab behaves just like a "mtx" object that stores
  its internal matrix in a table. So this matrix can be seen as a local/global
  variable of the workspace.;
! #X text 328 355 send to table;
! #X text 226 79 get from table;
! #X text 138 158 if no output: send to table anyway;
! #X text 489 276 Franz Zotter 2006;
! #X obj 112 223 t b a;
! #X obj 112 137 t b b a b;
! #X obj 111 271 spigot;
! #X msg 152 223 0;
! #X msg 181 223 1;
! #X obj 38 176 route bang;
! #X obj 142 244 t a a;
! #X connect 0 0 11 0;
! #X connect 1 0 8 0;
  #X connect 3 0 2 0;
! #X connect 4 0 20 0;
! #X connect 4 1 5 0;
! #X connect 5 0 6 0;
! #X connect 5 1 6 1;
! #X connect 6 0 21 0;
! #X connect 7 0 2 0;
! #X connect 8 0 4 0;
! #X connect 9 0 10 0;
! #X connect 9 1 4 0;
! #X connect 11 0 9 0;
! #X connect 11 1 13 0;
! #X connect 12 0 32 0;
! #X connect 13 0 33 0;
! #X connect 13 1 14 0;
! #X connect 14 0 15 0;
! #X connect 15 0 16 0;
! #X connect 16 0 12 1;
! #X connect 17 0 12 0;
! #X connect 18 0 17 1;
! #X connect 19 0 17 1;
! #X connect 20 1 3 0;
! #X connect 21 0 7 0;
! #X connect 32 0 18 0;
! #X connect 32 1 38 0;
! #X connect 33 0 17 0;
! #X connect 33 1 35 0;
! #X connect 33 2 37 0;
! #X connect 33 3 19 0;
! #X connect 33 3 36 0;
! #X connect 34 0 10 0;
! #X connect 35 0 34 1;
! #X connect 36 0 34 1;
! #X connect 37 0 12 0;
! #X connect 37 1 12 0;
! #X connect 38 0 34 0;
! #X connect 38 1 8 0;
--- 1,105 ----
! #N canvas 60 0 784 503 10;
! #X obj 33 154 inlet;
! #X obj 108 154 inlet;
! #X obj 33 358 outlet;
! #X text 345 160 part of iemmatrix.;
! #X text 348 215 see also:;
! #X obj 431 213 mtx;
! #X text 105 56 mtx_tab behaves just like a "mtx" object that stores
  its internal matrix in a table. So this matrix can be seen as a local/global
  variable of the workspace.;
! #X text 349 282 Franz Zotter 2006;
! #X text 347 250 requires zexy's [tabdump];
! #X text 105 6 [mtx_tab];
! #N canvas 0 0 657 677 mtx_tab 0;
! #X obj 33 34 inlet;
! #X obj 287 86 inlet;
! #X obj 287 624 s \$1;
! #X obj 287 601 list prepend 0;
! #X obj 287 506 t a a;
! #X obj 412 561 *;
! #X msg 412 600 resize \$1;
! #X obj 33 438 outlet;
! #X obj 156 343 mtx;
! #X obj 156 75 t a b;
! #X obj 191 156 tabdump \$1;
! #X obj 191 176 list prepend matrix;
! #X obj 191 196 list trim;
! #X obj 156 306 spigot;
! #X msg 218 305 0;
! #X msg 218 285 1;
! #X obj 412 581 + 2;
! #X text 329 625 send to table;
! #X text 298 159 get from table;
! #X obj 156 363 t b a;
! #X obj 191 411 spigot;
! #X msg 234 364 0;
! #X msg 263 364 1;
! #X obj 191 384 t a a;
! #N canvas 0 0 450 300 bang 0;
! #X obj 103 28 inlet;
! #X obj 103 59 route bang;
! #X obj 103 119 outlet;
! #X obj 103 92 b;
! #X connect 0 0 1 0;
! #X connect 1 0 3 0;
! #X connect 1 1 2 0;
  #X connect 3 0 2 0;
! #X restore 197 255 pd bang;
! #X obj 156 217 t b b a b b;
! #X text 301 485 <r> <c> ...;
! #X obj 287 467 route matrix;
! #X msg 412 542 \$1 \$2;
! #X obj 33 94 list prepend matrix;
! #X obj 33 114 list trim;
! #X obj 33 75 t a a;
! #X msg 201 135 set \$1;
! #X obj 33 56 route matrix set;
! #X obj 201 115 symbol;
! #X text 170 238 if no output: send to table anyway;
! #X connect 0 0 33 0;
! #X connect 1 0 27 0;
! #X connect 3 0 2 0;
! #X connect 4 0 3 0;
! #X connect 4 1 28 0;
! #X connect 5 0 16 0;
! #X connect 6 0 2 0;
! #X connect 8 0 19 0;
! #X connect 9 0 25 0;
! #X connect 9 1 10 0;
! #X connect 10 0 11 0;
! #X connect 11 0 12 0;
! #X connect 12 0 8 1;
! #X connect 13 0 8 0;
! #X connect 14 0 13 1;
! #X connect 15 0 13 1;
! #X connect 16 0 6 0;
! #X connect 19 0 14 0;
! #X connect 19 1 23 0;
! #X connect 20 0 7 0;
! #X connect 21 0 20 1;
! #X connect 22 0 20 1;
! #X connect 23 0 20 0;
! #X connect 23 1 27 0;
! #X connect 24 0 8 0;
! #X connect 25 0 13 0;
! #X connect 25 1 21 0;
! #X connect 25 2 24 0;
! #X connect 25 3 15 0;
! #X connect 25 4 22 0;
! #X connect 27 0 4 0;
! #X connect 28 0 5 0;
! #X connect 29 0 30 0;
! #X connect 30 0 7 0;
! #X connect 31 0 29 0;
! #X connect 31 1 27 0;
! #X connect 32 0 10 0;
! #X connect 33 0 31 0;
! #X connect 33 1 34 0;
! #X connect 33 2 9 0;
! #X connect 34 0 32 0;
! #X restore 33 327 pd mtx_tab;
! #X text 105 38 arguments: \$1 ... table name;
! #X connect 0 0 10 0;
! #X connect 1 0 10 1;
! #X connect 10 0 2 0;