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