#N canvas 432 246 737 444 10;
#X obj 114 109 until;
#X obj 116 84 t b b;
#X obj 116 147 f;
#X msg 160 85 0;
#X obj 179 137 + 1;
#X obj 115 63 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 118 180 t f f;
#X obj 115 38 inlet;
#X obj 232 214 pack 0 \$2;
#X obj 191 289 expr 1 + (($f1 % $f2) == 0);
#X obj 115 314 pack 0 \$3 0;
#X msg 115 337 \; add-rect \$1 \$2 \$3 10;
#X obj 117 216 pack 0 \$1 \$2;
#X obj 294 43 loadbang;
#X obj 295 67 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 179 164 sel;
#X floatatom 295 117 5 0 0 0 - - -;
#X obj 296 89 expr \$1 * \$2 + 1;
#X obj 117 259 expr 40 + 100 * $f1/$f2;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 1 1 3 0;
#X connect 2 0 4 0;
#X connect 2 0 6 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 4 0 15 0;
#X connect 5 0 1 0;
#X connect 6 0 12 0;
#X connect 6 1 8 0;
#X connect 7 0 5 0;
#X connect 8 0 9 0;
#X connect 9 0 10 2;
#X connect 10 0 11 0;
#X connect 12 0 18 0;
#X connect 13 0 14 0;
#X connect 14 0 17 0;
#X connect 15 0 0 1;
#X connect 17 0 15 1;
#X connect 17 0 16 0;
#X connect 18 0 10 0;