Mercurial > hg > octave-nkf

diff scripts/plot/bar.m @ 4030:22bd65326ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents f8dde1807dee
children ccb4eca28f7e
line wrap: on
line diff
--- a/scripts/plot/bar.m
+++ b/scripts/plot/bar.m
@@ -50,7 +50,7 @@
 function [xb, yb] = bar (x, y)
 
   if (nargin == 1)
-    if (is_vector (x))
+    if (isvector (x))
       len = 3 * length (x) + 1;
       tmp_xb = tmp_yb = zeros (len, 1);
       tmp_xb(1) = 0.5;
@@ -69,7 +69,7 @@
       error ("bar: argument must be a vector");
     endif
   elseif (nargin == 2)
-    if (is_vector (x) && is_vector (y))
+    if (isvector (x) && isvector (y))
       xlen = length (x);
       ylen = length (y);
       if (xlen == ylen)