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