#N canvas 223 83 1021 639 12;
#X declare -path list-abs;
#X text 136 42 Simple markov chain;
#X obj 144 73 declare -path list-abs;
#X obj 141 761 hradio 32 1 0 3 empty \$0-state state 0 -8 1 10 -262144
-1 -1 1;
#X obj 91 355 clone mark.cl 4;
#X obj 90 264 f;
#X obj 153 179 r \$0-state;
#X obj 90 220 bng 24 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 153 219 spigot;
#X obj 59 147 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 174 315 all s bang;
#X floatatom 91 292 5 0 0 0 - - -;
#X msg 91 316 \$1 m bang;
#X obj 191 380 print list;
#X msg 272 315 all r 100;
#X msg 356 315 all l 4;
#X obj 127 492 hradio 15 1 0 4 empty empty empty 0 -8 0 10 -262144
-1 -1 1;
#X obj 60 182 metro 500;
#X obj 91 411 route 0 1 2 3;
#X obj 127 512 s \$0-state;
#X connect 3 0 17 0;
#X connect 3 1 12 0;
#X connect 4 0 10 0;
#X connect 5 0 7 0;
#X connect 6 0 4 0;
#X connect 7 0 4 1;
#X connect 8 0 7 1;
#X connect 8 0 16 0;
#X connect 9 0 3 0;
#X connect 10 0 11 0;
#X connect 11 0 3 0;
#X connect 13 0 3 0;
#X connect 14 0 3 0;
#X connect 15 0 18 0;
#X connect 16 0 4 0;
#X connect 17 0 15 0;
#X connect 17 1 15 0;
#X connect 17 2 15 0;
#X connect 17 3 15 0;
