#N canvas 217 267 510 303 10;
#X floatatom 185 122 8 0 0 0 - - -;
#X obj 185 92 / 127;
#X obj 188 19 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X text 191 3 L < < < M > > > R;
#X text 322 21 Pan value;
#X obj 117 73 inlet~;
#X obj 67 205 outlet~ L;
#X obj 192 207 outlet~ R;
#N canvas 0 22 450 300 pan 0;
#X text 190 183 * ~M_PI/2;
#X obj 117 175 * 1.5708;
#X obj 117 60 inlet;
#X obj 38 62 inlet~;
#X obj 39 351 outlet~;
#X obj 130 355 outlet~;
#X obj 58 207 cos;
#X obj 147 209 sin;
#X msg 168 132 0.5;
#X obj 201 133 f \$1;
#N canvas 0 22 715 450 check-arg 0;
#X obj 179 184 makefilename $%d-EMPTY;
#X obj 52 185 symbol \$1-EMPTY;
#X msg 69 156 bang;
#X obj 52 217 select DUMMY;
#X obj 52 39 loadbang;
#X obj 52 62 t b b;
#X obj 179 157 1;
#X obj 52 294 outlet;
#X text 182 85 Using an idiom by IOhannes;
#X msg 133 250 1;
#X msg 52 246 0;
#X text 182 247 Output 0 if no \$1 argument present \, and 1 if \$1
is present even if it's 0!;
#X connect 0 0 3 1;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 10 0;
#X connect 3 1 9 0;
#X connect 4 0 5 0;
#X connect 5 0 1 0;
#X connect 5 1 6 0;
#X connect 6 0 0 0;
#X connect 9 0 7 0;
#X connect 10 0 7 0;
#X restore 168 59 pd check-arg;
#X obj 168 85 select 0 1;
#X obj 130 324 *~;
#X obj 39 320 *~;
#X obj 147 293 line~;
#X obj 147 267 pack 0 10;
#X obj 58 296 line~;
#X obj 58 270 pack 0 10;
#N canvas 228 198 627 317 LICENSE-BSD 0;
#X text 121 56 This software is copyrighted by Miller Puckette \, Reality
Jockey Ltd. and others. The terms (the "Standard Improved BSD License")
apply to all files associated with the software unless explicitly disclaimed
in individual files.;
#X text 123 148 See the file LICENSE.txt for the full license text.
;
#X restore 403 50 pd LICENSE-BSD;
#X connect 1 0 6 0;
#X connect 1 0 7 0;
#X connect 2 0 1 0;
#X connect 3 0 12 0;
#X connect 3 0 13 0;
#X connect 6 0 17 0;
#X connect 7 0 15 0;
#X connect 8 0 1 0;
#X connect 9 0 1 0;
#X connect 10 0 11 0;
#X connect 11 0 8 0;
#X connect 11 1 9 0;
#X connect 12 0 5 0;
#X connect 13 0 4 0;
#X connect 14 0 12 1;
#X connect 15 0 14 0;
#X connect 16 0 13 1;
#X connect 17 0 16 0;
#X restore 135 157 pd pan;
#X obj 276 65 float \$1;
#X obj 279 44 inlet;
#X obj 362 44 loadbang;
#X connect 0 0 8 1;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 5 0 8 0;
#X connect 8 0 6 0;
#X connect 8 1 7 0;
#X connect 9 0 1 0;
#X connect 10 0 9 0;
#X connect 11 0 9 0;
