11 #ifndef __IPMA97SOLVERINTERFACE_HPP__ 12 #define __IPMA97SOLVERINTERFACE_HPP__ 28 #define IPOPT_DECL_MA97_DEFAULT_CONTROL(x) void (x)( \ 29 struct ma97_control* control \ 33 #define IPOPT_DECL_MA97_ANALYSE(x) void (x)( \ 40 const struct ma97_control* control,\ 41 struct ma97_info* info, \ 46 #define IPOPT_DECL_MA97_FACTOR(x) void (x)( \ 50 const ipnumber val[], \ 53 const struct ma97_control* control, \ 54 struct ma97_info* info, \ 59 #define IPOPT_DECL_MA97_FACTOR_SOLVE(x) void (x)( \ 63 const ipnumber val[], \ 69 const struct ma97_control* control, \ 70 struct ma97_info* info, \ 75 #define IPOPT_DECL_MA97_SOLVE(x) void (x)( \ 82 const struct ma97_control* control, \ 83 struct ma97_info* info \ 87 #define IPOPT_DECL_MA97_FINALISE(x) void (x)( \ 93 #define IPOPT_DECL_MA97_FREE_AKEEP(x) void (x)( \ 205 const std::string& prefix
229 Index numberOfNegEVals
273 const std::string& name
bool ProvidesDegeneracyDetection() const
Query whether the indices of linearly dependent rows/columns can be determined by this linear solver...
bool IncreaseQuality()
Request to increase quality of solution for next solve.
ESymSolverStatus
Enum to report outcome of a linear solve.
#define IPOPT_DECL_MA97_FINALISE(x)
Index NumberOfNegEVals() const
Number of negative eigenvalues detected during last factorization.
Base class for interfaces to symmetric indefinite linear solvers for sparse matrices.
#define IPOPT_DECL_MA97_ANALYSE(x)
int numdelay_
Number of delayed pivots last time we scaled.
#define IPOPT_DECL_MA97_DEFAULT_CONTROL(x)
#define IPOPT_DECL_MA97_FREE_AKEEP(x)
ESymSolverStatus DetermineDependentRows(const Index *, const Index *, std::list< Index > &)
This method determines the list of row indices of the linearly dependent rows.
bool InitializeImpl(const OptionsList &options, const std::string &prefix)
Implementation of the initialization method that has to be overloaded by for each derived class...
static void SetFunctions(IPOPT_DECL_MA97_DEFAULT_CONTROL(*ma97_default_control), IPOPT_DECL_MA97_ANALYSE(*ma97_analyse), IPOPT_DECL_MA97_FACTOR(*ma97_factor), IPOPT_DECL_MA97_FACTOR_SOLVE(*ma97_factor_solve), IPOPT_DECL_MA97_SOLVE(*ma97_solve), IPOPT_DECL_MA97_FINALISE(*ma97_finalise),)
set MA97 functions to use for every instantiation of this class
Number * GetValuesArrayPtr()
Method returning an internal array into which the nonzero elements (in the same order as ja) will be ...
static int ScaleNameToNum(const std::string &name)
converts a scaling option name to its ma97 option number
struct ma97_control control_
enum scale_opts switch_[3]
IPOPT_DECL_MA97_FINALISE * ma97_finalise
Number * val_
Storage for variables.
static void RegisterOptions(SmartPtr< RegisteredOptions > roptions)
SmartPtr< LibraryLoader > hslloader
ipindex Index
Type of all indices of vectors, matrices etc.
Number * scaling_
Store scaling for reuse if doing dynamic scaling.
Compressed sparse row format for lower triangular part, with 1 offset.
IPOPT_DECL_MA97_FREE_AKEEP * ma97_free_akeep
This file contains a base class for all exceptions and a set of macros to help with exceptions...
Template class for Smart Pointers.
This class stores a list of user set options.
void * fkeep_
Stores pointer to factors (only understood Fortran code!)
int fctidx_
Current factorization number to dump to.
ESymSolverStatus MultiSolve(bool new_matrix, const Index *ia, const Index *ja, Index nrhs, Number *rhs_vals, bool check_NegEVals, Index numberOfNegEVals)
Solve operation for multiple right hand sides.
IPOPT_DECL_MA97_FACTOR_SOLVE * ma97_factor_solve
ESymSolverStatus InitializeStructure(Index dim, Index nonzeros, const Index *ia, const Index *ja)
Method for initializing internal structures.
ipnumber Number
Type of all numbers.
EMatrixFormat MatrixFormat() const
Query of requested matrix type that the linear solver understands.
#define IPOPT_DECL_MA97_FACTOR(x)
Unrecoverable error in linear solver occurred.
EMatrixFormat
Enum to specify sparse matrix format.
Ma97SolverInterface(SmartPtr< LibraryLoader > hslloader_)
IPOPT_DECL_MA97_ANALYSE * ma97_analyse
bool ProvidesInertia() const
Query whether inertia is computed by linear solver.
IPOPT_DECL_MA97_FACTOR * ma97_factor
void * akeep_
Stores pointer to factors (only understood Fortran code!)
#define IPOPT_DECL_MA97_FACTOR_SOLVE(x)
IPOPT_DECL_MA97_DEFAULT_CONTROL * ma97_default_control
int numneg_
Number of negative pivots in last factorization.
IPOPT_DECL_MA97_SOLVE * ma97_solve
int ndim_
Number of dimensions.
bool rescale_
Indicates if we should rescale next factorization.
bool pivtol_changed_
indicates if pivtol has been changed
#define IPOPT_DECL_MA97_SOLVE(x)