Add the Wood() test function and some tests.

[octave.git] / optimization / test_functions / wood_gradient1.m

diff --git a/optimization/test_functions/wood_gradient1.m b/optimization/test_functions/wood_gradient1.m
new file mode 100644 (file)
index 0000000..0191f54
--- /dev/null
+++ b/optimization/test_functions/wood_gradient1.m
@@ -0,0 +1,8 @@
+function g = wood_gradient1(x)
+  ##
+  ## A version of the wood_gradient() function which takes a column
+  ## 4-vector instead of four distinct arguments. See wood_gradient.m
+  ## for more information.
+  ##
+  g = wood_gradient(x(1), x(2), x(3), x(4));
+end