23 #if defined (HAVE_CONFIG_H)
58 if (nargin < 1 || nargin > 2)
76 tol =
args(1).float_value ();
79 error (
"pinv: TOL must be greater than zero");
90 tol =
args(1).double_value ();
93 error (
"pinv: TOL must be greater than zero");
109 tol =
args(1).float_value ();
112 error (
"pinv: TOL must be greater than zero");
133 tol =
args(1).double_value ();
136 error (
"pinv: TOL must be greater than zero");
FloatComplexDiagMatrix float_complex_diag_matrix_value(bool force=false) const
bool is_real_type(void) const
FloatComplexMatrix float_complex_matrix_value(bool frc_str_conv=false) const
OCTAVE_EXPORT octave_value_list isa nd deftypefn *return ovl(args(0).is_integer_type())
OCTINTERP_API void print_usage(void)
#define DEFUN(name, args_name, nargout_name, doc)
void error(const char *fmt,...)
bool is_perm_matrix(void) const
DiagMatrix pseudo_inverse(double tol=0.0) const
ComplexDiagMatrix pseudo_inverse(double tol=0.0) const
ComplexDiagMatrix complex_diag_matrix_value(bool force=false) const
FloatComplexMatrix pseudo_inverse(float tol=0.0) const
FloatComplexDiagMatrix pseudo_inverse(float tol=0.0f) const
PermMatrix inverse(void) const
OCTAVE_EXPORT octave_value_list isfloat
FloatDiagMatrix float_diag_matrix_value(bool force=false) const
nd deftypefn *octave_map m
bool is_complex_type(void) const
Matrix matrix_value(bool frc_str_conv=false) const
void err_wrong_type_arg(const char *name, const char *s)
DiagMatrix diag_matrix_value(bool force=false) const
FloatDiagMatrix pseudo_inverse(float tol=0.0f) const
ComplexMatrix pseudo_inverse(double tol=0.0) const
bool is_empty(void) const
ComplexMatrix complex_matrix_value(bool frc_str_conv=false) const
FloatMatrix float_matrix_value(bool frc_str_conv=false) const
PermMatrix perm_matrix_value(void) const
bool is_single_type(void) const
bool is_diag_matrix(void) const
Matrix pseudo_inverse(double tol=0.0) const
FloatMatrix pseudo_inverse(float tol=0.0) const