Jip J. Dekker
fad1b07018
git-subtree-dir: software/minizinc git-subtree-split: 4f10c82056ffcb1041d7ffef29d77a7eef92cf76
36 lines
618 B
MiniZinc
36 lines
618 B
MiniZinc
/***
|
|
!Test
|
|
expected:
|
|
- !Result
|
|
solution: !Solution
|
|
mark:
|
|
- 0
|
|
- 1
|
|
- 3
|
|
objective: 3
|
|
***/
|
|
|
|
% A regression test for G12 bug #85.
|
|
%
|
|
include "all_different.mzn";
|
|
|
|
int: m = 3;
|
|
int: n = m*m;
|
|
|
|
array [1..m] of var 0..n: mark :: add_to_output = [0, 1, 3];
|
|
|
|
array[1..(m*(m-1)) div 2] of var 0..n: differences =
|
|
[ mark[j] - mark[i] | i in 1..m, j in i+1..m];
|
|
|
|
constraint mark[1] = 0;
|
|
|
|
constraint forall ( i in 1..m-2 ) ( mark[i] < mark[i+1] );
|
|
|
|
constraint all_different(differences);
|
|
|
|
constraint mark[2] - mark[1] < mark[m] - mark[m-1];
|
|
|
|
solve minimize mark[m];
|
|
|
|
output ["% golomb ", show(mark), "\n"];
|