module Sound.SC3.UGen.Record.PV_MagSubtract where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data PV_MagSubtract = PV_MagSubtract {
bufferA :: S.UGen,
bufferB :: S.UGen,
zerolimit :: S.UGen
} deriving (Show)
pv_MagSubtract :: PV_MagSubtract
pv_MagSubtract = PV_MagSubtract {
bufferA = 0.0,
bufferB = 0.0,
zerolimit = 0.0
}
mkPV_MagSubtract :: PV_MagSubtract -> S.UGen
mkPV_MagSubtract (PV_MagSubtract a' b' c') = S.mkOsc S.KR "PV_MagSubtract" [a',b',c'] 1
instance Make PV_MagSubtract where
ugen = mkPV_MagSubtract