From: WANG <wang@wang-OptiPlex-780.(none)>
Date: Thu, 29 Aug 2013 12:54:38 +0000 (+0200)
Subject: Add sinwave, fft and fft2d examples.
X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/commitdiff_plain/d1e05f17aa7a1169e3e8ea4ccef8817d7dffb0da

Add sinwave, fft and fft2d examples.
---

diff --git a/examples/input_sounds/hcosine-32.csv b/examples/input_sounds/hcosine-32.csv
index 7d458c3..14d3ba6 100644
--- a/examples/input_sounds/hcosine-32.csv
+++ b/examples/input_sounds/hcosine-32.csv
@@ -1,1024 +1,32 @@
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
-217
-38
-38
-217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
+217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217,217,38,38,217
diff --git a/interpretor/main.ml b/interpretor/main.ml
index a99a7a5..8637875 100644
--- a/interpretor/main.ml
+++ b/interpretor/main.ml
@@ -32,7 +32,7 @@ let path_dsp = ref "";;
 let size_input = ref 0;;
 let inputs = ref [];;
 let time_max = ref 0xFFFF;;
-let dir_output = ref "../output_sounds/";;
+let dir_output = ref "";;
 let format_output = ref "wav";;
 let basename_output = ref "output";;