/***
!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;