val one_pole_coefficient : float -> floattype kind = | Low_pass| High_pass| Band_pass
type biquad = {b0 : float;b1 : float;b2 : float;a1 : float;a2 : float;
}val biquad : ?rate:float -> kind -> cutoff:float -> q:float -> biquadval response : ?rate:float -> biquad -> float -> floatval peaking : frequency:float -> q:float -> gain:float -> biquadval low_shelf : frequency:float -> gain:float -> biquadval high_shelf : frequency:float -> gain:float -> biquad