Mercurial > octave

comparison src/svd.cc @ 1544:f1931fc63ce9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-10-06 05:57:56 by jwe]
author jwe
date Fri, 06 Oct 1995 06:01:19 +0000
parents d6e96e0bc681
children f85887dfe06c
comparison
equal deleted inserted replaced
1543:d6e96e0bc681 1544:f1931fc63ce9
64 if (arg_is_empty < 0) 64 if (arg_is_empty < 0)
65 return retval; 65 return retval;
66 else if (arg_is_empty > 0) 66 else if (arg_is_empty > 0)
67 return Octave_object (3, Matrix ()); 67 return Octave_object (3, Matrix ());
68 68
69 SVD::type type = ((nargout == 1) ? SVD::sigma_only 69 SVD::type type = ((nargout == 0 || nargout == 1)
70 ? SVD::sigma_only
70 : (nargin == 2) ? SVD::economy : SVD::std); 71 : (nargin == 2) ? SVD::economy : SVD::std);
71 72
72 if (arg.is_real_type ()) 73 if (arg.is_real_type ())
73 { 74 {
74 Matrix tmp = arg.matrix_value (); 75 Matrix tmp = arg.matrix_value ();