Add the Himmelblau function, as defined in Applied Nonlinear Programming.
[octave.git] / optimization / test_functions / himmelblau_hessian1.m
1 function H = himmelblau_hessian1(x)
2 ##
3 ## A version of the himmelblau_hessian() function which takes a column
4 ## 2-vector instead of two distinct arguments. See himmelblau_hessian.m
5 ## for more information.
6 ##
7 if (length(x) == 2)
8 H = himmelblau_hessian(x(1), x(2));
9 else
10 H = NA;
11 end
12 end