#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"
Go to the source code of this file.
Defines | |
#define | OCTAVE_GLPK_GET_INT_PARAM(NAME, VAL) |
#define | OCTAVE_GLPK_GET_REAL_PARAM(NAME, IDX) |
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 | ||||
) |
do \ { \ octave_value tmp = PARAM.getfield (NAME); \ \ if (tmp.is_defined ()) \ { \ if (! tmp.is_empty ()) \ { \ VAL = tmp.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)
Definition at line 444 of file __glpk__.cc.
Referenced by DEFUN_DLD().
#define OCTAVE_GLPK_GET_REAL_PARAM | ( | NAME, | ||
IDX | ||||
) |
do \ { \ octave_value tmp = PARAM.getfield (NAME); \ \ if (tmp.is_defined ()) \ { \ if (! tmp.is_empty ()) \ { \ lpxRealParam[IDX] = tmp.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)
Definition at line 418 of file __glpk__.cc.
Referenced by DEFUN_DLD().
DEFUN_DLD | ( | __glpk__ | , | |
args | ||||
) |
Definition at line 470 of file __glpk__.cc.
References A, B, Sparse< T >::cidx(), Sparse< T >::cols(), Sparse< T >::data(), error(), error_state, Array< T >::fortran_vec(), gripe_not_supported(), Array< T >::length(), Sparse< T >::nnz(), OCTAVE_GLPK_GET_INT_PARAM, OCTAVE_GLPK_GET_REAL_PARAM, octave_Inf, octave_NA, print_usage(), ColumnVector::resize(), Array< T >::resize(), Sparse< T >::ridx(), Array< T >::rows(), Sparse< T >::rows(), xisinf(), and xmin().