this repo has no description
dekker.one
1/* -*- mode: C++; c-basic-offset: 2; indent-tabs-mode: nil -*- */
2/*
3 * Main authors:
4 * Guido Tack <tack@gecode.org>
5 *
6 * Copyright:
7 * Guido Tack, 2014
8 *
9 * This file is part of Gecode, the generic constraint
10 * development environment:
11 * http://www.gecode.org
12 *
13 * Permission is hereby granted, free of charge, to any person obtaining
14 * a copy of this software and associated documentation files (the
15 * "Software"), to deal in the Software without restriction, including
16 * without limitation the rights to use, copy, modify, merge, publish,
17 * distribute, sublicense, and/or sell copies of the Software, and to
18 * permit persons to whom the Software is furnished to do so, subject to
19 * the following conditions:
20 *
21 * The above copyright notice and this permission notice shall be
22 * included in all copies or substantial portions of the Software.
23 *
24 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
25 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
26 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
27 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
28 * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
29 * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
30 * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
31 *
32 */
33
34#include "test/flatzinc.hh"
35
36namespace Test { namespace FlatZinc {
37
38 namespace {
39 /// Helper class to create and register tests
40 class Create {
41 public:
42
43 /// Perform creation and registration
44 Create(void) {
45 (void) new FlatZincTest("knights",
46"predicate all_different_int(array [int] of var int: x);\n\
47predicate all_equal_int(array [int] of var int: x);\n\
48predicate among(var int: n, array [int] of var int: x, set of int: v);\n\
49predicate array_bool_lq(array [int] of var bool: x, array [int] of var bool: y);\n\
50predicate array_bool_lt(array [int] of var bool: x, array [int] of var bool: y);\n\
51predicate array_int_lq(array [int] of var int: x, array [int] of var int: y);\n\
52predicate array_int_lt(array [int] of var int: x, array [int] of var int: y);\n\
53predicate array_set_partition(array [int] of var set of int: S, set of int: universe);\n\
54predicate at_least_int(int: n, array [int] of var int: x, int: v);\n\
55predicate at_most_int(int: n, array [int] of var int: x, int: v);\n\
56predicate bool_lin_ge(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
57predicate bool_lin_gt(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
58predicate bool_lin_lt(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
59predicate bool_lin_ne(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
60predicate count(array [int] of var int: x, var int: y, var int: c);\n\
61predicate count_reif(array [int] of var int: x, var int: y, var int: c, var bool: b);\n\
62predicate cumulatives(array [int] of var int: s, array [int] of var int: d, array [int] of var int: r, var int: b);\n\
63predicate decreasing_bool(array [int] of var bool: x);\n\
64predicate decreasing_int(array [int] of var int: x);\n\
65predicate disjoint(var set of int: s1, var set of int: s2);\n\
66predicate gecode_array_set_element_union(var set of int: x, array [int] of var set of int: y, var set of int: z);\n\
67predicate gecode_bin_packing_load(array [int] of var int: l, array [int] of var int: bin, array [int] of int: w, int: minIndex);\n\
68predicate gecode_circuit(int: offset, array [int] of var int: x);\n\
69predicate gecode_int_set_channel(array [int] of var int: x, int: xoff, array [int] of var set of int: y, int: yoff);\n\
70predicate gecode_inverse_set(array [int] of var set of int: f, array [int] of var set of int: invf, int: xoff, int: yoff);\n\
71predicate gecode_link_set_to_booleans(var set of int: s, array [int] of var bool: b, int: idx);\n\
72predicate gecode_member_bool_reif(array [int] of var bool: x, var bool: y, var bool: b);\n\
73predicate gecode_member_int_reif(array [int] of var int: x, var int: y, var bool: b);\n\
74predicate gecode_nooverlap(array [int] of var int: x, array [int] of var int: w, array [int] of var int: y, array [int] of var int: h);\n\
75predicate gecode_precede(array [int] of var int: x, int: s, int: t);\n\
76predicate gecode_precede_set(array [int] of var set of int: x, int: s, int: t);\n\
77predicate gecode_range(array [int] of var int: x, int: xoff, var set of int: s, var set of int: t);\n\
78predicate gecode_set_weights(array [int] of int: csi, array [int] of int: cs, var set of int: x, var int: y);\n\
79predicate global_cardinality(array [int] of var int: x, array [int] of int: cover, array [int] of var int: counts);\n\
80predicate global_cardinality_closed(array [int] of var int: x, array [int] of int: cover, array [int] of var int: counts);\n\
81predicate global_cardinality_low_up(array [int] of var int: x, array [int] of int: cover, array [int] of int: lbound, array [int] of int: ubound);\n\
82predicate global_cardinality_low_up_closed(array [int] of var int: x, array [int] of int: cover, array [int] of int: lbound, array [int] of int: ubound);\n\
83predicate increasing_bool(array [int] of var bool: x);\n\
84predicate increasing_int(array [int] of var int: x);\n\
85predicate inverse_offsets(array [int] of var int: f, int: foff, array [int] of var int: invf, int: invfoff);\n\
86predicate maximum_int(var int: m, array [int] of var int: x);\n\
87predicate member_bool(array [int] of var bool: x, var bool: y);\n\
88predicate member_int(array [int] of var int: x, var int: y);\n\
89predicate minimum_int(var int: m, array [int] of var int: x);\n\
90predicate nvalue(var int: n, array [int] of var int: x);\n\
91predicate regular(array [int] of var int: x, int: Q, int: S, array [int, int] of int: d, int: q0, set of int: F);\n\
92predicate sort(array [int] of var int: x, array [int] of var int: y);\n\
93predicate table_bool(array [int] of var bool: x, array [int, int] of bool: t);\n\
94predicate table_int(array [int] of var int: x, array [int, int] of int: t);\n\
95array [1..36] of set of int: neighbours = [{9, 14}, {10, 13, 15}, {7, 11, 14, 16}, {8, 12, 15, 17}, {9, 16, 18}, {10, 17}, {3, 15, 20}, {4, 16, 19, 21}, {1, 5, 13, 17, 20, 22}, {2, 6, 14, 18, 21, 23}, {3, 15, 22, 24}, {4, 16, 23}, {2, 9, 21, 26}, {1, 3, 10, 22, 25, 27}, {2, 4, 7, 11, 19, 23, 26, 28}, {3, 5, 8, 12, 20, 24, 27, 29}, {4, 6, 9, 21, 28, 30}, {5, 10, 22, 29}, {8, 15, 27, 32}, {7, 9, 16, 28, 31, 33}, {8, 10, 13, 17, 25, 29, 32, 34}, {9, 11, 14, 18, 26, 30, 33, 35}, {10, 12, 15, 27, 34, 36}, {11, 16, 28, 35}, {14, 21, 33}, {13, 15, 22, 34}, {14, 16, 19, 23, 31, 35}, {15, 17, 20, 24, 32, 36}, {16, 18, 21, 33}, {17, 22, 34}, {20, 27}, {19, 21, 28}, {20, 22, 25, 29}, {21, 23, 26, 30}, {22, 24, 27}, {23, 28}];\n\
96var set of 1..36: SET____00001 :: is_defined_var :: var_is_introduced;\n\
97var set of 1..36: SET____00002 :: is_defined_var :: var_is_introduced;\n\
98var set of 1..36: SET____00003 :: is_defined_var :: var_is_introduced;\n\
99var set of 1..36: SET____00004 :: is_defined_var :: var_is_introduced;\n\
100var set of 1..36: SET____00005 :: is_defined_var :: var_is_introduced;\n\
101var set of 1..36: SET____00006 :: is_defined_var :: var_is_introduced;\n\
102var set of 1..36: SET____00007 :: is_defined_var :: var_is_introduced;\n\
103var set of 1..36: SET____00008 :: is_defined_var :: var_is_introduced;\n\
104var set of 1..36: SET____00009 :: is_defined_var :: var_is_introduced;\n\
105var set of 1..36: SET____00010 :: is_defined_var :: var_is_introduced;\n\
106var set of 1..36: SET____00011 :: is_defined_var :: var_is_introduced;\n\
107var set of 1..36: SET____00012 :: is_defined_var :: var_is_introduced;\n\
108var set of 1..36: SET____00013 :: is_defined_var :: var_is_introduced;\n\
109var set of 1..36: SET____00014 :: is_defined_var :: var_is_introduced;\n\
110var set of 1..36: SET____00015 :: is_defined_var :: var_is_introduced;\n\
111var set of 1..36: SET____00016 :: is_defined_var :: var_is_introduced;\n\
112var set of 1..36: SET____00017 :: is_defined_var :: var_is_introduced;\n\
113var set of 1..36: SET____00018 :: is_defined_var :: var_is_introduced;\n\
114var set of 1..36: SET____00019 :: is_defined_var :: var_is_introduced;\n\
115var set of 1..36: SET____00020 :: is_defined_var :: var_is_introduced;\n\
116var set of 1..36: SET____00021 :: is_defined_var :: var_is_introduced;\n\
117var set of 1..36: SET____00022 :: is_defined_var :: var_is_introduced;\n\
118var set of 1..36: SET____00023 :: is_defined_var :: var_is_introduced;\n\
119var set of 1..36: SET____00024 :: is_defined_var :: var_is_introduced;\n\
120var set of 1..36: SET____00025 :: is_defined_var :: var_is_introduced;\n\
121var set of 1..36: SET____00026 :: is_defined_var :: var_is_introduced;\n\
122var set of 1..36: SET____00027 :: is_defined_var :: var_is_introduced;\n\
123var set of 1..36: SET____00028 :: is_defined_var :: var_is_introduced;\n\
124var set of 1..36: SET____00029 :: is_defined_var :: var_is_introduced;\n\
125var set of 1..36: SET____00030 :: is_defined_var :: var_is_introduced;\n\
126var set of 1..36: SET____00031 :: is_defined_var :: var_is_introduced;\n\
127var set of 1..36: SET____00032 :: is_defined_var :: var_is_introduced;\n\
128var set of 1..36: SET____00033 :: is_defined_var :: var_is_introduced;\n\
129var set of 1..36: SET____00034 :: is_defined_var :: var_is_introduced;\n\
130var set of 1..36: SET____00035 :: is_defined_var :: var_is_introduced;\n\
131array [1..36] of var 1..36: p :: output_array([1..36]);\n\
132constraint all_different_int(p);\n\
133constraint array_set_element(p[1], neighbours, SET____00001) :: defines_var(SET____00001);\n\
134constraint array_set_element(p[2], neighbours, SET____00002) :: defines_var(SET____00002);\n\
135constraint array_set_element(p[3], neighbours, SET____00003) :: defines_var(SET____00003);\n\
136constraint array_set_element(p[4], neighbours, SET____00004) :: defines_var(SET____00004);\n\
137constraint array_set_element(p[5], neighbours, SET____00005) :: defines_var(SET____00005);\n\
138constraint array_set_element(p[6], neighbours, SET____00006) :: defines_var(SET____00006);\n\
139constraint array_set_element(p[7], neighbours, SET____00007) :: defines_var(SET____00007);\n\
140constraint array_set_element(p[8], neighbours, SET____00008) :: defines_var(SET____00008);\n\
141constraint array_set_element(p[9], neighbours, SET____00009) :: defines_var(SET____00009);\n\
142constraint array_set_element(p[10], neighbours, SET____00010) :: defines_var(SET____00010);\n\
143constraint array_set_element(p[11], neighbours, SET____00011) :: defines_var(SET____00011);\n\
144constraint array_set_element(p[12], neighbours, SET____00012) :: defines_var(SET____00012);\n\
145constraint array_set_element(p[13], neighbours, SET____00013) :: defines_var(SET____00013);\n\
146constraint array_set_element(p[14], neighbours, SET____00014) :: defines_var(SET____00014);\n\
147constraint array_set_element(p[15], neighbours, SET____00015) :: defines_var(SET____00015);\n\
148constraint array_set_element(p[16], neighbours, SET____00016) :: defines_var(SET____00016);\n\
149constraint array_set_element(p[17], neighbours, SET____00017) :: defines_var(SET____00017);\n\
150constraint array_set_element(p[18], neighbours, SET____00018) :: defines_var(SET____00018);\n\
151constraint array_set_element(p[19], neighbours, SET____00019) :: defines_var(SET____00019);\n\
152constraint array_set_element(p[20], neighbours, SET____00020) :: defines_var(SET____00020);\n\
153constraint array_set_element(p[21], neighbours, SET____00021) :: defines_var(SET____00021);\n\
154constraint array_set_element(p[22], neighbours, SET____00022) :: defines_var(SET____00022);\n\
155constraint array_set_element(p[23], neighbours, SET____00023) :: defines_var(SET____00023);\n\
156constraint array_set_element(p[24], neighbours, SET____00024) :: defines_var(SET____00024);\n\
157constraint array_set_element(p[25], neighbours, SET____00025) :: defines_var(SET____00025);\n\
158constraint array_set_element(p[26], neighbours, SET____00026) :: defines_var(SET____00026);\n\
159constraint array_set_element(p[27], neighbours, SET____00027) :: defines_var(SET____00027);\n\
160constraint array_set_element(p[28], neighbours, SET____00028) :: defines_var(SET____00028);\n\
161constraint array_set_element(p[29], neighbours, SET____00029) :: defines_var(SET____00029);\n\
162constraint array_set_element(p[30], neighbours, SET____00030) :: defines_var(SET____00030);\n\
163constraint array_set_element(p[31], neighbours, SET____00031) :: defines_var(SET____00031);\n\
164constraint array_set_element(p[32], neighbours, SET____00032) :: defines_var(SET____00032);\n\
165constraint array_set_element(p[33], neighbours, SET____00033) :: defines_var(SET____00033);\n\
166constraint array_set_element(p[34], neighbours, SET____00034) :: defines_var(SET____00034);\n\
167constraint array_set_element(p[35], neighbours, SET____00035) :: defines_var(SET____00035);\n\
168constraint int_eq(p[1], 1);\n\
169constraint int_eq(p[2], 9);\n\
170constraint int_eq(p[36], 14);\n\
171constraint set_in(p[2], SET____00001);\n\
172constraint set_in(p[3], SET____00002);\n\
173constraint set_in(p[4], SET____00003);\n\
174constraint set_in(p[5], SET____00004);\n\
175constraint set_in(p[6], SET____00005);\n\
176constraint set_in(p[7], SET____00006);\n\
177constraint set_in(p[8], SET____00007);\n\
178constraint set_in(p[9], SET____00008);\n\
179constraint set_in(p[10], SET____00009);\n\
180constraint set_in(p[11], SET____00010);\n\
181constraint set_in(p[12], SET____00011);\n\
182constraint set_in(p[13], SET____00012);\n\
183constraint set_in(p[14], SET____00013);\n\
184constraint set_in(p[15], SET____00014);\n\
185constraint set_in(p[16], SET____00015);\n\
186constraint set_in(p[17], SET____00016);\n\
187constraint set_in(p[18], SET____00017);\n\
188constraint set_in(p[19], SET____00018);\n\
189constraint set_in(p[20], SET____00019);\n\
190constraint set_in(p[21], SET____00020);\n\
191constraint set_in(p[22], SET____00021);\n\
192constraint set_in(p[23], SET____00022);\n\
193constraint set_in(p[24], SET____00023);\n\
194constraint set_in(p[25], SET____00024);\n\
195constraint set_in(p[26], SET____00025);\n\
196constraint set_in(p[27], SET____00026);\n\
197constraint set_in(p[28], SET____00027);\n\
198constraint set_in(p[29], SET____00028);\n\
199constraint set_in(p[30], SET____00029);\n\
200constraint set_in(p[31], SET____00030);\n\
201constraint set_in(p[32], SET____00031);\n\
202constraint set_in(p[33], SET____00032);\n\
203constraint set_in(p[34], SET____00033);\n\
204constraint set_in(p[35], SET____00034);\n\
205constraint set_in(p[36], SET____00035);\n\
206solve :: int_search(p, input_order, indomain_min, complete) satisfy;\n\
207", "p = array1d(1..36, [1, 9, 5, 16, 3, 7, 15, 2, 10, 6, 17, 30, 34, 26, 13, 21, 32, 19, 8, 4, 12, 23, 36, 28, 20, 31, 27, 35, 24, 11, 22, 18, 29, 33, 25, 14]);\n\
208----------\n\
209");
210 }
211 };
212
213 Create c;
214 }
215
216}}
217
218// STATISTICS: test-flatzinc