#N canvas 20 32 724 388 10; #X obj 42 70 dsp; #X obj 42 47 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X floatatom 42 111 5 0 0 0 - - -; #X floatatom 55 94 5 0 0 0 - - -; #N canvas 0 0 450 300 graph1 0; #X array scope 256 float 0; #X coords 0 100 255 0 300 200 1; #X restore 346 82 graph; #X text 130 39 iem_spec2 calculates only blocksize/2 + 1 samples of block; #N canvas 0 0 633 408 tables 0; #N canvas 0 0 450 300 graph1 0; #X array hann 259 float 0; #X coords 0 1 258 -1 200 140 1; #X restore 30 31 graph; #X obj 246 34 loadbang; #X msg 246 55 \; hann cosinesum 256 0.5 -0.5; #X connect 1 0 2 0; #X restore 149 82 pd tables; #X obj 42 145 noise~; #X obj 237 93 osc~ 11025; #X msg 292 58 0; #X obj 42 169 bpq2~ 7000 6 100; #X msg 206 187 1 0 0; #X msg 205 121 0.1 0 0.9; #X text 90 302 IEM KUG; #X text 74 290 musil; #X text 104 290 @; #X text 110 290 iem.at; #X text 73 312 Graz \, Austria; #X text 25 279 (c) Thomas Musil 2000 - 2006; #X text 18 5 spec2_1p1z_freq~; #N canvas 190 113 569 461 spec_analyse_by_1p1z_freq 0; #X obj 100 51 inlet~; #X obj 352 46 block~ 256 2; #X obj 102 156 rfft~; #X obj 101 108 *~; #X obj 298 46 inlet; #X obj 114 86 spec2_tabreceive~ hann; #X obj 97 186 *~; #X obj 124 186 *~; #X obj 104 211 +~; #X obj 104 266 powtodb~; #X obj 104 291 tabsend~ scope; #X obj 180 174 /; #X obj 101 131 *~ 0.032; #X msg 189 149 1 32; #X obj 188 127 loadbang; #X obj 300 225 spec2_1p1z_freq~ 0.5 0 0.5; #X connect 0 0 3 0; #X connect 2 0 6 0; #X connect 2 0 6 1; #X connect 2 1 7 0; #X connect 2 1 7 1; #X connect 3 0 12 0; #X connect 4 0 15 0; #X connect 5 0 3 1; #X connect 6 0 8 0; #X connect 7 0 8 1; #X connect 8 0 15 0; #X connect 9 0 10 0; #X connect 11 0 12 1; #X connect 12 0 2 0; #X connect 13 0 11 0; #X connect 14 0 13 0; #X connect 15 0 9 0; #X restore 42 214 pd spec_analyse_by_1p1z_freq; #X msg 205 143 0.3 0 0.7; #X msg 205 165 0.5 0 0.5; #X msg 105 123 6; #X msg 107 143 3; #X msg 134 122 16; #X msg 164 121 66; #X text 168 3 filter the spectrum with a 1p1z-IIR filter; #X text 169 14 first time from the left to right; #X text 169 26 second time from the right to left; #X connect 0 0 2 0; #X connect 0 1 3 0; #X connect 1 0 0 0; #X connect 7 0 10 0; #X connect 9 0 8 1; #X connect 10 0 20 0; #X connect 11 0 20 1; #X connect 12 0 20 1; #X connect 21 0 20 1; #X connect 22 0 20 1; #X connect 23 0 10 2; #X connect 24 0 10 2; #X connect 25 0 10 2; #X connect 26 0 10 2;