From f18d063d9312c95e25294e0777bc135ee9a3fd8a Mon Sep 17 00:00:00 2001 From: Thomas O Fredericks Date: Sun, 25 Oct 2009 00:39:13 +0000 Subject: Adding mtl svn path=/trunk/abstractions/mtl/; revision=12667 --- theMatrix.pd | 248 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 248 insertions(+) create mode 100644 theMatrix.pd (limited to 'theMatrix.pd') diff --git a/theMatrix.pd b/theMatrix.pd new file mode 100644 index 0000000..5ea4e1f --- /dev/null +++ b/theMatrix.pd @@ -0,0 +1,248 @@ +#N canvas 1030 0 1018 692 10; +#X obj 58 658 outlet; +#X obj 203 660 outlet; +#X obj 371 672 outlet; +#X obj 515 670 outlet; +#X obj 37 15 inlet; +#X obj 289 654 outlet; +#X obj 39 230 t a b; +#N canvas 248 74 909 686 resize 0; +#X obj 39 29 inlet; +#X obj 501 26 r \$0resize; +#X obj 288 628 s \$0resized_matrix; +#X obj 289 358 iemmatrix/mtx_resize; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 3 0 2 0; +#X restore 384 494 pd resize; +#N canvas 0 0 560 406 rows&cols 0; +#X obj 45 35 inlet; +#X obj 300 36 inlet; +#X obj 27 141 expr $f2-$f1; +#X obj 27 163 max 0; +#X msg 178 180 row; +#X msg 344 165 col; +#X obj 45 61 t a b b; +#X obj 300 69 t a b b; +#X obj 33 112 t a a; +#X obj 28 253 +; +#X obj 96 179 unpack f f; +#X obj 28 189 + 1; +#X obj 146 277 cyclone/prepend; +#X obj 29 216 tof/iterate; +#X obj 190 357 s \$0matrix; +#X obj 360 367 s \$0demux; +#X msg 345 329 1; +#X connect 0 0 6 0; +#X connect 1 0 7 0; +#X connect 2 0 3 0; +#X connect 3 0 11 0; +#X connect 4 0 12 1; +#X connect 5 0 12 1; +#X connect 6 0 8 0; +#X connect 6 1 4 0; +#X connect 6 2 16 0; +#X connect 7 0 8 0; +#X connect 7 1 5 0; +#X connect 7 2 16 0; +#X connect 8 0 2 0; +#X connect 8 1 10 0; +#X connect 9 0 12 0; +#X connect 10 0 9 1; +#X connect 11 0 13 0; +#X connect 12 0 14 0; +#X connect 13 0 9 0; +#X connect 16 0 15 0; +#X restore 579 253 pd rows&cols; +#N canvas 0 0 741 461 create 0; +#X obj 188 13 inlet; +#X obj 292 76 route bang; +#X msg 294 97 0; +#X obj 187 58 list split 2; +#X obj 201 278 t a b; +#X obj 164 345 s \$0matrix; +#X obj 258 348 s \$0demux; +#X msg 243 303 3; +#X obj 193 199 iemmatrix/mtx_ones; +#X obj 195 230 iemmatrix/mtx_mul 1; +#X connect 0 0 3 0; +#X connect 1 0 2 0; +#X connect 1 1 9 1; +#X connect 2 0 9 1; +#X connect 3 0 8 0; +#X connect 3 1 1 0; +#X connect 4 0 5 0; +#X connect 4 1 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X restore 379 222 pd create; +#X obj 283 565 t a a; +#X obj 486 244 t b b; +#X msg 84 252 0; +#N canvas 0 34 1018 686 do_resize 0; +#X obj 57 35 inlet; +#X obj 249 236 t b b; +#X msg 279 259 4; +#X obj 110 413 s \$0matrix; +#X obj 297 408 s \$0demux; +#X obj 77 85 t b b; +#X obj 65 189 t b b; +#X msg 115 227 3; +#X connect 0 0 5 0; +#X connect 1 0 3 0; +#X connect 1 1 2 0; +#X connect 2 0 4 0; +#X connect 5 0 6 0; +#X connect 5 1 1 0; +#X connect 6 0 3 0; +#X connect 6 1 7 0; +#X connect 7 0 4 0; +#X restore 205 126 pd do_resize; +#X obj 725 253 t b b; +#N canvas 202 104 546 411 do_copy 0; +#X obj 66 36 inlet; +#X obj 49 304 s \$0matrix; +#X obj 160 238 s \$0demux; +#X msg 157 212 5; +#X obj 64 157 t b b; +#X connect 0 0 4 0; +#X connect 3 0 2 0; +#X connect 4 0 1 0; +#X connect 4 1 3 0; +#X restore 240 97 pd do_copy; +#N canvas 0 0 984 587 do_paste 0; +#X obj 65 131 sel 0; +#X obj 11 318 s \$0print; +#X msg 11 208 Nothing to paste; +#X obj 53 13 inlet; +#X obj 72 60 b; +#X msg 354 232 set \$1data \, bang; +#X obj 360 321 cyclone/prepend matrix; +#X obj 354 352 t a b; +#X obj 427 410 s \$0demux; +#X msg 427 381 3; +#X obj 316 419 s \$0matrix; +#X obj 65 107 value MTXCLIP; +#X obj 352 288 zexy/tabdump \$0data; +#X connect 0 0 2 0; +#X connect 0 1 5 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 4 0 11 0; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 10 0; +#X connect 7 1 9 0; +#X connect 9 0 8 0; +#X connect 11 0 0 0; +#X connect 12 0 6 0; +#X restore 288 166 pd do_paste; +#X obj 764 64 loadbang; +#X obj 807 128 sel 0; +#X msg 804 163 1 1; +#X obj 489 434 iemmatrix/mtx_print; +#X obj 379 604 iemmatrix/mtx_size; +#X obj 765 104 iemlib/dollarg; +#X obj 249 366 iemmatrix/matrix; +#X obj 39 294 s \$0matrix; +#X obj 84 271 s \$0demux; +#X obj 249 340 r \$0matrix; +#X obj 408 371 r \$0demux; +#N canvas 161 60 985 686 copy 0; +#X obj 71 124 t a b; +#X obj 99 148 f \$0; +#X obj 106 446 table \$0data 3; +#X obj 70 220 route matrix; +#X obj 70 255 t a a; +#X obj 134 373 s \$0data; +#X msg 134 324 resize \$1; +#X obj 134 291 zexy/length; +#X obj 42 38 inlet; +#X obj 102 172 value MTXCLIP; +#X obj 34 327 zexy/tabset \$0data; +#X connect 0 0 3 0; +#X connect 0 1 1 0; +#X connect 1 0 9 0; +#X connect 3 0 4 0; +#X connect 4 0 10 0; +#X connect 4 1 7 0; +#X connect 6 0 5 0; +#X connect 7 0 6 0; +#X connect 8 0 0 0; +#X restore 468 494 pd copy; +#N canvas 0 0 450 300 set 0; +#X obj 129 94 iemmatrix/mtx_check; +#X obj 129 116 t a b; +#X obj 145 156 s \$0demux; +#X msg 145 137 3; +#X obj 88 179 s \$0matrix; +#X obj 128 10 inlet; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 3 0; +#X connect 3 0 2 0; +#X connect 5 0 0 0; +#X restore 143 90 pd set; +#X obj 726 304 s \$0matrix; +#X obj 798 303 s \$0demux; +#X obj 448 295 s \$0matrix; +#X obj 520 294 s \$0demux; +#X msg 520 269 2; +#X msg 800 278 6; +#X obj 205 64 route resize copy paste set create dump rows cols print +random; +#X obj 605 47 t a b; +#X obj 621 87 s \$0demux; +#X msg 621 68 3; +#X obj 606 115 s \$0matrix; +#X obj 605 25 iemmatrix/mtx_rand; +#X obj 39 40 zexy/relay element row col matrix; +#X obj 248 397 zexy/demultiplex 0 1 2 3 4 5 6; +#X connect 4 0 42 0; +#X connect 6 0 24 0; +#X connect 6 1 12 0; +#X connect 10 0 5 0; +#X connect 10 1 21 0; +#X connect 11 0 32 0; +#X connect 11 1 34 0; +#X connect 12 0 25 0; +#X connect 14 0 30 0; +#X connect 14 1 35 0; +#X connect 17 0 22 0; +#X connect 18 0 19 0; +#X connect 19 0 9 0; +#X connect 21 0 2 0; +#X connect 21 1 3 0; +#X connect 22 0 9 0; +#X connect 22 1 18 0; +#X connect 23 0 43 0; +#X connect 26 0 23 0; +#X connect 27 0 43 1; +#X connect 34 0 33 0; +#X connect 35 0 31 0; +#X connect 36 0 13 0; +#X connect 36 1 15 0; +#X connect 36 2 16 0; +#X connect 36 4 9 0; +#X connect 36 5 11 0; +#X connect 36 6 8 0; +#X connect 36 7 8 1; +#X connect 36 8 14 0; +#X connect 36 9 41 0; +#X connect 37 0 40 0; +#X connect 37 1 39 0; +#X connect 39 0 38 0; +#X connect 41 0 37 0; +#X connect 42 0 6 0; +#X connect 42 1 6 0; +#X connect 42 2 6 0; +#X connect 42 3 29 0; +#X connect 42 4 36 0; +#X connect 43 0 0 0; +#X connect 43 1 1 0; +#X connect 43 2 10 0; +#X connect 43 3 21 0; +#X connect 43 4 7 0; +#X connect 43 5 28 0; +#X connect 43 6 20 0; -- cgit v1.2.1