X-Git-Url: https://scm.cri.minesparis.psl.eu/git/Faustine.git/blobdiff_plain/c7f552fd8888da2f0d8cfb228fe0f28d3df3a12c..b4b6f2ea75b9f0f3ca918f5b84016610bf7a4d4f:/interpretor/faust-0.9.47mr3/tools/faust2pd/examples/synth/fuzz.dsp

diff --git a/interpretor/faust-0.9.47mr3/tools/faust2pd/examples/synth/fuzz.dsp b/interpretor/faust-0.9.47mr3/tools/faust2pd/examples/synth/fuzz.dsp
deleted file mode 100644
index 025a5d2..0000000
--- a/interpretor/faust-0.9.47mr3/tools/faust2pd/examples/synth/fuzz.dsp
+++ /dev/null
@@ -1,20 +0,0 @@
-
-/* A simple waveshaping effect. */
-
-declare name "fuzz -- a simple distortion effect";
-declare author "Bram de Jong (from musicdsp.org)";
-declare version "1.0";
-
-import("music.lib");
-
-dist	= hslider("distortion", 12, 0, 100, 0.1);	// distortion parameter
-gain	= hslider("gain", 3, -96, 96, 0.1);		// output gain (dB)
-
-// the waveshaping function
-f(a,x)	= x*(abs(x) + a)/(x*x + (a-1)*abs(x) + 1);
-
-// gain correction factor to compensate for distortion
-g(a)	= 1/sqrt(a+1);
-
-process	= vgroup("dist", (out, out))
-with { out(x) = db2linear(gain)*g(dist)*f(db2linear(dist),x); };