#N canvas 917 531 911 475 10;
#X obj 18 -37 inlet~;
#X obj 82 -37 inlet;
#X text 82 -56 phase;
#X text 22 -56 freq;
#X obj 19 -4 phasor~;
#X obj 219 -37 inlet;
#X text 209 -56 duty (0-1);
#X obj 238 -15 loadbang;
#X msg 238 9 0.5;
#X obj 19 115 outlet~;
#X obj 18 64 expr~ (($v1 > (1 - $f2)) - 0.5)* 2;
#X obj 19 16 *~ -1;
#X obj 19 40 +~ 1;
#X connect 0 0 4 0;
#X connect 1 0 4 1;
#X connect 4 0 11 0;
#X connect 5 0 10 1;
#X connect 7 0 8 0;
#X connect 8 0 10 1;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 12 0 10 0;
