-- | (not documented) module Sound.SC3.UGen.Record.FFTInterleave where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FFTInterleave = FFTInterleave { chain1 :: S.UGen, chain2 :: S.UGen } deriving (Show) fFTInterleave :: FFTInterleave fFTInterleave = FFTInterleave { chain1 = 0.0, chain2 = 0.0 } mkFFTInterleave :: FFTInterleave -> S.UGen mkFFTInterleave (FFTInterleave a' b') = S.mkOsc S.KR "FFTInterleave" [a',b'] 1 instance Make FFTInterleave where ugen = mkFFTInterleave