function G=gtest12(x)
// Gradient of Himmelblau, 1972
// x0 = [8, 9]'
// Xo = [5, 6]'
// S(xo) = 0

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

endfunction
