diff yetilab/signal/test/test_signal.yeti @ 147:e16e42c55a20

Add autocorrelation

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/yetilab/signal/test/test_signal.yeti	Sat Apr 27 23:56:15 2013 +0100
@@ -0,0 +1,24 @@
+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>;