> import Sound.DF

> do { n <- white_noise_m
>    ; audition [] (out1 (n * 0.1)) }