Add length checks to the wood functions, and fix wood_hessian1().
[octave.git] / optimization / test_functions / wood_gradient1.m
1 function g = wood_gradient1(x)
2 ##
3 ## A version of the wood_gradient() function which takes a column
4 ## 4-vector instead of four distinct arguments. See wood_gradient.m
5 ## for more information.
6 ##
7 if (length(x) == 4)
8 g = wood_gradient(x(1), x(2), x(3), x(4));
9 else
10 g = NA;
11 end
12 end