Refactoring in faustexp.ml.
[Faustine.git] / interpretor / faust-0.9.47mr3 / tools / faust2pd / examples / basic / white.dsp
1
2 declare name "white -- white noise";
3 declare author "Albert Graef";
4 declare version "1.0";
5
6 import("music.lib");
7
8 // control variables
9
10 vol = nentry("vol", 0.3, 0, 10, 0.01); // %
11 pan = nentry("pan", 0.5, 0, 1, 0.01); // %
12
13 // white (unfiltered) noise generator
14
15 process = noise*vol : panner(pan);