Jip J. Dekker
fad1b07018
git-subtree-dir: software/minizinc git-subtree-split: 4f10c82056ffcb1041d7ffef29d77a7eef92cf76
15 lines
392 B
MiniZinc
15 lines
392 B
MiniZinc
predicate fzn_inverse_in_range_reif(array[int] of var int: f,
|
|
array[int] of var int: invf,
|
|
var bool: b) =
|
|
b <-> (
|
|
forall(i in index_set(f)) (
|
|
f[i] in index_set(invf) ->
|
|
(invf[f[i]] == i)
|
|
) /\
|
|
forall(j in index_set(invf)) (
|
|
invf[j] in index_set(f) ->
|
|
(f[invf[j]] == j)
|
|
)
|
|
);
|
|
|