Jip J. Dekker
f2a1c4e389
git-subtree-dir: software/mza git-subtree-split: f970a59b177c13ca3dd8aaef8cc6681d83b7e813
7 lines
387 B
MiniZinc
7 lines
387 B
MiniZinc
%-----------------------------------------------------------------------------%
|
|
% Requires that the array 'x' is in strict decreasing order
|
|
%-----------------------------------------------------------------------------%
|
|
|
|
predicate fzn_strictly_decreasing_bool_reif(array[int] of var bool: x, var bool: b) =
|
|
b <-> forall(i in index_set(x) diff { min(index_set(x)) }) (x[i-1] > x[i]);
|