Mercurial > hg > octave-lyh

comparison scripts/linear-algebra/cond.m @ 4891:aa7573ddf60f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-05-06 20:44:15 by jwe]
author jwe
date Thu, 06 May 2004 20:44:15 +0000
parents e7da90a1cc11
children c08cb1098afc
comparison
equal deleted inserted replaced
4890:e7da90a1cc11 4891:aa7573ddf60f
28 ## Author: jwe 28 ## Author: jwe
29 29
30 function retval = cond (a) 30 function retval = cond (a)
31 31
32 if (nargin == 1) 32 if (nargin == 1)
33 if (ndims (x) > 2) 33 if (ndims (a) > 2)
34 error ("cond: Only valid on 2-D objects") 34 error ("cond: Only valid on 2-D objects")
35 endif 35 endif
36 36
37 [nr, nc] = size (a); 37 [nr, nc] = size (a);
38 if (nr == 0 || nc == 0) 38 if (nr == 0 || nc == 0)