-- | (Undocumented class)
module Sound.SC3.UGen.Record.PV_Whiten where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data PV_Whiten = PV_Whiten {
  chain :: S.UGen,
  trackbufnum :: S.UGen,
  relaxtime :: S.UGen,
  floor_ :: S.UGen,
  smear :: S.UGen,
  bindownsample :: S.UGen
  } deriving (Show)
pv_Whiten :: PV_Whiten
pv_Whiten = PV_Whiten {
  chain = 0.0,
  trackbufnum = 0.0,
  relaxtime = 2.0,
  floor_ = 0.1,
  smear = 0.0,
  bindownsample = 0.0
  }
mkPV_Whiten :: PV_Whiten -> S.UGen
mkPV_Whiten (PV_Whiten  a' b' c' d' e' f') = S.mkOsc S.KR "PV_Whiten" [a',b',c',d',e',f'] 1
instance Make PV_Whiten where
  ugen = mkPV_Whiten