#include <cfloat>
#include <csetjmp>
#include <ctime>
#include "lo-ieee.h"
#include "defun-dld.h"
#include "error.h"
#include "gripes.h"
#include "oct-map.h"
#include "oct-obj.h"
#include "pager.h"
Defines | |
#define | OCTAVE_GLPK_GET_REAL_PARAM(NAME, IDX) |
#define | OCTAVE_GLPK_GET_INT_PARAM(NAME, VAL) |
Functions | |
DEFUN_DLD (__glpk__, args,,"-*- texinfo -*-\n\ @deftypefn {Loadable Function} {[@var{values}] =} __glpk__ (@var{args})\n\ Undocumented internal function.\n\ @end deftypefn") |
#define OCTAVE_GLPK_GET_INT_PARAM | ( | NAME, | |||
VAL | ) |
Value:
do \ { \ if (PARAM.contains (NAME)) \ { \ Cell tmp = PARAM.contents (NAME); \ \ if (! tmp.is_empty ()) \ { \ VAL = tmp(0).int_value (); \ \ if (error_state) \ { \ error ("glpk: invalid value in param." NAME); \ return retval; \ } \ } \ else \ { \ error ("glpk: invalid value in param." NAME); \ return retval; \ } \ } \ } \ while (0)
#define OCTAVE_GLPK_GET_REAL_PARAM | ( | NAME, | |||
IDX | ) |
Value:
do \ { \ if (PARAM.contains (NAME)) \ { \ Cell tmp = PARAM.contents (NAME); \ \ if (! tmp.is_empty ()) \ { \ lpxRealParam[IDX] = tmp(0).scalar_value (); \ \ if (error_state) \ { \ error ("glpk: invalid value in param." NAME); \ return retval; \ } \ } \ else \ { \ error ("glpk: invalid value in param." NAME); \ return retval; \ } \ } \ } \ while (0)
DEFUN_DLD | ( | __glpk__ | , | |
args | ||||
) |