1
0
This repository has been archived on 2025-03-06. You can view files and clone it, but cannot push or open issues or pull requests.
Jip J. Dekker 9b7e65e00b Squashed 'software/minizinc/' content from commit 5a577826
git-subtree-dir: software/minizinc
git-subtree-split: 5a577826da4d7cf6195f28b5604d8d20a01fbc6e
2021-06-18 09:34:50 +10:00

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"
];