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