function S=test18(x)
// Papageorgiou, 1996
//
// x0 = 2
// goals: S* = [0.5 0.5]'
// weights: w = [0.5 0.5]'
// xo = 0.1429
// S(xo) = [1.0102 1.0102]'

S(1)=1+0.5*x.^2;
S(2)=4*(x-0.5).^2+0.5;

// goal = [0.5; 0.5];
// w = abs(goal);
// [x,S,gama,ex,out,lambda]=fgoalattain('test18',2,goal,w)

endfunction
