function G=gtest13(x)
// Gradient of Himmelblau, 1972
// x0 = [3, 1]'
// xo = [2.5, 0]'
// S(xo) = -3.25

G(1)=2*x(1)-5;
G(2)=6*x(2);

endfunction
