COIN-OR::LEMON - Graph Library

source: lemon-1.2/test/mip_test.cc @ 1005:f37f0845cf32

Last change on this file since 1005:f37f0845cf32 was 551:9d0d7e20f76d, checked in by Balazs Dezso <deba@…>, 16 years ago

Fix lp related errors and warnings (#241 and #242)

File size: 2.9 KB
RevLine 
[458]1/* -*- mode: C++; indent-tabs-mode: nil; -*-
2 *
3 * This file is a part of LEMON, a generic C++ optimization library.
4 *
[551]5 * Copyright (C) 2003-2009
[458]6 * Egervary Jeno Kombinatorikus Optimalizalasi Kutatocsoport
7 * (Egervary Research Group on Combinatorial Optimization, EGRES).
8 *
9 * Permission to use, modify and distribute this software is granted
10 * provided that this copyright notice appears in all copies. For
11 * precise terms see the accompanying LICENSE file.
12 *
13 * This software is provided "AS IS" with no warranty of any kind,
14 * express or implied, and with no claim as to its suitability for any
15 * purpose.
16 *
17 */
18
19#include "test_tools.h"
20
21
22#ifdef HAVE_CONFIG_H
23#include <lemon/config.h>
24#endif
25
26#ifdef HAVE_CPLEX
[461]27#include <lemon/cplex.h>
[458]28#endif
29
30#ifdef HAVE_GLPK
[461]31#include <lemon/glpk.h>
[458]32#endif
33
34
35using namespace lemon;
36
[459]37void solveAndCheck(MipSolver& mip, MipSolver::ProblemType stat,
[458]38                   double exp_opt) {
39  using std::string;
40
[459]41  mip.solve();
[458]42  //int decimal,sign;
43  std::ostringstream buf;
[459]44  buf << "Type should be: " << int(stat)<<" and it is "<<int(mip.type());
[458]45
46
47  //  itoa(stat,buf1, 10);
[459]48  check(mip.type()==stat, buf.str());
[458]49
[459]50  if (stat ==  MipSolver::OPTIMAL) {
[458]51    std::ostringstream sbuf;
52    buf << "Wrong optimal value: the right optimum is " << exp_opt;
[459]53    check(std::abs(mip.solValue()-exp_opt) < 1e-3, sbuf.str());
[458]54    //+ecvt(exp_opt,2)
55  }
56}
57
[459]58void aTest(MipSolver& mip)
[458]59{
60 //The following example is very simple
61
62
[459]63  typedef MipSolver::Row Row;
64  typedef MipSolver::Col Col;
[458]65
66
67
68  Col x1 = mip.addCol();
69  Col x2 = mip.addCol();
70
71
72  //Objective function
73  mip.obj(x1);
74
75  mip.max();
76
77
78  //Unconstrained optimization
79  mip.solve();
80  //Check it out!
81
82  //Constraints
83  mip.addRow(2*x1+x2 <=2);
84  mip.addRow(x1-2*x2 <=0);
85
86  //Nonnegativity of the variable x1
87  mip.colLowerBound(x1, 0);
88
89  //Maximization of x1
90  //over the triangle with vertices (0,0),(4/5,2/5),(0,2)
91  double expected_opt=4.0/5.0;
[459]92  solveAndCheck(mip, MipSolver::OPTIMAL, expected_opt);
[458]93
94  //Restrict x2 to integer
[459]95  mip.colType(x2,MipSolver::INTEGER);
[458]96  expected_opt=1.0/2.0;
[459]97  solveAndCheck(mip, MipSolver::OPTIMAL, expected_opt);
[458]98
99
100  //Restrict both to integer
[459]101  mip.colType(x1,MipSolver::INTEGER);
[458]102  expected_opt=0;
[459]103  solveAndCheck(mip, MipSolver::OPTIMAL, expected_opt);
[458]104
105
106
107}
108
[540]109template<class MIP>
110void cloneTest()
111{
[551]112
[540]113  MIP* mip = new MIP();
114  MIP* mipnew = mip->newSolver();
115  MIP* mipclone = mip->cloneSolver();
116  delete mip;
117  delete mipnew;
118  delete mipclone;
119}
[458]120
121int main()
122{
123
124#ifdef HAVE_GLPK
[459]125  {
[462]126    GlpkMip mip1;
[459]127    aTest(mip1);
[540]128    cloneTest<GlpkMip>();
[459]129  }
[458]130#endif
131
132#ifdef HAVE_CPLEX
[459]133  try {
[462]134    CplexMip mip2;
[459]135    aTest(mip2);
[551]136    cloneTest<CplexMip>();
[459]137  } catch (CplexEnv::LicenseError& error) {
138#ifdef LEMON_FORCE_CPLEX_CHECK
139    check(false, error.what());
140#else
141    std::cerr << error.what() << std::endl;
142    std::cerr << "Cplex license check failed, lp check skipped" << std::endl;
143#endif
144  }
[458]145#endif
146
147  return 0;
148
149}
Note: See TracBrowser for help on using the repository browser.