Add the Wood() test function and some tests.

[octave.git] / tests / wood_tests.m

diff --git a/tests/wood_tests.m b/tests/wood_tests.m
new file mode 100644 (file)
index 0000000..822da99
--- /dev/null
+++ b/tests/wood_tests.m
@@ -0,0 +1,6 @@
+## Test the optimal point.
+
+f = wood(1,1,1,1);
+unit_test_equals("wood(1,1,1,1) == 0", ...
+                0, ...
+                wood(1,1,1,1));