-- | (Undocumented class)
module Sound.SC3.UGen.Record.PV_Compander where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data PV_Compander = PV_Compander {
  buffer :: S.UGen,
  thresh :: S.UGen,
  slopeBelow :: S.UGen,
  slopeAbove :: S.UGen
  } deriving (Show)
pv_Compander :: PV_Compander
pv_Compander = PV_Compander {
  buffer = 0.0,
  thresh = 50.0,
  slopeBelow = 1.0,
  slopeAbove = 1.0
  }
mkPV_Compander :: PV_Compander -> S.UGen
mkPV_Compander (PV_Compander  a' b' c' d') = S.mkOsc S.KR "PV_Compander" [a',b',c',d'] 1
instance Make PV_Compander where
  ugen = mkPV_Compander