Jip J. Dekker
f2a1c4e389
git-subtree-dir: software/mza git-subtree-split: f970a59b177c13ca3dd8aaef8cc6681d83b7e813
12 lines
345 B
MiniZinc
12 lines
345 B
MiniZinc
include "sort.mzn";
|
|
|
|
/** @group globals.sort
|
|
Return a multiset of values that is the same as the
|
|
multiset of values in \a x but in sorted order.
|
|
*/
|
|
function array[int] of var int: sort(array[int] of var int: x) ::promise_total =
|
|
let {
|
|
array[1..length(x)] of var lb_array(x)..ub_array(x): y;
|
|
constraint sort(x,y);
|
|
} in y;
|