Mercurial > hg > octave-nkf

changeset 19862:6e2729924601 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
eigs.m: Only transform char input sigma to lower case in cset 08dbf53f34c1. eigs.m: Use tolower() only on char input. Otherwise set sigma from the numeric input variable directly.
author Rik <rik@octave.org>
date Fri, 06 Feb 2015 08:31:09 -0800
parents 08dbf53f34c1
children c728ae4d1790 77f65eabac20
files scripts/sparse/eigs.m
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/sparse/eigs.m
+++ b/scripts/sparse/eigs.m
@@ -231,8 +231,10 @@
 
       if (nargin > 2 + offset)
         tmp = varargin{3+offset};
-        if (ischar (tmp) || (isnumeric (tmp) && isscalar (tmp)))
+        if (ischar (tmp))
           sigma = tolower (tmp);
+        elseif (isnumeric (tmp) && isscalar (tmp))
+          sigma = tmp;
         else
           call_eig = false;
         endif