% RUNS ON mzn20_fd
% RUNS ON mzn-fzn_fd
include "decreasing.mzn";

%-----------------------------------------------------------------------------%
% decreasing
%-----------------------------------------------------------------------------%

array[1..5] of var -100..100:         inc_avi = [5, _, 3, _, 1];
array[1..5] of var bool:        inc_avb = [true, false, _, _, _];
%array[1..8] of var set of 1..3: inc_avsi; % XXX :: is_output

constraint decreasing(inc_avi);
constraint decreasing(inc_avb);
% XXX: comparisons not implemented for sets
%constraint increasing(inc_avsi);

solve satisfy;

output [
    "inc_avb = array1d(1..5, ", show(inc_avb), ");\n",
    "inc_avi = array1d(1..5, ", show(inc_avi), ");\n"
];