Mercurial > hg > octave-nkf

diff scripts/plot/contour.m @ 3882:c8c1ead8474f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-04-02 18:25:48 by jwe]
author jwe
date Tue, 02 Apr 2002 18:25:48 +0000
parents b736f8b8f0a1
children 22bd65326ec1
line wrap: on
line diff
--- a/scripts/plot/contour.m
+++ b/scripts/plot/contour.m
@@ -62,7 +62,10 @@
     else
       error ("contour: argument must be a matrix");
     endif
-  elseif (nargin == 4)
+  elseif (nargin == 3 || nargin == 4)
+    if (nargin == 3)
+      n = 10;
+    endif
     if (is_vector (x) && is_vector (y) && is_matrix (z))
       xlen = length (x);
       ylen = length (y);
@@ -104,7 +107,7 @@
       error ("contour: x and y must be vectors and z must be a matrix");
     endif
   else
-    usage ("contour (z, levels, x, y)");
+    usage ("contour (z, x, y, levels)");
   endif
 
 endfunction