Mercurial > hg > constant-q-cpp

changeset 18:95c7656d023f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
More on assembling blocks
author Chris Cannam <c.cannam@qmul.ac.uk>
date Wed, 30 Oct 2013 10:51:23 +0000
parents b54bd1d0dc1e
children 3b044c30cffc
files yeti/cqt.yeti
diffstat 1 files changed, 10 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/yeti/cqt.yeti	Wed Oct 30 10:20:55 2013 +0000
+++ b/yeti/cqt.yeti	Wed Oct 30 10:51:23 2013 +0000
@@ -102,7 +102,16 @@
     assembleBlock bits =
        (println "assembleBlock: structure of bits is:";
         println (map length bits);
-        []);
+        cm.generate do row col:
+            oct = int (row / binsPerOctave);
+            binNo = row % binsPerOctave;
+            
+
+            cplx.zero;
+        done { 
+            rows = octaves * kdata.binsPerOctave,
+            columns = (pow 2 (octaves - 1)) * kdata.atomsPerFrame
+        });
 
     processOctaveLists octs =
         case octs[0] of