#N canvas 375 121 750 388 12;
#X text 87 172 frequency;
#X floatatom 30 180 0 0 0 0 - - -;
#X floatatom 30 72 0 0 63 0 - - -;
#X text 87 189 in Hz.;
#X obj 30 243 rfft~;
#X obj 30 155 / 64;
#X obj 571 17 loadbang;
#X msg 571 43 \; pd dsp 1;
#X obj 49 21 framp~;
#X text 112 20 - estimate frequency and amplitude of FFT components
;
#X obj 28 277 framp~;
#X obj 103 336 print~ frequency;
#X obj 118 311 print~ amplitude;
#X obj 30 211 osc~;
#X text 291 108 Framp~ takes as input a rectangular-windowed FFT and
outputs \, for each FFT channel \, the estimated amplitude and frequency
of any component feeding that channel. A sinusoidal component should
appear in four components (or three in the special case of a sinusoid
exactly tuned to a bin.) Frequency output is in bins \, i.e. \, units
of SR/N.;
#X text 80 70 frequency in bins (< 63);
#X obj 30 97 t f b;
#X obj 62 128 samplerate~;
#X obj 30 127 *;
#X text 491 330 updated for Pd version 0.47;
#X text 291 220 The estimation is done according to the hop-1 trick
described in Puckette&Brown \, Accuracy of Frequency Estimates Using
the Phase Vocoder \, using a Hann window. A more sophisticated version
of this technique is used in the sigmund~ object.;
#X obj 103 263 bng 20 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X text 129 264 <= print analysis;
#X connect 1 0 13 0;
#X connect 2 0 16 0;
#X connect 4 0 10 0;
#X connect 4 1 10 1;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 10 0 11 0;
#X connect 10 1 12 0;
#X connect 13 0 4 0;
#X connect 16 0 18 0;
#X connect 16 1 17 0;
#X connect 17 0 18 1;
#X connect 18 0 5 0;
#X connect 21 0 11 0;
#X connect 21 0 12 0;
