-- | (Undocumented class) module Sound.SC3.UGen.Record.WeaklyNonlinear where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data WeaklyNonlinear = WeaklyNonlinear { input :: S.UGen, reset :: S.UGen, ratex :: S.UGen, ratey :: S.UGen, freq :: S.UGen, initx :: S.UGen, inity :: S.UGen, alpha :: S.UGen, xexponent :: S.UGen, beta :: S.UGen, yexponent :: S.UGen } deriving (Show) weaklyNonlinear :: WeaklyNonlinear weaklyNonlinear = WeaklyNonlinear { input = 0.0, reset = 0.0, ratex = 1.0, ratey = 1.0, freq = 440.0, initx = 0.0, inity = 0.0, alpha = 0.0, xexponent = 0.0, beta = 0.0, yexponent = 0.0 } mkWeaklyNonlinear :: WeaklyNonlinear -> S.UGen mkWeaklyNonlinear (WeaklyNonlinear a' b' c' d' e' f' g' h' i' j' k') = S.mkOsc S.AR "WeaklyNonlinear" [a',b',c',d',e',f',g',h',i',j',k'] 1 instance Make WeaklyNonlinear where ugen = mkWeaklyNonlinear