Jip J. Dekker
fad1b07018
git-subtree-dir: software/minizinc git-subtree-split: 4f10c82056ffcb1041d7ffef29d77a7eef92cf76
13 lines
552 B
MiniZinc
13 lines
552 B
MiniZinc
include "fzn_all_equal_int.mzn";
|
|
include "fzn_all_equal_int_reif.mzn";
|
|
|
|
%-----------------------------------------------------------------------------%
|
|
% Constrains the array of objects 'x' to be all equal.
|
|
%-----------------------------------------------------------------------------%
|
|
|
|
predicate all_equal_int(array[int] of var int: x) =
|
|
if length(x) <= 1 then true else fzn_all_equal_int(x) endif;
|
|
|
|
predicate all_equal_int_reif(array[int] of var int: x, var bool: b) =
|
|
if length(x) <= 1 then b=true else fzn_all_equal_int_reif(x,b) endif;
|