-- | (Undocumented class) module Sound.SC3.UGen.Record.PV_BinDelay where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PV_BinDelay = PV_BinDelay { buffer :: S.UGen, maxdelay :: S.UGen, delaybuf :: S.UGen, fbbuf :: S.UGen, hop :: S.UGen } deriving (Show) pv_BinDelay :: PV_BinDelay pv_BinDelay = PV_BinDelay { buffer = 0.0, maxdelay = 0.0, delaybuf = 0.0, fbbuf = 0.0, hop = 0.5 } mkPV_BinDelay :: PV_BinDelay -> S.UGen mkPV_BinDelay (PV_BinDelay a' b' c' d' e') = S.mkOsc S.KR "PV_BinDelay" [a',b',c',d',e'] 1 instance Make PV_BinDelay where ugen = mkPV_BinDelay