test_sc_suppression_mic_2nd-order_notch.dsp

/* This tests the responsiveness and accuracy of the suppression technique
 * implementing spectral centroid detection and notch filtering suppression.
 */

import("stdfaust.lib");
import("detection.lib");
import("suppression.lib");

on = checkbox("active");
gain = hslider("gain", 1, 0, 64, .001);
vol = hslider("vol", 1, 0, 1, .001);
response = hslider("response", .1, .001, 1, .001); // in seconds
spec_cent(in) = dt.sc(2, response, in) : dt.inspect(0, 0, 20000);
process(in) = ((in1 : su.notch(1000, spec_cent(in1))) * on + 
    in1 * (1 - on)) * vol
with {
    in1 = in * gain;
};