bLowPass.help.lhs

> import Sound.SC3 {- hsc3 -}
> import Sound.SC3.Common.Math.Filter.BEQ {- hsc3 -}

> g_01 =
>     let i = soundIn (mce2 0 1)
>         f = mouseX KR 10 20000 Exponential 0.2
>         rq = mouseY KR 0 1 Linear 0.2
>     in bLowPass i f rq

> g_02 =
>     let i = mix (saw AR (mce [0.99, 1, 1.01] * 440) * 0.3)
>         f = mouseX KR 100 20000 Exponential 0.2
>         rq = mouseY KR 0.1 1 Linear 0.2
>     in bLowPass i f rq

calculate coefficients and use sos (see also bLowPass4)

> g_03 =
>     let i = mix (saw AR (mce [0.99, 1, 1.01] * 440) * 0.3)
>         f = mouseX KR 100 20000 Exponential 0.2
>         rq = mouseY KR 0.1 1 Linear 0.2
>         (a0, a1, a2, b1, b2) = bLowPassCoef sampleRate f rq
>     in sos i a0 a1 a2 b1 b2

> g_04 = bLowPass (whiteNoise 'α' AR) (xLine KR 24000 20 10 DoNothing) 1
> g_05 = bLowPass (whiteNoise 'α' AR) 1200 (xLine KR 0.5 100 10 DoNothing)