pp.fft-profile~.pd

#N canvas 557 238 916 592 10;
#X obj 587 96 inlet;
#N canvas 639 332 1009 532 stuff 0;
#X obj 113 151 s \$0-visbngr;
#X obj 95 46 r \$0-visbng;
#X msg 93 123 color 0 0;
#X msg 177 123 color 10 10;
#X obj 95 68 t b;
#X obj 175 98 del 250;
#X obj 59 206 s pd-\$0-fft-profile;
#N canvas 89 132 345 180 isvisible 0;
#X obj 48 43 loadbang;
#X obj 48 85 metro 300;
#X obj 48 65 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 48 108 s \$0-isvisible-check;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X restore 195 46 pd isvisible;
#X obj 337 65 r \$0-mode;
#X obj 337 88 sel 0 1 2;
#X obj 337 179 s \$0-modelabel;
#X msg 413 134 label learn;
#X msg 337 136 label slew;
#X msg 501 134 label freeze;
#X obj 656 40 r \$0-window-size;
#X obj 656 148 s \$0-fft-profile-gui;
#X msg 656 123 vis 0 \, vis 1 \, vis 0;
#X obj 656 97 del 0;
#X obj 656 63 t b;
#X msg 59 182 relocate 330x260+1+1 1x1+50+60 \, vis 1;
#X obj 353 228 r \$0-restoretgl;
#X obj 353 370 s \$0-restoretglr;
#X obj 353 251 sel 0 1 2;
#X msg 370 306 label Restore-mode\ 1;
#X msg 387 334 label Restore-mode\ 2;
#X obj 623 198 r \$0-restoretgl;
#X obj 623 280 sel 0 1;
#X obj 623 227 != 0;
#X obj 615 363 s \$0-lockr;
#X msg 719 319 color 0 22 22;
#X obj 615 407 s \$0-restorer;
#X obj 615 430 s \$0-restoreguir;
#X obj 615 451 s \$0-trebler;
#X obj 615 473 s \$0-trebleguir;
#X msg 615 319 color 10 11 22;
#X obj 615 384 s \$0-lockguir;
#X msg 353 278 label Restore-mode\ 0/Off;
#X obj 623 250 change;
#X connect 1 0 4 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 2 0;
#X connect 4 0 5 0;
#X connect 4 0 19 0;
#X connect 5 0 3 0;
#X connect 8 0 9 0;
#X connect 9 0 12 0;
#X connect 9 1 11 0;
#X connect 9 2 13 0;
#X connect 11 0 10 0;
#X connect 12 0 10 0;
#X connect 13 0 10 0;
#X connect 14 0 18 0;
#X connect 16 0 15 0;
#X connect 17 0 16 0;
#X connect 18 0 17 0;
#X connect 19 0 6 0;
#X connect 20 0 22 0;
#X connect 22 0 36 0;
#X connect 22 1 23 0;
#X connect 22 2 24 0;
#X connect 23 0 21 0;
#X connect 24 0 21 0;
#X connect 25 0 27 0;
#X connect 26 0 34 0;
#X connect 26 1 29 0;
#X connect 27 0 37 0;
#X connect 29 0 28 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 29 0 32 0;
#X connect 29 0 33 0;
#X connect 29 0 35 0;
#X connect 34 0 28 0;
#X connect 34 0 30 0;
#X connect 34 0 31 0;
#X connect 34 0 32 0;
#X connect 34 0 33 0;
#X connect 34 0 35 0;
#X connect 36 0 21 0;
#X connect 37 0 26 0;
#X restore 590 240 pd stuff;
#X obj 103 115 hsl 175 15 0 127 0 0 \$0-visbng \$0-visbngr empty 50 8 2 10 #e0e0e0 #e0e0e0 #000000 0 1;
#X obj 590 418 outlet;
#N canvas 1119 244 649 304 in 0;
#X obj 122 18 inlet;
#X obj 121 192 s \$0-window-size;
#X obj 152 236 s \$0-overlap;
#X obj 121 145 change;
#X obj 152 216 change;
#N canvas 3 57 617 375 blocksize 0;
#X obj 184 76 t f f;
#X obj 184 212 spigot;
#X text 249 141 prevent setting blocksizes that are not a power of 2;
#X msg 244 244 blocksize is not a power of 2;
#X obj 184 294 outlet;
#X obj 244 222 sel 0;
#X obj 184 54 inlet;
#X obj 244 265 print pp.fft-gate~;
#X obj 217 122 expr (($f1-1) & $f1) == 0;
#X connect 0 0 1 0;
#X connect 0 1 8 0;
#X connect 1 0 4 0;
#X connect 3 0 7 0;
#X connect 5 0 3 0;
#X connect 6 0 0 0;
#X connect 8 0 1 1;
#X connect 8 0 5 0;
#X restore 120 171 pd blocksize;
#N canvas 698 546 200 251 route 0;
#X obj 20 20 inlet;
#X obj 30 60 route save recall;
#X obj 30 85 route float;
#X obj 97 111 route float;
#X obj 30 136 s \$0-save;
#X obj 30 108 i;
#X obj 98 133 i;
#X obj 98 161 s \$0-recall;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 5 0;
#X connect 3 0 6 0;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X restore 141 58 pd route save-recall;
#N canvas 362 125 450 479 recall 0;
#X obj 49 145 outlet;
#N canvas 3 54 450 600 listsplit 0;
#X obj 158 23 inlet;
#X obj 220 87 list length;
#X obj 220 113 until;
#X obj 182 150 f;
#X obj 278 150 + 1;
#X msg 265 111 0;
#X obj 182 226 list store;
#X msg 182 202 get \$1 1;
#X obj 154 367 list split;
#X obj 222 342 f;
#X obj 154 334 list;
#X obj 98 124 list;
#X obj 182 389 list split 1;
#X obj 154 274 t bang bang bang;
#X obj 182 179 t f f;
#X obj 158 48 t l l l b;
#X obj 154 473 outlet;
#X obj 154 440 list trim;
#X obj 163 248 sel |;
#X text 275 197 hacky split list at "|";
#X connect 0 0 15 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 14 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 18 0;
#X connect 7 0 6 0;
#X connect 8 0 17 0;
#X connect 8 1 12 0;
#X connect 9 0 8 1;
#X connect 10 0 8 0;
#X connect 11 0 15 0;
#X connect 12 1 11 0;
#X connect 13 0 10 0;
#X connect 13 1 9 0;
#X connect 13 2 2 1;
#X connect 14 0 7 0;
#X connect 14 1 9 1;
#X connect 15 0 1 0;
#X connect 15 1 10 1;
#X connect 15 2 6 1;
#X connect 15 3 5 0;
#X connect 17 0 16 0;
#X connect 18 0 13 0;
#X restore 49 117 pd listsplit;
#X obj 49 24 r \$0-recall;
#X obj 49 54 pipe 1;
#X obj 221 409 text fromlist \$0-savestates;
#X obj 49 77 text get \$0-savestates;
#X msg 253 246 21;
#X obj 253 269 until;
#X obj 253 292 f;
#X obj 300 295 + 1;
#X obj 253 315 t b f;
#X obj 253 367 text set \$0-savestates;
#X obj 221 114 text tolist \$0-savestates;
#X msg 253 342 list empty_slot;
#X obj 221 160 t a b;
#X obj 151 166 loadbang;
#X obj 221 137 savestate;
#X obj 221 33 text define \$0-savestates;
#X obj 151 189 del 0;
#X msg 298 199 0;
#X obj 253 220 spigot 1;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 10 0 13 0;
#X connect 10 1 11 1;
#X connect 12 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 4 0;
#X connect 14 1 19 0;
#X connect 15 0 18 0;
#X connect 16 0 14 0;
#X connect 16 1 12 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 6 0;
#X restore 207 80 pd recall;
#X obj 184 145 s \$0-maskingr;
#X obj 215 170 s \$0-slew-attacr;
#X obj 248 193 s \$0-slew-decayr;
#X obj 280 218 s \$0-expandr;
#X obj 376 173 s \$0-moder;
#X obj 314 148 s \$0-restorer;
#X obj 365 194 s \$0-restoretglr;
#X obj 420 144 s \$0-trebler;
#X obj 472 175 s \$0-lockr;
#X obj 121 107 route blocksize overlap masking learn forget expand restore restore-mode masking-mode treble lock;
#X connect 0 0 6 0;
#X connect 0 0 17 0;
#X connect 3 0 5 0;
#X connect 4 0 2 0;
#X connect 5 0 1 0;
#X connect 7 0 17 0;
#X connect 17 0 3 0;
#X connect 17 1 4 0;
#X connect 17 2 8 0;
#X connect 17 3 9 0;
#X connect 17 4 10 0;
#X connect 17 5 11 0;
#X connect 17 6 13 0;
#X connect 17 7 14 0;
#X connect 17 8 12 0;
#X connect 17 9 15 0;
#X connect 17 10 16 0;
#X restore 587 117 pd in;
#N canvas 128 299 1074 543 outlet-message 0;
#N canvas 105 314 986 300 bang_once....................................... 0;
#X obj 174 87 t b f;
#X obj 132 87 t b f;
#X obj 89 139 del 0;
#X obj 89 87 t b f;
#X obj 217 87 t b f;
#X obj 261 87 t b f;
#X obj 303 87 t b f;
#X obj 89 41 inlet;
#X obj 132 40 inlet;
#X obj 174 40 inlet;
#X obj 217 40 inlet;
#X obj 261 41 inlet;
#X obj 303 42 inlet;
#X obj 89 247 outlet;
#X obj 89 173 f;
#X obj 351 87 t b f;
#X obj 351 43 inlet;
#X obj 394 89 t b f;
#X obj 394 43 inlet;
#X obj 442 89 t b f;
#X obj 442 44 inlet;
#X obj 89 203 pack 0 0 0 0 0 0 0 0 0 0 0;
#X obj 485 88 t b f;
#X obj 485 42 inlet;
#X obj 533 88 t b f;
#X obj 533 43 inlet;
#X connect 0 0 2 0;
#X connect 0 1 21 2;
#X connect 1 0 2 0;
#X connect 1 1 21 1;
#X connect 2 0 14 0;
#X connect 3 0 2 0;
#X connect 3 1 14 1;
#X connect 4 0 2 0;
#X connect 4 1 21 3;
#X connect 5 0 2 0;
#X connect 5 1 21 4;
#X connect 6 0 2 0;
#X connect 6 1 21 5;
#X connect 7 0 3 0;
#X connect 8 0 1 0;
#X connect 9 0 0 0;
#X connect 10 0 4 0;
#X connect 11 0 5 0;
#X connect 12 0 6 0;
#X connect 14 0 21 0;
#X connect 15 0 2 0;
#X connect 15 1 21 6;
#X connect 16 0 15 0;
#X connect 17 0 2 0;
#X connect 17 1 21 7;
#X connect 18 0 17 0;
#X connect 19 0 2 0;
#X connect 19 1 21 8;
#X connect 20 0 19 0;
#X connect 21 0 13 0;
#X connect 22 0 2 0;
#X connect 22 1 21 9;
#X connect 23 0 22 0;
#X connect 24 0 2 0;
#X connect 24 1 21 10;
#X connect 25 0 24 0;
#X restore 251 205 pd bang_once.......................................;
#X obj 307 430 list trim;
#X msg 227 428 addcomma;
#X msg 163 435 set;
#X obj 307 407 list prepend add2;
#X obj 307 515 outlet;
#X obj 251 42 r \$0-window-size;
#X obj 288 66 r \$0-overlap;
#X obj 251 240 t b a b;
#X obj 288 358 t b a a;
#N canvas 497 319 297 264 save 0;
#X obj 48 16 inlet;
#N canvas 690 259 481 384 collect 0;
#X obj 47 60 inlet;
#X obj 47 274 outlet;
#X obj 98 180 list;
#X obj 166 181 t l;
#X obj 47 225 list;
#X obj 98 139 list append |;
#X obj 47 126 del 0;
#X obj 47 82 t b a;
#X text 119 75 hacky thing... replaycing " \, " with "|";
#X connect 0 0 7 0;
#X connect 2 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 2 1;
#X connect 4 0 1 0;
#X connect 5 0 2 0;
#X connect 6 0 2 1;
#X connect 6 0 4 0;
#X connect 7 0 6 0;
#X connect 7 1 5 0;
#X restore 48 38 pd collect;
#X obj 117 16 r \$0-save;
#X obj 27 130 text set \$0-savestates;
#X obj 27 104 list;
#X obj 117 62 t b f;
#X obj 117 39 clip 0 20;
#X connect 0 0 1 0;
#X connect 1 0 4 1;
#X connect 2 0 6 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 5 1 3 1;
#X connect 6 0 5 0;
#X restore 327 382 pd save;
#X obj 326 90 r \$0-masking;
#X obj 364 115 r \$0-slew-attac;
#X obj 402 140 r \$0-slew-decay;
#X obj 440 164 r \$0-expand;
#X obj 524 110 r \$0-mode;
#X obj 474 56 r \$0-restore;
#X obj 512 83 r \$0-restoretgl;
#X obj 544 136 r \$0-treble;
#X obj 562 167 r \$0-lock;
#X msg 288 291 blocksize \$1 \, overlap \$2 \, masking \$3 \, learn \$4 \, forget \$5 \, expand \$6 \, restore \$7 \, restore-mode \$8 \, masking-mode \$9 \, treble \$10 \, lock \$11;
#X connect 0 0 8 0;
#X connect 1 0 5 0;
#X connect 2 0 5 0;
#X connect 3 0 5 0;
#X connect 4 0 1 0;
#X connect 6 0 0 0;
#X connect 7 0 0 1;
#X connect 8 0 5 0;
#X connect 8 1 20 0;
#X connect 8 2 3 0;
#X connect 9 0 2 0;
#X connect 9 1 4 0;
#X connect 9 2 10 0;
#X connect 11 0 0 2;
#X connect 12 0 0 3;
#X connect 13 0 0 4;
#X connect 14 0 0 5;
#X connect 15 0 0 8;
#X connect 16 0 0 6;
#X connect 17 0 0 7;
#X connect 18 0 0 9;
#X connect 19 0 0 10;
#X connect 20 0 9 0;
#X restore 590 394 pd outlet-message;
#N canvas 50 60 330 260 \$0-fft-profile 1;
#N canvas 355 217 1407 760 mask 0;
#X obj 100 100 cnv 15 319 249 empty empty empty 20 12 0 14 #fcfcfc #404040 0;
#X obj 210 268 nbx 5 12 0 200 0 0 \$0-masking \$0-maskingr empty 41 8 2 10 #fcfcfc #000000 #000000 0 256;
#X obj 356 268 nbx 5 12 0 1e+37 0 0 \$0-expand \$0-expandr empty 41 8 2 10 #fcfcfc #000000 #000000 0 256;
#X obj 210 140 nbx 5 12 0 2 0 0 \$0-slew-attac \$0-slew-attacr empty 41 8 2 10 #fcfcfc #000000 #000000 0 256;
#X obj 122 268 hsl 80 12 0 1 0 0 \$0-maskgui \$0-maskguir Masking -2 -6 2 10 #fcfcfc #000000 #000000 0 1;
#X obj 269 268 hsl 80 12 0 100 0 0 \$0-expgui \$0-expguir Expand -2 -6 2 10 #fcfcfc #000000 #000000 0 1;
#X obj 123 140 hsl 80 12 0 1 0 0 \$0-atgui \$0-atguir Learn -2 -6 2 10 #fcfcfc #000000 #000000 0 1;
#X obj 359 123 cnv 10 10 10 empty \$0-modelabel slew 0 5 2 10 #fcfcfc #000000 0;
#X obj 158 118 cnv 10 10 10 empty empty fft-profile~ 0 5 2 14 #fcfcfc #9c9c9c 0;
#N canvas 0 0 450 300 map 0;
#X obj 103 36 inlet;
#X obj 103 124 outlet;
#X obj 102 59 pow 0.25;
#X obj 103 82 * 110;
#X obj 213 33 inlet;
#X obj 213 56 / 110;
#X obj 213 79 pow 4;
#X obj 213 133 outlet;
#X msg 213 106 set \$1;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 43 262 pd map;
#N canvas 734 369 263 260 map 0;
#X obj 46 50 inlet;
#X obj 46 134 outlet;
#X obj 121 52 inlet;
#X obj 121 134 outlet;
#X msg 121 108 set \$1;
#X obj 46 102 pow 2;
#X obj 121 77 pow 0.5;
#X connect 0 0 5 0;
#X connect 2 0 6 0;
#X connect 4 0 3 0;
#X connect 5 0 1 0;
#X connect 6 0 4 0;
#X restore 49 132 pd map;
#X obj 355 141 nbx 5 12 0 2 0 0 \$0-slew-decay \$0-slew-decayr empty 41 8 2 10 #fcfcfc #000000 #000000 0 256;
#X obj 269 141 hsl 80 12 0 1 0 0 \$0-dcgui \$0-dcguir Forget -2 -6 2 10 #fcfcfc #000000 #000000 0 1;
#N canvas 734 369 263 311 map 0;
#X obj 46 50 inlet;
#X obj 46 134 outlet;
#X obj 121 52 inlet;
#X obj 121 134 outlet;
#X msg 121 108 set \$1;
#X obj 46 82 pow 2;
#X obj 121 77 pow 0.5;
#X connect 0 0 5 0;
#X connect 2 0 6 0;
#X connect 4 0 3 0;
#X connect 5 0 1 0;
#X connect 6 0 4 0;
#X restore 427 133 pd map;
#N canvas 779 492 450 300 map 0;
#X obj 138 14 inlet;
#X obj 138 157 outlet;
#X obj 282 21 inlet;
#X obj 282 155 outlet;
#X msg 282 120 set \$1;
#X obj 138 44 / 100;
#X obj 138 90 * 100;
#X obj 138 67 pow 6;
#X obj 282 74 pow 0.166667;
#X obj 282 51 / 100;
#X obj 282 97 * 100;
#X connect 0 0 5 0;
#X connect 2 0 9 0;
#X connect 4 0 3 0;
#X connect 5 0 7 0;
#X connect 6 0 1 0;
#X connect 7 0 6 0;
#X connect 8 0 10 0;
#X connect 9 0 8 0;
#X connect 10 0 4 0;
#X restore 429 263 pd map;
#X msg 578 235 color \$1;
#X obj 578 258 s \$0-spectrum;
#X floatatom 578 213 5 0 0 0 - - - 0;
#X obj 672 185 loadbang;
#X msg 672 208 color 8;
#X obj 121 170 cnv 10 280 80 empty empty empty 0 5 2 10 #dfdfdf #000000 0;
#X obj 315 120 hradio 12 1 0 3 \$0-mode \$0-moder Mode 0 -6 2 10 #fcfcfc #000000 #000000 0;
#X msg 593 85 isvisible;
#X obj 593 108 pdcontrol;
#X obj 593 131 s \$0-isvisible;
#X obj 593 63 r \$0-isvisible-check;
#X obj 96 440 namecanvas \$0-fft-profile-gui;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-spectrum 512 float 0;
#X coords 0 1 511 0 280 80 2 0 0;
#X restore 120 170 graph;
#X obj 120 154 cnv 14 100 14 \$0-mask-canvas \$0-mask-canvasr Mask 0 8 2 10 #fcfcfc #000000 0;
#X obj 356 296 nbx 5 12 0 1e+37 0 0 \$0-restore \$0-restorer empty 41 8 2 10 #e0e0e0 #7c7c7c #000000 0 256;
#X obj 269 296 hsl 80 12 0 100 0 0 \$0-restoregui \$0-restoreguir Restore -2 -6 2 10 #e0e0e0 #7c7c7c #000000 0 1;
#N canvas 779 492 450 300 map 0;
#X obj 138 14 inlet;
#X obj 138 157 outlet;
#X obj 282 21 inlet;
#X obj 282 155 outlet;
#X msg 282 120 set \$1;
#X obj 138 44 / 100;
#X obj 138 90 * 100;
#X obj 138 67 pow 6;
#X obj 282 74 pow 0.166667;
#X obj 282 51 / 100;
#X obj 282 97 * 100;
#X connect 0 0 5 0;
#X connect 2 0 9 0;
#X connect 4 0 3 0;
#X connect 5 0 7 0;
#X connect 6 0 1 0;
#X connect 7 0 6 0;
#X connect 8 0 10 0;
#X connect 9 0 8 0;
#X connect 10 0 4 0;
#X restore 431 292 pd map;
#X obj 119 291 hradio 12 1 0 3 \$0-restoretgl \$0-restoretglr Restore-mode\ 0/Off 45 10 2 10 #fcfcfc #000000 #000000 0;
#X obj 356 325 nbx 5 12 0 1e+37 0 0 \$0-treble \$0-trebler empty 41 8 2 10 #e0e0e0 #7c7c7c #000000 0 256;
#X obj 269 325 hsl 80 12 0 5 0 0 \$0-treblegui \$0-trebleguir Treble -2 -6 2 10 #e0e0e0 #7c7c7c #000000 0 1;
#N canvas 779 492 450 300 map 0;
#X obj 138 14 inlet;
#X obj 138 157 outlet;
#X obj 282 21 inlet;
#X obj 282 155 outlet;
#X msg 282 120 set \$1;
#X connect 0 0 1 0;
#X connect 2 0 4 0;
#X connect 4 0 3 0;
#X restore 434 320 pd map;
#X obj 209 324 nbx 5 12 0 1e+37 0 0 \$0-lock \$0-lockr empty 41 8 2 10 #e0e0e0 #7c7c7c #000000 0 256;
#X obj 122 324 hsl 80 12 0 5 0 0 \$0-lockgui \$0-lockguir Lock -2 -6 2 10 #e0e0e0 #7c7c7c #000000 0 1;
#X msg 38 320 set \$1;
#X connect 1 0 9 1;
#X connect 2 0 14 1;
#X connect 3 0 10 1;
#X connect 4 0 9 0;
#X connect 5 0 14 0;
#X connect 6 0 10 0;
#X connect 9 0 1 0;
#X connect 9 1 4 0;
#X connect 10 0 3 0;
#X connect 10 1 6 0;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 11 0;
#X connect 13 1 12 0;
#X connect 14 0 2 0;
#X connect 14 1 5 0;
#X connect 15 0 16 0;
#X connect 17 0 15 0;
#X connect 18 0 19 0;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 25 0 22 0;
#X connect 29 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 29 0;
#X connect 31 1 30 0;
#X connect 33 0 35 1;
#X connect 34 0 35 0;
#X connect 35 0 33 0;
#X connect 35 1 34 0;
#X connect 36 0 38 0;
#X connect 37 0 36 0;
#X connect 38 0 37 0;
#X coords 0 -1 1 1 320 250 2 100 100;
#X restore 4 5 pd mask;
#X restore 590 216 pd \$0-fft-profile;
#N canvas 672 118 1076 982 fft 0;
#X obj 908 61 r \$0-window-size;
#X obj 206 19 inlet~;
#X obj 205 62 *~;
#X obj 205 87 rfft~;
#X obj 625 45 tabreceive~ \$0-hann;
#X obj 275 136 *~;
#X obj 301 135 *~;
#X obj 276 156 +~;
#X obj 203 785 rifft~;
#X obj 202 916 outlet~;
#N canvas 768 337 511 389 normalize 0;
#X obj 173 313 outlet;
#X obj 159 208 / 4;
#X msg 157 148 1;
#X obj 173 230 *;
#X obj 159 175 t f f;
#X obj 157 123 t b f;
#X obj 280 117 t b f;
#X obj 173 282 / 1;
#X obj 191 207 / 0.375;
#X obj 280 96 r \$0-window-size;
#X obj 157 100 r \$0-overlap;
#X text 258 208 Hanning mean of squares;
#X floatatom 336 152 5 0 0 0 - - - 0;
#X connect 1 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 1 0;
#X connect 4 1 8 0;
#X connect 5 0 2 0;
#X connect 5 1 1 1;
#X connect 6 0 2 0;
#X connect 6 1 7 1;
#X connect 6 1 12 0;
#X connect 7 0 0 0;
#X connect 8 0 3 1;
#X connect 9 0 6 0;
#X connect 10 0 5 0;
#X restore 355 868 pd normalize;
#X obj 236 755 *~;
#X obj 204 756 *~;
#X obj 577 337 *~;
#X obj 389 516 /~;
#X obj 390 451 -~, f 5;
#X obj 390 489 max~ 0;
#X obj 416 517 +~ 1e-20;
#X obj 389 540 sqrt~;
#X obj 202 890 *~;
#X obj 202 844 *~;
#X obj 576 18 inlet~;
#X obj 575 67 *~;
#X obj 575 90 rfft~;
#X obj 575 117 *~;
#X obj 604 117 *~;
#X obj 576 140 +~;
#X obj 592 311 dbtorms;
#X obj 341 792 rifft~;
#X obj 340 919 outlet~;
#X obj 374 762 *~;
#X obj 342 763 *~;
#X obj 340 893 *~;
#X obj 341 846 *~;
#X obj 357 820 tabreceive~ \$0-hann;
#X obj 393 693 sig~ 1;
#X obj 393 717 -~;
#X obj 908 134 pack 1024 4;
#X obj 944 88 r \$0-overlap;
#X obj 944 111 t b f;
#X obj 908 186 block~ 1024 4;
#X obj 907 232 r \$0-window-size;
#X msg 907 284 resize \$1;
#X obj 907 255 / 2;
#X msg 908 159 set \$1 \$2;
#X obj 907 310 s \$0-mask;
#N canvas 389 248 1002 689 mask 0;
#X obj 163 99 inlet~;
#X obj 164 173 -~;
#X obj 205 436 *~;
#X obj 190 524 +~;
#X obj 190 605 outlet~;
#X obj 204 222 max~ 0;
#X obj 361 222 min~ 0;
#X obj 359 435 *~;
#X obj 227 560 tabsend~ \$0-mask;
#X obj 657 51 array define \$0-mask 512;
#X obj 853 59 r \$0-window-size;
#X obj 853 127 / 16;
#X obj 866 83 r \$0-overlap;
#X obj 853 153 t f b;
#X obj 880 176 samplerate~;
#X obj 880 199 / 1000;
#X obj 853 223 /;
#X obj 853 245 / 5.33333;
#X obj 866 106 t b f;
#X obj 853 268 s \$0-slew-norm;
#X obj 205 494 +~;
#N canvas 889 106 730 524 slew 0;
#X obj 68 27 r \$0-slew-attac;
#X obj 224 26 r \$0-slew-decay;
#N canvas 0 0 450 300 norm-clip 0;
#X obj 163 49 t b f;
#X obj 175 121 * 1;
#X obj 163 25 r \$0-slew-norm;
#X obj 86 139 clip 1 2;
#X obj 175 143 clip 0 1;
#X obj 86 84 f;
#X obj 86 25 inlet;
#X obj 86 218 outlet;
#X obj 86 162 change;
#X obj 175 166 change;
#X connect 0 0 5 0;
#X connect 0 1 1 1;
#X connect 1 0 4 0;
#X connect 2 0 0 0;
#X connect 3 0 8 0;
#X connect 4 0 9 0;
#X connect 5 0 1 0;
#X connect 5 0 3 0;
#X connect 6 0 5 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X restore 224 156 pd norm-clip;
#N canvas 0 0 450 300 norm-clip 0;
#X obj 163 49 t b f;
#X obj 175 121 * 1;
#X obj 163 25 r \$0-slew-norm;
#X obj 86 139 clip 1 2;
#X obj 175 143 clip 0 1;
#X obj 86 84 f;
#X obj 86 25 inlet;
#X obj 86 218 outlet;
#X obj 86 162 change;
#X obj 175 166 change;
#X connect 0 0 5 0;
#X connect 0 1 1 1;
#X connect 1 0 4 0;
#X connect 2 0 0 0;
#X connect 3 0 8 0;
#X connect 4 0 9 0;
#X connect 5 0 1 0;
#X connect 5 0 3 0;
#X connect 6 0 5 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X restore 68 161 pd norm-clip;
#X obj 269 211 == 0;
#X obj 68 248 spigot 1;
#X obj 224 244 spigot 1;
#N canvas 1257 361 401 391 average 0;
#X msg 247 316 0;
#X msg 201 206 0;
#X obj 148 282 float;
#X obj 148 46 bang~;
#X obj 148 200 spigot;
#X obj 217 107 f;
#X obj 217 130 change;
#X obj 148 74 t b b;
#X obj 228 183 sel 1 0;
#X obj 148 364 outlet;
#X obj 232 35 inlet;
#X obj 148 316 expr 1/($f1+1);
#X obj 201 284 + 1;
#X obj 73 126 inlet;
#X obj 73 154 min 1;
#X obj 232 58 swap 2;
#X obj 232 81 -;
#X obj 181 163 == 1;
#X connect 0 0 9 0;
#X connect 1 0 2 1;
#X connect 2 0 12 0;
#X connect 2 0 11 0;
#X connect 3 0 7 0;
#X connect 4 0 2 0;
#X connect 5 0 6 0;
#X connect 6 0 8 0;
#X connect 6 0 17 0;
#X connect 7 0 4 0;
#X connect 7 1 5 0;
#X connect 8 0 1 0;
#X connect 8 1 0 0;
#X connect 10 0 15 0;
#X connect 11 0 9 0;
#X connect 12 0 2 1;
#X connect 13 0 14 0;
#X connect 14 0 12 1;
#X connect 15 0 16 0;
#X connect 15 1 16 1;
#X connect 16 0 5 1;
#X connect 17 0 4 1;
#X restore 297 327 pd average;
#X obj 509 373 sel 1;
#X msg 509 422 const 0;
#X obj 509 443 s \$0-mask;
#X obj 168 128 sel 0;
#X obj 68 454 outlet;
#X obj 224 452 outlet;
#X obj 224 188 f;
#X obj 68 188 f;
#X obj 297 408 spigot;
#X obj 139 407 spigot;
#X obj 335 73 t f f f f;
#X text 500 43 pain...;
#X obj 415 313 >= 1;
#N canvas 1028 401 401 391 average 0;
#X msg 247 316 0;
#X msg 201 206 0;
#X obj 148 282 float;
#X obj 148 46 bang~;
#X obj 148 200 spigot;
#X obj 217 107 f;
#X obj 217 130 change;
#X obj 148 74 t b b;
#X obj 228 183 sel 1 0;
#X obj 148 364 outlet;
#X obj 232 35 inlet;
#X obj 148 316 expr 1/($f1+1);
#X obj 201 284 + 1;
#X obj 73 126 inlet;
#X obj 73 154 min 1;
#X obj 232 58 swap 2;
#X obj 232 81 -;
#X obj 181 163 == 1;
#X connect 0 0 9 0;
#X connect 1 0 2 1;
#X connect 2 0 12 0;
#X connect 2 0 11 0;
#X connect 3 0 7 0;
#X connect 4 0 2 0;
#X connect 5 0 6 0;
#X connect 6 0 8 0;
#X connect 6 0 17 0;
#X connect 7 0 4 0;
#X connect 7 1 5 0;
#X connect 8 0 1 0;
#X connect 8 1 0 0;
#X connect 10 0 15 0;
#X connect 11 0 9 0;
#X connect 12 0 2 1;
#X connect 13 0 14 0;
#X connect 14 0 12 1;
#X connect 15 0 16 0;
#X connect 15 1 16 1;
#X connect 16 0 5 1;
#X connect 17 0 4 1;
#X restore 139 334 pd average;
#X obj 354 267 f;
#X obj 335 50 r \$0-mode;
#X obj 509 346 r \$0-mode;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 14 0;
#X connect 3 0 15 0;
#X connect 4 0 5 1;
#X connect 4 0 6 1;
#X connect 5 0 12 0;
#X connect 6 0 13 0;
#X connect 7 0 16 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 11 0 14 0;
#X connect 11 0 15 0;
#X connect 14 0 6 0;
#X connect 14 0 21 0;
#X connect 15 0 5 0;
#X connect 15 0 7 0;
#X connect 16 0 13 0;
#X connect 17 0 12 0;
#X connect 18 0 11 0;
#X connect 18 1 22 0;
#X connect 18 2 20 0;
#X connect 18 3 4 0;
#X connect 20 0 16 1;
#X connect 20 0 17 1;
#X connect 21 0 17 0;
#X connect 22 0 7 1;
#X connect 22 0 21 1;
#X connect 23 0 18 0;
#X connect 24 0 8 0;
#X restore 235 362 pd slew logic;
#X obj 191 145 tabreceive~ \$0-mask;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 1 0 6 0;
#X connect 2 0 20 0;
#X connect 3 0 8 0;
#X connect 3 0 4 0;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 20 1;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 12 0 18 0;
#X connect 13 0 16 0;
#X connect 13 1 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 1;
#X connect 16 0 17 0;
#X connect 17 0 19 0;
#X connect 18 0 11 0;
#X connect 18 1 11 1;
#X connect 20 0 3 1;
#X connect 21 0 2 1;
#X connect 21 1 7 1;
#X connect 22 0 1 1;
#X connect 22 0 3 0;
#X restore 577 166 pd mask;
#X obj 390 563 clip~ 0 1;
#X obj 427 611 max 0.01;
#X obj 427 588 r \$0-expand;
#X obj 592 287 r \$0-masking;
#N canvas 405 140 672 502 draw-spec 0;
#X obj 218 132 sqrt~;
#X obj 218 187 powtodb~;
#X obj 218 209 /~ 100;
#X obj 219 235 *~;
#X obj 264 140 r \$0-window-size;
#X obj 264 165 / 4;
#X obj 220 279 tabwrite~ \$0-spectrum;
#X obj 218 164 /~ 256;
#X obj 560 133 r \$0-isvisible;
#X obj 560 156 switch~;
#X obj 532 182 tgl 18 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 532 205 metro 50;
#X obj 218 90 inlet~;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 3 1;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 7 1;
#X connect 7 0 1 0;
#X connect 8 0 9 0;
#X connect 8 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 6 0;
#X connect 12 0 0 0;
#X restore 705 294 pd draw-spec;
#X obj 390 390 *~;
#X obj 917 340 s \$0-spectrum;
#X obj 390 636 pow~;
#N canvas 920 172 487 618 restore 0;
#N canvas 250 460 716 422 sqelch 0;
#X obj 90 44 inlet~;
#X obj 89 142 rsqrt~;
#X obj 252 84 tgl 18 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 152 177 f;
#X obj 252 144 sel 1;
#X obj 90 80 +~ 1e-24;
#X obj 152 29 r \$0-restore;
#X obj 252 33 r \$0-restoretgl;
#X obj 114 273 outlet~;
#X obj 152 54 / 100;
#X obj 152 111 list trim;
#X obj 152 134 route 1 0;
#X obj 113 214 *~ 0, f 7;
#X obj 152 88 list prepend 0;
#X obj 252 58 != 0;
#X connect 0 0 5 0;
#X connect 1 0 12 0;
#X connect 2 0 4 0;
#X connect 2 0 13 1;
#X connect 3 0 12 1;
#X connect 4 0 3 0;
#X connect 4 1 12 1;
#X connect 5 0 1 0;
#X connect 6 0 9 0;
#X connect 7 0 14 0;
#X connect 9 0 13 0;
#X connect 10 0 11 0;
#X connect 11 0 3 0;
#X connect 11 1 3 1;
#X connect 12 0 8 0;
#X connect 13 0 10 0;
#X connect 14 0 2 0;
#X restore 259 217 pd sqelch;
#X obj 126 326 *~;
#X obj 293 511 r \$0-restoretgl;
#X obj 295 187 *~;
#X obj 260 188 pow~;
#X obj 294 113 sig~ 1;
#X obj 294 165 -~;
#X obj 260 89 clip~ 0 1;
#X obj 259 63 inlet~;
#X obj 293 534 == 0;
#X obj 258 534 +~ 1;
#X obj 126 68 inlet~;
#X obj 126 426 *~;
#X obj 154 425 == 2;
#X obj 154 404 r \$0-restoretgl;
#X obj 259 423 *~;
#X obj 285 403 r \$0-restoretgl;
#X obj 285 424 == 1;
#X obj 258 566 outlet~;
#X obj 322 187 r \$0-treble;
#N canvas 75 285 1192 404 lock 0;
#X obj 95 95 lrshift~ 1;
#X obj 89 120 lrshift~ -1;
#X obj 91 307 *~;
#X obj 75 331 +~;
#X obj 164 235 r \$0-lock;
#X obj 76 15 inlet~;
#X obj 75 354 outlet~;
#N canvas 675 260 751 433 more 0;
#X obj 59 94 lrshift~ 2;
#X obj 54 118 lrshift~ -2;
#X obj 143 95 lrshift~ 3;
#X obj 138 119 lrshift~ -3;
#X obj 223 96 lrshift~ 4;
#X obj 218 120 lrshift~ -4;
#X obj 304 96 lrshift~ 5;
#X obj 299 120 lrshift~ -5;
#X obj 386 96 lrshift~ 6;
#X obj 381 120 lrshift~ -6;
#X obj 464 96 lrshift~ 7;
#X obj 459 121 lrshift~ -7;
#X obj 545 96 lrshift~ 8;
#X obj 540 120 lrshift~ -8;
#X obj 627 96 lrshift~ 9;
#X obj 622 120 lrshift~ -9;
#X obj 54 287 *~;
#X obj 53 7 inlet~;
#X obj 257 327 switch~ 0;
#X obj 54 328 outlet~;
#X obj 124 279 r \$0-lock;
#X obj 124 302 clip 1 2;
#X obj 124 325 - 1;
#X obj 257 280 r \$0-lock;
#X obj 257 303 > 1;
#X connect 0 0 16 0;
#X connect 1 0 16 0;
#X connect 2 0 16 0;
#X connect 3 0 16 0;
#X connect 4 0 16 0;
#X connect 5 0 16 0;
#X connect 6 0 16 0;
#X connect 7 0 16 0;
#X connect 8 0 16 0;
#X connect 9 0 16 0;
#X connect 10 0 16 0;
#X connect 11 0 16 0;
#X connect 12 0 16 0;
#X connect 13 0 16 0;
#X connect 14 0 16 0;
#X connect 15 0 16 0;
#X connect 16 0 19 0;
#X connect 17 0 1 0;
#X connect 17 0 15 0;
#X connect 17 0 14 0;
#X connect 17 0 13 0;
#X connect 17 0 12 0;
#X connect 17 0 11 0;
#X connect 17 0 10 0;
#X connect 17 0 9 0;
#X connect 17 0 8 0;
#X connect 17 0 7 0;
#X connect 17 0 6 0;
#X connect 17 0 5 0;
#X connect 17 0 4 0;
#X connect 17 0 3 0;
#X connect 17 0 2 0;
#X connect 17 0 0 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 16 1;
#X connect 23 0 24 0;
#X connect 24 0 18 0;
#X restore 191 97 pd more lrshift;
#N canvas 675 260 935 451 more 0;
#X obj 56 304 *~;
#X obj 55 6 inlet~;
#X obj 56 351 outlet~;
#X obj 68 106 lrshift~ 11;
#X obj 55 135 lrshift~ -11;
#X obj 154 109 lrshift~ 12;
#X obj 149 133 lrshift~ -12;
#X obj 238 110 lrshift~ 13;
#X obj 233 134 lrshift~ -13;
#X obj 318 111 lrshift~ 14;
#X obj 313 135 lrshift~ -14;
#X obj 399 111 lrshift~ 15;
#X obj 394 135 lrshift~ -15;
#X obj 481 111 lrshift~ 16;
#X obj 476 135 lrshift~ -16;
#X obj 559 111 lrshift~ 17;
#X obj 554 136 lrshift~ -17;
#X obj 640 111 lrshift~ 18;
#X obj 635 135 lrshift~ -18;
#X obj 722 111 lrshift~ 19;
#X obj 717 135 lrshift~ -19;
#X obj 224 346 switch~ 0;
#X obj 116 303 r \$0-lock;
#X obj 224 299 r \$0-lock;
#X obj 116 326 clip 2 3;
#X obj 116 349 - 2;
#X obj 224 322 > 2;
#X connect 0 0 2 0;
#X connect 1 0 4 0;
#X connect 1 0 20 0;
#X connect 1 0 19 0;
#X connect 1 0 18 0;
#X connect 1 0 17 0;
#X connect 1 0 16 0;
#X connect 1 0 15 0;
#X connect 1 0 14 0;
#X connect 1 0 13 0;
#X connect 1 0 12 0;
#X connect 1 0 11 0;
#X connect 1 0 10 0;
#X connect 1 0 9 0;
#X connect 1 0 8 0;
#X connect 1 0 7 0;
#X connect 1 0 6 0;
#X connect 1 0 5 0;
#X connect 1 0 3 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X connect 8 0 0 0;
#X connect 9 0 0 0;
#X connect 10 0 0 0;
#X connect 11 0 0 0;
#X connect 12 0 0 0;
#X connect 13 0 0 0;
#X connect 14 0 0 0;
#X connect 15 0 0 0;
#X connect 16 0 0 0;
#X connect 17 0 0 0;
#X connect 18 0 0 0;
#X connect 19 0 0 0;
#X connect 20 0 0 0;
#X connect 22 0 24 0;
#X connect 23 0 26 0;
#X connect 24 0 25 0;
#X connect 25 0 0 1;
#X connect 26 0 21 0;
#X restore 191 123 pd more and more lrshift;
#X obj 164 293 moses 3;
#X obj 164 261 moses 1.01;
#X obj 203 314 - 2;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 2 0 3 1;
#X connect 3 0 6 0;
#X connect 4 0 10 0;
#X connect 5 0 1 0;
#X connect 5 0 0 0;
#X connect 5 0 3 0;
#X connect 5 0 7 0;
#X connect 5 0 8 0;
#X connect 7 0 2 0;
#X connect 8 0 2 0;
#X connect 9 1 11 0;
#X connect 10 0 2 1;
#X connect 10 1 9 0;
#X connect 11 0 2 1;
#X restore 259 476 pd lock;
#X connect 0 0 15 0;
#X connect 0 0 1 1;
#X connect 1 0 12 0;
#X connect 2 0 9 0;
#X connect 3 0 4 1;
#X connect 4 0 0 0;
#X connect 5 0 6 0;
#X connect 6 0 3 0;
#X connect 7 0 6 1;
#X connect 7 0 4 0;
#X connect 8 0 7 0;
#X connect 9 0 10 1;
#X connect 10 0 18 0;
#X connect 11 0 1 0;
#X connect 12 0 20 0;
#X connect 13 0 12 1;
#X connect 14 0 13 0;
#X connect 15 0 20 0;
#X connect 16 0 17 0;
#X connect 17 0 15 1;
#X connect 19 0 3 1;
#X connect 20 0 10 0;
#X restore 406 312 pd restore;
#X obj 427 634 pow 2;
#X connect 0 0 37 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 12 0;
#X connect 3 0 31 1;
#X connect 3 0 5 1;
#X connect 3 0 5 0;
#X connect 3 1 11 0;
#X connect 3 1 30 1;
#X connect 3 1 6 1;
#X connect 3 1 6 0;
#X connect 4 0 2 1;
#X connect 4 0 22 1;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 52 0;
#X connect 7 0 55 0;
#X connect 8 0 20 0;
#X connect 10 0 19 1;
#X connect 10 0 32 1;
#X connect 11 0 8 1;
#X connect 12 0 8 0;
#X connect 13 0 15 1;
#X connect 14 0 18 0;
#X connect 15 0 16 0;
#X connect 16 0 14 0;
#X connect 17 0 14 1;
#X connect 18 0 47 0;
#X connect 19 0 9 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 23 1 25 0;
#X connect 23 1 25 1;
#X connect 24 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 46 0;
#X connect 27 0 13 1;
#X connect 28 0 33 0;
#X connect 30 0 28 1;
#X connect 31 0 28 0;
#X connect 32 0 29 0;
#X connect 33 0 32 0;
#X connect 34 0 33 1;
#X connect 34 0 20 1;
#X connect 35 0 36 0;
#X connect 36 0 30 0;
#X connect 36 0 31 0;
#X connect 37 0 44 0;
#X connect 38 0 39 0;
#X connect 39 0 37 0;
#X connect 39 1 37 1;
#X connect 41 0 43 0;
#X connect 42 0 45 0;
#X connect 42 0 53 0;
#X connect 43 0 42 0;
#X connect 44 0 40 0;
#X connect 46 0 51 0;
#X connect 46 0 13 0;
#X connect 46 0 55 1;
#X connect 47 0 54 0;
#X connect 48 0 56 0;
#X connect 49 0 48 0;
#X connect 50 0 27 0;
#X connect 52 0 17 0;
#X connect 52 0 15 0;
#X connect 54 0 11 1;
#X connect 54 0 12 1;
#X connect 54 0 36 1;
#X connect 55 0 52 1;
#X connect 56 0 54 1;
#X restore 329 255 pd fft;
#X f 11;
#X obj 329 220 inlet~;
#X obj 391 219 inlet~;
#X obj 329 310 outlet~;
#X obj 392 309 outlet~;
#N canvas 450 50 369 400 hanning 0;
#X obj 36 24 r \$0-window-size;
#N canvas 0 50 450 300 (subpatch) 0;
#X array \$0-hann 1024 float 1;
#A 0 0 9.41753e-06 3.76701e-05 8.4728e-05 0.000150621 0.000235319 0.000338852 0.000461191 0.000602335 0.000762284 0.000941008 0.00113854 0.00135487 0.00158995 0.00184381 0.00211641 0.00240776 0.00271782 0.00304663 0.00339416 0.00376037 0.00414526 0.00454885 0.00497106 0.00541192 0.00587142 0.0063495 0.00684613 0.00736138 0.00789517 0.00844747 0.0090183 0.00960758 0.0102154 0.0108416 0.0114862 0.0121492 0.0128306 0.0135303 0.0142483 0.0149846 0.0157392 0.0165121 0.0173031 0.0181123 0.0189396 0.0197851 0.0206486 0.0215302 0.0224297 0.0233473 0.0242828 0.0252362 0.0262076 0.0271967 0.0282037 0.0292284 0.0302708 0.0313309 0.0324086 0.033504 0.0346169 0.0357474 0.0368953 0.0380607 0.0392434 0.0404435 0.0416609 0.0428956 0.0441475 0.0454164 0.0467026 0.0480058 0.049326 0.0506632 0.0520174 0.0533883 0.0547761 0.0561807 0.057602 0.0590398 0.0604944 0.0619654 0.063453 0.064957 0.0664774 0.0680141 0.0695671 0.0711362 0.0727216 0.074323 0.0759403 0.0775737 0.0792231 0.0808882 0.0825691 0.0842658 0.0859781 0.0877059 0.0894493 0.0912082 0.0929825 0.094772 0.0965768 0.0983968 0.100232 0.102082 0.103947 0.105827 0.107722 0.109632 0.111556 0.113495 0.115449 0.117417 0.119399 0.121396 0.123407 0.125432 0.127472 0.129525 0.131592 0.133674 0.135768 0.137877 0.139999 0.142135 0.144285 0.146447 0.148623 0.150813 0.153015 0.15523 0.157459 0.1597 0.161954 0.164221 0.166501 0.168793 0.171097 0.173414 0.175744 0.178085 0.180439 0.182804 0.185182 0.187571 0.189972 0.192385 0.194809 0.197245 0.199692 0.202151 0.204621 0.207102 0.209594 0.212097 0.21461 0.217135 0.21967 0.222216 0.224772 0.227338 0.229915 0.232502 0.235099 0.237706 0.240323 0.242949 0.245586 0.248232 0.250887 0.253552 0.256226 0.258909 0.261601 0.264302 0.267012 0.269731 0.272459 0.275195 0.27794 0.280693 0.283454 0.286223 0.289001 0.291786 0.294579 0.29738 0.300189 0.303005 0.305828 0.308659 0.311497 0.314342 0.317194 0.320053 0.322919 0.325791 0.32867 0.331556 0.334448 0.337346 0.34025 0.34316 0.346076 0.348998 0.351925 0.354858 0.357797 0.360741 0.36369 0.366644 0.369604 0.372568 0.375537 0.378511 0.381489 0.384472 0.387459 0.39045 0.393446 0.396445 0.399448 0.402456 0.405466 0.408481 0.411499 0.41452 0.417544 0.420572 0.423602 0.426635 0.429672 0.43271 0.435752 0.438795 0.441841 0.44489 0.44794 0.450992 0.454046 0.457102 0.460159 0.463218 0.466279 0.46934 0.472403 0.475467 0.478532 0.481597 0.484663 0.48773 0.490797 0.493865 0.496933 0.500001 0.503069 0.506136 0.509204 0.512271 0.515338 0.518404 0.52147 0.524534 0.527598 0.530661 0.533723 0.536783 0.539842 0.542899 0.545955 0.549009 0.552061 0.555112 0.55816 0.561206 0.56425 0.567291 0.57033 0.573366 0.576399 0.57943 0.582457 0.585482 0.588503 0.59152 0.594535 0.597546 0.600553 0.603556 0.606556 0.609551 0.612543 0.61553 0.618512 0.621491 0.624464 0.627433 0.630398 0.633357 0.636311 0.63926 0.642204 0.645143 0.648076 0.651003 0.653925 0.656841 0.659751 0.662656 0.665554 0.668445 0.671331 0.67421 0.677082 0.679948 0.682807 0.685659 0.688504 0.691342 0.694173 0.696996 0.699813 0.702621 0.705422 0.708215 0.711001 0.713778 0.716547 0.719308 0.722061 0.724806 0.727542 0.73027 0.732989 0.735699 0.7384 0.741092 0.743775 0.746449 0.749114 0.75177 0.754415 0.757052 0.759678 0.762295 0.764902 0.767499 0.770086 0.772663 0.775229 0.777785 0.780331 0.782866 0.785391 0.787904 0.790407 0.792899 0.79538 0.79785 0.800309 0.802756 0.805192 0.807616 0.810029 0.81243 0.814819 0.817197 0.819562 0.821916 0.824257 0.826587 0.828904 0.831208 0.8335 0.83578 0.838047 0.840301 0.842542 0.844771 0.846986 0.849188 0.851378 0.853554 0.855716 0.857866 0.860001 0.862124 0.864232 0.866327 0.868408 0.870476 0.872529 0.874568 0.876594 0.878605 0.880601 0.882584 0.884552 0.886505 0.888444 0.890369 0.892278 0.894173 0.896053 0.897919 0.899769 0.901604 0.903424 0.905229 0.907018 0.908793 0.910551 0.912295 0.914023 0.915735 0.917432 0.919112 0.920778 0.922427 0.92406 0.925678 0.927279 0.928864 0.930434 0.931987 0.933523 0.935044 0.936548 0.938035 0.939506 0.940961 0.942399 0.94382 0.945224 0.946612 0.947983 0.949337 0.950675 0.951995 0.953298 0.954584 0.955853 0.957105 0.95834 0.959557 0.960757 0.96194 0.963105 0.964253 0.965384 0.966496 0.967592 0.96867 0.96973 0.970772 0.971797 0.972804 0.973793 0.974764 0.975718 0.976653 0.977571 0.97847 0.979352 0.980215 0.981061 0.981888 0.982697 0.983488 0.984261 0.985016 0.985752 0.98647 0.98717 0.987851 0.988514 0.989159 0.989785 0.990393 0.990982 0.991553 0.992105 0.992639 0.993154 0.993651 0.994129 0.994588 0.995029 0.995451 0.995855 0.99624 0.996606 0.996953 0.997282 0.997592 0.997884 0.998156 0.99841 0.998645 0.998862 0.999059 0.999238 0.999398 0.999539 0.999661 0.999765 0.999849 0.999915 0.999962 0.999991 1 0.999991 0.999962 0.999915 0.999849 0.999765 0.999661 0.999539 0.999398 0.999238 0.999059 0.998862 0.998645 0.99841 0.998156 0.997884 0.997592 0.997282 0.996953 0.996606 0.99624 0.995855 0.995451 0.995029 0.994588 0.994129 0.993651 0.993154 0.992639 0.992105 0.991553 0.990982 0.990393 0.989785 0.989159 0.988514 0.987851 0.98717 0.98647 0.985752 0.985016 0.984261 0.983488 0.982697 0.981888 0.981061 0.980215 0.979352 0.97847 0.977571 0.976653 0.975718 0.974764 0.973793 0.972804 0.971797 0.970772 0.96973 0.96867 0.967592 0.966496 0.965384 0.964253 0.963105 0.96194 0.960757 0.959557 0.95834 0.957105 0.955853 0.954584 0.953298 0.951995 0.950675 0.949337 0.947983 0.946612 0.945224 0.94382 0.942399 0.940961 0.939506 0.938035 0.936548 0.935044 0.933523 0.931987 0.930434 0.928864 0.927279 0.925678 0.92406 0.922427 0.920778 0.919112 0.917432 0.915735 0.914023 0.912295 0.910551 0.908793 0.907018 0.905229 0.903424 0.901604 0.899769 0.897919 0.896053 0.894173 0.892278 0.890369 0.888444 0.886505 0.884552 0.882584 0.880601 0.878605 0.876594 0.874568 0.872529 0.870476 0.868408 0.866327 0.864232 0.862124 0.860001 0.857866 0.855716 0.853554 0.851378 0.849188 0.846986 0.844771 0.842542 0.840301 0.838047 0.83578 0.8335 0.831208 0.828904 0.826587 0.824257 0.821916 0.819562 0.817197 0.814819 0.81243 0.810029 0.807616 0.805192 0.802756 0.800309 0.79785 0.79538 0.792899 0.790407 0.787904 0.785391 0.782866 0.780331 0.777785 0.775229 0.772663 0.770086 0.767499 0.764902 0.762295 0.759678 0.757052 0.754415 0.75177 0.749114 0.746449 0.743775 0.741092 0.7384 0.735699 0.732989 0.73027 0.727542 0.724806 0.722061 0.719308 0.716547 0.713778 0.711001 0.708215 0.705422 0.702621 0.699813 0.696996 0.694173 0.691342 0.688504 0.685659 0.682807 0.679948 0.677082 0.67421 0.671331 0.668445 0.665554 0.662656 0.659751 0.656841 0.653925 0.651003 0.648076 0.645143 0.642204 0.63926 0.636311 0.633357 0.630398 0.627433 0.624464 0.621491 0.618512 0.61553 0.612543 0.609551 0.606556 0.603556 0.600553 0.597546 0.594535 0.59152 0.588503 0.585482 0.582457 0.57943 0.576399 0.573366 0.57033 0.567291 0.56425 0.561206 0.55816 0.555112 0.552061 0.549009 0.545955 0.542899 0.539842 0.536783 0.533723 0.530661 0.527598 0.524534 0.52147 0.518404 0.515338 0.512271 0.509204 0.506136 0.503069 0.500001 0.496933 0.493865 0.490797 0.48773 0.484663 0.481597 0.478532 0.475467 0.472403 0.46934 0.466279 0.463218 0.460159 0.457102 0.454046 0.450992 0.44794 0.44489 0.441841 0.438795 0.435752 0.43271 0.429672 0.426635 0.423602 0.420572 0.417544 0.41452 0.411499 0.408481 0.405466 0.402456 0.399448 0.396445 0.393446 0.39045 0.387459 0.384472 0.381489 0.378511 0.375537 0.372568 0.369604 0.366644 0.36369 0.360741 0.357797 0.354858 0.351925 0.348998 0.346076 0.34316 0.34025 0.337346 0.334448 0.331556 0.32867 0.325791 0.322919 0.320053 0.317194 0.314342 0.311497 0.308659 0.305828 0.303005 0.300189 0.29738 0.294579 0.291786 0.289001 0.286223 0.283454 0.280693 0.27794 0.275195 0.272459 0.269731 0.267012 0.264302 0.261601 0.258909 0.256226 0.253552 0.250887 0.248232 0.245586 0.242949 0.240323 0.237706 0.235099 0.232502 0.229915 0.227338 0.224772 0.222216 0.21967 0.217135 0.21461 0.212097 0.209594 0.207102 0.204621 0.202151 0.199692 0.197245 0.194809 0.192385 0.189972 0.187571 0.185182 0.182804 0.180439 0.178085 0.175744 0.173414 0.171097 0.168793 0.166501 0.164221 0.161954 0.1597 0.157459 0.15523 0.153015 0.150813 0.148623 0.146447 0.144285 0.142135 0.139999 0.137877 0.135768 0.133674 0.131592 0.129525 0.127472 0.125432 0.123407 0.121396 0.119399 0.117417 0.115449 0.113495 0.111556 0.109632 0.107722 0.105827 0.103947 0.102082 0.100232 0.0983968 0.0965768 0.094772 0.0929825 0.0912082 0.0894493 0.0877059 0.0859781 0.0842658 0.0825691 0.0808882 0.0792231 0.0775737 0.0759403 0.074323 0.0727216 0.0711362 0.0695671 0.0680141 0.0664774 0.064957 0.063453 0.0619654 0.0604944 0.0590398 0.057602 0.0561807 0.0547761 0.0533883 0.0520174 0.0506632 0.049326 0.0480058 0.0467026 0.0454164 0.0441475 0.0428956 0.0416609 0.0404435 0.0392434 0.0380607 0.0368953 0.0357474 0.0346169 0.033504 0.0324086 0.0313309 0.0302708 0.0292284 0.0282037 0.0271967 0.0262076 0.0252362 0.0242828 0.0233473 0.0224297 0.0215302 0.0206486 0.0197851 0.0189396 0.0181123 0.0173031 0.0165121 0.0157392 0.0149846 0.0142483 0.0135303 0.0128306 0.0121492 0.0114862 0.0108416 0.0102154 0.00960758 0.0090183 0.00844747 0.00789517 0.00736138 0.00684613 0.0063495 0.00587142 ;
#A 1000 0.00541192 0.00497106 0.00454885 0.00414526 0.00376037 0.00339416 0.00304663 0.00271782 0.00240776 0.00211641 0.00184381 0.00158995 0.00135487 0.00113854 0.000941008 0.000762284 0.000602335 0.000461191 0.000338852 0.000235319 0.000150621 8.4728e-05 3.76701e-05 9.41753e-06;
#X coords 0 1 1023 0 300 100 1 0 0;
#X restore 39 219 graph;
#X obj 35 110 tabwrite \$0-hann;
#N canvas 774 181 450 300 make-hann 0;
#X obj 59 330 outlet;
#X obj 112 329 outlet;
#X obj 65 31 inlet;
#X obj 64 195 t f f;
#X obj 59 301 expr 0.5+0.5*cos($f1);
#X obj 64 251 - 1;
#X obj 64 120 until;
#X obj 64 173 f;
#X obj 93 174 + 1;
#X msg 82 148 0;
#X obj 138 214 / 2;
#X obj 64 231 /;
#X obj 64 64 t f b f;
#X obj 59 281 * 3.14159;
#X connect 2 0 12 0;
#X connect 3 0 11 0;
#X connect 3 1 1 0;
#X connect 4 0 0 0;
#X connect 5 0 13 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 3 0;
#X connect 8 0 7 1;
#X connect 9 0 7 1;
#X connect 10 0 11 1;
#X connect 11 0 5 0;
#X connect 12 0 6 0;
#X connect 12 1 9 0;
#X connect 12 2 10 0;
#X connect 13 0 4 0;
#X restore 35 82 pd make-hann;
#X obj 158 93 s \$0-hann;
#X msg 158 70 resize \$1;
#X obj 35 53 t f f;
#X connect 0 0 6 0;
#X connect 3 0 2 0;
#X connect 3 1 2 1;
#X connect 5 0 4 0;
#X connect 6 0 3 0;
#X connect 6 1 5 0;
#X restore 590 264 pd hanning;
#N canvas 356 328 694 400 init 0;
#X obj 303 38 loadbang;
#X obj 303 162 pack \$0 1024 4;
#X obj 303 60 t b b b;
#X obj 342 85 f \$1;
#X obj 421 88 f \$2;
#X obj 342 107 sel 0;
#X obj 429 112 sel 0;
#N canvas 3 57 617 375 blocksize 0;
#X obj 184 76 t f f;
#X obj 184 212 spigot;
#X text 249 141 prevent setting blocksizes that are not a power of 2;
#X msg 244 244 blocksize is not a power of 2;
#X obj 184 294 outlet;
#X obj 244 222 sel 0;
#X obj 184 54 inlet;
#X obj 217 122 expr (($f1-1) & $f1) == 0;
#X obj 244 265 print pp.fft-profile~;
#X connect 0 0 1 0;
#X connect 0 1 7 0;
#X connect 1 0 4 0;
#X connect 3 0 8 0;
#X connect 5 0 3 0;
#X connect 6 0 0 0;
#X connect 7 0 1 1;
#X connect 7 0 5 0;
#X restore 342 137 pd blocksize;
#X obj 279 59 bng 18 250 50 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000;
#X msg 303 186 \; \$1-expandr 1 \; \$1-slew-attacr 1 \; \$1-slew-decayr 1 \; \$1-restorer 100 \; \$1-window-size \$2 \; \$1-overlap \$3 \; \$1-restoretglr 0 \; \$1-lockr 1 \; \$1-restoretglr 0 \;;
#X connect 0 0 2 0;
#X connect 1 0 9 0;
#X connect 2 0 1 0;
#X connect 2 1 3 0;
#X connect 2 2 4 0;
#X connect 3 0 5 0;
#X connect 4 0 6 0;
#X connect 5 1 7 0;
#X connect 6 1 1 2;
#X connect 7 0 1 1;
#X connect 8 0 2 0;
#X restore 590 182 pd init;
#X text 625 520 p.s. 2023;
#X connect 0 0 4 0;
#X connect 5 0 3 0;
#X connect 7 0 10 0;
#X connect 7 1 11 0;
#X connect 8 0 7 0;
#X connect 9 0 7 1;
#X coords 0 -1 1 1 180 33 1 100 100;