hsc3-0.21: Help/Ugen/ring3.help.hs
-- ring3
let a = fSinOsc ar 800 0
b = fSinOsc ar (xLine kr 200 500 5 DoNothing) 0
in ring3 a b * 0.125
-- ring3 ; written out
let a = fSinOsc ar 800 0
b = fSinOsc ar (xLine kr 200 500 5 DoNothing) 0
in (a * a * b) * 0.125