hsc3-0.20: Help/Ugen/tWindex.help.hs
-- tWindex
let p = mce [1/5, 2/5, 2/5]
a = mce [400, 500, 600]
t = impulse kr 6 0
i = tWindexId 'α' t 0 p
in sinOsc ar (select i a) 0 * 0.1
-- tWindex ; modulating probability values
let p = mce [1/4, 1/2, sinOsc kr 0.3 0 * 0.5 + 0.5]
a = mce [400, 500, 600]
t = impulse kr 6 0
i = tWindexId 'α' t 1 p
in sinOsc ar (select i a) 0 * 0.1