8 lines
380 B
MiniZinc
8 lines
380 B
MiniZinc
%-----------------------------------------------------------------------------%
|
|
% Requires that the array 'x' is in decreasing order (duplicates are allowed).
|
|
%-----------------------------------------------------------------------------%
|
|
|
|
predicate fzn_decreasing_set(array[int] of var set of int: x) =
|
|
forall(i in index_set(x) diff { min(index_set(x)) }) (x[i-1] >= x[i]);
|
|
|