hsc3-0.18: Help/UGen/peak.help.lhs
> import Sound.SC3 {- hsc3 -}
> g_01 =
> let t = dust 'α' AR 20
> r = impulse AR 0.4 0
> f = peak t r * 500 + 200
> in sinOsc AR f 0 * 0.2
> import Sound.SC3 {- hsc3 -}
> g_01 =
> let t = dust 'α' AR 20
> r = impulse AR 0.4 0
> f = peak t r * 500 + 200
> in sinOsc AR f 0 * 0.2