addfile ./Help/UGen/Demand/dshuf.help.lhs hunk ./Help/UGen/Demand/dshuf.help.lhs 1 +> Sound.SC3.UGen.Help.viewSC3Help "Dshuf" +> Sound.SC3.UGen.DB.ugenSummary "Dshuf" + +# sclang re-orders inputs + +> import Sound.SC3.ID + +> let {a = dseq 'a' dinf (dshuf 'a' 3 (mce [1,3,2,7,8.5])) +> ;x = mouseX KR 1 40 Exponential 0.1 +> ;t = impulse KR x 0 +> ;f = demand t 0 a * 30 + 340} +> in audition (out 0 (sinOsc AR f 0 * 0.1)) + +> import Sound.SC3.UGen.External.RDU + +> let {a = dseq 'a' dinf (dshuf 'a' 5 (randN 81 'a' 0 10)) +> ;x = mouseX KR 1 10000 Exponential 0.1 +> ;t = impulse AR x 0 +> ;f = demand t 0 a * 30 + 340} +> in audition (out 0 (sinOsc AR f 0 * 0.1)) hunk ./Sound/SC3/UGen/Demand/ID.hs 64 +-- | Demand rate sequence shuffler. +dshuf :: ID i => i -> UGen -> UGen -> UGen +dshuf z l array = mkOscMCEId z DR "Dshuf" [l] array 1 + hunk ./Sound/SC3/UGen/Demand/Monadic.hs 63 +-- | Demand rate sequence shuffler. +dshuf :: (UId m) => UGen -> UGen -> m UGen +dshuf = liftU2 D.dshuf +