13 lines
301 B
MiniZinc
13 lines
301 B
MiniZinc
int: n;
|
|
array[0..n-1] of var 0..n: s;
|
|
|
|
constraint forall(i in 0..n-1) (
|
|
s[i] = (sum(j in 0..n-1)(bool2int(s[j]=i))));
|
|
|
|
constraint redundant_constraint(sum(i in 0..n-1)(s[i]) = n);
|
|
constraint redundant_constraint(sum(i in 0..n-1)(s[i] * i) = n);
|
|
|
|
solve satisfy;
|
|
|
|
output [ "s = ", show(s), ";\n" ] ;
|