-- | (Undocumented class) module Sound.SC3.UGen.Record.LFBrownNoise2 where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data LFBrownNoise2 = LFBrownNoise2 { rate :: S.Rate, freq :: S.UGen, dev :: S.UGen, dist :: S.UGen } deriving (Show) lfBrownNoise2 :: LFBrownNoise2 lfBrownNoise2 = LFBrownNoise2 { rate = S.AR, freq = 20.0, dev = 1.0, dist = 0.0 } mkLFBrownNoise2 :: LFBrownNoise2 -> S.UGen mkLFBrownNoise2 (LFBrownNoise2 r a' b' c') = S.mkOsc r "LFBrownNoise2" [a',b',c'] 1 instance Make LFBrownNoise2 where ugen = mkLFBrownNoise2