-- | (Undocumented class) module Sound.SC3.UGen.Record.SoftClipper8 where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SoftClipper8 = SoftClipper8 { input :: S.UGen } deriving (Show) softClipper8 :: SoftClipper8 softClipper8 = SoftClipper8 { input = 0.0 } mkSoftClipper8 :: SoftClipper8 -> S.UGen mkSoftClipper8 (SoftClipper8 a') = S.mkOsc S.AR "SoftClipper8" [a'] 1 instance Make SoftClipper8 where ugen = mkSoftClipper8