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