-- sqrSum
(fSinOsc ar 800 0 `sqrSum` fSinOsc ar (xLine kr 200 500 5 DoNothing) 0) * 0.1