29 lines
842 B
MiniZinc
29 lines
842 B
MiniZinc
/***
|
|
!Test
|
|
expected:
|
|
- !Result
|
|
solution: !Solution
|
|
dist_base: [6, 7, 6, 8, 6, 9, 6]
|
|
dist_card: [4, 1, 1, 1]
|
|
dist_value: [6, 7, 8, 9]
|
|
***/
|
|
|
|
include "distribute.mzn";
|
|
|
|
%-----------------------------------------------------------------------------%
|
|
% distribute
|
|
%-----------------------------------------------------------------------------%
|
|
array[1..4] of var -100..100: dist_card ::add_to_output = [4, _, 1, _];
|
|
array[1..4] of var -100..100: dist_value ::add_to_output = [_, 7, 8, 9];
|
|
array[1..7] of var -100..100: dist_base ::add_to_output = [_, 7, 6, 8, 6, 9, _];
|
|
|
|
constraint distribute(dist_card, dist_value, dist_base);
|
|
|
|
solve satisfy;
|
|
|
|
output [
|
|
"dist_base = array1d(1..7, ", show(dist_base), ");\n",
|
|
"dist_card = array1d(1..4, ", show(dist_card), ");\n",
|
|
"dist_value = array1d(1..4, ", show(dist_value), ");\n"
|
|
];
|