-- | (Undocumented class) module Sound.SC3.UGen.Record.FFTSlope where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FFTSlope = FFTSlope { buffer :: S.UGen } deriving (Show) fFTSlope :: FFTSlope fFTSlope = FFTSlope { buffer = 0.0 } mkFFTSlope :: FFTSlope -> S.UGen mkFFTSlope (FFTSlope a') = S.mkOsc S.KR "FFTSlope" [a'] 1 instance Make FFTSlope where ugen = mkFFTSlope