hsc3-0.18: Help/UGen/sms.help.lhs
> import Sound.SC3 {- hsc3 -}
> import qualified Sound.SC3.UGen.Bindings.DB.External as X {- hsc3 -}
sine reconstruction left channel, noises on right
> g_01 =
> let z = soundIn 0
> y = mouseY KR 1 50 Linear 0.2
> x = mouseX KR 0.5 4 Linear 0.2
> in X.sms {- AR -} z 50 y 8 0.3 x 0 0 0 1 (-1)
default param
> g_02 =
> let z = soundIn 0
> in X.sms {- AR -} z 80 80 4 0.2 1 0 0 0 1 (-1)