# an example from Nocedal & Overton 
# (1984 paper on projected Quasi-Newton update)
# written in AMPL by Yu-Ju Kuo and Hans D. Mittelmann, 6/2001
param N;
param NH;
param NG;
var X{1..N};
minimize obj:.5e0*(X[1]**2+X[2]**2)-5.e0*X[1]*X[2];
s.t.   HXI : 1.e0/(X[2]-2.e0)+1.e0=0;
s.t.   GXI : 2.e0-X[2]>=0;

data;
var X:=1  5.0001 2 1.00001;
param N:=2;
param NH:=1;
param NG:=1;