Mercurial > hg > may
annotate yetilab/stream/test/audiofile_reference.yeti @ 182:1ab130dcf7f3
Start on audiofile-test-reference implementation
author | Chris Cannam |
---|---|
date | Fri, 03 May 2013 18:00:48 +0100 |
parents | b6db07468ed1 |
children | 045908c861a4 |
rev | line source |
---|---|
Chris@157 | 1 |
Chris@157 | 2 module yetilab.stream.test.audiofile_reference; |
Chris@157 | 3 |
Chris@157 | 4 syn = load yetilab.stream.syntheticstream; |
Chris@182 | 5 filt = load yetilab.stream.filter; |
Chris@157 | 6 vec = load yetilab.block.fvector; |
Chris@157 | 7 block = load yetilab.block.block; |
Chris@157 | 8 |
Chris@182 | 9 pulseChannel rate = syn.silent rate; //!!! to be implemented! |
Chris@182 | 10 |
Chris@182 | 11 referenceChannels rate = |
Chris@182 | 12 (leftovers rate n = |
Chris@182 | 13 (syn.generated rate \(n / 20) :. \(leftovers rate (n+1))); |
Chris@182 | 14 syn.sinusoid rate 600 :: pulseChannel rate :: leftovers rate 2); |
Chris@182 | 15 |
Chris@182 | 16 afReference rate channels = |
Chris@182 | 17 filt.multiplexed (take channels (referenceChannels rate)); |
Chris@157 | 18 |
Chris@182 | 19 { |
Chris@182 | 20 afReference |
Chris@182 | 21 } |
Chris@182 | 22 |
Chris@182 | 23 |