]> gitweb.michael.orlitzky.com - octave.git/blob - optimization/test_functions/wood1.m
c34de26a9dfe738f59f595b5a5f3731cef472f32
[octave.git] / optimization / test_functions / wood1.m
1 function f = wood1(x)
2 ##
3 ## A version of the Wood function which takes a column 4-vector
4 ## instead of four distinct arguments. See wood.m for more
5 ## information.
6 ##
7 if (length(x) == 4)
8 f = wood(x(1), x(2), x(3), x(4));
9 else
10 f = NA;
11 end
12 end