23 #if defined (HAVE_CONFIG_H) 37 template <
typename MT>
48 template <
typename MT>
53 if (U.issquare () && fact.
regular ())
140 int nargin = args.length ();
141 bool issparse = (
nargin > 0 && args(0).issparse ());
152 if (args(n).is_string ())
159 error (
"lu: unrecognized string argument");
164 error (
"lu: can not define pivoting threshold THRES for full matrices");
167 if (
tmp.numel () == 1)
173 else if (
tmp.numel () == 2)
176 error (
"lu: THRES must be a 1 or 2-element vector");
200 "lu: function may fail when called with less than 4 output arguments and a sparse input");
269 "lu: function may fail when called with less than 4 output arguments and a sparse input");
571 && (
p.is_undefined () ||
p.rows () == m));
574 DEFUN (luupdate, args, ,
619 int nargin = args.length ();
624 bool pivoted = (
nargin == 5);
635 error (
"luupdate: L, U, X, and Y must be numeric");
637 if (! check_lu_dims (argl, argu, argp))
638 error (
"luupdate: dimension mismatch");
void warning_with_id(const char *id, const char *fmt,...)
ColumnVector Pc_vec(void) const
static octave_value get_lu_l(const octave::math::lu< MT > &fact)
void resize(octave_idx_type nr, octave_idx_type nc, double rfv=0)
OCTINTERP_API void print_usage(void)
#define DEFUN(name, args_name, nargout_name, doc)
Macro to define a builtin function.
void error(const char *fmt,...)
FloatMatrix float_matrix_value(bool frc_str_conv=false) const
bool is_perm_matrix(void) const
PermMatrix Pr_mat(void) const
octave_value resize(const dim_vector &dv, bool fill=false) const
SparseMatrix R(void) const
FloatComplexMatrix float_complex_matrix_value(bool frc_str_conv=false) const
static octave_value get_lu_u(const octave::math::lu< MT > &fact)
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
PermMatrix Pc_mat(void) const
bool is_single_type(void) const
octave_idx_type rows(void) const
void update_piv(const VT &u, const VT &v)
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()) ? '\'' :'"'))
OCTAVE_EXPORT octave_value_list isa nd deftypefn *return ovl(args(0).isinteger())
ColumnVector P_vec(void) const
SparseMatrix sparse_matrix_value(bool frc_str_conv=false) const
the element is set to zero In other the statement xample y
void scale(Matrix &m, double x, double y, double z)
void update(const VT &u, const VT &v)
bool iscomplex(void) const
ColumnVector Pr_vec(void) const
PermMatrix perm_matrix_value(void) const
const octave_idx_type * row_perm(void) const
const octave_idx_type * col_perm(void) const
ComplexMatrix complex_matrix_value(bool frc_str_conv=false) const
static PermMatrix eye(octave_idx_type n)
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 isnumeric(void) const
Matrix matrix_value(bool frc_str_conv=false) const
PermMatrix transpose(void) const
F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T const F77_DBLE * x
charNDArray min(char d, const charNDArray &m)