function G=gtest2(x)
// Gradient Whitte & Holst, 1964
// x0 = [-1.2, 1]'
// xo = [1, 1]'
// S(xo) = 0

G(1)=-4*x(1).*(x(2)-x(1).^2)-2*(1-x(1));
G(2)=2*(x(2)-x(1).^2);

endfunction
