Jip J. Dekker
fad1b07018
git-subtree-dir: software/minizinc git-subtree-split: 4f10c82056ffcb1041d7ffef29d77a7eef92cf76
13 lines
338 B
MiniZinc
13 lines
338 B
MiniZinc
include "lex_lesseq.mzn";
|
|
|
|
predicate fzn_lex_chain_lesseq_bool_reif(
|
|
array[int, int] of var bool: a, var bool: b) =
|
|
let {
|
|
int: lb2 = min(index_set_2of2(a)),
|
|
int: ub2 = max(index_set_2of2(a))
|
|
} in b <-> (
|
|
forall(j in lb2 + 1 .. ub2) (
|
|
lex_lesseq(col(a, j-1), col(a, j))
|
|
)
|
|
);
|