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