source: ThirdParty/Glpk/trunk/glpk.patch @ 814

Last change on this file since 814 was 814, checked in by stefan, 12 years ago

include fix for mir cut backsubstitution into patch

File size: 2.5 KB
  • include/glpk.h

    diff -Naur glpk-4.24/include/glpk.h glpk/include/glpk.h
    old new  
    3030
    3131/* library version numbers: */
    3232#define GLP_MAJOR_VERSION  4
    33 #define GLP_MINOR_VERSION  23
     33#define GLP_MINOR_VERSION  24
    3434
    3535#ifndef _GLP_PROB
    3636#define _GLP_PROB
  • src/glpapi08.c

    diff -Naur glpk-4.24/src/glpapi08.c glpk/src/glpapi08.c
    old new  
    345345      switch (ret)
    346346      {  case 0:
    347347            if (tree->mip->mip_stat == GLP_FEAS)
    348             {  if (parm->msg_lev >= GLP_MSG_ALL)
    349                   xprintf("INTEGER OPTIMAL SOLUTION FOUND\n");
    350                tree->mip->mip_stat = GLP_OPT;
     348             { if (ios_relative_gap(tree) > 0) {
     349                               if (parm->msg_lev >= GLP_MSG_ALL)
     350                                       xprintf("INTEGER FEASIBLE SOLUTION FOUND, GAP SMALLER THAN TOLERANCE\n");
     351                               tree->mip->mip_stat = GLP_FEAS;
     352               } else {
     353                       if (parm->msg_lev >= GLP_MSG_ALL)
     354                               xprintf("INTEGER OPTIMAL SOLUTION FOUND\n");
     355                       tree->mip->mip_stat = GLP_OPT;
     356               }
    351357            }
    352358            else
    353359            {  if (parm->msg_lev >= GLP_MSG_ALL)
  • src/glpios03.c

    diff -Naur glpk-4.24/src/glpios03.c glpk/src/glpios03.c
    old new  
    13411341         {  if (tree->parm->msg_lev >= GLP_MSG_DBG)
    13421342               xprintf("Relative gap tolerance reached; search terminat"
    13431343                  "ed\n");
    1344             ret = GLP_ETMLIM;
     1344            ret = 0;
    13451345            goto done;
    13461346         }
    13471347#endif
  • src/glpios05.c

    diff -Naur glpk-4.24/src/glpios05.c glpk/src/glpios05.c
    old new  
    10841084            else
    10851085            {  /* x'[k] = x[k] - lb[k] * x[kk] */
    10861086               jj = mir->cut_vec->pos[kk];
     1087#if 0
    10871088               xassert(jj != 0);
     1089#else
     1090               if (jj == 0)
     1091               {  ios_set_vj(mir->cut_vec, kk, 1.0);
     1092                  jj = mir->cut_vec->pos[kk];
     1093                  xassert(jj != 0);
     1094                  mir->cut_vec->val[jj] = 0.0;
     1095               }
     1096#endif
    10881097               mir->cut_vec->val[jj] -= mir->cut_vec->val[j] *
    10891098                  mir->lb[k];
    10901099            }
Note: See TracBrowser for help on using the repository browser.