hsc3-lang-0.7: Help/Pattern/pwhite.help.lhs
pwhite :: (Random a) => P a -> P a -> P Int -> P a
Uniform linear distribution in given range.
> import Sound.SC3.Lang.Pattern
> let p = pwhite 0.0 1.0 12
> in evalP 0 p
> let { l = pseq [0.0, 10.0] 1
> ; r = pseq [1.0, 11.0] 1
> ; p = pwhite l r 12 }
> in evalP 0 p
Or equivalently,
> let { b = pseq [return (0.0, 1.0)
> ,return (10.0, 11.0)] 1
> ; p = pwhite (fmap fst b) (fmap snd b) 12 }
> in evalP 0 p