New directory tree, with preprocessor/ inside interpretor/.

[Faustine.git] / dsp_files / sin.dsp

diff --git a/dsp_files/sin.dsp b/dsp_files/sin.dsp
deleted file mode 100644 (file)
index b1650f2..0000000
--- a/dsp_files/sin.dsp
+++ /dev/null
@@ -1,19 +0,0 @@
-//sin = ffunction(float sin(float), <math.h>, "");
-//floor = ffunction(float floor(float), <math.h>, "");
-PI = 3.141592653589;
-
-tablesize = 40000;
-samplingfreq = 44100.;
-
-time = (+(1)~_) - 1;
-sinwavform = time * (2 * PI)/tablesize : sin;
-
-decimal = _ <: -(floor);
-phase(freq) = freq / samplingfreq : mem : ( + : decimal) ~ _ : * (tablesize) : int;
-osc(freq) = phase(freq) : rdtable(tablesize, sinwavform);
-
-vol = 1;
-freq = 1000;
-
-process = osc(freq) * vol;
-//process = freq / samplingfreq : @(1): ( + : decimal) ~ _ : * (tablesize) : int ;