43 lines
2.3 KiB
MiniZinc
43 lines
2.3 KiB
MiniZinc
array [1..5] of int: cc = [1250, 200, 300, 401, 500];
|
|
array [1..5] of int: rr = [101, 200, 350, 1400, 600];
|
|
var int: INT____00001 :: is_defined_var :: var_is_introduced;
|
|
var int: total :: output_var = INT____00001;
|
|
array [1..25] of var int: x :: output_array([1..5, 1..5]);
|
|
constraint int_le(0, x[1]);
|
|
constraint int_le(0, x[2]);
|
|
constraint int_le(0, x[3]);
|
|
constraint int_le(0, x[4]);
|
|
constraint int_le(0, x[5]);
|
|
constraint int_le(0, x[6]);
|
|
constraint int_le(0, x[7]);
|
|
constraint int_le(0, x[8]);
|
|
constraint int_le(0, x[9]);
|
|
constraint int_le(0, x[10]);
|
|
constraint int_le(0, x[11]);
|
|
constraint int_le(0, x[12]);
|
|
constraint int_le(0, x[13]);
|
|
constraint int_le(0, x[14]);
|
|
constraint int_le(0, x[15]);
|
|
constraint int_le(0, x[16]);
|
|
constraint int_le(0, x[17]);
|
|
constraint int_le(0, x[18]);
|
|
constraint int_le(0, x[19]);
|
|
constraint int_le(0, x[20]);
|
|
constraint int_le(0, x[21]);
|
|
constraint int_le(0, x[22]);
|
|
constraint int_le(0, x[23]);
|
|
constraint int_le(0, x[24]);
|
|
constraint int_le(0, x[25]);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[1], x[2], x[3], x[4], x[5]], 101);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[1], x[6], x[11], x[16], x[21]], 1250);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[2], x[7], x[12], x[17], x[22]], 200);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[3], x[8], x[13], x[18], x[23]], 300);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[4], x[9], x[14], x[19], x[24]], 401);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[5], x[10], x[15], x[20], x[25]], 500);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[6], x[7], x[8], x[9], x[10]], 200);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[11], x[12], x[13], x[14], x[15]], 350);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[16], x[17], x[18], x[19], x[20]], 1400);
|
|
constraint int_lin_eq([1, 1, 1, 1, 1], [x[21], x[22], x[23], x[24], x[25]], 600);
|
|
constraint int_lin_eq([-1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1], [INT____00001, x[1], x[2], x[3], x[4], x[5], x[6], x[7], x[8], x[9], x[10], x[11], x[12], x[13], x[14], x[15], x[16], x[17], x[18], x[19], x[20], x[21], x[22], x[23], x[24], x[25]], 0) :: defines_var(INT____00001);
|
|
solve :: int_search([x[1], x[2], x[3], x[4], x[5], x[6], x[7], x[8], x[9], x[10], x[11], x[12], x[13], x[14], x[15], x[16], x[17], x[18], x[19], x[20], x[21], x[22], x[23], x[24], x[25]], first_fail, indomain, complete) minimize INT____00001;
|