-- | (Undocumented class) module Sound.SC3.UGen.Record.RTraceRdX where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RTraceRdX = RTraceRdX { bufnum :: S.UGen, degree :: S.UGen, index :: S.UGen } deriving (Show) rTraceRdX :: RTraceRdX rTraceRdX = RTraceRdX { bufnum = 0.0, degree = 4.0, index = 0.0 } mkRTraceRdX :: RTraceRdX -> S.UGen mkRTraceRdX (RTraceRdX a' b' c') = S.mkOsc S.KR "RTraceRdX" [a',b',c'] 1 instance Make RTraceRdX where ugen = mkRTraceRdX