From: WANG Date: Thu, 29 Aug 2013 12:54:38 +0000 (+0200) Subject: Add sinwave, fft and fft2d examples. X-Git-Url: https://scm.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";;