Mercurial > hg > octave-lyh

diff scripts/set/create_set.m @ 4862:a0997c4d1d54

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-04-15 21:14:43 by jwe]
author jwe
date Thu, 15 Apr 2004 21:14:44 +0000
parents e6d0041aedf3
children c08cb1098afc
line wrap: on
line diff
--- a/scripts/set/create_set.m
+++ b/scripts/set/create_set.m
@@ -42,10 +42,9 @@
   if (isempty(x))
     y = [];
   else
-    [nrx, ncx] = size (x);
-    nelx = nrx * ncx;
-    y = sort (reshape (x, 1, nelx));
-    els = find (y(1:nelx-1) != y(2:nelx));
+    nel = numel (x);
+    y = sort (reshape (x, 1, nel));
+    els = find (y(1:nel-1) != y(2:nel));
     if (isempty (els));
       y = y(1);
     else