#N canvas 1262 320 509 382 12;
#X obj 27 16 inlet step;
#X obj 131 16 inlet steps;
#X obj 239 18 inlet centre;
#X obj 357 20 inlet range;
#X floatatom 226 132 5 0 0 0 - - -;
#X obj 26 164 mod;
#X obj 26 323 outlet;
#X floatatom 26 228 5 0 0 0 - - -;
#X obj 26 259 * 1;
#X obj 226 56 loadbang;
#X obj 26 291 + 0;
#X obj 226 81 f \$1;
#X obj 98 256 f \$2;
#X obj 138 218 loadbang;
#X obj 254 178 f \$3;
#X obj 254 215 expr if ($f1 == 0 \, 1 \, $f1);
#X text 136 42 Integer;
#X text 39 43 Integer;
#X text 247 37 Float;
#X text 363 42 Float;
#X obj 39 77 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 26 196 expr cos($f1 * 6.2918 / $f2);
#X obj 227 106 expr if($f1 == 0 \, 16 \, $f1);
#X connect 0 0 5 0;
#X connect 0 0 20 0;
#X connect 1 0 4 0;
#X connect 2 0 10 1;
#X connect 3 0 8 1;
#X connect 4 0 5 1;
#X connect 4 0 21 1;
#X connect 5 0 21 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 6 0;
#X connect 11 0 22 0;
#X connect 12 0 10 1;
#X connect 13 0 12 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 8 1;
#X connect 21 0 7 0;
#X connect 22 0 4 0;
