Jip J. Dekker
fad1b07018
git-subtree-dir: software/minizinc git-subtree-split: 4f10c82056ffcb1041d7ffef29d77a7eef92cf76
28 lines
459 B
MiniZinc
28 lines
459 B
MiniZinc
/***
|
|
!Test
|
|
expected: !Result
|
|
status: SATISFIED
|
|
solution: !Solution
|
|
x: 10
|
|
***/
|
|
|
|
array [1..10] of int: a =
|
|
[i | i in 1..10];
|
|
|
|
% Predicate style assertion.
|
|
%
|
|
constraint assert(forall (i in 1..9) (a[i] < a[i + 1]), "a not increasing");
|
|
|
|
% Function style assertion.
|
|
%
|
|
test even(int: x) = (x mod 2 = 0);
|
|
|
|
array [1..10] of int: b =
|
|
[assert(even(2 * a[i]), "that's odd...", 2 * a[i]) | i in 1..10];
|
|
|
|
var 1..10: x;
|
|
|
|
constraint b[x] = max(b);
|
|
|
|
solve satisfy;
|