25 #if defined (HAVE_CONFIG_H) 43 template <
typename CHOLT>
50 template <
typename CHOLT>
58 template <
typename CHOLT>
151 int nargin = args.length ();
155 if (
nargout > 2 && ! args(0).issparse ())
156 error (
"chol: using three output arguments, matrix A must be sparse");
164 std::string tmp = args(n++).xstring_value (
"chol: optional arguments must be strings");
173 error (R
"(chol: optional argument must be one of "vector", "lower", or "upper")"); 211 error (
"chol: input matrix must be positive definite");
236 error (
"chol: input matrix must be positive definite");
244 error (R
"(chol: A must be sparse for the "vector" option)"); 256 error (
"chol: input matrix must be positive definite");
269 error (
"chol: input matrix must be positive definite");
277 error (R
"(chol: A must be sparse for the "vector" option)"); 289 error (
"chol: input matrix must be positive definite");
302 error (
"chol: input matrix must be positive definite");
364 if (args.length () != 1)
373 if (nr == 0 || nc == 0)
390 error (
"cholinv: A must be positive definite");
401 error (
"cholinv: A must be positive definite");
417 error (
"cholinv: A must be positive definite");
428 error (
"cholinv: A must be positive definite");
444 error (
"cholinv: A must be positive definite");
455 error (
"cholinv: A must be positive definite");
492 if (args.length () != 1)
502 if (nr == 0 || nc == 0)
624 int nargin = args.length ();
633 || (
nargin > 2 && ! args(2).is_string ()))
642 bool down = (op ==
"-");
644 if (! down && op !=
"+")
645 error (R
"(cholupdate: OP must be "+" or "-")"); 648 error (
"cholupdate: dimension mismatch between R and U");
726 error (
"cholupdate: downdate violates positiveness");
728 error (
"cholupdate: singular matrix");
821 if (args.length () != 3)
836 error (
"cholinsert: dimension mismatch between R and U");
838 if (j < 1 || j > n+1)
839 error (
"cholinsert: index J out of range");
904 error (
"cholinsert: insertion violates positiveness");
906 error (
"cholinsert: singular matrix");
908 error (
"cholinsert: diagonal element must be real");
1062 if (args.length () != 2)
1078 error (
"choldelete: index J out of range");
1190 if (args.length () != 3)
1208 if (j < 0 || j > n+1 || i < 0 || i > n+1)
1209 error (
"cholshift: index I or J is out of range");
static octave_value get_chol_r(const CHOLT &fact)
RowVector perm(void) const
static octave_value get_chol(const CHOLT &fact)
FloatComplexColumnVector float_complex_column_vector_value(bool frc_str_conv=false, bool frc_vec_conv=false) const
OCTINTERP_API void print_usage(void)
static octave_value get_chol_l(const CHOLT &fact)
void error(const char *fmt,...)
octave_idx_type insert_sym(const VT &u, octave_idx_type j)
FloatMatrix float_matrix_value(bool frc_str_conv=false) const
void err_square_matrix_required(const char *fcn, const char *name)
FloatComplexMatrix float_complex_matrix_value(bool frc_str_conv=false) const
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)
octave_idx_type columns(void) const
bool is_single_type(void) const
double scalar_value(bool frc_str_conv=false) const
octave_idx_type downdate(const VT &u)
ComplexColumnVector complex_column_vector_value(bool frc_str_conv=false, bool frc_vec_conv=false) const
octave_idx_type rows(void) const
void delete_sym(octave_idx_type j)
bool issparse(void) const
FloatColumnVector float_column_vector_value(bool frc_str_conv=false, bool frc_vec_conv=false) const
void err_wrong_type_arg(const char *name, const char *s)
SparseComplexMatrix sparse_complex_matrix_value(bool frc_str_conv=false) const
return octave_value(v1.char_array_value() . concat(v2.char_array_value(), ra_idx),((a1.is_sq_string()||a2.is_sq_string()) ? '\'' :'"'))
bool strcmpi(const T &str_a, const T &str_b)
True if strings are the same, ignoring case.
OCTAVE_EXPORT octave_value_list isa nd deftypefn *return ovl(args(0).isinteger())
void shift_sym(octave_idx_type i, octave_idx_type j)
ColumnVector column_vector_value(bool frc_str_conv=false, bool frc_vec_conv=false) const
SparseMatrix sparse_matrix_value(bool frc_str_conv=false) const
bool iscomplex(void) const
#define DEFUN_DLD(name, args_name, nargout_name, doc)
Macro to define an at run time dynamically loadable builtin function.
OCTAVE_EXPORT octave_value_list error nd deftypefn *const octave_scalar_map err
SparseMatrix Q(void) const
ComplexMatrix complex_matrix_value(bool frc_str_conv=false) const
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
bool is_real_scalar(void) const
bool isnumeric(void) const
Matrix matrix_value(bool frc_str_conv=false) const