mtxstep.pd

#N canvas 0 23 1133 855 12;
#X obj 3719 2488 inlet;
#N canvas 0 23 450 300 \$0-matrix 0;
#X obj 0 2 tgl 15 0 1558-stog-0 1558-rtog-0 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 15 2 tgl 15 0 1558-stog-1 1558-rtog-1 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 30 2 tgl 15 0 1558-stog-2 1558-rtog-2 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 45 2 tgl 15 0 1558-stog-3 1558-rtog-3 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 60 2 tgl 15 0 1558-stog-4 1558-rtog-4 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 75 2 tgl 15 0 1558-stog-5 1558-rtog-5 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 90 2 tgl 15 0 1558-stog-6 1558-rtog-6 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 105 2 tgl 15 0 1558-stog-7 1558-rtog-7 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 120 2 tgl 15 0 1558-stog-8 1558-rtog-8 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 135 2 tgl 15 0 1558-stog-9 1558-rtog-9 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 150 2 tgl 15 0 1558-stog-10 1558-rtog-10 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 165 2 tgl 15 0 1558-stog-11 1558-rtog-11 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 180 2 tgl 15 0 1558-stog-12 1558-rtog-12 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 195 2 tgl 15 0 1558-stog-13 1558-rtog-13 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 210 2 tgl 15 0 1558-stog-14 1558-rtog-14 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 225 2 tgl 15 0 1558-stog-15 1558-rtog-15 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 0 17 tgl 15 0 1558-stog-16 1558-rtog-16 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 15 17 tgl 15 0 1558-stog-17 1558-rtog-17 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 30 17 tgl 15 0 1558-stog-18 1558-rtog-18 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 45 17 tgl 15 0 1558-stog-19 1558-rtog-19 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 60 17 tgl 15 0 1558-stog-20 1558-rtog-20 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 75 17 tgl 15 0 1558-stog-21 1558-rtog-21 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 90 17 tgl 15 0 1558-stog-22 1558-rtog-22 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 105 17 tgl 15 0 1558-stog-23 1558-rtog-23 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 120 17 tgl 15 0 1558-stog-24 1558-rtog-24 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 135 17 tgl 15 0 1558-stog-25 1558-rtog-25 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 150 17 tgl 15 0 1558-stog-26 1558-rtog-26 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 165 17 tgl 15 0 1558-stog-27 1558-rtog-27 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 180 17 tgl 15 0 1558-stog-28 1558-rtog-28 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 195 17 tgl 15 0 1558-stog-29 1558-rtog-29 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 210 17 tgl 15 0 1558-stog-30 1558-rtog-30 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 225 17 tgl 15 0 1558-stog-31 1558-rtog-31 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 0 32 tgl 15 0 1558-stog-32 1558-rtog-32 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 15 32 tgl 15 0 1558-stog-33 1558-rtog-33 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 30 32 tgl 15 0 1558-stog-34 1558-rtog-34 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 45 32 tgl 15 0 1558-stog-35 1558-rtog-35 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 60 32 tgl 15 0 1558-stog-36 1558-rtog-36 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 75 32 tgl 15 0 1558-stog-37 1558-rtog-37 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 90 32 tgl 15 0 1558-stog-38 1558-rtog-38 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 105 32 tgl 15 0 1558-stog-39 1558-rtog-39 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 120 32 tgl 15 0 1558-stog-40 1558-rtog-40 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 135 32 tgl 15 0 1558-stog-41 1558-rtog-41 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 150 32 tgl 15 0 1558-stog-42 1558-rtog-42 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 165 32 tgl 15 0 1558-stog-43 1558-rtog-43 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 180 32 tgl 15 0 1558-stog-44 1558-rtog-44 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 195 32 tgl 15 0 1558-stog-45 1558-rtog-45 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 210 32 tgl 15 0 1558-stog-46 1558-rtog-46 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 225 32 tgl 15 0 1558-stog-47 1558-rtog-47 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 0 47 tgl 15 0 1558-stog-48 1558-rtog-48 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 15 47 tgl 15 0 1558-stog-49 1558-rtog-49 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 30 47 tgl 15 0 1558-stog-50 1558-rtog-50 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 45 47 tgl 15 0 1558-stog-51 1558-rtog-51 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 60 47 tgl 15 0 1558-stog-52 1558-rtog-52 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 75 47 tgl 15 0 1558-stog-53 1558-rtog-53 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 90 47 tgl 15 0 1558-stog-54 1558-rtog-54 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 105 47 tgl 15 0 1558-stog-55 1558-rtog-55 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 120 47 tgl 15 0 1558-stog-56 1558-rtog-56 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 135 47 tgl 15 0 1558-stog-57 1558-rtog-57 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 150 47 tgl 15 0 1558-stog-58 1558-rtog-58 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 165 47 tgl 15 0 1558-stog-59 1558-rtog-59 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 180 47 tgl 15 0 1558-stog-60 1558-rtog-60 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 195 47 tgl 15 0 1558-stog-61 1558-rtog-61 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 210 47 tgl 15 0 1558-stog-62 1558-rtog-62 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 225 47 tgl 15 0 1558-stog-63 1558-rtog-63 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 0 62 tgl 15 0 1558-stog-64 1558-rtog-64 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 15 62 tgl 15 0 1558-stog-65 1558-rtog-65 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 30 62 tgl 15 0 1558-stog-66 1558-rtog-66 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 45 62 tgl 15 0 1558-stog-67 1558-rtog-67 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 60 62 tgl 15 0 1558-stog-68 1558-rtog-68 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 75 62 tgl 15 0 1558-stog-69 1558-rtog-69 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 90 62 tgl 15 0 1558-stog-70 1558-rtog-70 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 105 62 tgl 15 0 1558-stog-71 1558-rtog-71 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 120 62 tgl 15 0 1558-stog-72 1558-rtog-72 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 135 62 tgl 15 0 1558-stog-73 1558-rtog-73 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 150 62 tgl 15 0 1558-stog-74 1558-rtog-74 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 165 62 tgl 15 0 1558-stog-75 1558-rtog-75 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 180 62 tgl 15 0 1558-stog-76 1558-rtog-76 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 195 62 tgl 15 0 1558-stog-77 1558-rtog-77 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 210 62 tgl 15 0 1558-stog-78 1558-rtog-78 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 225 62 tgl 15 0 1558-stog-79 1558-rtog-79 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 0 77 tgl 15 0 1558-stog-80 1558-rtog-80 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 15 77 tgl 15 0 1558-stog-81 1558-rtog-81 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 30 77 tgl 15 0 1558-stog-82 1558-rtog-82 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 45 77 tgl 15 0 1558-stog-83 1558-rtog-83 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 60 77 tgl 15 0 1558-stog-84 1558-rtog-84 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 75 77 tgl 15 0 1558-stog-85 1558-rtog-85 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 90 77 tgl 15 0 1558-stog-86 1558-rtog-86 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 105 77 tgl 15 0 1558-stog-87 1558-rtog-87 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 120 77 tgl 15 0 1558-stog-88 1558-rtog-88 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 135 77 tgl 15 0 1558-stog-89 1558-rtog-89 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 150 77 tgl 15 0 1558-stog-90 1558-rtog-90 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 165 77 tgl 15 0 1558-stog-91 1558-rtog-91 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 180 77 tgl 15 0 1558-stog-92 1558-rtog-92 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 195 77 tgl 15 0 1558-stog-93 1558-rtog-93 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 210 77 tgl 15 0 1558-stog-94 1558-rtog-94 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 225 77 tgl 15 0 1558-stog-95 1558-rtog-95 empty 17 7 0 10 -91543
-91543 -91543 0 1;
#X obj 0 92 tgl 15 0 1558-stog-96 1558-rtog-96 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 15 92 tgl 15 0 1558-stog-97 1558-rtog-97 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 30 92 tgl 15 0 1558-stog-98 1558-rtog-98 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 45 92 tgl 15 0 1558-stog-99 1558-rtog-99 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 60 92 tgl 15 0 1558-stog-100 1558-rtog-100 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 75 92 tgl 15 0 1558-stog-101 1558-rtog-101 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 90 92 tgl 15 0 1558-stog-102 1558-rtog-102 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 105 92 tgl 15 0 1558-stog-103 1558-rtog-103 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 120 92 tgl 15 0 1558-stog-104 1558-rtog-104 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 135 92 tgl 15 0 1558-stog-105 1558-rtog-105 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 150 92 tgl 15 0 1558-stog-106 1558-rtog-106 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 165 92 tgl 15 0 1558-stog-107 1558-rtog-107 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 180 92 tgl 15 0 1558-stog-108 1558-rtog-108 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 195 92 tgl 15 0 1558-stog-109 1558-rtog-109 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 210 92 tgl 15 0 1558-stog-110 1558-rtog-110 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 225 92 tgl 15 0 1558-stog-111 1558-rtog-111 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 0 107 tgl 15 0 1558-stog-112 1558-rtog-112 empty 17 7 0 10 -91543
-91543 -91543 1 1;
#X obj 15 107 tgl 15 0 1558-stog-113 1558-rtog-113 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 30 107 tgl 15 0 1558-stog-114 1558-rtog-114 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 45 107 tgl 15 0 1558-stog-115 1558-rtog-115 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 60 107 tgl 15 0 1558-stog-116 1558-rtog-116 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 75 107 tgl 15 0 1558-stog-117 1558-rtog-117 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 90 107 tgl 15 0 1558-stog-118 1558-rtog-118 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 105 107 tgl 15 0 1558-stog-119 1558-rtog-119 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 120 107 tgl 15 0 1558-stog-120 1558-rtog-120 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 135 107 tgl 15 0 1558-stog-121 1558-rtog-121 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 150 107 tgl 15 0 1558-stog-122 1558-rtog-122 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 165 107 tgl 15 0 1558-stog-123 1558-rtog-123 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 180 107 tgl 15 0 1558-stog-124 1558-rtog-124 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 195 107 tgl 15 0 1558-stog-125 1558-rtog-125 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X obj 210 107 tgl 15 0 1558-stog-126 1558-rtog-126 empty 17 7 0 10
-91543 -91543 -91543 1 1;
#X obj 225 107 tgl 15 0 1558-stog-127 1558-rtog-127 empty 17 7 0 10
-91543 -91543 -91543 0 1;
#X coords 0 -1 1 1 240 124 2 0 0;
#X restore 0 0 pd \$0-matrix;
#N canvas 0 53 417 99 \$0-toggs 0;
#X obj 10 10 clone mtxgui_auxabs 128 1558;
#X restore 3719 2701 pd \$0-toggs;
#X obj 3719 2680 namecanvas \$0-mtxgui;
#N canvas 406 113 894 560 arg_management 0;
#X obj 5 49 pdcontrol;
#X msg 5 26 args;
#X obj 5 4 loadbang;
#X msg 5 366 mtxgui created with default values: 3 4 13;
#X msg 37 322 3 4 13;
#X obj 5 300 t b b;
#X obj 37 344 s \$0-mtxgui_args;
#X obj 5 388 print \$0-mtxgui;
#X obj 88 116 list length;
#X obj 56 94 t l l;
#X obj 5 71 route bang list;
#X obj 182 140 sel 1 2 3;
#X obj 182 276 print \$0-mtxgui;
#X obj 182 173 t b b;
#X msg 214 195 3 4 13;
#X obj 214 217 s \$0-mtxgui_args;
#X msg 182 240 Please inform mtxgui args: rows cols cellsize [optional].
A mtxgui was created with the default values: 3 4 13;
#X obj 56 159 spigot;
#X obj 56 203 pack 0 0 13;
#X obj 56 181 unpack 0 0 0;
#X msg 106 159 1;
#X obj 56 226 s \$0-mtxgui_args;
#X connect 0 0 10 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 7 0;
#X connect 4 0 6 0;
#X connect 5 0 3 0;
#X connect 5 1 4 0;
#X connect 8 0 11 0;
#X connect 9 0 17 0;
#X connect 9 1 8 0;
#X connect 10 0 5 0;
#X connect 10 1 9 0;
#X connect 11 0 13 0;
#X connect 11 1 20 0;
#X connect 11 2 20 0;
#X connect 11 3 13 0;
#X connect 13 0 16 0;
#X connect 13 1 14 0;
#X connect 14 0 15 0;
#X connect 16 0 12 0;
#X connect 17 0 19 0;
#X connect 18 0 21 0;
#X connect 19 0 18 0;
#X connect 19 1 18 1;
#X connect 19 2 18 2;
#X connect 20 0 17 1;
#X restore 3719 2552 pd arg_management;
#N canvas 661 203 450 300 \$0-cloneplace 0;
#X obj 10 10 clone -s 1 mtxstepseq_auxabs 8 1558 row;
#X obj 10 40 clone -s 1 mtxstepseq_auxabs 16 1558 col;
#X restore 3719 2722 pd \$0-cloneplace;
#N canvas 0 23 1440 855 tempocalc 0;
#X obj 46 -27 r \$0-ms;
#X obj 617 507 r \$0-cps;
#X obj 271 845 v \$0-mtx-rows;
#X obj 271 949 pack 0 0;
#X obj 271 870 until;
#X obj 271 794 f;
#X obj 299 924 + 1;
#X msg 289 901 1;
#X obj 408 870 until;
#X obj 408 924 f;
#X obj 436 924 + 1;
#X msg 426 901 1;
#X obj 408 845 v \$0-mtx-cols;
#X obj 408 949 pack 0 0;
#X obj 46 335 r \$0-sec;
#X obj 89 597 unpack 0 0;
#X obj 156 620 / 1000;
#X obj 89 620 pack 0 0;
#X obj 132 431 unpack 0 0;
#X obj 199 454 / 1000;
#X obj 132 454 pack 0 0;
#X obj 556 67 unpack 0 0;
#X obj 556 90 pack 0 0;
#X obj 470 -27 r \$0-bpm;
#X obj 633 67 t b f;
#X msg 676 67 60000;
#X obj 675 90 /;
#X obj 470 322 t b f;
#X msg 470 344 60000;
#X obj 469 367 /;
#X obj 703 615 unpack 0 0;
#X obj 703 638 pack 0 0;
#X obj 780 615 t b f;
#X obj 822 638 /;
#X obj 617 776 t b f;
#X obj 616 821 /;
#X msg 823 615 1000;
#X msg 617 798 1000;
#X obj 271 971 s \$0-rowmetros_set;
#X obj 408 971 s \$0-colmetros_set;
#X obj 46 697 * 1000;
#X obj 556 112 s \$0-rowmetros_set;
#X obj 132 476 s \$0-rowmetros_set;
#X obj 132 72 s \$0-rowmetros_set;
#X obj 703 660 s \$0-rowmetros_set;
#X obj 660 727 s \$0-colmetros_set;
#X obj 513 269 s \$0-colmetros_set;
#X obj 89 642 s \$0-colmetros_set;
#X obj 89 184 s \$0-colmetros_set;
#X obj 470 -5 route float col row;
#X obj 46 357 route float col row;
#X obj 46 -1 route float col row;
#X obj 617 532 route float col row;
#X obj 243 252 s \$0-rowbeatgroup_set;
#X msg 78 210 1;
#X obj 176 207 unpack 0 0;
#X floatatom 260 207 5 0 0 0 - - -;
#X floatatom 183 236 5 0 0 0 - - -;
#X obj 46 184 t f b;
#X obj 271 812 t b b f b;
#X obj 176 669 unpack 0 0;
#X obj 243 694 s \$0-rowbeatgroup_set;
#X msg 78 669 1;
#X obj 46 642 t f b;
#X obj 46 270 s \$0-mtxmetrosvals;
#X obj 271 787 r \$0-mtxmetrosvals;
#X obj 46 720 s \$0-mtxmetrosvals;
#X obj 600 293 unpack 0 0;
#X obj 667 317 s \$0-rowbeatgroup_set;
#X msg 502 293 1;
#X obj 470 270 t f b;
#X obj 469 389 s \$0-mtxmetrosvals;
#X obj 747 750 unpack 0 0;
#X obj 814 774 s \$0-rowbeatgroup_set;
#X msg 649 750 1;
#X obj 617 727 t f b;
#X obj 616 844 s \$0-mtxmetrosvals;
#X floatatom 529 366 5 0 0 0 - - -;
#X obj 628 345 s \$0-colbeatgroup_set;
#X obj 255 229 s \$0-colbeatgroup_set;
#X obj 253 668 s \$0-colbeatgroup_set;
#X obj 826 750 s \$0-colbeatgroup_set;
#X obj 513 224 unpack 0 0;
#X obj 513 247 pack 0 0;
#X obj 590 224 t b f;
#X msg 633 224 60000;
#X obj 632 247 /;
#X obj 660 682 unpack 0 0;
#X obj 660 705 pack 0 0;
#X obj 737 682 t b f;
#X obj 779 705 /;
#X msg 780 682 1000;
#X obj 680 40 s \$0-rowbeatgroup_set;
#X msg 636 18 \$3;
#X obj 556 19 t l l l;
#X obj 629 40 spigot;
#X msg 579 42 \$1 \$3;
#X obj 669 18 != 0;
#X obj 827 582 s \$0-rowbeatgroup_set;
#X msg 783 560 \$3;
#X obj 703 561 t l l l;
#X obj 776 582 spigot;
#X msg 726 584 \$1 \$3;
#X obj 816 560 != 0;
#X obj 257 401 s \$0-rowbeatgroup_set;
#X msg 213 379 \$3;
#X obj 133 380 t l l l;
#X obj 206 401 spigot;
#X msg 156 403 \$1 \$3;
#X obj 246 379 != 0;
#X obj 256 43 s \$0-rowbeatgroup_set;
#X msg 212 21 \$3;
#X obj 132 22 t l l l;
#X obj 205 43 spigot;
#X msg 155 45 \$1 \$3;
#X obj 245 21 != 0;
#X msg 171 113 \$3;
#X obj 91 114 t l l l;
#X obj 164 135 spigot;
#X msg 114 137 \$1 \$3;
#X obj 204 113 != 0;
#X obj 215 135 s \$0-colbeatgroup_set;
#X msg 593 170 \$3;
#X obj 513 171 t l l l;
#X obj 586 192 spigot;
#X msg 536 194 \$1 \$3;
#X obj 626 170 != 0;
#X obj 637 192 s \$0-colbeatgroup_set;
#X msg 169 528 \$3;
#X obj 89 529 t l l l;
#X obj 162 550 spigot;
#X msg 112 552 \$1 \$3;
#X obj 202 528 != 0;
#X obj 213 550 s \$0-colbeatgroup_set;
#X connect 0 0 51 0;
#X connect 1 0 52 0;
#X connect 2 0 4 0;
#X connect 3 0 38 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 3 0;
#X connect 6 0 5 1;
#X connect 7 0 5 1;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 0 13 0;
#X connect 10 0 9 1;
#X connect 11 0 9 1;
#X connect 12 0 8 0;
#X connect 13 0 39 0;
#X connect 14 0 50 0;
#X connect 15 0 17 0;
#X connect 15 1 16 0;
#X connect 16 0 17 1;
#X connect 17 0 47 0;
#X connect 18 0 20 0;
#X connect 18 1 19 0;
#X connect 19 0 20 1;
#X connect 20 0 42 0;
#X connect 21 0 22 0;
#X connect 21 1 24 0;
#X connect 22 0 41 0;
#X connect 23 0 49 0;
#X connect 24 0 25 0;
#X connect 24 1 26 1;
#X connect 25 0 26 0;
#X connect 26 0 22 1;
#X connect 27 0 28 0;
#X connect 27 1 29 1;
#X connect 28 0 29 0;
#X connect 29 0 71 0;
#X connect 29 0 77 0;
#X connect 30 0 31 0;
#X connect 30 1 32 0;
#X connect 31 0 44 0;
#X connect 32 0 36 0;
#X connect 32 1 33 1;
#X connect 33 0 31 1;
#X connect 34 0 37 0;
#X connect 34 1 35 1;
#X connect 35 0 76 0;
#X connect 36 0 33 0;
#X connect 37 0 35 0;
#X connect 40 0 66 0;
#X connect 49 0 70 0;
#X connect 49 1 123 0;
#X connect 49 2 94 0;
#X connect 49 3 67 0;
#X connect 50 0 63 0;
#X connect 50 1 129 0;
#X connect 50 2 106 0;
#X connect 50 3 60 0;
#X connect 51 0 58 0;
#X connect 51 1 117 0;
#X connect 51 2 112 0;
#X connect 51 3 55 0;
#X connect 52 0 75 0;
#X connect 52 1 87 0;
#X connect 52 2 100 0;
#X connect 52 3 72 0;
#X connect 54 0 53 0;
#X connect 54 0 79 0;
#X connect 55 0 57 0;
#X connect 55 0 64 0;
#X connect 55 1 53 0;
#X connect 55 1 56 0;
#X connect 55 1 79 0;
#X connect 58 0 64 0;
#X connect 58 1 54 0;
#X connect 59 0 2 0;
#X connect 59 1 12 0;
#X connect 59 2 13 1;
#X connect 59 2 3 1;
#X connect 59 3 11 0;
#X connect 59 3 7 0;
#X connect 60 0 40 0;
#X connect 60 1 61 0;
#X connect 60 1 80 0;
#X connect 62 0 61 0;
#X connect 62 0 80 0;
#X connect 63 0 40 0;
#X connect 63 1 62 0;
#X connect 65 0 59 0;
#X connect 67 0 27 0;
#X connect 67 1 68 0;
#X connect 67 1 78 0;
#X connect 69 0 68 0;
#X connect 69 0 78 0;
#X connect 70 0 27 0;
#X connect 70 1 69 0;
#X connect 72 0 34 0;
#X connect 72 1 73 0;
#X connect 72 1 81 0;
#X connect 74 0 73 0;
#X connect 74 0 81 0;
#X connect 75 0 34 0;
#X connect 75 1 74 0;
#X connect 82 0 83 0;
#X connect 82 1 84 0;
#X connect 83 0 46 0;
#X connect 84 0 85 0;
#X connect 84 1 86 1;
#X connect 85 0 86 0;
#X connect 86 0 83 1;
#X connect 87 0 88 0;
#X connect 87 1 89 0;
#X connect 88 0 45 0;
#X connect 89 0 91 0;
#X connect 89 1 90 1;
#X connect 90 0 88 1;
#X connect 91 0 90 0;
#X connect 93 0 97 0;
#X connect 94 0 21 0;
#X connect 94 1 96 0;
#X connect 94 2 93 0;
#X connect 95 0 92 0;
#X connect 96 0 95 0;
#X connect 97 0 95 1;
#X connect 99 0 103 0;
#X connect 100 0 30 0;
#X connect 100 1 102 0;
#X connect 100 2 99 0;
#X connect 101 0 98 0;
#X connect 102 0 101 0;
#X connect 103 0 101 1;
#X connect 105 0 109 0;
#X connect 106 0 18 0;
#X connect 106 1 108 0;
#X connect 106 2 105 0;
#X connect 107 0 104 0;
#X connect 108 0 107 0;
#X connect 109 0 107 1;
#X connect 111 0 115 0;
#X connect 112 0 43 0;
#X connect 112 1 114 0;
#X connect 112 2 111 0;
#X connect 113 0 110 0;
#X connect 114 0 113 0;
#X connect 115 0 113 1;
#X connect 116 0 120 0;
#X connect 117 0 48 0;
#X connect 117 1 119 0;
#X connect 117 2 116 0;
#X connect 118 0 121 0;
#X connect 119 0 118 0;
#X connect 120 0 118 1;
#X connect 122 0 126 0;
#X connect 123 0 82 0;
#X connect 123 1 125 0;
#X connect 123 2 122 0;
#X connect 124 0 127 0;
#X connect 125 0 124 0;
#X connect 126 0 124 1;
#X connect 128 0 132 0;
#X connect 129 0 15 0;
#X connect 129 1 131 0;
#X connect 129 2 128 0;
#X connect 130 0 133 0;
#X connect 131 0 130 0;
#X connect 132 0 130 1;
#X restore 3719 2811 pd tempocalc;
#N canvas 0 23 1440 855 switches 0;
#X obj 20 18 r \$0-sw;
#X obj 185 47 r \$0-mode;
#X obj 185 101 sel col row colrow;
#X obj 185 78 symbol;
#X obj 21 348 spigot;
#X obj 71 348 spigot;
#X msg 60 296 1;
#X msg 60 318 0;
#X msg 110 296 1;
#X msg 110 318 0;
#X obj 21 383 s \$0-colmetros_sw;
#X obj 71 415 s \$0-rowmetros_sw;
#X obj 124 345 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 43 324 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 20 77 route col row float;
#X connect 0 0 14 0;
#X connect 1 0 3 0;
#X connect 2 0 6 0;
#X connect 2 0 9 0;
#X connect 2 1 8 0;
#X connect 2 1 7 0;
#X connect 2 2 6 0;
#X connect 2 2 8 0;
#X connect 3 0 2 0;
#X connect 4 0 10 0;
#X connect 5 0 11 0;
#X connect 6 0 4 1;
#X connect 6 0 13 0;
#X connect 7 0 4 1;
#X connect 7 0 13 0;
#X connect 8 0 5 1;
#X connect 8 0 12 0;
#X connect 9 0 5 1;
#X connect 9 0 12 0;
#X connect 14 0 4 0;
#X connect 14 1 5 0;
#X connect 14 2 4 0;
#X connect 14 2 5 0;
#X restore 3719 2833 pd switches;
#X obj 3718 2941 outlet;
#X obj 3719 2530 s \$0-abs_inlet;
#X obj 3719 2765 table \$0-acellsrow \$1;
#X obj 3719 2787 table \$0-acellscol \$2;
#N canvas 661 203 450 300 \$0-cvals 0;
#X obj 10 10 array define -yrange 0 255 1558-cval-0 19;
#X obj 10 36 array define -yrange 0 255 1558-cval-1 19;
#X obj 10 62 array define -yrange 0 255 1558-cval-2 19;
#X obj 10 88 array define -yrange 0 255 1558-cval-3 19;
#X obj 10 114 array define -yrange 0 255 1558-cval-4 19;
#X obj 10 140 array define -yrange 0 255 1558-cval-5 19;
#X obj 10 166 array define -yrange 0 255 1558-cval-6 19;
#X obj 10 192 array define -yrange 0 255 1558-cval-7 19;
#X obj 10 218 array define -yrange 0 255 1558-cval-8 19;
#X obj 10 244 array define -yrange 0 255 1558-cval-9 19;
#X obj 10 270 array define -yrange 0 255 1558-cval-10 19;
#X obj 10 296 array define -yrange 0 255 1558-cval-11 19;
#X obj 10 322 array define -yrange 0 255 1558-cval-12 19;
#X obj 10 348 array define -yrange 0 255 1558-cval-13 19;
#X obj 10 374 array define -yrange 0 255 1558-cval-14 19;
#X obj 10 400 array define -yrange 0 255 1558-cval-15 19;
#X obj 10 426 array define -yrange 0 255 1558-cval-16 19;
#X obj 10 452 array define -yrange 0 255 1558-cval-17 19;
#X obj 10 478 array define -yrange 0 255 1558-cval-18 19;
#X obj 10 504 array define -yrange 0 255 1558-cval-19 19;
#X obj 10 530 array define -yrange 0 255 1558-cval-20 19;
#X obj 10 556 array define -yrange 0 255 1558-cval-21 19;
#X obj 10 582 array define -yrange 0 255 1558-cval-22 19;
#X obj 10 608 array define -yrange 0 255 1558-cval-23 19;
#X obj 10 634 array define -yrange 0 255 1558-cval-24 19;
#X obj 10 660 array define -yrange 0 255 1558-cval-25 19;
#X obj 10 686 array define -yrange 0 255 1558-cval-26 19;
#X obj 10 712 array define -yrange 0 255 1558-cval-27 19;
#X obj 10 738 array define -yrange 0 255 1558-cval-28 19;
#X obj 10 764 array define -yrange 0 255 1558-cval-29 19;
#X obj 10 790 array define -yrange 0 255 1558-cval-30 19;
#X obj 10 816 array define -yrange 0 255 1558-cval-31 19;
#X obj 10 842 array define -yrange 0 255 1558-cval-32 19;
#X obj 10 868 array define -yrange 0 255 1558-cval-33 19;
#X obj 10 894 array define -yrange 0 255 1558-cval-34 19;
#X obj 10 920 array define -yrange 0 255 1558-cval-35 19;
#X obj 10 946 array define -yrange 0 255 1558-cval-36 19;
#X obj 10 972 array define -yrange 0 255 1558-cval-37 19;
#X obj 10 998 array define -yrange 0 255 1558-cval-38 19;
#X obj 10 1024 array define -yrange 0 255 1558-cval-39 19;
#X obj 10 1050 array define -yrange 0 255 1558-cval-40 19;
#X obj 10 1076 array define -yrange 0 255 1558-cval-41 19;
#X obj 10 1102 array define -yrange 0 255 1558-cval-42 19;
#X obj 10 1128 array define -yrange 0 255 1558-cval-43 19;
#X obj 10 1154 array define -yrange 0 255 1558-cval-44 19;
#X obj 10 1180 array define -yrange 0 255 1558-cval-45 19;
#X obj 10 1206 array define -yrange 0 255 1558-cval-46 19;
#X obj 10 1232 array define -yrange 0 255 1558-cval-47 19;
#X obj 10 1258 array define -yrange 0 255 1558-cval-48 19;
#X obj 10 1284 array define -yrange 0 255 1558-cval-49 19;
#X obj 10 1310 array define -yrange 0 255 1558-cval-50 19;
#X obj 10 1336 array define -yrange 0 255 1558-cval-51 19;
#X obj 10 1362 array define -yrange 0 255 1558-cval-52 19;
#X obj 10 1388 array define -yrange 0 255 1558-cval-53 19;
#X obj 10 1414 array define -yrange 0 255 1558-cval-54 19;
#X obj 10 1440 array define -yrange 0 255 1558-cval-55 19;
#X obj 10 1466 array define -yrange 0 255 1558-cval-56 19;
#X obj 10 1492 array define -yrange 0 255 1558-cval-57 19;
#X obj 10 1518 array define -yrange 0 255 1558-cval-58 19;
#X obj 10 1544 array define -yrange 0 255 1558-cval-59 19;
#X obj 10 1570 array define -yrange 0 255 1558-cval-60 19;
#X obj 10 1596 array define -yrange 0 255 1558-cval-61 19;
#X obj 10 1622 array define -yrange 0 255 1558-cval-62 19;
#X obj 10 1648 array define -yrange 0 255 1558-cval-63 19;
#X obj 10 1674 array define -yrange 0 255 1558-cval-64 19;
#X obj 10 1700 array define -yrange 0 255 1558-cval-65 19;
#X obj 10 1726 array define -yrange 0 255 1558-cval-66 19;
#X obj 10 1752 array define -yrange 0 255 1558-cval-67 19;
#X obj 10 1778 array define -yrange 0 255 1558-cval-68 19;
#X obj 10 1804 array define -yrange 0 255 1558-cval-69 19;
#X obj 10 1830 array define -yrange 0 255 1558-cval-70 19;
#X obj 10 1856 array define -yrange 0 255 1558-cval-71 19;
#X obj 10 1882 array define -yrange 0 255 1558-cval-72 19;
#X obj 10 1908 array define -yrange 0 255 1558-cval-73 19;
#X obj 10 1934 array define -yrange 0 255 1558-cval-74 19;
#X obj 10 1960 array define -yrange 0 255 1558-cval-75 19;
#X obj 10 1986 array define -yrange 0 255 1558-cval-76 19;
#X obj 10 2012 array define -yrange 0 255 1558-cval-77 19;
#X obj 10 2038 array define -yrange 0 255 1558-cval-78 19;
#X obj 10 2064 array define -yrange 0 255 1558-cval-79 19;
#X obj 10 2090 array define -yrange 0 255 1558-cval-80 19;
#X obj 10 2116 array define -yrange 0 255 1558-cval-81 19;
#X obj 10 2142 array define -yrange 0 255 1558-cval-82 19;
#X obj 10 2168 array define -yrange 0 255 1558-cval-83 19;
#X obj 10 2194 array define -yrange 0 255 1558-cval-84 19;
#X obj 10 2220 array define -yrange 0 255 1558-cval-85 19;
#X obj 10 2246 array define -yrange 0 255 1558-cval-86 19;
#X obj 10 2272 array define -yrange 0 255 1558-cval-87 19;
#X obj 10 2298 array define -yrange 0 255 1558-cval-88 19;
#X obj 10 2324 array define -yrange 0 255 1558-cval-89 19;
#X obj 10 2350 array define -yrange 0 255 1558-cval-90 19;
#X obj 10 2376 array define -yrange 0 255 1558-cval-91 19;
#X obj 10 2402 array define -yrange 0 255 1558-cval-92 19;
#X obj 10 2428 array define -yrange 0 255 1558-cval-93 19;
#X obj 10 2454 array define -yrange 0 255 1558-cval-94 19;
#X obj 10 2480 array define -yrange 0 255 1558-cval-95 19;
#X obj 10 2506 array define -yrange 0 255 1558-cval-96 19;
#X obj 10 2532 array define -yrange 0 255 1558-cval-97 19;
#X obj 10 2558 array define -yrange 0 255 1558-cval-98 19;
#X obj 10 2584 array define -yrange 0 255 1558-cval-99 19;
#X obj 10 2610 array define -yrange 0 255 1558-cval-100 19;
#X obj 10 2636 array define -yrange 0 255 1558-cval-101 19;
#X obj 10 2662 array define -yrange 0 255 1558-cval-102 19;
#X obj 10 2688 array define -yrange 0 255 1558-cval-103 19;
#X obj 10 2714 array define -yrange 0 255 1558-cval-104 19;
#X obj 10 2740 array define -yrange 0 255 1558-cval-105 19;
#X obj 10 2766 array define -yrange 0 255 1558-cval-106 19;
#X obj 10 2792 array define -yrange 0 255 1558-cval-107 19;
#X obj 10 2818 array define -yrange 0 255 1558-cval-108 19;
#X obj 10 2844 array define -yrange 0 255 1558-cval-109 19;
#X obj 10 2870 array define -yrange 0 255 1558-cval-110 19;
#X obj 10 2896 array define -yrange 0 255 1558-cval-111 19;
#X obj 10 2922 array define -yrange 0 255 1558-cval-112 19;
#X obj 10 2948 array define -yrange 0 255 1558-cval-113 19;
#X obj 10 2974 array define -yrange 0 255 1558-cval-114 19;
#X obj 10 3000 array define -yrange 0 255 1558-cval-115 19;
#X obj 10 3026 array define -yrange 0 255 1558-cval-116 19;
#X obj 10 3052 array define -yrange 0 255 1558-cval-117 19;
#X obj 10 3078 array define -yrange 0 255 1558-cval-118 19;
#X obj 10 3104 array define -yrange 0 255 1558-cval-119 19;
#X obj 10 3130 array define -yrange 0 255 1558-cval-120 19;
#X obj 10 3156 array define -yrange 0 255 1558-cval-121 19;
#X obj 10 3182 array define -yrange 0 255 1558-cval-122 19;
#X obj 10 3208 array define -yrange 0 255 1558-cval-123 19;
#X obj 10 3234 array define -yrange 0 255 1558-cval-124 19;
#X obj 10 3260 array define -yrange 0 255 1558-cval-125 19;
#X obj 10 3286 array define -yrange 0 255 1558-cval-126 19;
#X obj 10 3312 array define -yrange 0 255 1558-cval-127 19;
#X restore 3719 2743 pd \$0-cvals;
#N canvas 112 88 330 437 initmtxstep 0;
#X obj 27 58 pdcontrol;
#X msg 27 34 args 0 1 2;
#X obj 73 104 unpack 0 0 s;
#X obj 114 197 v \$0-mtx-cols;
#X obj 73 220 v \$0-mtx-rows;
#X obj 154 175 s \$0-abs_inlet;
#X msg 154 153 mode \$1;
#N canvas 0 25 1440 853 dynpatching 0;
#X obj 415 -15 f \$0;
#X obj 395 17 v \$0-mtx-cols;
#X obj 375 46 v \$0-mtx-rows;
#X obj 355 -65 inlet;
#X obj 355 -38 t b b b b;
#X obj 189 258 s \$0-cloneloadbang;
#X obj 378 343 v \$0-mtx-rows;
#X obj 355 320 t b b b;
#X obj 377 390 until;
#X obj 377 439 f;
#X obj 406 439 + 1;
#X msg 395 416 1;
#X obj 377 490 v \$0-mtx-cols;
#X obj 377 517 until;
#X obj 377 566 f;
#X obj 406 566 + 1;
#X msg 395 543 1;
#X obj 556 535 /;
#X msg 556 499 255;
#X obj 538 563 *;
#X obj 437 367 t f b f b;
#X obj 375 68 t f f;
#X obj 417 68 *;
#X msg 375 230 \; pd-\$1-cloneplace obj 10 10 clone -s 1 mtxstepseq_auxabs
\$2 \$1 row \; pd-\$1-cloneplace obj 10 40 clone -s 1 mtxstepseq_auxabs
\$3 \$1 col \;, f 68;
#X msg 375 207 \$3 \$1 \$2;
#X obj 416 113 until;
#X obj 517 92 t f f;
#X obj 594 92 + 10;
#X obj 417 90 t f b;
#X obj 458 113 f;
#X obj 487 113 + 1;
#X msg 476 92 0;
#X obj 517 114 pack 0 0 \$0;
#X obj 375 184 pack 0 0 \$0;
#X msg 629 92 \$3 \$1 \$2;
#X msg 451 -43 \; pd-\$1-cloneplace clear \; pd-\$1-cvals clear \;
;
#X obj 559 92 * 26;
#X text 1110 415 cval;
#X text 1237 431 0 1 2;
#X text 1238 468 3 4 5;
#X text 1237 415 h s v;
#X text 1238 453 h s v;
#X text 1238 493 h s v;
#X text 1238 508 6 7 8;
#X text 1150 415 ioff;
#X text 1151 452 ion;
#X text 1151 492 aoff;
#X text 1238 533 h s v;
#X text 1151 532 aon;
#X text 1238 573 h s v;
#X text 1151 572 hoff;
#X text 1238 613 h s v;
#X text 1151 612 hon;
#X text 1238 548 9 10 11;
#X text 1238 588 12 13 14;
#X text 1236 627 15 16 17;
#X floatatom 380 669 5 0 0 0 - - -;
#X text 845 792 0 1 2 3 4 5 6 7 8;
#X text 845 809 9 10 11 12 13 14 15 16 17;
#X text 846 825 18 19 20 21 22 23 24 25 26;
#X text 420 672 idx;
#N canvas 0 23 450 300 rowcol2idx 0;
#X obj 91 26 inlet;
#X obj 91 70 - 1;
#X obj 133 92 v \$0-mtx-cols;
#X obj 91 136 +;
#X obj 119 136 - 1;
#X obj 91 92 t f b;
#X obj 91 114 *;
#X obj 91 158 outlet;
#X obj 91 48 unpack 0 0;
#X connect 0 0 8 0;
#X connect 1 0 5 0;
#X connect 2 0 6 1;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 6 0;
#X connect 5 1 2 0;
#X connect 6 0 3 0;
#X connect 8 0 1 0;
#X connect 8 1 4 0;
#X restore 380 647 pd rowcol2idx;
#X obj 379 787 array set;
#X obj 377 592 pack 0 0;
#N canvas 456 48 589 359 half_active_generate 0;
#X obj 58 37 inlet;
#X obj 68 295 outlet;
#X msg 245 107 \$7 \$8 \$9;
#X msg 395 100 \$10 \$11 \$12;
#X obj 326 152 * 0.75;
#X obj 245 129 unpack 0 0 0;
#X obj 245 152 pack 0 0 0;
#X obj 476 145 * 0.75;
#X obj 395 122 unpack 0 0 0;
#X obj 395 145 pack 0 0 0;
#X obj 59 62 t l l l;
#X obj 244 209 list append;
#X obj 68 264 list append;
#X obj 326 176 int;
#X obj 476 169 int;
#X connect 0 0 10 0;
#X connect 2 0 5 0;
#X connect 3 0 8 0;
#X connect 4 0 13 0;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 5 2 4 0;
#X connect 6 0 11 0;
#X connect 7 0 14 0;
#X connect 8 0 9 0;
#X connect 8 1 9 1;
#X connect 8 2 7 0;
#X connect 9 0 11 1;
#X connect 10 0 12 0;
#X connect 10 1 2 0;
#X connect 10 2 3 0;
#X connect 11 0 12 1;
#X connect 12 0 1 0;
#X connect 13 0 6 2;
#X connect 14 0 9 2;
#X restore 509 671 pd half_active_generate;
#X obj 380 714 pack 0 \$0;
#X msg 380 739 symbol \$2-cval-\$1;
#X obj 377 462 t b f f b;
#X obj 379 763 list store;
#X obj 380 690 t b f;
#X msg 380 617 \$2 \$1;
#X msg 509 647 \$1 0 90 \$1 70 190 \$1 0 210 \$1 255 255;
#X obj 482 503 - 1;
#X obj 647 318 s \$0-cloneloadbang;
#X msg 698 92 \; pd-\$1-cvals obj 10 \$3 array define -yrange 0 255
\$1-cval-\$2 19 \;, f 68;
#X text 1148 650 val 18: 0 inactive 1 active 2 half-active;
#X obj 504 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj -184 489 r \$0-colorreset;
#X obj -184 512 t b b b;
#X msg -122 550 1;
#X obj -185 582 spigot;
#N canvas 0 23 450 300 rowcol2idx 0;
#X obj 91 26 inlet;
#X obj 91 70 - 1;
#X obj 133 92 v \$0-mtx-cols;
#X obj 91 136 +;
#X obj 119 136 - 1;
#X obj 91 92 t f b;
#X obj 91 114 *;
#X obj 91 158 outlet;
#X obj 91 48 unpack 0 0;
#X connect 0 0 8 0;
#X connect 1 0 5 0;
#X connect 2 0 6 1;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 6 0;
#X connect 5 1 2 0;
#X connect 6 0 3 0;
#X connect 8 0 1 0;
#X connect 8 1 4 0;
#X restore -191 642 pd rowcol2idx;
#X msg -123 581 0;
#X obj -233 610 t b l l;
#X obj -94 531 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg -8 744 symbol \$2-cval-\$1;
#X obj -89 742 array get;
#X obj -9 719 pack 0 \$0;
#X obj -89 694 t b b f;
#X msg -60 718 1;
#X msg -89 718 18;
#X obj -89 766 * 6;
#X floatatom -190 747 5 0 0 0 - - -;
#X text -150 750 idx;
#X msg -121 819 symbol \$2-cval-\$1;
#X obj -192 819 array get;
#X obj -192 843 list split 3;
#X msg -350 925 cellcolorons;
#X msg -350 845 cellcoloroffs;
#X obj -266 947 list append;
#X text -378 924 ion;
#X obj -266 867 list append;
#X text -385 847 ioff;
#X obj -350 867 list append;
#X obj -350 947 list append;
#X obj -350 888 s \$0-colors;
#X obj -350 968 s \$0-colors;
#X obj -121 794 pack 0 \$0;
#X obj -191 794 f;
#X msg -162 795 6;
#X obj -190 771 t b b f;
#X text -58 768 0 6 12 -> idx de inicio de inativos \, ativos \, semiativos
;
#X obj -190 665 t f f;
#X connect 0 0 35 0;
#X connect 1 0 22 1;
#X connect 1 0 33 1;
#X connect 2 0 21 0;
#X connect 3 0 4 0;
#X connect 4 0 7 0;
#X connect 4 1 2 0;
#X connect 4 2 1 0;
#X connect 4 3 0 0;
#X connect 6 0 20 0;
#X connect 7 0 5 0;
#X connect 7 1 6 0;
#X connect 7 2 73 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 0 67 0;
#X connect 10 0 9 1;
#X connect 11 0 9 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 14 0 63 0;
#X connect 15 0 14 1;
#X connect 16 0 14 1;
#X connect 17 0 19 1;
#X connect 18 0 17 0;
#X connect 19 0 71 0;
#X connect 20 0 8 0;
#X connect 20 1 18 0;
#X connect 20 2 17 1;
#X connect 20 3 11 0;
#X connect 21 0 33 0;
#X connect 21 1 22 0;
#X connect 22 0 28 0;
#X connect 24 0 23 0;
#X connect 25 0 29 0;
#X connect 26 0 32 0;
#X connect 26 1 36 0;
#X connect 27 0 32 1;
#X connect 28 0 25 0;
#X connect 28 1 31 0;
#X connect 29 0 30 0;
#X connect 29 0 26 0;
#X connect 30 0 29 1;
#X connect 31 0 29 1;
#X connect 32 0 34 0;
#X connect 33 0 24 0;
#X connect 34 0 74 0;
#X connect 36 0 27 0;
#X connect 56 0 69 0;
#X connect 61 0 56 0;
#X connect 63 0 70 0;
#X connect 64 0 68 1;
#X connect 65 0 66 0;
#X connect 66 0 62 2;
#X connect 67 0 12 0;
#X connect 67 1 63 1;
#X connect 67 2 72 0;
#X connect 67 3 16 0;
#X connect 68 0 62 0;
#X connect 69 0 68 0;
#X connect 69 1 65 0;
#X connect 70 0 61 0;
#X connect 70 0 80 0;
#X connect 71 0 64 0;
#X connect 72 0 19 0;
#X connect 77 0 78 0;
#X connect 77 0 84 0;
#X connect 78 0 82 0;
#X connect 78 1 6 0;
#X connect 78 2 79 0;
#X connect 79 0 80 1;
#X connect 80 0 83 0;
#X connect 81 0 112 0;
#X connect 82 0 80 1;
#X connect 83 0 98 0;
#X connect 83 0 97 0;
#X connect 83 1 101 0;
#X connect 83 1 99 0;
#X connect 83 2 81 0;
#X connect 85 0 86 2;
#X connect 86 0 91 0;
#X connect 87 0 85 0;
#X connect 88 0 90 0;
#X connect 88 1 89 0;
#X connect 88 2 87 0;
#X connect 89 0 86 1;
#X connect 90 0 86 0;
#X connect 91 0 108 1;
#X connect 92 0 110 0;
#X connect 94 0 95 2;
#X connect 95 0 96 0;
#X connect 96 0 101 1;
#X connect 96 1 99 1;
#X connect 97 0 104 0;
#X connect 98 0 103 0;
#X connect 99 0 104 1;
#X connect 101 0 103 1;
#X connect 103 0 105 0;
#X connect 104 0 106 0;
#X connect 107 0 94 0;
#X connect 108 0 95 0;
#X connect 109 0 95 1;
#X connect 110 0 108 0;
#X connect 110 1 109 0;
#X connect 110 2 107 0;
#X connect 112 0 92 0;
#X connect 112 1 88 0;
#X restore 50 247 pd dynpatching;
#X obj 154 132 symbol col;
#X obj 28 10 inlet;
#X msg 100 275 bpm 60;
#X obj 100 297 s \$0-abs_inlet;
#X obj 100 342 s \$0-abs_inlet;
#X msg 100 320 mode row;
#X obj 100 364 s \$0-cloneloadbang;
#X obj 27 80 t b b l;
#X obj 100 406 s \$0-mtxgui_inlet;
#X msg 100 385 colorreset;
#X obj 27 274 t b b b b;
#X connect 0 0 15 0;
#X connect 1 0 0 0;
#X connect 2 0 4 0;
#X connect 2 1 3 0;
#X connect 2 2 8 0;
#X connect 6 0 5 0;
#X connect 8 0 6 0;
#X connect 9 0 1 0;
#X connect 10 0 11 0;
#X connect 13 0 12 0;
#X connect 15 0 18 0;
#X connect 15 1 7 0;
#X connect 15 2 2 0;
#X connect 17 0 16 0;
#X connect 18 0 17 0;
#X connect 18 1 14 0;
#X connect 18 2 13 0;
#X connect 18 3 10 0;
#X restore 3719 2638 pd initmtxstep;
#X obj 3729 2509 s \$0-mtxgui_inlet;
#N canvas 217 118 746 632 dyn_patching_mtxgui 0;
#X obj 317 273 f \$0;
#X obj 307 453 r \$0-matrix;
#X obj 307 474 route size rows cols;
#X obj 203 476 unpack 0 0 15;
#X obj 203 499 unpack 0 0 0;
#X msg 352 273 \; pd-\$1-matrix clear \; pd-\$1-toggs clear \;;
#X obj 168 11 r \$0-mtxgui_args;
#X obj 168 33 unpack 0 0 0;
#X obj 168 136 pack 0 0 0;
#X obj 8 11 r \$0-mtxgui_setrowsnum;
#X obj 287 11 r \$0-mtxgui_setcolsnum;
#X obj 593 11 r \$0-mtxgui_setsize;
#X obj 447 11 r \$0-mtxgui_cellsize;
#X obj 446 37 t b f;
#X obj 285 61 t b f;
#X obj 593 36 unpack 0 0;
#X obj 269 570 v \$0-mtx-size;
#X obj 314 547 v \$0-mtx-rows;
#X obj 360 524 v \$0-mtx-cols;
#X obj 14 545 s \$0-mtxguiout4;
#X msg 13 477 mtxgui_ready 1;
#X msg 21 523 mtxgui_ready 0;
#X obj 168 380 outlet;
#X obj 316 228 s \$0-mtxguiready0;
#X obj 21 501 r \$0-mtxguiready0;
#X obj 13 456 r \$0-mtxguiready1;
#X obj 317 345 s \$0-sizerowcol;
#X obj 195 453 r \$0-sizerowcol;
#N canvas 0 23 807 596 togglemaker 0;
#X obj 12 5 inlet;
#X floatatom 11 53 5 0 0 0 - - -;
#X obj 11 79 t f b;
#X msg 63 101 0;
#X obj 11 125 f;
#X obj 39 125 + 1;
#X floatatom 12 217 5 0 0 0 - - -;
#X obj 11 102 until;
#X msg 59 316 0;
#X obj 7 340 f;
#X obj 35 340 + 1;
#X obj 7 317 until;
#X obj 13 239 t b b f;
#X floatatom 6 374 5 0 0 0 - - -;
#X obj 35 193 *;
#X obj 12 147 t f f b;
#X obj 6 481 pack 0 0 0 0;
#X obj 29 447 *;
#X obj 6 401 t f f b;
#X msg 159 490 0;
#X obj 141 513 f;
#X obj 169 513 + 1;
#X obj 6 504 t l b;
#X floatatom 141 537 5 0 0 0 - - -;
#X obj 10 647 pack \$0 0 0 0 0 0 0;
#X msg 10 670 \; pd-\$1-matrix obj \$2 \$3 tgl \$7 0 \$1-stog-\$6 \$1-rtog-\$6
empty 17 7 0 10 -262144 -1 -1 0 1 \;;
#X obj 26 596 unpack 0 0 0 0;
#X msg 6 544 \$2 \$4 \$1 \$3;
#X obj 140 564 v \$0-mtx-size;
#X obj 6 568 t b l b;
#X obj 52 425 v \$0-mtx-size;
#X obj 8 272 v \$0-mtx-cols;
#X obj 58 170 v \$0-mtx-size;
#X obj 12 31 v \$0-mtx-rows;
#X obj 53 622 + 2;
#X connect 0 0 33 0;
#X connect 1 0 2 0;
#X connect 2 0 7 0;
#X connect 2 1 3 0;
#X connect 3 0 4 1;
#X connect 3 0 19 0;
#X connect 4 0 5 0;
#X connect 4 0 15 0;
#X connect 5 0 4 1;
#X connect 6 0 12 0;
#X connect 7 0 4 0;
#X connect 8 0 9 1;
#X connect 9 0 10 0;
#X connect 9 0 13 0;
#X connect 10 0 9 1;
#X connect 11 0 9 0;
#X connect 12 0 31 0;
#X connect 12 1 8 0;
#X connect 12 2 16 2;
#X connect 13 0 18 0;
#X connect 14 0 16 3;
#X connect 15 0 6 0;
#X connect 15 1 14 0;
#X connect 15 2 32 0;
#X connect 16 0 22 0;
#X connect 17 0 16 1;
#X connect 18 0 16 0;
#X connect 18 1 17 0;
#X connect 18 2 30 0;
#X connect 19 0 20 1;
#X connect 20 0 21 0;
#X connect 20 0 23 0;
#X connect 21 0 20 1;
#X connect 22 0 27 0;
#X connect 22 1 20 0;
#X connect 23 0 24 5;
#X connect 24 0 25 0;
#X connect 26 0 24 1;
#X connect 26 1 34 0;
#X connect 26 2 24 3;
#X connect 26 3 24 4;
#X connect 27 0 29 0;
#X connect 28 0 24 6;
#X connect 29 0 24 0;
#X connect 29 1 26 0;
#X connect 29 2 28 0;
#X connect 30 0 17 1;
#X connect 31 0 11 0;
#X connect 32 0 14 1;
#X connect 33 0 1 0;
#X connect 34 0 24 2;
#X restore 318 368 pd togglemaker;
#X obj 316 250 s \$0-sizerowcol;
#N canvas 0 23 450 300 toggs-clone-maker 0;
#X obj 4 8 inlet;
#X obj 4 144 f \$0;
#X obj 64 55 v \$0-mtx-size;
#X obj 37 123 *;
#X obj 71 123 *;
#X obj 4 166 pack 0 0 0;
#X obj 4 33 t b b b b;
#X obj 145 101 *;
#X obj 145 149 pack \$0 0;
#X obj 145 123 t b f;
#X obj 24 99 v \$0-mtx-cols;
#X obj 44 77 v \$0-mtx-rows;
#X msg 145 171 \; pd-\$1-toggs obj 10 10 clone mtxgui_auxabs \$2 \$1
\;;
#X msg 4 207 \; pd-\$1-matrix coords 0 -1 1 1 \$2 \$3 2 0 0 pd-\$1-matrix
restore 100 52 pd-\$1-matrix \; \$1-mtxgui coords 0 -1 1 1 \$2 \$3
2 0 0 \$1-mtxgui restore 100 52 \$1-mtxgui \;;
#X obj 71 145 + 4;
#X connect 0 0 6 0;
#X connect 1 0 5 0;
#X connect 2 0 4 1;
#X connect 2 0 3 1;
#X connect 3 0 5 1;
#X connect 4 0 14 0;
#X connect 5 0 13 0;
#X connect 6 0 1 0;
#X connect 6 1 10 0;
#X connect 6 2 11 0;
#X connect 6 3 2 0;
#X connect 7 0 9 0;
#X connect 8 0 12 0;
#X connect 9 0 8 0;
#X connect 9 1 8 1;
#X connect 10 0 3 0;
#X connect 10 0 7 0;
#X connect 11 0 4 0;
#X connect 11 0 7 1;
#X connect 14 0 5 2;
#X restore 317 323 pd toggs-clone-maker;
#X obj 168 158 t b b l b b l b;
#N canvas 0 23 745 741 finally_out 0;
#X obj 16 6 inlet;
#X obj 16 179 outlet;
#X obj 61 77 s \$0-mtxgui_mtxdumpspigot;
#X msg 62 54 1;
#X obj 39 100 s \$0-ready;
#X obj 31 123 s \$0-readymtx;
#X obj 31 146 s \$0-mtxguiready1;
#X obj 16 30 t b b b;
#X connect 0 0 7 0;
#X connect 3 0 2 0;
#X connect 7 0 5 0;
#X connect 7 0 6 0;
#X connect 7 0 1 0;
#X connect 7 1 4 0;
#X connect 7 2 3 0;
#X restore 168 357 pd finally_out;
#X connect 0 0 5 0;
#X connect 1 0 2 0;
#X connect 2 0 16 0;
#X connect 2 1 17 0;
#X connect 2 2 18 0;
#X connect 3 0 17 0;
#X connect 3 1 18 0;
#X connect 3 2 16 0;
#X connect 4 0 17 0;
#X connect 4 1 18 0;
#X connect 4 2 16 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 1 8 1;
#X connect 7 2 8 2;
#X connect 8 0 31 0;
#X connect 9 0 8 0;
#X connect 10 0 14 0;
#X connect 11 0 15 0;
#X connect 12 0 13 0;
#X connect 13 0 8 0;
#X connect 13 1 8 2;
#X connect 14 0 8 0;
#X connect 14 1 8 1;
#X connect 15 0 8 0;
#X connect 15 1 8 1;
#X connect 20 0 19 0;
#X connect 21 0 19 0;
#X connect 24 0 21 0;
#X connect 25 0 20 0;
#X connect 27 0 4 0;
#X connect 27 0 3 0;
#X connect 31 0 32 0;
#X connect 31 1 28 0;
#X connect 31 2 26 0;
#X connect 31 3 30 0;
#X connect 31 4 0 0;
#X connect 31 5 29 0;
#X connect 31 6 23 0;
#X connect 32 0 22 0;
#X restore 3719 2616 pd dyn_patching_mtxgui;
#N canvas 630 153 1353 855 message_processing_mtxgui 0;
#N canvas 0 23 450 300 getsetrow 0;
#X obj 85 25 inlet;
#X obj 85 49 route float list;
#N canvas 50 112 964 766 getrow 0;
#X obj 220 24 inlet;
#X msg 290 183 0;
#X msg 385 222 set;
#X floatatom 29 220 5 0 0 0 - - -;
#X obj 29 243 pack 0 \$0;
#X obj 43 357 v;
#X msg 29 266 \$2-\$1-tval;
#X obj 29 311 t b a;
#X obj 29 288 list prepend symbol;
#X obj 61 334 list trim;
#X msg 45 422 0 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
#X msg 44 389 add2 \$1;
#X floatatom 471 70 5 0 0 0 - - -;
#X obj 409 160 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 220 92 spigot;
#X obj 422 189 sel 0;
#X obj 455 227 f;
#X obj 215 52 t f f b f;
#X floatatom 272 274 5 0 0 0 - - -;
#X obj 254 303 *;
#X obj 213 304 f;
#X obj 220 135 t b b f b b b;
#X floatatom 254 326 5 0 0 0 - - -;
#X obj 254 220 - 1;
#X obj 213 326 until;
#X obj 217 376 f;
#X obj 244 376 + 1;
#X msg 177 431 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
21 22 23;
#X msg 210 405 add2 \$1;
#X obj 180 181 t b b;
#X msg 455 251 row \$1 out of range;
#X obj 471 46 v \$0-mtx-rows;
#X obj 273 250 v \$0-mtx-cols;
#X obj 10 454 s \$0-mtxguiout2;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 409 135 pd expr;
#X obj 455 279 print \$0-mtxgui;
#X connect 0 0 17 0;
#X connect 2 0 27 0;
#X connect 2 0 10 0;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 5 0 11 0;
#X connect 6 0 8 0;
#X connect 7 0 5 0;
#X connect 7 1 9 0;
#X connect 8 0 7 0;
#X connect 9 0 5 1;
#X connect 10 0 33 0;
#X connect 11 0 10 0;
#X connect 12 0 34 1;
#X connect 13 0 14 1;
#X connect 13 0 15 0;
#X connect 14 0 21 0;
#X connect 15 0 16 0;
#X connect 16 0 30 0;
#X connect 17 0 14 0;
#X connect 17 1 34 0;
#X connect 17 2 31 0;
#X connect 17 3 16 1;
#X connect 18 0 20 1;
#X connect 18 0 19 1;
#X connect 19 0 22 0;
#X connect 20 0 24 0;
#X connect 21 0 29 0;
#X connect 21 1 20 0;
#X connect 21 2 23 0;
#X connect 21 3 32 0;
#X connect 21 4 1 0;
#X connect 21 5 2 0;
#X connect 22 0 25 1;
#X connect 23 0 19 0;
#X connect 24 0 25 0;
#X connect 25 0 26 0;
#X connect 25 0 28 0;
#X connect 25 0 3 0;
#X connect 26 0 25 1;
#X connect 28 0 27 0;
#X connect 29 0 10 0;
#X connect 29 1 27 0;
#X connect 30 0 35 0;
#X connect 31 0 12 0;
#X connect 32 0 18 0;
#X connect 34 0 13 0;
#X restore 85 97 pd getrow;
#N canvas 135 128 1232 930 setrow 0;
#X obj 88 237 list split 1;
#X obj 133 291 list length;
#X obj 133 340 sel 1 0;
#X obj 80 418 list store;
#N canvas 0 23 450 300 parselist 0;
#X obj 62 21 inlet;
#X obj 49 183 outlet;
#X obj 36 76 until;
#X obj 49 159 list store;
#X obj 62 43 t b b l;
#X obj 36 101 f;
#X obj 74 102 + 1;
#X msg 88 76 0, f 2;
#X msg 35 130 get \$1 1;
#X connect 0 0 4 0;
#X connect 2 0 5 0;
#X connect 3 0 1 0;
#X connect 3 1 2 1;
#X connect 4 0 2 0;
#X connect 4 1 7 0;
#X connect 4 2 3 1;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 5 1;
#X connect 7 0 5 1;
#X connect 8 0 3 0;
#X restore 80 444 pd parselist;
#X obj 188 361 print \$0-mtxgui;
#X obj 133 267 t l l;
#X obj 76 535 f;
#X msg 93 284 \$1;
#X obj 111 535 f;
#X obj 145 535 + 1;
#X msg 129 512 1;
#X obj 80 478 t b b f;
#X obj 78 577 pack 0 0 0;
#X msg 78 605 element \$1 \$2 \$3;
#X obj 78 630 s \$0-mtxgui_inlet;
#X obj 128 190 value \$0-mtx-cols;
#X obj 88 140 t l l b b;
#X msg 188 340 number of elements don't match with number of cols;
#X obj 65 22 inlet;
#X obj 133 316 ==;
#X msg 111 69 0;
#X obj -45 109 s \$0-mtxgui_inlet;
#X msg -45 86 matrixdumpcolrow;
#X obj 111 91 s \$0dumpelementspigot;
#X obj 65 45 t b l b;
#X connect 0 1 6 0;
#X connect 1 0 20 0;
#X connect 2 0 3 0;
#X connect 2 1 18 0;
#X connect 3 0 4 0;
#X connect 4 0 12 0;
#X connect 6 0 1 0;
#X connect 6 1 3 1;
#X connect 7 0 13 0;
#X connect 8 0 7 1;
#X connect 9 0 10 0;
#X connect 9 0 13 1;
#X connect 10 0 9 1;
#X connect 11 0 9 1;
#X connect 12 0 7 0;
#X connect 12 1 9 0;
#X connect 12 2 13 2;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 16 0 20 1;
#X connect 17 0 0 0;
#X connect 17 1 8 0;
#X connect 17 2 16 0;
#X connect 17 3 11 0;
#X connect 18 0 5 0;
#X connect 19 0 25 0;
#X connect 20 0 2 0;
#X connect 21 0 24 0;
#X connect 23 0 22 0;
#X connect 25 0 23 0;
#X connect 25 1 17 0;
#X connect 25 2 21 0;
#X restore 139 74 pd setrow;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X restore 437 60 pd getsetrow;
#N canvas 105 108 1335 770 matrixdumplogic 0;
#X text 87 43 1 mtxdump is a switch: if on \, must dump a matrix for
every change \, if off no.;
#X text 86 83 2 when on \, must distinguish set/element commands (dump
every cell change) and col/row messages (dump only when the entire
col or row changed);
#X obj 380 179 r \$0matrixdumpcolrow;
#X obj 682 182 r \$0matrixdumpcell;
#X obj 381 307 spigot;
#X msg 381 331 matrix;
#X obj 381 354 s \$0-mtxgui_inlet;
#X obj 420 282 v \$0mtxgui_mtxdumpspigot;
#X obj 682 214 t b b;
#X obj 682 262 spigot;
#X msg 682 396 matrix;
#X obj 682 419 s \$0-mtxgui_inlet;
#X obj 714 237 v \$0mtxgui_mtxdumpspigot;
#X msg 440 229 0;
#X obj 682 375 spigot;
#X obj 380 205 t b b b b;
#X msg 356 225 1;
#X obj 818 281 loadbang;
#X msg 818 302 1;
#X obj 805 376 r \$0dumpelementspigot;
#X obj 440 255 s \$0dumpelementspigot;
#X connect 2 0 15 0;
#X connect 3 0 8 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 7 0 4 1;
#X connect 8 0 9 0;
#X connect 8 1 12 0;
#X connect 9 0 14 0;
#X connect 10 0 11 0;
#X connect 12 0 9 1;
#X connect 13 0 20 0;
#X connect 14 0 10 0;
#X connect 15 0 16 0;
#X connect 15 1 4 0;
#X connect 15 2 7 0;
#X connect 15 3 13 0;
#X connect 16 0 20 0;
#X connect 17 0 18 0;
#X connect 18 0 14 1;
#X connect 19 0 14 1;
#X restore 19 14 pd matrixdumplogic;
#X obj 20 37 r \$0-mtxgui_inlet;
#X obj 147 37 route col;
#N canvas 0 23 450 300 getsetcol 0;
#X obj 85 25 inlet;
#X obj 85 49 route float list;
#N canvas 50 112 964 766 getcol 0;
#X obj 220 -26 inlet;
#X floatatom 255 242 5 0 0 0 - - -;
#X floatatom 237 289 5 0 0 0 - - -;
#X obj 237 310 until;
#X obj 237 333 f;
#X obj 265 333 +;
#X obj 237 355 - 1;
#X msg 290 183 0;
#X obj 237 380 +;
#X msg 322 183 set;
#X msg 215 446 2 26 50 74 98 122 146;
#X msg 237 419 add2 \$1;
#X obj 220 135 t b b b f b b;
#X floatatom 69 220 5 0 0 0 - - -;
#X obj 69 243 pack 0 \$0;
#X obj 83 357 v;
#X msg 69 266 \$2-\$1-tval;
#X obj 69 311 t b a;
#X obj 69 288 list prepend symbol;
#X obj 101 334 list trim;
#X msg 85 422 0 0 0 1 0 0 0;
#X msg 84 389 add2 \$1;
#X obj 255 219 value \$0-mtx-cols;
#X obj 237 265 value \$0-mtx-rows;
#X obj 220 92 spigot;
#X obj 185 165 t b b;
#N canvas 666 99 883 638 checkrange 0;
#X obj 193 49 inlet;
#X obj 182 369 outlet;
#X floatatom 245 148 5 0 0 0 - - -;
#X obj 245 124 value \$0-mtx-cols;
#X obj 199 194 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 212 223 sel 0;
#X obj 212 246 f;
#X msg 212 270 col \$1 out of range;
#X obj 193 77 t f b f;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 199 172 pd expr;
#X obj 212 298 print \$0-mtxgui;
#X connect 0 0 8 0;
#X connect 2 0 9 1;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 8 1 3 0;
#X connect 8 2 6 1;
#X connect 9 0 4 0;
#X restore 262 51 pd checkrange;
#X obj 223 8 t f f;
#X text 371 447 togglenumber;
#X obj 85 448 s \$0-mtxguiout3;
#X connect 0 0 27 0;
#X connect 1 0 5 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 4 1;
#X connect 6 0 8 0;
#X connect 7 0 4 1;
#X connect 8 0 11 0;
#X connect 8 0 13 0;
#X connect 9 0 10 0;
#X connect 9 0 20 0;
#X connect 11 0 10 0;
#X connect 12 0 25 0;
#X connect 12 1 23 0;
#X connect 12 2 22 0;
#X connect 12 3 8 1;
#X connect 12 4 7 0;
#X connect 12 5 9 0;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 15 0 21 0;
#X connect 16 0 18 0;
#X connect 17 0 15 0;
#X connect 17 1 19 0;
#X connect 18 0 17 0;
#X connect 19 0 15 1;
#X connect 20 0 29 0;
#X connect 21 0 20 0;
#X connect 22 0 1 0;
#X connect 23 0 2 0;
#X connect 24 0 12 0;
#X connect 25 0 20 0;
#X connect 25 1 10 0;
#X connect 26 0 24 1;
#X connect 27 0 24 0;
#X connect 27 1 26 0;
#X restore 85 151 pd getcol;
#N canvas 135 128 809 739 setcol 0;
#X obj 169 54 inlet;
#X obj 292 297 list split 1;
#X obj 332 250 value \$0-mtx-rows;
#X obj 332 351 list length;
#X obj 332 400 sel 1 0;
#X obj 209 458 list store;
#N canvas 0 23 450 300 parselist 0;
#X obj 62 21 inlet;
#X obj 49 183 outlet;
#X obj 36 76 until;
#X obj 49 159 list store;
#X obj 62 43 t b b l;
#X obj 36 101 f;
#X obj 74 102 + 1;
#X msg 88 76 0, f 2;
#X msg 35 130 get \$1 1;
#X connect 0 0 4 0;
#X connect 2 0 5 0;
#X connect 3 0 1 0;
#X connect 3 1 2 1;
#X connect 4 0 2 0;
#X connect 4 1 7 0;
#X connect 4 2 3 1;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 5 1;
#X connect 7 0 5 1;
#X connect 8 0 3 0;
#X restore 209 484 pd parselist;
#X msg 387 400 number of elements don't match with number of rows;
#X obj 387 421 print \$0-mtxgui;
#X obj 332 327 t l l;
#X obj 247 592 f;
#X msg 312 499 \$1;
#X obj 209 558 f;
#X obj 243 558 + 1;
#X msg 227 535 1;
#X obj 209 511 t b b f;
#X obj 212 617 pack 0 0 0;
#X msg 212 645 element \$1 \$2 \$3;
#X obj 212 670 s \$0-mtxgui_inlet;
#X obj 292 200 t l l b b;
#X msg 215 100 0;
#X obj 19 180 s \$0-mtxgui_inlet;
#X obj 332 376 ==;
#X msg 19 157 matrixdumpcolrow;
#X obj 215 122 s \$0dumpelementspigot;
#X obj 169 76 t b l b;
#X connect 0 0 25 0;
#X connect 1 1 9 0;
#X connect 2 0 22 1;
#X connect 3 0 22 0;
#X connect 4 0 5 0;
#X connect 4 1 7 0;
#X connect 5 0 6 0;
#X connect 6 0 15 0;
#X connect 7 0 8 0;
#X connect 9 0 3 0;
#X connect 9 1 5 1;
#X connect 10 0 16 1;
#X connect 11 0 10 1;
#X connect 12 0 13 0;
#X connect 12 0 16 0;
#X connect 13 0 12 1;
#X connect 14 0 12 1;
#X connect 15 0 12 0;
#X connect 15 1 10 0;
#X connect 15 2 16 2;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 19 0 1 0;
#X connect 19 1 11 0;
#X connect 19 2 2 0;
#X connect 19 3 14 0;
#X connect 20 0 24 0;
#X connect 22 0 4 0;
#X connect 23 0 21 0;
#X connect 25 0 23 0;
#X connect 25 1 19 0;
#X connect 25 2 20 0;
#X restore 139 88 pd setcol;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X restore 437 37 pd getsetcol;
#X obj 20 60 r \$0-mtxgui_inlet;
#X obj 147 60 route row;
#X obj 20 82 r \$0-mtxgui_inlet;
#X obj 147 82 route matrix;
#N canvas 769 228 920 495 getsetmatrix 0;
#X obj 29 13 inlet;
#X obj 29 36 route bang list;
#N canvas 0 23 845 562 getmatrix 0;
#N canvas 50 262 964 766 getrow 0;
#X obj 220 24 inlet;
#X msg 290 183 0;
#X msg 385 222 set;
#X floatatom 29 220 5 0 0 0 - - -;
#X obj 29 243 pack 0 \$0;
#X obj 43 357 v;
#X msg 29 266 \$2-\$1-tval;
#X obj 29 311 t b a;
#X obj 29 288 list prepend symbol;
#X obj 61 334 list trim;
#X msg 45 422 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1;
#X msg 44 389 add2 \$1;
#X obj 57 467 outlet;
#X floatatom 471 70 5 0 0 0 - - -;
#X obj 409 160 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 220 92 spigot;
#X obj 422 189 sel 0;
#X obj 455 227 f;
#X obj 215 52 t f f b f;
#X obj 471 46 value \$0-mtx-rows;
#X obj 272 250 value \$0-mtx-cols;
#X floatatom 272 274 5 0 0 0 - - -;
#X obj 254 303 *;
#X obj 213 304 f;
#X obj 220 135 t b b f b b b;
#X floatatom 254 326 5 0 0 0 - - -;
#X obj 254 220 - 1;
#X obj 213 326 until;
#X obj 217 376 f;
#X obj 244 376 + 1;
#X obj 234 464 outlet;
#X msg 177 431 112 113 114 115 116 117 118 119 120 121 122 123 124
125 126 127;
#X msg 225 405 add2 \$1;
#X obj 112 464 outlet;
#X obj 313 465 outlet;
#X obj 180 181 t b b;
#X msg 455 251 row \$1 out of range;
#X obj 167 468 outlet;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 409 129 pd expr;
#X obj 455 279 print \$0-mtxgui;
#X connect 0 0 18 0;
#X connect 2 0 31 0;
#X connect 2 0 10 0;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 5 0 11 0;
#X connect 5 0 37 0;
#X connect 6 0 8 0;
#X connect 7 0 5 0;
#X connect 7 1 9 0;
#X connect 8 0 7 0;
#X connect 9 0 5 1;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 13 0 34 0;
#X connect 13 0 38 1;
#X connect 14 0 15 1;
#X connect 14 0 16 0;
#X connect 15 0 24 0;
#X connect 16 0 17 0;
#X connect 17 0 36 0;
#X connect 18 0 15 0;
#X connect 18 1 38 0;
#X connect 18 2 19 0;
#X connect 18 3 17 1;
#X connect 19 0 13 0;
#X connect 20 0 21 0;
#X connect 21 0 23 1;
#X connect 21 0 22 1;
#X connect 22 0 25 0;
#X connect 23 0 27 0;
#X connect 24 0 35 0;
#X connect 24 1 23 0;
#X connect 24 2 26 0;
#X connect 24 3 20 0;
#X connect 24 4 1 0;
#X connect 24 5 2 0;
#X connect 25 0 28 1;
#X connect 26 0 22 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 28 0 30 0;
#X connect 28 0 32 0;
#X connect 28 0 3 0;
#X connect 29 0 28 1;
#X connect 31 0 33 0;
#X connect 32 0 31 0;
#X connect 35 0 10 0;
#X connect 35 1 31 0;
#X connect 36 0 39 0;
#X connect 38 0 14 0;
#X restore 324 209 pd getrow;
#X obj 176 44 inlet;
#X msg 265 320 matrix 8 16 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 1;
#X obj 593 97 value \$0-mtx-rows;
#X obj 468 97 value \$0-mtx-cols;
#X msg 719 97 set matrix;
#X obj 266 82 t b b b b b;
#X msg 481 152 add2 \$1;
#X obj 325 135 f;
#X obj 324 161 until;
#X obj 324 183 f;
#X obj 352 183 + 1;
#X msg 415 159 1;
#X msg 292 247 add2 \$1;
#X obj 266 533 outlet;
#X connect 0 2 13 0;
#X connect 1 0 6 0;
#X connect 2 0 14 0;
#X connect 3 0 7 0;
#X connect 3 0 8 1;
#X connect 4 0 7 0;
#X connect 5 0 2 0;
#X connect 6 0 2 0;
#X connect 6 1 8 0;
#X connect 6 2 4 0;
#X connect 6 3 3 0;
#X connect 6 4 5 0;
#X connect 6 4 12 0;
#X connect 7 0 2 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 0 0 0;
#X connect 11 0 10 1;
#X connect 12 0 10 1;
#X connect 13 0 2 0;
#X restore 29 128 pd getmatrix;
#N canvas 444 26 1236 832 setmatrix 1;
#X obj 238 16 inlet;
#X obj 310 98 unpack 0 0;
#X obj 310 122 *;
#X obj 391 38 list split 2;
#X obj 488 146 list length;
#X obj 330 192 sel 0;
#X msg 27 217 can't construct a matrix with these parameters;
#X obj 27 238 print \$0-mtxgui;
#X obj 362 323 list;
#X obj 304 411 until;
#X obj 317 494 list store;
#X obj 338 381 t b b l;
#X obj 304 436 f;
#X obj 342 437 + 1;
#X msg 356 411 0, f 2;
#X msg 303 465 get \$1 1;
#X obj 362 349 t l b;
#X obj 511 300 s \$0-mtxgui_setsize;
#X obj 298 748 s \$0-mtxgui_set_element;
#X obj 437 593 v \$0-mtx-cols;
#X floatatom 437 615 5 0 0 0 - - -;
#X msg 511 253 set \$1 \$2;
#X msg 511 275 8 16;
#X obj 298 724 pack 0 0 0;
#X obj 297 606 f;
#X obj 324 606 + 1;
#X msg 369 568 0;
#X obj 331 665 mod;
#X obj 297 665 div;
#X obj 331 688 + 1;
#X obj 297 688 + 1;
#X obj 317 539 t b f;
#X obj 310 73 t l l b b;
#X obj 259 145 t f f;
#X obj 297 630 t f f f b;
#X obj 89 122 s \$0-mtxgui_mtxdumpspigot;
#X msg 264 81 0;
#X msg 180 76 1;
#X obj 362 300 t b b b;
#X obj 244 45 t b b l b;
#X msg 89 58 matrix;
#X obj 17 85 s \$0-mtxgui_inlet;
#X obj 330 170 ==;
#X msg 742 94 8 16 1 0 0 0 1 0 1 0 1 0 0 1 1 0 1 0 1 1 0 0 0 1 0 0
0 1 0 0 0 1 0 1 1 0 0 0 1 0 1 0 0 1 0 0 1 0 1 0 0 0 1 0 0 1 0 1 0 0
1 0 1 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 1 0 1 0 1 0 1 0 1
1 0 1 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 1 0 1 0 0 0 0 0 1 0 1 0
1 0;
#X obj 529 71 print x;
#X floatatom 403 128 5 0 0 0 - - -;
#X floatatom 329 137 5 0 0 0 - - -;
#X obj 579 505 mod;
#X obj 317 516 mod 2;
#X connect 0 0 39 0;
#X connect 1 0 2 0;
#X connect 1 0 46 0;
#X connect 1 1 2 1;
#X connect 1 1 45 0;
#X connect 2 0 33 0;
#X connect 3 0 32 0;
#X connect 3 0 44 0;
#X connect 3 1 4 0;
#X connect 3 1 8 1;
#X connect 4 0 42 1;
#X connect 5 0 6 0;
#X connect 5 1 38 0;
#X connect 6 0 7 0;
#X connect 8 0 16 0;
#X connect 9 0 12 0;
#X connect 10 0 48 0;
#X connect 10 1 9 1;
#X connect 11 0 9 0;
#X connect 11 1 14 0;
#X connect 11 2 10 1;
#X connect 12 0 13 0;
#X connect 12 0 15 0;
#X connect 13 0 12 1;
#X connect 14 0 12 1;
#X connect 15 0 10 0;
#X connect 16 0 11 0;
#X connect 16 1 26 0;
#X connect 19 0 20 0;
#X connect 20 0 27 1;
#X connect 20 0 28 1;
#X connect 21 0 22 0;
#X connect 22 0 17 0;
#X connect 23 0 18 0;
#X connect 24 0 25 0;
#X connect 24 0 34 0;
#X connect 25 0 24 1;
#X connect 26 0 24 1;
#X connect 27 0 29 0;
#X connect 28 0 30 0;
#X connect 29 0 23 1;
#X connect 30 0 23 0;
#X connect 31 0 24 0;
#X connect 31 1 23 2;
#X connect 32 0 1 0;
#X connect 32 1 21 0;
#X connect 33 0 42 0;
#X connect 34 1 28 0;
#X connect 34 2 27 0;
#X connect 34 3 19 0;
#X connect 36 0 35 0;
#X connect 37 0 35 0;
#X connect 38 0 8 0;
#X connect 38 1 36 0;
#X connect 38 2 22 0;
#X connect 39 0 40 0;
#X connect 39 1 37 0;
#X connect 39 2 3 0;
#X connect 39 3 36 0;
#X connect 40 0 41 0;
#X connect 42 0 5 0;
#X connect 43 0 3 0;
#X connect 48 0 31 0;
#X restore 80 105 pd setmatrix;
#X obj 183 102 outlet;
#X obj 80 70 t b l;
#X obj 29 155 s \$0-mtxguiout5;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 5 0;
#X connect 2 0 6 0;
#X connect 5 0 4 0;
#X connect 5 1 3 0;
#X restore 438 82 pd getsetmatrix;
#X obj 20 104 r \$0-mtxgui_inlet;
#X obj 148 104 route element get set;
#N canvas 294 67 1386 961 getset 0;
#X obj 179 26 inlet;
#X obj 295 160 list length;
#X obj 179 136 t l l l;
#X obj 298 229 spigot;
#X msg 351 229 1;
#X msg 383 230 0;
#X obj 352 207 sel 3;
#N canvas 251 23 947 1005 set_element 0;
#X obj 186 791 v;
#X obj 187 728 t b a;
#X obj 187 705 list prepend symbol;
#X obj 219 751 list trim;
#X floatatom 451 394 5 0 0 0 - - -;
#X obj 428 443 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 428 460 sel 0;
#X obj 461 498 f;
#X msg 461 522 col \$1 out of range;
#X obj 428 351 t f b f;
#X floatatom 385 597 5 0 0 0 - - -;
#X obj 362 646 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 362 663 sel 0;
#X obj 395 701 f;
#X obj 362 554 t f b f;
#X msg 395 725 row \$1 out of range;
#X obj 321 427 &&;
#X obj 135 280 spigot;
#X obj 361 329 unpack 0 0 0;
#X obj 135 329 unpack 0 0 0;
#X obj 135 368 - 1;
#X obj 174 367 - 1;
#X obj 174 398 t f b;
#X obj 181 523 *;
#X msg 34 732 \; \$1-stog-\$2 \$3 \;;
#X obj 140 558 +;
#X floatatom 140 585 5 0 0 0 - - -;
#X floatatom 231 499 5 0 0 0 - - -;
#X floatatom 161 443 5 0 0 0 - - -;
#X obj 74 638 pack \$0 0 0;
#X obj 71 604 t b f;
#X msg 135 305 \$2 \$1 \$3;
#X obj 159 756 f;
#X msg 187 677 \$1-\$2-tval;
#X obj 187 654 pack 0 \$0;
#X msg 133 686 \$2;
#X obj 157 69 t l l;
#X obj 157 43 inlet;
#X obj 451 373 v \$0-mtx-cols;
#X obj 385 576 v \$0-mtx-rows;
#X obj 206 468 v \$0-mtx-cols;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 428 418 pd expr;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 363 620 pd expr;
#X obj 396 765 print \$0-mtxgui;
#X obj 461 550 print \$0-mtxgui;
#X obj 73 676 t b l l;
#X obj 64 899 s \$0-mtxgui_inlet;
#X msg 64 875 matrixdumpcell;
#X connect 1 0 32 0;
#X connect 1 1 3 0;
#X connect 2 0 1 0;
#X connect 3 0 0 1;
#X connect 4 0 41 1;
#X connect 5 0 6 0;
#X connect 5 0 16 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 44 0;
#X connect 9 0 41 0;
#X connect 9 1 38 0;
#X connect 9 2 7 1;
#X connect 10 0 42 1;
#X connect 11 0 12 0;
#X connect 11 0 16 0;
#X connect 12 0 13 0;
#X connect 13 0 15 0;
#X connect 14 0 42 0;
#X connect 14 1 39 0;
#X connect 14 2 13 1;
#X connect 15 0 43 0;
#X connect 16 0 17 1;
#X connect 17 0 31 0;
#X connect 18 0 14 0;
#X connect 18 1 9 0;
#X connect 19 0 20 0;
#X connect 19 1 21 0;
#X connect 19 2 29 2;
#X connect 19 2 32 1;
#X connect 20 0 25 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 22 0 28 0;
#X connect 22 1 40 0;
#X connect 23 0 25 1;
#X connect 25 0 26 0;
#X connect 26 0 30 0;
#X connect 29 0 45 0;
#X connect 30 0 29 0;
#X connect 30 1 29 1;
#X connect 31 0 19 0;
#X connect 32 0 0 0;
#X connect 33 0 2 0;
#X connect 34 0 33 0;
#X connect 35 0 34 0;
#X connect 36 0 17 0;
#X connect 36 1 18 0;
#X connect 37 0 36 0;
#X connect 38 0 4 0;
#X connect 39 0 10 0;
#X connect 40 0 23 1;
#X connect 40 0 27 0;
#X connect 41 0 5 0;
#X connect 42 0 11 0;
#X connect 45 0 47 0;
#X connect 45 1 35 0;
#X connect 45 2 24 0;
#X connect 47 0 46 0;
#X restore 298 254 pd set_element;
#N canvas 683 132 947 851 get_element 0;
#X obj 59 747 v;
#X obj 140 661 list prepend symbol;
#X obj 77 709 list trim;
#X floatatom 451 394 5 0 0 0 - - -;
#X obj 428 443 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 428 460 sel 0;
#X obj 461 498 f;
#X msg 461 522 col \$1 out of range;
#X obj 428 351 t f b f;
#X floatatom 385 597 5 0 0 0 - - -;
#X obj 362 646 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 362 663 sel 0;
#X obj 395 701 f;
#X obj 362 554 t f b f;
#X msg 395 725 row \$1 out of range;
#X obj 321 427 &&;
#X obj 154 277 spigot;
#X obj 135 368 - 1;
#X obj 174 367 - 1;
#X obj 174 398 t f b;
#X obj 181 523 *;
#X obj 140 558 +;
#X floatatom 140 585 5 0 0 0 - - -;
#X floatatom 231 499 5 0 0 0 - - -;
#X floatatom 161 443 5 0 0 0 - - -;
#X obj 140 610 pack 0 \$0;
#X obj 157 43 inlet;
#X msg 156 303 \$2 \$1;
#X obj 135 329 unpack 0 0;
#X obj 59 773 outlet;
#X floatatom 88 747 5 0 0 0 - - -;
#X obj 157 69 t b l l;
#X obj 451 373 v \$0-mtx-cols;
#X obj 385 576 v \$0-mtx-rows;
#X obj 206 468 v \$0-mtx-cols;
#X obj 361 318 unpack 0 0;
#X obj 259 330 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 159 748 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 140 633 \$2-\$1-tval;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 428 420 pd expr;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 362 624 pd expr;
#X obj 396 765 print \$0-mtxgui;
#X obj 461 550 print \$0-mtxgui;
#X connect 0 0 29 0;
#X connect 0 0 30 0;
#X connect 0 0 37 0;
#X connect 1 0 2 0;
#X connect 2 0 0 1;
#X connect 3 0 39 1;
#X connect 4 0 5 0;
#X connect 4 0 15 1;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 42 0;
#X connect 8 0 39 0;
#X connect 8 1 32 0;
#X connect 8 2 6 1;
#X connect 9 0 40 1;
#X connect 10 0 11 0;
#X connect 10 0 15 0;
#X connect 11 0 12 0;
#X connect 12 0 14 0;
#X connect 13 0 40 0;
#X connect 13 1 33 0;
#X connect 13 2 12 1;
#X connect 14 0 41 0;
#X connect 15 0 16 1;
#X connect 15 0 36 0;
#X connect 16 0 27 0;
#X connect 17 0 21 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 19 0 24 0;
#X connect 19 1 34 0;
#X connect 20 0 21 1;
#X connect 21 0 22 0;
#X connect 22 0 25 0;
#X connect 25 0 38 0;
#X connect 26 0 31 0;
#X connect 27 0 28 0;
#X connect 28 0 17 0;
#X connect 28 1 18 0;
#X connect 31 0 0 0;
#X connect 31 1 16 0;
#X connect 31 2 35 0;
#X connect 32 0 3 0;
#X connect 33 0 9 0;
#X connect 34 0 20 1;
#X connect 34 0 23 0;
#X connect 35 0 13 0;
#X connect 35 1 8 0;
#X connect 38 0 1 0;
#X connect 39 0 4 0;
#X connect 40 0 10 0;
#X restore 179 254 pd get_element;
#X obj 179 228 spigot;
#X msg 232 228 1;
#X msg 264 229 0;
#X obj 233 206 sel 2;
#X obj 472 23 inlet;
#X obj 832 21 inlet;
#X obj 504 82 list length;
#X obj 472 53 t l l;
#X obj 504 104 sel 2;
#X obj 465 138 spigot;
#X msg 518 138 1;
#X msg 550 139 0;
#X obj 864 82 list length;
#X obj 832 53 t l l;
#X obj 825 138 spigot;
#X msg 878 138 1;
#X msg 910 139 0;
#X obj 864 104 sel 3;
#X msg 910 164 set message expects 3 args (row \, col \, value);
#X msg 550 164 get message expects 2 args (row \, col);
#X obj 179 318 s \$0-mtxguiout1;
#X obj 418 254 r \$0-mtxgui_set_element;
#X obj 458 174 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 910 186 print \$0-mtxgui;
#X obj 550 186 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 1 0 12 0;
#X connect 2 0 9 0;
#X connect 2 1 3 0;
#X connect 2 2 1 0;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 8 0 29 0;
#X connect 9 0 8 0;
#X connect 10 0 9 1;
#X connect 11 0 9 1;
#X connect 12 0 10 0;
#X connect 12 1 11 0;
#X connect 13 0 16 0;
#X connect 14 0 22 0;
#X connect 15 0 17 0;
#X connect 16 0 18 0;
#X connect 16 1 15 0;
#X connect 17 0 19 0;
#X connect 17 1 20 0;
#X connect 17 1 28 0;
#X connect 18 0 8 0;
#X connect 18 0 31 0;
#X connect 19 0 18 1;
#X connect 20 0 18 1;
#X connect 21 0 26 0;
#X connect 22 0 23 0;
#X connect 22 1 21 0;
#X connect 23 0 7 0;
#X connect 24 0 23 1;
#X connect 25 0 23 1;
#X connect 26 0 24 0;
#X connect 26 1 25 0;
#X connect 26 1 27 0;
#X connect 27 0 32 0;
#X connect 28 0 33 0;
#X connect 30 0 7 0;
#X restore 438 104 pd getset;
#X obj 20 126 r \$0-mtxgui_inlet;
#X obj 148 126 route setrows;
#X obj 438 126 s \$0-mtxgui_setrowsnum;
#X obj 20 148 r \$0-mtxgui_inlet;
#X obj 148 148 route setcols;
#X obj 438 148 s \$0-mtxgui_setcolsnum;
#X obj 20 170 r \$0-mtxgui_inlet;
#X obj 438 170 s \$0-mtxgui_setsize;
#X obj 148 170 route setsize;
#X obj 20 192 r \$0-mtxgui_inlet;
#X obj 148 192 route setcellsize;
#X obj 438 192 s \$0-mtxgui_cellsize;
#X obj 20 214 r \$0-mtxgui_inlet;
#X obj 438 214 s \$0-mtxgui_args;
#X obj 148 214 route setnewargs;
#X obj 20 246 r \$0-mtxgui_inlet;
#X obj 148 246 route colorons;
#X obj 515 298 s \$0-mtxgui_colorons;
#X obj 439 594 s \$0-colormode;
#X obj 438 268 list store;
#X obj 20 311 r \$0-mtxgui_inlet;
#X obj 438 333 list store;
#X obj 148 311 route coloroffs;
#X obj 515 363 s \$0-mtxgui_coloroffs;
#X obj 20 417 r \$0-mtxgui_inlet;
#X obj 148 417 route mtxdump;
#X obj 438 417 s \$0mtxgui_mtxdumpspigot;
#X obj 20 440 r \$0-mtxgui_inlet;
#X obj 148 440 route cellcolorons cellcoloroffs;
#N canvas 296 323 1313 710 cellcolors 0;
#X obj 58 31 inlet;
#X obj 90 124 list length;
#X obj 58 95 t l l;
#X obj 58 218 spigot;
#X msg 104 180 1;
#X msg 136 181 0;
#X obj 90 146 sel 5;
#N canvas 733 23 947 1005 set_cellcoloron 0;
#X obj 150 119 spigot;
#X obj 150 239 - 1;
#X obj 177 207 - 1;
#X obj 177 278 t f b;
#X obj 191 344 *;
#X obj 150 372 +;
#X obj 157 69 t l l;
#X obj 157 43 inlet;
#X obj 209 308 v \$0-mtx-cols;
#X obj 150 168 unpack 0 0 0 0 0;
#X obj 208 449 s \$0-mtxgui_cellcolorons;
#X obj 208 414 pack 0 0 0 0;
#N canvas 616 23 1092 1005 range_check 0;
#X obj 102 31 inlet;
#X obj 112 460 outlet;
#X floatatom 332 150 5 0 0 0 - - -;
#X obj 309 199 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 309 216 sel 0;
#X obj 342 254 f;
#X msg 342 278 col \$1 out of range;
#X obj 309 107 t f b f;
#X floatatom 266 353 5 0 0 0 - - -;
#X obj 243 402 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 243 419 sel 0;
#X obj 276 457 f;
#X obj 243 310 t f b f;
#X msg 276 481 row \$1 out of range;
#X obj 112 439 &&;
#X obj 242 85 unpack 0 0 0;
#X obj 332 129 v \$0-mtx-cols;
#X obj 266 332 v \$0-mtx-rows;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 309 177 pd expr;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 243 381 pd expr;
#X obj 342 306 print \$0-mtxgui;
#X obj 277 521 print \$0-mtxgui;
#X connect 0 0 15 0;
#X connect 2 0 18 1;
#X connect 3 0 4 0;
#X connect 3 0 14 1;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 20 0;
#X connect 7 0 18 0;
#X connect 7 1 16 0;
#X connect 7 2 5 1;
#X connect 8 0 19 1;
#X connect 9 0 10 0;
#X connect 9 0 14 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 12 0 19 0;
#X connect 12 1 17 0;
#X connect 12 2 11 1;
#X connect 13 0 21 0;
#X connect 14 0 1 0;
#X connect 15 0 12 0;
#X connect 15 1 7 0;
#X connect 16 0 2 0;
#X connect 17 0 8 0;
#X connect 18 0 3 0;
#X connect 19 0 9 0;
#X restore 189 93 pd range_check;
#X msg 150 144 \$2 \$1 \$3 \$4 \$5;
#X connect 0 0 13 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 8 0;
#X connect 4 0 5 1;
#X connect 5 0 11 0;
#X connect 6 0 0 0;
#X connect 6 1 12 0;
#X connect 7 0 6 0;
#X connect 8 0 4 1;
#X connect 9 0 1 0;
#X connect 9 1 2 0;
#X connect 9 2 11 1;
#X connect 9 3 11 2;
#X connect 9 4 11 3;
#X connect 11 0 10 0;
#X connect 12 0 0 1;
#X connect 13 0 9 0;
#X restore 58 275 pd set_cellcoloron;
#X msg 136 206 cellcolorons message expects 5 args (row \, col \, r
\, g \, b);
#X obj 592 43 inlet;
#X obj 624 104 list length;
#X obj 592 75 t l l;
#X obj 592 198 spigot;
#X msg 638 160 1;
#X msg 670 161 0;
#X obj 624 126 sel 5;
#N canvas 733 23 947 1005 set_cellcoloroff 0;
#X obj 150 119 spigot;
#X obj 150 239 - 1;
#X obj 177 207 - 1;
#X obj 177 278 t f b;
#X obj 191 344 *;
#X obj 150 372 +;
#X obj 157 69 t l l;
#X obj 157 43 inlet;
#X obj 209 308 v \$0-mtx-cols;
#X obj 150 168 unpack 0 0 0 0 0;
#X obj 208 414 pack 0 0 0 0;
#N canvas 490 53 1092 1005 range_check 0;
#X obj 102 31 inlet;
#X obj 112 460 outlet;
#X floatatom 332 150 5 0 0 0 - - -;
#X obj 309 199 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 309 216 sel 0;
#X obj 342 254 f;
#X msg 342 278 col \$1 out of range;
#X obj 309 107 t f b f;
#X floatatom 266 353 5 0 0 0 - - -;
#X obj 243 402 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 243 419 sel 0;
#X obj 276 457 f;
#X obj 243 310 t f b f;
#X msg 276 481 row \$1 out of range;
#X obj 112 439 &&;
#X obj 242 85 unpack 0 0 0;
#X obj 332 129 v \$0-mtx-cols;
#X obj 266 332 v \$0-mtx-rows;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 309 177 pd expr;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 243 380 pd expr;
#X obj 342 306 print \$0-mtxgui;
#X obj 277 521 print \$0-mtxgui;
#X connect 0 0 15 0;
#X connect 2 0 18 1;
#X connect 3 0 4 0;
#X connect 3 0 14 1;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 20 0;
#X connect 7 0 18 0;
#X connect 7 1 16 0;
#X connect 7 2 5 1;
#X connect 8 0 19 1;
#X connect 9 0 10 0;
#X connect 9 0 14 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 12 0 19 0;
#X connect 12 1 17 0;
#X connect 12 2 11 1;
#X connect 13 0 21 0;
#X connect 14 0 1 0;
#X connect 15 0 12 0;
#X connect 15 1 7 0;
#X connect 16 0 2 0;
#X connect 17 0 8 0;
#X connect 18 0 3 0;
#X connect 19 0 9 0;
#X restore 189 93 pd range_check;
#X obj 208 449 s \$0-mtxgui_cellcoloroffs;
#X msg 150 145 \$2 \$1 \$3 \$4 \$5;
#X connect 0 0 13 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 8 0;
#X connect 4 0 5 1;
#X connect 5 0 10 0;
#X connect 6 0 0 0;
#X connect 6 1 11 0;
#X connect 7 0 6 0;
#X connect 8 0 4 1;
#X connect 9 0 1 0;
#X connect 9 1 2 0;
#X connect 9 2 10 1;
#X connect 9 3 10 2;
#X connect 9 4 10 3;
#X connect 10 0 12 0;
#X connect 11 0 0 1;
#X connect 13 0 9 0;
#X restore 592 255 pd set_cellcoloroff;
#X msg 670 186 cellcoloroffs message expects 5 args (row \, col \,
r \, g \, b);
#X obj 136 228 print \$0-mtxgui;
#X obj 670 208 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 6 1 8 0;
#X connect 8 0 18 0;
#X connect 9 0 11 0;
#X connect 10 0 15 0;
#X connect 11 0 12 0;
#X connect 11 1 10 0;
#X connect 12 0 16 0;
#X connect 13 0 12 1;
#X connect 14 0 12 1;
#X connect 15 0 13 0;
#X connect 15 1 14 0;
#X connect 15 1 17 0;
#X connect 17 0 19 0;
#X restore 438 440 pd cellcolors;
#X obj 20 463 r \$0-mtxgui_inlet;
#X obj 148 463 route colcolorons colcoloroffs;
#N canvas 187 163 1493 895 colcolors 0;
#X obj 462 28 inlet;
#X floatatom 250 242 5 0 0 0 - - -;
#X floatatom 230 289 5 0 0 0 - - -;
#X obj 230 310 until;
#X obj 230 333 f;
#X obj 258 333 +;
#X obj 230 355 - 1;
#X msg 290 183 0;
#X obj 230 380 +;
#X obj 250 219 value \$0-mtx-cols;
#X obj 230 265 value \$0-mtx-rows;
#X obj 220 92 spigot;
#N canvas 550 63 883 638 checkrange 0;
#X obj 193 49 inlet;
#X obj 182 369 outlet;
#X floatatom 428 139 5 0 0 0 - - -;
#X obj 428 115 value \$0-mtx-cols;
#X obj 199 194 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 212 223 sel 0;
#X obj 212 246 f;
#X msg 212 270 col \$1 out of range;
#X obj 193 77 t f b f;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 199 170 pd expr;
#X obj 212 298 print \$0-mtxgui;
#X connect 0 0 8 0;
#X connect 2 0 9 1;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 8 1 3 0;
#X connect 8 2 6 1;
#X connect 9 0 4 0;
#X restore 262 51 pd checkrange;
#X obj 223 8 t f f;
#X text 137 381 togglenumber;
#N canvas 0 23 450 300 checkargs 0;
#X obj 43 9 inlet;
#X obj 74 61 list length;
#X obj 42 32 t l l;
#X obj 42 155 spigot;
#X msg 88 117 1;
#X msg 120 118 0;
#X obj 74 83 sel 4;
#X obj 42 226 outlet;
#X msg 119 143 colcolorons message expects 4 args (col \, r \, g \,
b);
#X obj 120 165 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 6 1 8 0;
#X connect 8 0 9 0;
#X restore 462 56 pd checkargs;
#X obj 462 83 unpack 0 0 0 0;
#X obj 230 431 s \$0-mtxgui_cellcolorons;
#X obj 230 405 pack 0 0 0 0;
#X obj 230 159 t b b f b;
#X obj 888 38 inlet;
#X floatatom 676 252 5 0 0 0 - - -;
#X floatatom 656 299 5 0 0 0 - - -;
#X obj 656 320 until;
#X obj 656 343 f;
#X obj 684 343 +;
#X obj 656 365 - 1;
#X msg 716 193 0;
#X obj 656 390 +;
#X obj 676 229 value \$0-mtx-cols;
#X obj 656 275 value \$0-mtx-rows;
#X obj 646 102 spigot;
#N canvas 569 151 883 638 checkrange 0;
#X obj 193 49 inlet;
#X obj 182 369 outlet;
#X floatatom 428 139 5 0 0 0 - - -;
#X obj 428 115 value \$0-mtx-cols;
#X obj 199 194 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 212 223 sel 0;
#X obj 212 246 f;
#X msg 212 270 col \$1 out of range;
#X obj 193 77 t f b f;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 199 171 pd expr;
#X obj 212 298 print \$0-mtxgui;
#X connect 0 0 8 0;
#X connect 2 0 9 1;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 8 1 3 0;
#X connect 8 2 6 1;
#X connect 9 0 4 0;
#X restore 688 61 pd checkrange;
#X obj 649 18 t f f;
#X text 563 391 togglenumber;
#N canvas 0 23 450 300 checkargs 0;
#X obj 43 9 inlet;
#X obj 74 61 list length;
#X obj 42 32 t l l;
#X obj 42 155 spigot;
#X msg 88 117 1;
#X msg 120 118 0;
#X obj 74 83 sel 4;
#X obj 42 226 outlet;
#X msg 119 143 colcoloroffs message expects 4 args (col \, r \, g \,
b);
#X obj 120 166 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 6 1 8 0;
#X connect 8 0 9 0;
#X restore 888 66 pd checkargs;
#X obj 888 93 unpack 0 0 0 0;
#X obj 656 415 pack 0 0 0 0;
#X obj 656 169 t b b f b;
#X obj 656 441 s \$0-mtxgui_cellcoloroffs;
#X connect 0 0 15 0;
#X connect 1 0 5 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 4 1;
#X connect 6 0 8 0;
#X connect 7 0 4 1;
#X connect 8 0 18 0;
#X connect 9 0 1 0;
#X connect 10 0 2 0;
#X connect 11 0 19 0;
#X connect 12 0 11 1;
#X connect 13 0 11 0;
#X connect 13 1 12 0;
#X connect 15 0 16 0;
#X connect 16 0 13 0;
#X connect 16 1 18 1;
#X connect 16 2 18 2;
#X connect 16 3 18 3;
#X connect 18 0 17 0;
#X connect 19 0 10 0;
#X connect 19 1 9 0;
#X connect 19 2 8 1;
#X connect 19 3 7 0;
#X connect 20 0 35 0;
#X connect 21 0 25 1;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 24 0 25 0;
#X connect 24 0 26 0;
#X connect 25 0 24 1;
#X connect 26 0 28 0;
#X connect 27 0 24 1;
#X connect 28 0 37 0;
#X connect 29 0 21 0;
#X connect 30 0 22 0;
#X connect 31 0 38 0;
#X connect 32 0 31 1;
#X connect 33 0 31 0;
#X connect 33 1 32 0;
#X connect 35 0 36 0;
#X connect 36 0 33 0;
#X connect 36 1 37 1;
#X connect 36 2 37 2;
#X connect 36 3 37 3;
#X connect 37 0 39 0;
#X connect 38 0 30 0;
#X connect 38 1 29 0;
#X connect 38 2 28 1;
#X connect 38 3 27 0;
#X restore 439 463 pd colcolors;
#X obj 20 485 r \$0-mtxgui_inlet;
#X obj 148 485 route rowcolorons rowcoloroffs;
#N canvas 427 290 1493 895 rowcolors 0;
#X obj 462 8 inlet;
#X obj 220 192 spigot;
#N canvas 515 114 883 638 checkrange 0;
#X obj 193 -11 inlet;
#X obj 182 369 outlet;
#X obj 193 17 t f b f;
#X floatatom 428 90 5 0 0 0 - - -;
#X obj 199 143 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 212 172 sel 0;
#X obj 245 210 f;
#X msg 245 234 row \$1 out of range;
#X obj 428 66 v \$0-mtx-rows;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 199 117 pd expr;
#X obj 245 262 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 2 0 9 0;
#X connect 2 1 8 0;
#X connect 2 2 6 1;
#X connect 3 0 9 1;
#X connect 4 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 3 0;
#X connect 9 0 4 0;
#X restore 262 151 pd checkrange;
#X obj 223 108 t f f;
#X text 129 334 togglenumber;
#N canvas 0 23 450 300 checkargs 0;
#X obj 43 9 inlet;
#X obj 74 61 list length;
#X obj 42 32 t l l;
#X obj 42 155 spigot;
#X msg 88 117 1;
#X msg 120 118 0;
#X obj 74 83 sel 4;
#X obj 42 226 outlet;
#X msg 119 143 rowcolorons message expects 4 args (row \, r \, g \,
b);
#X obj 120 165 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 6 1 8 0;
#X connect 8 0 9 0;
#X restore 462 36 pd checkargs;
#X obj 462 63 unpack 0 0 0 0;
#X obj 220 387 s \$0-mtxgui_cellcolorons;
#X obj 220 361 pack 0 0 0 0;
#X floatatom 270 259 5 0 0 0 - - -;
#X obj 261 282 *;
#X obj 220 283 f;
#X floatatom 261 305 5 0 0 0 - - -;
#X obj 243 259 - 1;
#X obj 220 305 until;
#X obj 220 331 f;
#X obj 247 331 + 1;
#X obj 270 237 v \$0-mtx-cols;
#X obj 220 214 t b f b;
#X obj 852 8 inlet;
#X obj 610 192 spigot;
#N canvas 506 81 883 638 checkrange 0;
#X obj 193 -11 inlet;
#X obj 182 369 outlet;
#X obj 193 17 t f b f;
#X floatatom 428 90 5 0 0 0 - - -;
#X obj 199 143 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 212 172 sel 0;
#X obj 245 210 f;
#X msg 245 234 row \$1 out of range;
#X obj 428 66 v \$0-mtx-rows;
#N canvas 0 23 450 300 expr 0;
#X obj 104 35 inlet;
#X obj 234 35 inlet;
#X obj 161 85 > 0;
#X obj 104 61 t f f;
#X obj 104 113 &&;
#X obj 104 139 outlet;
#X obj 104 87 <=;
#X text 198 70 expr if(($f1<=$f2)&&($f1>0) \, 1 \, 0);
#X connect 0 0 3 0;
#X connect 1 0 6 1;
#X connect 2 0 4 1;
#X connect 3 0 6 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X restore 199 122 pd expr;
#X obj 245 262 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 2 0 9 0;
#X connect 2 1 8 0;
#X connect 2 2 6 1;
#X connect 3 0 9 1;
#X connect 4 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 3 0;
#X connect 9 0 4 0;
#X restore 652 151 pd checkrange;
#X obj 613 108 t f f;
#X text 519 334 togglenumber;
#N canvas 0 23 450 300 checkargs 0;
#X obj 43 9 inlet;
#X obj 74 61 list length;
#X obj 42 32 t l l;
#X obj 42 155 spigot;
#X msg 88 117 1;
#X msg 120 118 0;
#X obj 74 83 sel 4;
#X obj 42 226 outlet;
#X msg 119 143 rowcoloroffs message expects 4 args (row \, r \, g \,
b);
#X obj 120 165 print \$0-mtxgui;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 6 1 8 0;
#X connect 8 0 9 0;
#X restore 852 36 pd checkargs;
#X obj 852 63 unpack 0 0 0 0;
#X obj 610 361 pack 0 0 0 0;
#X floatatom 660 259 5 0 0 0 - - -;
#X obj 651 282 *;
#X obj 610 283 f;
#X floatatom 651 305 5 0 0 0 - - -;
#X obj 633 259 - 1;
#X obj 610 305 until;
#X obj 610 331 f;
#X obj 637 331 + 1;
#X obj 660 237 v \$0-mtx-cols;
#X obj 610 214 t b f b;
#X obj 610 387 s \$0-mtxgui_cellcoloroffs;
#X connect 0 0 5 0;
#X connect 1 0 18 0;
#X connect 2 0 1 1;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 5 0 6 0;
#X connect 6 0 3 0;
#X connect 6 1 8 1;
#X connect 6 2 8 2;
#X connect 6 3 8 3;
#X connect 8 0 7 0;
#X connect 9 0 11 1;
#X connect 9 0 10 1;
#X connect 10 0 12 0;
#X connect 11 0 14 0;
#X connect 12 0 15 1;
#X connect 13 0 10 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 15 0 8 0;
#X connect 16 0 15 1;
#X connect 17 0 9 0;
#X connect 18 0 11 0;
#X connect 18 1 13 0;
#X connect 18 2 17 0;
#X connect 19 0 24 0;
#X connect 20 0 36 0;
#X connect 21 0 20 1;
#X connect 22 0 20 0;
#X connect 22 1 21 0;
#X connect 24 0 25 0;
#X connect 25 0 22 0;
#X connect 25 1 26 1;
#X connect 25 2 26 2;
#X connect 25 3 26 3;
#X connect 26 0 37 0;
#X connect 27 0 29 1;
#X connect 27 0 28 1;
#X connect 28 0 30 0;
#X connect 29 0 32 0;
#X connect 30 0 33 1;
#X connect 31 0 28 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 33 0 26 0;
#X connect 34 0 33 1;
#X connect 35 0 27 0;
#X connect 36 0 29 0;
#X connect 36 1 31 0;
#X connect 36 2 35 0;
#X restore 439 485 pd rowcolors;
#X obj 20 508 r \$0-mtxgui_inlet;
#X obj 148 508 route matrixdumpcolrow matrixdumpcell;
#X obj 439 508 s \$0matrixdumpcolrow;
#X obj 587 508 s \$0matrixdumpcell;
#X obj 20 594 r \$0-mtxgui_inlet;
#X obj 148 594 route colormode;
#X obj 20 531 r \$0-mtxgui_inlet;
#X obj 148 531 route colordefault colorreset;
#X obj 464 540 s \$0-colordefaultreset;
#X obj 394 542 t b b;
#X obj 464 564 s \$0-mtxstepcolorreset;
#X obj 928 483 loadbang;
#X obj 935 505 r \$0-colordefaultreset;
#X msg 900 568 hsv;
#X obj 565 61 print;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 63 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 1 12 1;
#X connect 11 2 12 2;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 19 0 21 0;
#X connect 21 0 20 0;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 25 0 27 0;
#X connect 27 0 26 0;
#X connect 28 0 29 0;
#X connect 29 0 32 0;
#X connect 32 0 30 0;
#X connect 33 0 35 0;
#X connect 34 0 36 0;
#X connect 35 0 34 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 40 0 41 0;
#X connect 41 0 42 0;
#X connect 41 1 42 1;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 44 1 45 1;
#X connect 46 0 47 0;
#X connect 47 0 48 0;
#X connect 47 1 48 1;
#X connect 49 0 50 0;
#X connect 50 0 51 0;
#X connect 50 1 52 0;
#X connect 53 0 54 0;
#X connect 54 0 31 0;
#X connect 55 0 56 0;
#X connect 56 0 58 0;
#X connect 56 1 58 0;
#X connect 58 0 59 0;
#X connect 58 1 57 0;
#X connect 60 0 62 0;
#X connect 61 0 62 0;
#X connect 62 0 31 0;
#X restore 3719 2573 pd message_processing_mtxgui;
#N canvas 87 23 1353 855 message_processing_mtxstep 0;
#X obj 71 161 s \$0-sw;
#X obj 104 140 s \$0-ms;
#X obj 138 119 s \$0-sec;
#X obj 171 98 s \$0-bpm;
#X obj 205 77 s \$0-cps;
#X obj 238 56 s \$0-mode;
#X obj 250 672 s \$0-allrows_beatpat_set;
#X obj 63 694 s \$0-row_beatpat_set;
#X obj 63 649 route row col rows cols;
#X obj 250 694 s \$0-allcols_beatpat_set;
#X obj 101 673 s \$0-col_beatpat_set;
#X obj 69 514 route row col rows cols;
#X obj 108 537 s \$0-col_dirpat_set;
#X obj 69 559 s \$0-row_dirpat_set;
#X obj 256 537 s \$0-allrows_dirpat_set;
#X obj 256 559 s \$0-allcols_dirpat_set;
#X obj 71 33 route sw ms sec bpm cps mode float;
#X obj 71 10 r \$0-abs_inlet;
#X obj 69 468 r \$0-abs_inlet;
#X obj 63 605 r \$0-abs_inlet;
#X obj 71 371 route row col rows cols;
#X obj 71 327 r \$0-abs_inlet;
#X obj 71 416 s \$0-row_del_set;
#X obj 110 394 s \$0-col_del_set;
#X obj 258 394 s \$0-allrows_del_set;
#X obj 258 417 s \$0-allcols_del_set;
#X obj 71 231 route row col rows cols;
#X obj 71 187 r \$0-abs_inlet;
#X obj 110 254 s \$0-col_num_set;
#X obj 71 276 s \$0-row_num_set;
#X obj 258 254 s \$0-allrows_num_set;
#X obj 258 277 s \$0-allcols_num_set;
#X obj 71 209 route num phase;
#N canvas 0 23 556 713 color_setting 0;
#X obj 24 43 inlet;
#X obj 23 190 route float cell row col;
#X obj 146 234 list split 1;
#X obj 105 287 list split 1;
#X obj 64 339 list split 2;
#X obj 21 362 t b f;
#X obj 143 398 list trim;
#X msg 136 446 6 3 0 \$1;
#X msg 195 490 3 6 3 \$1;
#N canvas 0 23 1157 788 cell_setnewcvals 0;
#X floatatom 308 188 5 0 0 0 - - -;
#X text 348 191 idx;
#N canvas 0 23 450 300 rowcol2idx 0;
#X obj 91 26 inlet;
#X obj 91 70 - 1;
#X obj 133 92 v \$0-mtx-cols;
#X obj 91 136 +;
#X obj 119 136 - 1;
#X obj 91 92 t f b;
#X obj 91 114 *;
#X obj 91 158 outlet;
#X obj 91 48 unpack 0 0;
#X connect 0 0 8 0;
#X connect 1 0 5 0;
#X connect 2 0 6 1;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 6 0;
#X connect 5 1 2 0;
#X connect 6 0 3 0;
#X connect 8 0 1 0;
#X connect 8 1 4 0;
#X restore 308 166 pd rowcol2idx;
#X obj 484 323 array set;
#X obj 554 300 pack 0 \$0;
#X msg 554 325 symbol \$2-cval-\$1;
#X obj 458 223 until;
#X obj 458 246 f;
#X obj 488 246 + 1;
#X obj 423 199 t b b;
#X obj 485 300 f;
#X obj 495 269 t b f;
#X obj 468 57 inlet;
#X obj 261 56 inlet;
#X text 280 36 row/col;
#X obj 423 174 t b f;
#X text 684 57 numero de iterações \, pulo entre iteraçoes \, indice
de inicio \, hue;
#X obj 474 151 unpack 0 0 0 0;
#X msg 399 489 symbol \$2-cval-\$1;
#X obj 318 487 array get;
#X obj 398 464 pack 0 \$0;
#X obj 318 439 t b b f;
#X msg 347 463 1;
#X msg 318 463 18;
#X obj 318 511 * 6;
#X floatatom 217 492 5 0 0 0 - - -;
#X text 257 495 idx;
#X msg 286 564 symbol \$2-cval-\$1;
#X obj 215 564 array get;
#X obj 215 588 list split 3;
#X msg 57 670 cellcolorons;
#X msg 57 590 cellcoloroffs;
#X obj 141 692 list append;
#X text 29 669 ion;
#X obj 141 612 list append;
#X text 22 592 ioff;
#X obj 57 612 list append;
#X obj 57 692 list append;
#X obj 57 633 s \$0-colors;
#X obj 57 713 s \$0-colors;
#X obj 286 539 pack 0 \$0;
#X obj 216 539 f;
#X msg 245 540 6;
#X obj 217 516 t b b f;
#X text 349 513 0 6 12 -> idx de inicio de inativos \, ativos \, semiativos
;
#X obj 308 209 t f f f;
#X obj 262 131 t b l l b;
#X obj 537 198 f;
#X obj 423 224 f;
#X obj 458 269 +;
#X msg 500 222 0;
#X obj 468 125 t l b;
#X obj 587 61 inlet;
#X obj 458 293 +;
#X connect 0 0 45 0;
#X connect 2 0 0 0;
#X connect 4 0 5 0;
#X connect 5 0 3 2;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 49 0;
#X connect 8 0 7 1;
#X connect 9 0 48 0;
#X connect 9 1 47 0;
#X connect 10 0 3 0;
#X connect 11 0 10 0;
#X connect 11 1 3 1;
#X connect 12 0 51 0;
#X connect 13 0 46 0;
#X connect 15 0 9 0;
#X connect 15 1 4 0;
#X connect 17 0 48 1;
#X connect 17 1 8 1;
#X connect 17 2 47 0;
#X connect 17 3 10 1;
#X connect 18 0 19 2;
#X connect 19 0 24 0;
#X connect 20 0 18 0;
#X connect 21 0 23 0;
#X connect 21 1 22 0;
#X connect 21 2 20 0;
#X connect 22 0 19 1;
#X connect 23 0 19 0;
#X connect 24 0 41 1;
#X connect 25 0 43 0;
#X connect 27 0 28 2;
#X connect 28 0 29 0;
#X connect 29 0 34 1;
#X connect 29 1 32 1;
#X connect 30 0 37 0;
#X connect 31 0 36 0;
#X connect 32 0 37 1;
#X connect 34 0 36 1;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 40 0 27 0;
#X connect 41 0 28 0;
#X connect 42 0 28 1;
#X connect 43 0 41 0;
#X connect 43 1 42 0;
#X connect 43 2 40 0;
#X connect 45 0 25 0;
#X connect 45 1 21 0;
#X connect 45 2 15 0;
#X connect 46 0 31 0;
#X connect 46 0 30 0;
#X connect 46 1 34 0;
#X connect 46 1 32 0;
#X connect 46 2 2 0;
#X connect 46 3 50 0;
#X connect 47 0 49 1;
#X connect 48 0 6 0;
#X connect 49 0 53 0;
#X connect 50 0 7 1;
#X connect 51 0 17 0;
#X connect 51 1 50 0;
#X connect 52 0 53 1;
#X connect 53 0 11 0;
#X restore 71 660 pd cell_setnewcvals;
#X msg 162 468 3 6 0 \$1;
#X msg 228 513 1 3 0 \$1;
#X msg 259 536 1 3 3 \$1;
#X msg 289 558 2 6 6 \$1;
#X msg 320 580 2 6 9 \$1;
#N canvas 0 24 450 300 allcells 0;
#X obj 24 8 inlet;
#X obj 24 35 v \$0-mtx-rows;
#X obj 23 82 until;
#X obj 23 106 f;
#X obj 55 106 + 1;
#X msg 65 82 1;
#X obj 24 152 v \$0-mtx-cols;
#X obj 24 221 pack 0 0;
#X obj 23 58 t f b;
#X obj 24 175 until;
#X obj 24 199 f;
#X obj 56 199 + 1;
#X msg 66 175 1;
#X obj 24 128 t b f b;
#X msg 24 243 \$2 \$1;
#X obj 24 267 outlet;
#X connect 0 0 1 0;
#X connect 1 0 8 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 13 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 9 0;
#X connect 7 0 14 0;
#X connect 8 0 2 0;
#X connect 8 1 5 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 0 7 0;
#X connect 11 0 10 1;
#X connect 12 0 10 1;
#X connect 13 0 6 0;
#X connect 13 1 7 1;
#X connect 13 2 12 0;
#X connect 14 0 15 0;
#X restore 20 392 pd allcells;
#N canvas 0 24 450 300 allcells_in_row 0;
#X obj 24 8 inlet;
#X obj 24 152 v \$0-mtx-cols;
#X obj 24 221 pack 0 0;
#X obj 24 175 until;
#X obj 24 199 f;
#X obj 56 199 + 1;
#X msg 66 175 1;
#X obj 24 128 t b f b;
#X msg 24 243 \$2 \$1;
#X obj 24 267 outlet;
#X connect 0 0 7 0;
#X connect 1 0 3 0;
#X connect 2 0 8 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 2 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 7 0 1 0;
#X connect 7 1 2 1;
#X connect 7 2 6 0;
#X connect 8 0 9 0;
#X restore 104 313 pd allcells_in_row;
#N canvas 0 24 450 300 allcells_in_col 0;
#X obj 24 8 inlet;
#X obj 24 55 v \$0-mtx-rows;
#X obj 23 102 until;
#X obj 23 126 f;
#X obj 55 126 + 1;
#X msg 65 102 1;
#X obj 23 150 pack 0 0;
#X obj 23 78 t f b;
#X obj 23 174 outlet;
#X obj 24 30 t b f;
#X connect 0 0 9 0;
#X connect 1 0 7 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 6 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 8 0;
#X connect 7 0 2 0;
#X connect 7 1 5 0;
#X connect 9 0 1 0;
#X connect 9 1 6 1;
#X restore 146 259 pd allcells_in_col;
#X msg 55 145 0;
#X msg 126 144 1;
#X msg 196 145 2;
#X obj 23 123 t a b;
#X obj 94 123 t a b;
#X obj 164 123 t a b;
#X obj 188 212 t b a;
#X obj 136 422 route float off on ioff ion aoff aon i a;
#X msg 351 602 2 3 0 \$1;
#X msg 382 624 4 3 6 \$1;
#X obj 23 69 route hue h sat s val v hsv;
#N canvas 0 23 929 669 hsvmess 0;
#X obj 331 231 list length;
#X floatatom 365 253 5 0 0 0 - - -;
#X obj 366 274 - 3;
#X obj 236 237 list split;
#X obj 269 263 list trim;
#X obj 236 212 t a a;
#X obj 195 261 list trim;
#X obj 269 286 unpack 0 0 0;
#X obj 196 315 list append;
#X obj 283 315 list append;
#X obj 369 315 list append;
#X obj 195 285 t a a a;
#X obj 236 187 inlet;
#X obj 196 339 outlet;
#X obj 283 339 outlet;
#X obj 369 339 outlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 1;
#X connect 3 0 6 0;
#X connect 3 1 4 0;
#X connect 4 0 7 0;
#X connect 5 0 3 0;
#X connect 5 1 0 0;
#X connect 6 0 11 0;
#X connect 7 0 8 1;
#X connect 7 1 9 1;
#X connect 7 2 10 1;
#X connect 8 0 13 0;
#X connect 9 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 8 0;
#X connect 11 1 9 0;
#X connect 11 2 10 0;
#X connect 12 0 5 0;
#X restore 182 91 pd hsvmess;
#X obj 55 168 s \$0-setnewcvalsnum;
#X obj 212 660 r \$0-setnewcvalsnum;
#X connect 0 0 28 0;
#X connect 1 0 5 0;
#X connect 1 1 4 0;
#X connect 1 2 3 0;
#X connect 1 3 2 0;
#X connect 1 4 24 0;
#X connect 2 0 17 0;
#X connect 2 1 6 0;
#X connect 3 0 16 0;
#X connect 3 1 6 0;
#X connect 4 0 9 0;
#X connect 4 1 6 0;
#X connect 5 0 15 0;
#X connect 5 1 7 0;
#X connect 6 0 25 0;
#X connect 7 0 9 1;
#X connect 8 0 9 1;
#X connect 10 0 9 1;
#X connect 11 0 9 1;
#X connect 12 0 9 1;
#X connect 13 0 9 1;
#X connect 14 0 9 1;
#X connect 15 0 9 0;
#X connect 16 0 9 0;
#X connect 17 0 9 0;
#X connect 18 0 30 0;
#X connect 19 0 30 0;
#X connect 20 0 30 0;
#X connect 21 0 1 0;
#X connect 21 1 18 0;
#X connect 22 0 1 0;
#X connect 22 1 19 0;
#X connect 23 0 1 0;
#X connect 23 1 20 0;
#X connect 24 0 15 0;
#X connect 24 1 25 0;
#X connect 25 0 7 0;
#X connect 25 1 10 0;
#X connect 25 2 8 0;
#X connect 25 3 11 0;
#X connect 25 4 12 0;
#X connect 25 5 13 0;
#X connect 25 6 14 0;
#X connect 25 7 26 0;
#X connect 25 8 27 0;
#X connect 26 0 9 1;
#X connect 27 0 9 1;
#X connect 28 0 21 0;
#X connect 28 1 21 0;
#X connect 28 2 22 0;
#X connect 28 3 22 0;
#X connect 28 4 23 0;
#X connect 28 5 23 0;
#X connect 28 6 29 0;
#X connect 29 0 21 0;
#X connect 29 1 22 0;
#X connect 29 2 23 0;
#X connect 31 0 9 2;
#X restore 64 767 pd color_setting;
#X obj 64 745 route color;
#X obj 64 722 r \$0-abs_inlet;
#X obj 71 348 route del delay;
#X obj 808 836 s \$0-colorreset;
#X obj 881 814 s \$0-colormode;
#X msg 847 814 hsv;
#X obj 808 790 t b b;
#X obj 735 779 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 808 767 r \$0-mtxstepcolorreset;
#X obj 69 491 route dirpat steppat directionpattern steppattern;
#X obj 63 626 route beatpat beatpattern;
#X obj 421 231 route row col rows cols;
#X obj 421 187 r \$0-abs_inlet;
#X obj 421 209 route numnow phase;
#X obj 460 254 s \$0-col_numnow_set;
#X obj 421 276 s \$0-row_numnow_set;
#X obj 608 254 s \$0-allrows_numnow_set;
#X obj 608 277 s \$0-allcols_numnow_set;
#X connect 8 0 7 0;
#X connect 8 1 10 0;
#X connect 8 2 6 0;
#X connect 8 3 9 0;
#X connect 8 4 6 0;
#X connect 8 4 9 0;
#X connect 11 0 13 0;
#X connect 11 1 12 0;
#X connect 11 2 14 0;
#X connect 11 3 15 0;
#X connect 11 4 14 0;
#X connect 11 4 15 0;
#X connect 16 0 0 0;
#X connect 16 1 1 0;
#X connect 16 2 2 0;
#X connect 16 3 3 0;
#X connect 16 4 4 0;
#X connect 16 5 5 0;
#X connect 16 6 0 0;
#X connect 17 0 16 0;
#X connect 18 0 43 0;
#X connect 19 0 44 0;
#X connect 20 0 22 0;
#X connect 20 1 23 0;
#X connect 20 2 24 0;
#X connect 20 3 25 0;
#X connect 20 4 24 0;
#X connect 20 4 25 0;
#X connect 21 0 36 0;
#X connect 26 0 29 0;
#X connect 26 1 28 0;
#X connect 26 2 30 0;
#X connect 26 3 31 0;
#X connect 26 4 30 0;
#X connect 26 4 31 0;
#X connect 27 0 32 0;
#X connect 32 0 26 0;
#X connect 32 1 26 0;
#X connect 34 0 33 0;
#X connect 35 0 34 0;
#X connect 36 0 20 0;
#X connect 36 1 20 0;
#X connect 39 0 38 0;
#X connect 40 0 37 0;
#X connect 40 1 39 0;
#X connect 42 0 40 0;
#X connect 42 0 41 0;
#X connect 43 0 11 0;
#X connect 43 1 11 0;
#X connect 43 2 11 0;
#X connect 43 3 11 0;
#X connect 44 0 8 0;
#X connect 44 1 8 0;
#X connect 45 0 49 0;
#X connect 45 1 48 0;
#X connect 45 2 50 0;
#X connect 45 3 51 0;
#X connect 45 4 50 0;
#X connect 45 4 51 0;
#X connect 46 0 47 0;
#X connect 47 0 45 0;
#X connect 47 1 45 0;
#X restore 3719 2595 pd message_processing_mtxstep;
#X obj 3718 2918 r \$0-mtxstepout;
#X obj 3718 2897 s \$0-mtxstepout;
#N canvas 0 23 1440 573 mtxgui_mtxstep_outroutes 0;
#X obj 15 280 outlet;
#X obj 708 215 r \$0-mtxguiout1;
#X obj 65 63 r \$0-mtxguiout2;
#X obj 126 151 r \$0-mtxguiout4;
#X obj 218 195 r \$0-mtxguiout5;
#X obj 15 254 list trim;
#X obj 126 173 list prepend changed;
#X obj 218 217 list prepend mtx;
#X obj 96 106 r \$0-mtxguiout3;
#X obj 65 84 list prepend row;
#X obj 96 128 list prepend col;
#X obj 223 251 r \$0-mtxguiout6;
#X obj 457 171 r \$0-read;
#X obj 894 285 r \$0-noread;
#X msg 457 409 get \$1 \$2;
#X obj 457 437 s \$0-mtxgui_inlet;
#X obj 620 440 s \$0-mtxstepout;
#X obj 1418 101 r \$0-colors;
#X obj 1418 145 s \$0-mtxgui_inlet;
#X obj 1418 123 list trim;
#X obj 457 199 t l l l;
#X obj 708 239 t f f;
#X obj 708 283 spigot;
#X obj 761 284 unpack;
#X msg 789 360 0;
#X obj 754 240 != 0;
#N canvas 0 23 450 300 rowcol2idx 0;
#X obj 91 26 inlet;
#X obj 91 70 - 1;
#X obj 133 92 v \$0-mtx-cols;
#X obj 91 136 +;
#X obj 119 136 - 1;
#X obj 91 92 t f b;
#X obj 91 114 *;
#X obj 91 158 outlet;
#X obj 91 48 unpack 0 0;
#X connect 0 0 8 0;
#X connect 1 0 5 0;
#X connect 2 0 6 1;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 6 0;
#X connect 5 1 2 0;
#X connect 6 0 3 0;
#X connect 8 0 1 0;
#X connect 8 1 4 0;
#X restore 894 333 pd rowcol2idx;
#X msg 926 414 celloff \$1 \$2 0;
#X obj 894 309 t l l;
#X msg 894 393 idxoff \$1 0;
#N canvas 0 23 450 300 rowcol2idx 0;
#X obj 91 26 inlet;
#X obj 91 70 - 1;
#X obj 133 92 v \$0-mtx-cols;
#X obj 91 136 +;
#X obj 119 136 - 1;
#X obj 91 92 t f b;
#X obj 91 114 *;
#X obj 91 158 outlet;
#X obj 91 48 unpack 0 0;
#X connect 0 0 8 0;
#X connect 1 0 5 0;
#X connect 2 0 6 1;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 6 0;
#X connect 5 1 2 0;
#X connect 6 0 3 0;
#X connect 8 0 1 0;
#X connect 8 1 4 0;
#X restore 480 246 pd rowcol2idx;
#X msg 480 223 \$1 \$2;
#X msg 620 414 idxon \$2 \$1;
#X msg 708 414 cellon \$3 \$4 \$1;
#X obj 708 336 pack 0 0 0 0;
#X obj 708 360 t l l b;
#X obj 25 40 list prepend cell;
#X obj 25 19 r \$0-mtxguiout1;
#X connect 1 0 21 0;
#X connect 2 0 9 0;
#X connect 3 0 6 0;
#X connect 4 0 7 0;
#X connect 5 0 0 0;
#X connect 6 0 5 0;
#X connect 7 0 5 0;
#X connect 8 0 10 0;
#X connect 9 0 5 0;
#X connect 10 0 5 0;
#X connect 11 0 0 0;
#X connect 12 0 20 0;
#X connect 13 0 28 0;
#X connect 14 0 15 0;
#X connect 17 0 19 0;
#X connect 19 0 18 0;
#X connect 20 0 14 0;
#X connect 20 1 31 0;
#X connect 20 2 23 0;
#X connect 21 0 22 0;
#X connect 21 1 25 0;
#X connect 22 0 34 0;
#X connect 23 0 34 2;
#X connect 23 1 34 3;
#X connect 24 0 22 1;
#X connect 25 0 22 1;
#X connect 26 0 29 0;
#X connect 27 0 16 0;
#X connect 28 0 26 0;
#X connect 28 1 27 0;
#X connect 29 0 16 0;
#X connect 30 0 34 1;
#X connect 31 0 30 0;
#X connect 32 0 16 0;
#X connect 33 0 16 0;
#X connect 34 0 35 0;
#X connect 35 0 32 0;
#X connect 35 1 33 0;
#X connect 35 2 24 0;
#X connect 36 0 5 0;
#X connect 37 0 36 0;
#X restore 3719 2875 pd mtxgui_mtxstep_outroutes;
#X connect 0 0 9 0;
#X connect 0 0 14 0;
#X connect 15 0 13 0;
#X connect 18 0 8 0;
#X connect 20 0 19 0;
#X coords 0 -1 1 1 240 124 2 0 0;