00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034 #include "test/flatzinc.hh"
00035
00036 namespace Test { namespace FlatZinc {
00037
00038 namespace {
00040 class Create {
00041 public:
00042
00044 Create(void) {
00045 (void) new FlatZincTest("queens::cp2",
00046 "predicate all_different_int(array [int] of var int: x);\n\
00047 predicate bool_lin_ge(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
00048 predicate bool_lin_gt(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
00049 predicate bool_lin_lt(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
00050 predicate bool_lin_ne(array [int] of int: a, array [int] of var bool: x, var int: c);\n\
00051 var 2..9: INT____00001 :: is_defined_var :: var_is_introduced;\n\
00052 var 3..10: INT____00002 :: is_defined_var :: var_is_introduced;\n\
00053 var 4..11: INT____00003 :: is_defined_var :: var_is_introduced;\n\
00054 var 5..12: INT____00004 :: is_defined_var :: var_is_introduced;\n\
00055 var 6..13: INT____00005 :: is_defined_var :: var_is_introduced;\n\
00056 var 7..14: INT____00006 :: is_defined_var :: var_is_introduced;\n\
00057 var 8..15: INT____00007 :: is_defined_var :: var_is_introduced;\n\
00058 var 8..15: INT____00008 :: is_defined_var :: var_is_introduced;\n\
00059 var 7..14: INT____00009 :: is_defined_var :: var_is_introduced;\n\
00060 var 6..13: INT____00010 :: is_defined_var :: var_is_introduced;\n\
00061 var 5..12: INT____00011 :: is_defined_var :: var_is_introduced;\n\
00062 var 4..11: INT____00012 :: is_defined_var :: var_is_introduced;\n\
00063 var 3..10: INT____00013 :: is_defined_var :: var_is_introduced;\n\
00064 var 2..9: INT____00014 :: is_defined_var :: var_is_introduced;\n\
00065 array [1..8] of var 1..8: q :: output_array([1..8]);\n\
00066 constraint all_different_int([INT____00008, INT____00009, INT____00010, INT____00011, INT____00012, INT____00013, INT____00014, q[8]]);\n\
00067 constraint all_different_int([q[1], INT____00001, INT____00002, INT____00003, INT____00004, INT____00005, INT____00006, INT____00007]);\n\
00068 constraint all_different_int(q);\n\
00069 constraint int_lin_eq([-1, 1], [INT____00001, q[2]], -1) :: defines_var(INT____00001);\n\
00070 constraint int_lin_eq([-1, 1], [INT____00002, q[3]], -2) :: defines_var(INT____00002);\n\
00071 constraint int_lin_eq([-1, 1], [INT____00003, q[4]], -3) :: defines_var(INT____00003);\n\
00072 constraint int_lin_eq([-1, 1], [INT____00004, q[5]], -4) :: defines_var(INT____00004);\n\
00073 constraint int_lin_eq([-1, 1], [INT____00005, q[6]], -5) :: defines_var(INT____00005);\n\
00074 constraint int_lin_eq([-1, 1], [INT____00006, q[7]], -6) :: defines_var(INT____00006);\n\
00075 constraint int_lin_eq([-1, 1], [INT____00007, q[8]], -7) :: defines_var(INT____00007);\n\
00076 constraint int_lin_eq([-1, 1], [INT____00008, q[1]], -7) :: defines_var(INT____00008);\n\
00077 constraint int_lin_eq([-1, 1], [INT____00009, q[2]], -6) :: defines_var(INT____00009);\n\
00078 constraint int_lin_eq([-1, 1], [INT____00010, q[3]], -5) :: defines_var(INT____00010);\n\
00079 constraint int_lin_eq([-1, 1], [INT____00011, q[4]], -4) :: defines_var(INT____00011);\n\
00080 constraint int_lin_eq([-1, 1], [INT____00012, q[5]], -3) :: defines_var(INT____00012);\n\
00081 constraint int_lin_eq([-1, 1], [INT____00013, q[6]], -2) :: defines_var(INT____00013);\n\
00082 constraint int_lin_eq([-1, 1], [INT____00014, q[7]], -1) :: defines_var(INT____00014);\n\
00083 solve :: int_search(q, first_fail, indomain_min, complete) satisfy;\n\
00084 ", "q = array1d(1..8, [1, 5, 8, 6, 3, 7, 2, 4]);\n\
00085 ----------\n\
00086 ");
00087 }
00088 };
00089
00090 Create c;
00091 }
00092
00093 }}
00094
00095