#N canvas 319 311 450 300 10;
#X floatatom 26 113 5 0 0 0 - - -;
#X floatatom 337 111 5 0 0 0 - - -;
#X obj 158 177 pack 0 0 0 0;
#X obj 252 149 t b f;
#X floatatom 242 112 5 0 0 0 - - -;
#X obj 212 148 t b f;
#X floatatom 142 113 5 0 0 0 - - -;
#X obj 169 146 t b f;
#X obj 207 82 unpack 0 0 0 0;
#X obj 129 51 bng 15 250 50 0 empty empty set 0 -6 0 8 -262144 -1 -1
;
#X msg 41 174 set memento;
#X obj 49 41 inlet;
#X obj 48 73 select restore;
#X msg 163 265 substate \$1;
#X obj 102 229 hradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
-1 0;
#X obj 134 244 t b a;
#X symbolatom 250 182 10 0 0 0 - - -;
#X obj 330 181 commun name \$0;
#X obj 142 206 commun list1 \$0;
#X obj 39 266 originator \$1 \$0;
#X obj 332 208 symbol;
#X obj 232 53 bng 15 250 50 0 empty empty copy 0 -6 0 8 -262144 -1
-1;
#X obj 352 54 bng 15 250 50 0 empty empty paste 0 -6 0 8 -262144 -1
-1;
#X msg 272 61 copy;
#X msg 393 71 paste;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 18 0;
#X connect 3 0 2 0;
#X connect 3 1 2 3;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X connect 5 1 2 2;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X connect 7 1 2 1;
#X connect 8 0 0 0;
#X connect 8 1 6 0;
#X connect 8 2 4 0;
#X connect 8 3 1 0;
#X connect 9 0 10 0;
#X connect 10 0 19 0;
#X connect 11 0 12 0;
#X connect 12 0 9 0;
#X connect 13 0 19 0;
#X connect 14 0 15 0;
#X connect 15 0 9 0;
#X connect 15 1 13 0;
#X connect 16 0 17 0;
#X connect 17 0 20 0;
#X connect 18 0 8 0;
#X connect 20 0 16 0;
#X connect 21 0 23 0;
#X connect 22 0 24 0;
#X connect 23 0 19 0;
#X connect 24 0 19 0;
#X coords 0 0 1 1 200 140 1;