-- | (Undocumented class) module Sound.SC3.UGen.Record.DoubleWell3 where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data DoubleWell3 = DoubleWell3 { reset :: S.UGen, rate_ :: S.UGen, f :: S.UGen, delta :: S.UGen, initx :: S.UGen, inity :: S.UGen } deriving (Show) doubleWell3 :: DoubleWell3 doubleWell3 = DoubleWell3 { reset = 0.0, rate_ = 0.01, f = 0.0, delta = 0.25, initx = 0.0, inity = 0.0 } mkDoubleWell3 :: DoubleWell3 -> S.UGen mkDoubleWell3 (DoubleWell3 a' b' c' d' e' f') = S.mkOsc S.AR "DoubleWell3" [a',b',c',d',e',f'] 1 instance Make DoubleWell3 where ugen = mkDoubleWell3