#N canvas 398 352 418 256 10;
#X obj 21 65 inlet;
#X obj 21 233 outlet;
#X obj 21 85 # +;
#X obj 78 199 # *;
#X obj 190 108 float \$1;
#X obj 190 88 loadbang;
#X obj 156 64 inlet;
#X text 20 7 new = (x-1)/x of old input + 1/x of new input;
#X obj 173 180 # - 1;
#X text 198 65 select fade rate;
#X text 61 65 input;
#X text 70 236 output;
#X obj 21 106 # +;
#X obj 127 169 # / 2;
#X obj 156 86 t a;
#X text 19 21 now rounds to closest;
#X obj 21 127 # *>>8;
#X obj 70 128 # inv* 256;
#X obj 21 213 t a a;
#X text 19 34 also faster (uses *>>8 instead of /);
#X connect 0 0 2 0;
#X connect 2 0 12 0;
#X connect 3 0 2 1;
#X connect 4 0 14 0;
#X connect 5 0 4 0;
#X connect 6 0 14 0;
#X connect 8 0 3 1;
#X connect 12 0 16 0;
#X connect 13 0 12 1;
#X connect 14 0 13 0;
#X connect 14 0 8 0;
#X connect 14 0 17 0;
#X connect 16 0 18 0;
#X connect 17 0 16 1;
#X connect 18 0 1 0;
#X connect 18 1 3 0;