#N canvas 1260 267 450 611 10; #N canvas 0 0 450 300 (subpatch) 0; #X array array1 100 float 1 black black; #A 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; #X coords 0 100 99 0 200 140 1; #X restore 133 43 graph; #X msg 56 234 \; array1 const 0; #X obj 60 325 unpack f f; #X obj 102 411 -; #X obj 102 434 abs; #X obj 102 457 until; #X obj 72 497 f; #X obj 123 496 + 1; #X obj 72 520 t b f, f 11; #X obj 72 543 random 100; #X obj 72 566 tabwrite array1; #X msg 70 302 75 85; #X obj 60 371 t f f; #X text 90 19 array of size 100 \, with values ranging from 0 and 100 ; #X text 161 240 <- reset array; #X text 103 279 <- randomize indeces 10-40; #X text 113 302 <- randomize indeces 75-80; #X msg 60 279 10 40; #X obj 60 348 min; #X connect 2 0 18 0; #X connect 2 1 3 1; #X connect 2 1 18 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 6 0 8 0; #X connect 7 0 6 1; #X connect 8 0 9 0; #X connect 8 1 10 1; #X connect 9 0 10 0; #X connect 11 0 2 0; #X connect 12 0 3 0; #X connect 12 1 6 1; #X connect 17 0 2 0; #X connect 18 0 12 0;