% RUNS ON mzn20_fd
% RUNS ON mzn-fzn_fd
var 1..1: x;	% Just so we have something to print out.

include "roots.mzn";

constraint roots([], {}, {});
constraint roots([1, 2, 3], {}, {});
constraint roots([1, 3, 1, 2, 3], {2, 4, 5}, {2, 3, 8});
constraint roots([1, 1, 1], {1, 2, 3}, {1, 2});

solve satisfy;

output [
   "x = ", show(x), ";\n"
];