24 #if defined (HAVE_CONFIG_H)
121 error (
"spparms: too many output arguments");
123 else if (nargin == 1)
128 int len = str.length ();
129 for (
int i = 0;
i < len;
i++)
130 str[
i] = tolower (str[
i]);
132 if (str ==
"defaults" || str ==
"default")
135 static bool warned =
false;
136 if (! warned && str ==
"defaults")
138 warning (
"spparms: use \"default\" instead of \"defaults\"");
143 else if (str ==
"tight")
149 error (
"spparms: KEY not recognized");
156 NDArray vals =
args(0).xarray_value (
"spparms: input must be a string or a vector");
158 error (
"spparms: too many elements in vector VALS");
163 else if (nargin == 2)
167 double val =
args(1).xdouble_value (
"spparms: second argument must be a real scalar");
169 if (str ==
"umfpack")
170 warning (
"spparms: request to disable umfpack solvers ignored");
172 error (
"spparms: KEY not found");
175 error (
"spparms: too many input arguments");
static string_vector get_keys(void)
OCTAVE_EXPORT octave_value_list isa nd deftypefn *return ovl(args(0).is_integer_type())
octave_idx_type numel(void) const
Number of elements in the array.
identity matrix If supplied two scalar respectively For allows like xample val
#define OCTAVE_SPARSE_CONTROLS_SIZE
#define DEFUN(name, args_name, nargout_name, doc)
void error(const char *fmt,...)
static void print_info(std::ostream &os, const std::string &prefix)
static double get_key(const std::string &key)
static ColumnVector get_vals(void)
OCTAVE_EXPORT octave_value_list return the number of command line arguments passed to Octave If called with the optional argument the function xample nargout(@histc)
bool is_string(void) const
static void defaults(void)
void warning(const char *fmt,...)
=val(i)}if ode{val(i)}occurs in table i
static bool set_key(const std::string &key, const double &val)
static bool set_vals(const NDArray &vals)
If this string is the system will ring the terminal sometimes it is useful to be able to print the original representation of the string