#N canvas -11 -11 1920 970 12;
#X obj 49 68 inlet~;
#X obj 428 233 *~;
#X obj 635 236 *~;
#X obj 625 76 inlet~;
#X obj 625 144 clip~ 0 1;
#X obj 446 195 expr~ 0.5-0.5*pow($v1 \, 2);
#X obj 653 198 expr~ 1-0.5*pow(1-$v1 \, 2);
#X obj 501 76 inlet~;
#X obj 29 231 *~;
#X obj 236 234 *~;
#X obj 254 196 expr~ 0.5-0.5*pow($v1 \, 2);
#X obj 47 193 expr~ 1-0.5*pow(1-$v1 \, 2);
#X obj 241 332 +~;
#X obj 421 336 +~;
#X obj 241 376 outlet~;
#X obj 421 376 outlet~;
#X obj 625 18 loadbang;
#X obj 625 47 f \$1;
#X text 47 46 audio left;
#X text 501 55 audio right;
#X text 665 46 <-argument 1;
#X text 676 74 <-width;
#X text 26 435 Eito Murakami - EM_width~ (05/22/21);
#X text 22 460 (A stereo width reducer using equal power panning);
#X obj 625 110 lop~ 100;
#X connect 0 0 8 0;
#X connect 0 0 9 0;
#X connect 1 0 12 1;
#X connect 2 0 13 1;
#X connect 3 0 24 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 4 0 10 0;
#X connect 4 0 11 0;
#X connect 5 0 1 1;
#X connect 6 0 2 1;
#X connect 7 0 2 0;
#X connect 7 0 1 0;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 10 0 9 1;
#X connect 11 0 8 1;
#X connect 12 0 14 0;
#X connect 13 0 15 0;
#X connect 16 0 17 0;
#X connect 17 0 3 0;
#X connect 24 0 4 0;
