function [dg,dh]=restr(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]'

//e=1.1;
global e

dg(1,:)= x;
dg(2,:)=-1;

dh=[];

endfunction
