#N canvas 863 421 559 421 10;
#X obj 174 83 phasor~ 300;
#N canvas 0 22 478 328 disarray_block 0;
#X obj 107 116 disarray~ 3000 0 4 1;
#X obj 107 59 inlet~;
#X obj 186 65 inlet;
#X obj 107 186 outlet~;
#X obj 295 170 print;
#X obj 188 206 block~ 256;
#X connect 0 0 3 0;
#X connect 0 1 4 0;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X restore 174 133 pd disarray_block;
#X obj 174 179 *~ 0.2;
#X obj 174 216 dac~;
#N canvas 673 80 659 338 messages 0;
#X obj 172 305 outlet;
#X obj 136 33 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X floatatom 304 138 5 0 0 0 - - -;
#X msg 304 163 topfreq \$1;
#X msg 184 130 switch_count \$1;
#X floatatom 184 104 5 0 0 0 - - -;
#X msg 415 201 showstate;
#X obj 421 277 fftease-system;
#X msg 184 81 40;
#X obj 184 54 loadbang;
#X msg 304 112 4000;
#X obj 304 88 loadbang;
#X text 344 137 top frequency to scramble;
#X text 222 73 number of bins to scramble;
#X text 418 182 report current scramble;
#X text 160 30 get new distribution;
#N canvas 887 617 454 304 data 0;
#X obj 8 226 outlet;
#X msg 8 104 35 89 192 56 132 187 141 82 51 87 156 43 103 37 80 122
107 1 109 209 81;
#X text 11 80 load your own data as a list;
#X text 62 139 use the data reported from "showstate" as a start;
#X connect 1 0 0 0;
#X restore 405 245 pd data;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 5 0 4 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X connect 8 0 5 0;
#X connect 9 0 8 0;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 16 0 0 0;
#X restore 288 90 pd messages;
#X msg 26 166 \; pd dsp \$1;
#X obj 26 143 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X text 286 75 open for controls:;
#X text 36 283 disarray~ reorders the weights of spectral components
below a specified top frequency.;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 3 1;
#X connect 4 0 1 1;
#X connect 6 0 5 0;