hsc3-rec-0.7: Sound/SC3/UGen/Record/PV_MagShift.hs

module Sound.SC3.UGen.Record.PV_MagShift where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data PV_MagShift = PV_MagShift {
  buffer :: S.UGen,
  stretch :: S.UGen,
  shift :: S.UGen
  } deriving (Show)
pV_MagShift :: PV_MagShift
pV_MagShift = PV_MagShift {
  buffer = 0.0,
  stretch = 1.0,
  shift = 0.0
  }
mkPV_MagShift :: PV_MagShift -> S.UGen
mkPV_MagShift (PV_MagShift  a' b' c') = S.mkOsc S.KR "PV_MagShift" [a',b',c'] 1
instance Make PV_MagShift where
  ugen = mkPV_MagShift