hsc3-rec-0.12: Sound/SC3/UGen/Record/DriveNoise.hs
-- | (not documented)
module Sound.SC3.UGen.Record.DriveNoise where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data DriveNoise = DriveNoise {
input :: S.UGen,
amount :: S.UGen,
multi :: S.UGen
} deriving (Show)
driveNoise :: DriveNoise
driveNoise = DriveNoise {
input = 0.0,
amount = 1.0,
multi = 5.0
}
mkDriveNoise :: DriveNoise -> S.UGen
mkDriveNoise (DriveNoise a' b' c') = S.mkOsc S.AR "DriveNoise" [a',b',c'] 1
instance Make DriveNoise where
ugen = mkDriveNoise