X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/1059e1cc0c2ecfa237406949aa26155b6a5b9154..66f23d4fabf89ad09adbd4dfc15ac6b5b2b7da83:/interpreter/preprocessor/faust-0.9.47mr3/tests/mathdoc/select2.dsp

diff --git a/interpreter/preprocessor/faust-0.9.47mr3/tests/mathdoc/select2.dsp b/interpreter/preprocessor/faust-0.9.47mr3/tests/mathdoc/select2.dsp
new file mode 100644
index 0000000..66a52f2
--- /dev/null
+++ b/interpreter/preprocessor/faust-0.9.47mr3/tests/mathdoc/select2.dsp
@@ -0,0 +1,18 @@
+declare name 		"select2";
+declare version 	"0.1";
+declare author 		"Grame";
+declare license 	"BSD";
+declare copyright 	"(c)GRAME 2009";
+
+//-----------------------------------------------
+// Two noises compared
+//-----------------------------------------------
+
+
+RANDMAX = 2147483647;
+random1 = ffunction(int random (), <stdlib.h>, "");
+noise1 = (random1 << 1) * (1.0/RANDMAX);
+random2 = (*(1103515245)+12345) ~ _ ; 
+noise2 = random2 * (1.0/RANDMAX);
+
+process = select2(button("Switch"), noise1, noise2) * hslider("Volume", 0, 0, 1, 0.01) <: _,_ ;