Chris@147: module yetilab.signal.test.test_signal;
Chris@147: 
Chris@147: { acf, acfNormalised, acfUnityNormalised } = load yetilab.signal.autocorrelation;
Chris@147: 
Chris@147: { compare } = load yetilab.test.test;
Chris@147: 
Chris@147: [
Chris@147: 
Chris@147: "unnormalised": \(
Chris@147:     compare (acf 12 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
Chris@147:         [4,0,0, 3,0,0, 2,0,0, 1,0,0 ];
Chris@147: ),
Chris@147: 
Chris@147: "normalised": \(
Chris@147:     compare (acfNormalised 9 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
Chris@147:         [4/12,0,0, 3/9,0,0, 2/6,0,0 ];
Chris@147: ),
Chris@147: 
Chris@147: "normalisedUnity": \(
Chris@147:     compare (acfUnityNormalised 9 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
Chris@147:         [1,0,0, 1,0,0, 1,0,0 ];
Chris@147: ),
Chris@147: 
Chris@147: ] is hash<string, () -> boolean>;