#N canvas 854 303 573 611 10;
#X declare -path ..;
#N canvas 0 22 450 300 (subpatch) 0;
#X array data2 100 float 2;
#X coords 0 1 99 -1 200 140 1 0 0;
#X restore 307 39 graph;
#X obj 313 223 loadbang;
#X msg 313 244 \; pd dsp 1;
#X text 212 458 writing to the shared memory;
#X obj 66 16 declare -path ..;
#X obj 118 130 f;
#X obj 118 151 + 1;
#X obj 118 169 % 100;
#X obj 118 191 / 100;
#X msg 84 223 100;
#X obj 84 243 until;
#X obj 84 265 f;
#X obj 113 266 + 1;
#X msg 169 203 0;
#X obj 67 110 t b b b b;
#X obj 103 316 f;
#X obj 84 286 t b f;
#X obj 103 337 tabwrite data2;
#X obj 67 352 f;
#X obj 67 372 + 1;
#X obj 82 393 % 25;
#X msg 109 459 memset \$1 data2;
#X obj 109 435 * 100;
#X obj 109 479 shmem 1004 2500;
#X obj 82 414 t f f;
#X msg 82 510 syncro \$1;
#X obj 67 72 loadbang;
#X obj 82 530 stdout;
#X obj 67 91 metro 5;
#X connect 1 0 2 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 5 1;
#X connect 8 0 15 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 0 16 0;
#X connect 12 0 11 1;
#X connect 13 0 11 1;
#X connect 14 0 18 0;
#X connect 14 1 9 0;
#X connect 14 2 13 0;
#X connect 14 3 5 0;
#X connect 15 0 17 0;
#X connect 16 0 15 0;
#X connect 16 1 17 1;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 20 0 18 1;
#X connect 20 0 24 0;
#X connect 21 0 23 0;
#X connect 22 0 21 0;
#X connect 24 0 25 0;
#X connect 24 1 22 0;
#X connect 25 0 27 0;
#X connect 26 0 28 0;
#X connect 28 0 14 0;