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
00035
00036
00037
00038 #include <gecode/driver.hh>
00039 #include <gecode/int.hh>
00040 #include <gecode/minimodel.hh>
00041
00042 using namespace Gecode;
00043
00053 class Money : public Script {
00054 protected:
00056 static const int nl = 8;
00058 IntVarArray le;
00059 public:
00061 enum {
00062 MODEL_SINGLE,
00063 MODEL_CARRY
00064 };
00066 Money(const Options& opt) : le(*this,nl,0,9) {
00067 IntVar
00068 s(le[0]), e(le[1]), n(le[2]), d(le[3]),
00069 m(le[4]), o(le[5]), r(le[6]), y(le[7]);
00070
00071 rel(*this, s, IRT_NQ, 0);
00072 rel(*this, m, IRT_NQ, 0);
00073
00074 distinct(*this, le, opt.icl());
00075
00076 switch (opt.model()) {
00077 case MODEL_SINGLE:
00078 rel(*this, 1000*s+100*e+10*n+d
00079 + 1000*m+100*o+10*r+e
00080 == 10000*m+1000*o+100*n+10*e+y,
00081 opt.icl());
00082 break;
00083 case MODEL_CARRY:
00084 {
00085 IntVar c0(*this,0,1), c1(*this,0,1), c2(*this,0,1), c3(*this,0,1);
00086 rel(*this, d+e == y+10*c0, opt.icl());
00087 rel(*this, c0+n+r == e+10*c1, opt.icl());
00088 rel(*this, c1+e+o == n+10*c2, opt.icl());
00089 rel(*this, c2+s+m == o+10*c3, opt.icl());
00090 rel(*this, c3 == m, opt.icl());
00091 }
00092 break;
00093 default: GECODE_NEVER;
00094 }
00095
00096 branch(*this, le, INT_VAR_SIZE_MIN, INT_VAL_MIN);
00097 }
00099 virtual void
00100 print(std::ostream& os) const {
00101 os << "\t" << le << std::endl;
00102 }
00103
00105 Money(bool share, Money& s) : Script(share,s) {
00106 le.update(*this, share, s.le);
00107 }
00109 virtual Space*
00110 copy(bool share) {
00111 return new Money(share,*this);
00112 }
00113 };
00114
00118 int
00119 main(int argc, char* argv[]) {
00120 Options opt("SEND+MORE=MONEY");
00121 opt.model(Money::MODEL_SINGLE);
00122 opt.model(Money::MODEL_SINGLE, "single", "use single linear equation");
00123 opt.model(Money::MODEL_CARRY, "carry", "use carry");
00124 opt.solutions(0);
00125 opt.iterations(20000);
00126 opt.parse(argc,argv);
00127 Script::run<Money,DFS,Options>(opt);
00128 return 0;
00129 }
00130
00131
00132