ampl/tp054v3.mod


If Cut/Copy and Paste fails, then click here for download.


# Model tp054v3
# Source version 1
# Simple APM canonicalizer version 1.3
# AMPL backend version 1.1
var x_1 >= -5/4, <= 5/4;
let x_1 := -1/2;
var x_2 >= -11, <= 9;
let x_2 := 1/2;
var x_3 >= -2/7, <= 8/7;
let x_3 := 2/7;
var x_4 >= -1/5, <= 1/5;
let x_4 := -4/25;
var x_5 >= -1001/50, <= 999/50;
let x_5 := 1/25;
var x_6 >= -1/5, <= 1/5;
let x_6 := -1/10;
var h1 = (x_1^2 + x_1*x_2*2/5 + x_2^2)*25/24;
var h2 = x_3^2 + x_4^2 + x_5^2 + x_6^2;
var mf = h1 + h2;
var myminfun = mf;
var myabsdevnod0_0 = abs(myminfun - 0.1928571428571429);
var myreldevnod0_0 = abs(myminfun/0.1928571428571429 - 1);
var myabsdevnod0_1 = abs(x_1 - 0.3857142857142857);
var myreldevnod0_1 = abs(x_1/0.3857142857142857 - 1);
var myabsdevnod0_2 = abs(x_2 - 0.1285714285714286);
var myreldevnod0_2 = abs(x_2/0.1285714285714286 - 1);
var myabsdevnod0_3 = abs(x_3);
var myreldevnod0_3 = abs(x_3);
var myabsdevnod0_4 = abs(x_4);
var myreldevnod0_4 = abs(x_4);
var myabsdevnod0_5 = abs(x_5);
var myreldevnod0_5 = abs(x_5);
var myabsdevnod0_6 = abs(x_6);
var myreldevnod0_6 = abs(x_6);
var myabsdevnod1_0 = (1/2)*(abs(myabsdevnod0_0 - myabsdevnod0_1) + (myabsdevnod0_0 + myabsdevnod0_1));
var myreldevnod1_0 = (1/2)*(abs(myreldevnod0_0 - myreldevnod0_1) + (myreldevnod0_0 + myreldevnod0_1));
var myabsdevnod1_2 = (1/2)*(abs(myabsdevnod0_2 - myabsdevnod0_3) + (myabsdevnod0_2 + myabsdevnod0_3));
var myreldevnod1_2 = (1/2)*(abs(myreldevnod0_2 - myreldevnod0_3) + (myreldevnod0_2 + myreldevnod0_3));
var myabsdevnod1_4 = (1/2)*(abs(myabsdevnod0_4 - myabsdevnod0_5) + (myabsdevnod0_4 + myabsdevnod0_5));
var myreldevnod1_4 = (1/2)*(abs(myreldevnod0_4 - myreldevnod0_5) + (myreldevnod0_4 + myreldevnod0_5));
var myabsdevnod1_6 = myabsdevnod0_6;
var myreldevnod1_6 = myreldevnod0_6;
var myabsdevnod2_0 = (1/2)*(abs(myabsdevnod1_0 - myabsdevnod1_2) + (myabsdevnod1_0 + myabsdevnod1_2));
var myreldevnod2_0 = (1/2)*(abs(myreldevnod1_0 - myreldevnod1_2) + (myreldevnod1_0 + myreldevnod1_2));
var myabsdevnod2_4 = (1/2)*(abs(myabsdevnod1_4 - myabsdevnod1_6) + (myabsdevnod1_4 + myabsdevnod1_6));
var myreldevnod2_4 = (1/2)*(abs(myreldevnod1_4 - myreldevnod1_6) + (myreldevnod1_4 + myreldevnod1_6));
var myabsdevnod3_0 = (1/2)*(abs(myabsdevnod2_0 - myabsdevnod2_4) + (myabsdevnod2_0 + myabsdevnod2_4));
var myreldevnod3_0 = (1/2)*(abs(myreldevnod2_0 - myreldevnod2_4) + (myreldevnod2_0 + myreldevnod2_4));
var zmyabsdevmax = myabsdevnod3_0;
var zmyreldevmax = myreldevnod3_0;
minimize obj: myminfun;
subject to ce_1: 8*x_1 + 4*x_2 - 18/5 = 0;
solve;
display x_1;
display x_2;
display x_3;
display x_4;
display x_5;
display x_6;
display myminfun;
display zmyabsdevmax;
display zmyreldevmax;
# End Model

Stephan K.H. Seidl