view yetilab/signal/test/test_signal.yeti @ 238:0c86d9284f20 sparse

Implement sparse matrix construction, add tests for sparse matrices (currently failing)
author Chris Cannam
date Mon, 20 May 2013 14:18:14 +0100
parents e16e42c55a20
children
line wrap: on
line source
module yetilab.signal.test.test_signal;

{ acf, acfNormalised, acfUnityNormalised } = load yetilab.signal.autocorrelation;

{ compare } = load yetilab.test.test;

[

"unnormalised": \(
    compare (acf 12 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
        [4,0,0, 3,0,0, 2,0,0, 1,0,0 ];
),

"normalised": \(
    compare (acfNormalised 9 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
        [4/12,0,0, 3/9,0,0, 2/6,0,0 ];
),

"normalisedUnity": \(
    compare (acfUnityNormalised 9 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
        [1,0,0, 1,0,0, 1,0,0 ];
),

] is hash<string, () -> boolean>;