this repo has no description
1include "alldifferent.mzn";
2include "increasing.mzn";
3
4predicate fzn_sort(array[int] of var int: x, array[int] of var int: y) =
5 let {
6 int: lx = min(index_set(x)),
7 int: ux = max(index_set(x)),
8 int: ly = min(index_set(y)),
9 int: uy = max(index_set(y)),
10 array[lx..ux] of var ly..uy: p
11 } in
12 forall(i in index_set(x)) ( y[p[i]] == x[i] ) /\
13 alldifferent(p) /\
14 increasing(y);