diff yeti/silvet.yeti @ 12:0f6db1895e1c

Prepare the ground for cqt and templates
author Chris Cannam
date Fri, 21 Mar 2014 17:14:44 +0000
parents
children e15bc63cb146
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/yeti/silvet.yeti	Fri Mar 21 17:14:44 2014 +0000
@@ -0,0 +1,32 @@
+
+program silvet;
+
+{ prepareTimeFrequency } = load timefreq;
+{ loadTemplates } = load templates;
+
+mat = load may.matrix;
+vec = load may.vector;
+
+templates = loadTemplates ();
+
+eprintln "we have \(length (keys templates)) instruments:";
+for (sort (keys templates)) eprintln;
+eprintln "";
+
+columns = prepareTimeFrequency "test.wav";
+
+chunkSize = 100;
+height = if empty? columns then 0 else vec.length (head columns) fi;
+
+chunkify cols = 
+    if empty? cols then []
+    else
+       (mat.resizedTo { rows = chunkSize, columns = height }
+           (mat.fromColumns (take chunkSize cols)))
+        :. \(chunkify (drop chunkSize cols));
+    fi;
+
+chunks = chunkify columns;
+
+eprintln "we have \(length chunks) chunks of size \(mat.size (head chunks))";
+