hsc3-0.21: Help/Ugen/onePole.help.hs
-- onePole
let n = whiteNoiseId 'α' ar in onePole (n * 0.1) 0.95
-- onePole
let n = whiteNoiseId 'α' ar in onePole (n * 0.1) (-0.95)
-- onePole
let n = whiteNoiseId 'α' ar
c = line kr (-0.99) 0.99 10 RemoveSynth
in onePole (n * 0.1) c