-- | (Undocumented class) module Sound.SC3.UGen.Record.RDelayMap where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RDelayMap = RDelayMap { rate :: S.Rate, bufnum :: S.UGen, input :: S.UGen, dynamic :: S.UGen, spec :: S.UGen } deriving (Show) rDelayMap :: RDelayMap rDelayMap = RDelayMap { rate = S.AR, bufnum = 0.0, input = 0.0, dynamic = 0.0, spec = 0.0 } mkRDelayMap :: RDelayMap -> S.UGen mkRDelayMap (RDelayMap r a' b' c' d') = S.mkOsc r "RDelayMap" [a',b',c',d'] 1 instance Make RDelayMap where ugen = mkRDelayMap