-- | (Undocumented class) module Sound.SC3.UGen.Record.OSFold8 where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data OSFold8 = OSFold8 { input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) oSFold8 :: OSFold8 oSFold8 = OSFold8 { input = 0.0, lo = 0.0, hi = 0.0 } mkOSFold8 :: OSFold8 -> S.UGen mkOSFold8 (OSFold8 a' b' c') = S.mkOsc S.AR "OSFold8" [a',b',c'] 1 instance Make OSFold8 where ugen = mkOSFold8