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