diff scripts/general/diff.m @ 4030:22bd65326ec1

[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000 (2002-08-09)
parents 38c61cbf086c
children b92d59213e63
line wrap: on
line diff
--- a/scripts/general/diff.m
+++ b/scripts/general/diff.m
@@ -47,7 +47,7 @@
   if (nargin == 1)
     k = 1;
   elseif (nargin == 2)
-    if (! (is_scalar (k) && k == round (k) && k >= 0))
+    if (! (isscalar (k) && k == round (k) && k >= 0))
       error ("diff: k must be a nonnegative integer");
     elseif (k == 0)
       return;
@@ -58,7 +58,7 @@
 
   if (isstr (x))
     error ("diff: symbolic differentiation not (yet) supported");
-  elseif (is_vector (x))
+  elseif (isvector (x))
     n = length (x);
     if (n <= k)
       x = [];
@@ -67,7 +67,7 @@
         x = x (2 : (n - i + 1)) - x (1 : (n - i));
       endfor
     endif
-  elseif (is_matrix (x))
+  elseif (ismatrix (x))
     n = rows (x);
     if (n <= k)
       x = [];