Mercurial > octave
comparison libinterp/corefcn/rcond.cc @ 20939:b17fda023ca6
maint: Use new C++ archetype in more files.
Place input validation first in files.
Move declaration of retval down in function to be closer to point of usage.
Eliminate else clause after if () error.
Use "return ovl()" where it makes sense.
* find.cc, gammainc.cc, gcd.cc, getgrent.cc, getpwent.cc, givens.cc,
graphics.cc, help.cc, hess.cc, hex2num.cc, input.cc, kron.cc, load-path.cc,
load-save.cc, lookup.cc, mappers.cc, matrix_type.cc, mgorth.cc, nproc.cc,
ordschur.cc, pager.cc, pinv.cc, pr-output.cc, profiler.cc, psi.cc, quad.cc,
rcond.cc, regexp.cc, schur.cc, sighandlers.cc, sparse.cc, str2double.cc,
strfind.cc, strfns.cc, sub2ind.cc, svd.cc, sylvester.cc, symtab.cc,
syscalls.cc, sysdep.cc, time.cc, toplev.cc, tril.cc, tsearch.cc, typecast.cc,
urlwrite.cc, utils.cc, variables.cc, __delaunayn__.cc, __eigs__.cc,
__glpk__.cc, __magick_read__.cc, __osmesa_print__.cc, __voronoi__.cc, amd.cc,
audiodevinfo.cc, audioread.cc, chol.cc, colamd.cc, dmperm.cc, fftw.cc, qr.cc,
symbfact.cc, symrcm.cc, ov-bool-mat.cc, ov-cell.cc, ov-class.cc,
ov-classdef.cc, ov-fcn-handle.cc, ov-fcn-inline.cc, ov-flt-re-mat.cc,
ov-java.cc, ov-null-mat.cc, ov-oncleanup.cc, ov-re-mat.cc, ov-struct.cc,
ov-typeinfo.cc, ov-usr-fcn.cc, ov.cc, octave.cc:
Use new C++ archetype in more files.
author | Rik <rik@octave.org> |
---|---|
date | Fri, 18 Dec 2015 15:37:22 -0800 |
parents | 1142cf6abc0d |
children | 48b2ad5ee801 |
comparison
equal
deleted
inserted
replaced
20938:aac911d8847b | 20939:b17fda023ca6 |
---|---|
43 @code{condest (@var{A})} or @code{rcond (full (@var{A}))} should be used\n\ | 43 @code{condest (@var{A})} or @code{rcond (full (@var{A}))} should be used\n\ |
44 instead.\n\ | 44 instead.\n\ |
45 @seealso{cond, condest}\n\ | 45 @seealso{cond, condest}\n\ |
46 @end deftypefn") | 46 @end deftypefn") |
47 { | 47 { |
48 octave_value retval; | |
49 | |
50 if (args.length () != 1) | 48 if (args.length () != 1) |
51 print_usage (); | 49 print_usage (); |
52 | 50 |
51 octave_value retval; | |
52 | |
53 if (args(0).is_sparse_type ()) | 53 if (args(0).is_sparse_type ()) |
54 error ("rcond: for sparse matrices use 'rcond (full (a))' or 'condest (a)' instead"); | 54 error ("rcond: for sparse matrices use 'rcond (full (a))' or 'condest (a)' instead"); |
55 else if (args(0).is_single_type ()) | 55 |
56 if (args(0).is_single_type ()) | |
56 { | 57 { |
57 if (args(0).is_complex_type ()) | 58 if (args(0).is_complex_type ()) |
58 { | 59 { |
59 FloatComplexMatrix m = args(0).float_complex_matrix_value (); | 60 FloatComplexMatrix m = args(0).float_complex_matrix_value (); |
60 MatrixType mattyp; | 61 MatrixType mattyp; |