hsc3-0.18: Help/UGen/dwhite.help.lhs
> import Sound.SC3 {- hsc3 -}
> g_01 =
> let n = dwhite 'α' dinf 0 15 {- Dwhite(0, 15, inf) -}
> x = mouseX KR 1 40 Exponential 0.1
> t = impulse KR x 0
> f = demand t 0 n * 30 + 340
> in sinOsc AR f 0 * 0.1