Add tests for wood1().
authorMichael Orlitzky <michael@orlitzky.com>
Thu, 7 Mar 2013 01:04:53 +0000 (20:04 -0500)
committerMichael Orlitzky <michael@orlitzky.com>
Thu, 7 Mar 2013 01:04:53 +0000 (20:04 -0500)
tests/wood1_tests.m [new file with mode: 0644]

diff --git a/tests/wood1_tests.m b/tests/wood1_tests.m
new file mode 100644 (file)
index 0000000..98a17dd
--- /dev/null
@@ -0,0 +1,15 @@
+## Test the optimal point.
+unit_test_equals("wood1([1;1;1;1]) == 0", ...
+                0, ...
+                wood1([1;1;1;1]));
+
+## It should fail with the wrong number of coordinates.
+f = wood1([1;2;3]);
+unit_test_equals("wood1 fails with too few coordinates", ...
+                true, ...
+                isna(f));
+
+f = wood1([1;2;3;4;5]);
+unit_test_equals("wood1 fails with too many coordinates", ...
+                true, ...
+                isna(f));