Mercurial > hg > octave-nkf

diff scripts/geometry/triplot.m @ 6826:8618f29520c6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-08-24 16:02:07 by jwe]
author jwe
date Fri, 24 Aug 2007 16:02:07 +0000
parents 9fddcc586065
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/geometry/triplot.m
+++ b/scripts/geometry/triplot.m
@@ -32,17 +32,17 @@
 function h = triplot (tri, x, y, varargin)
 
   if (nargin < 3)
-    print_usage();
+    print_usage ();
   endif
 
-  idx = tri (:, [1, 2, 3, 1]).';
-  nt = size(tri, 1);
+  idx = tri(:, [1, 2, 3, 1]).';
+  nt = size (tri, 1);
   if (nargout > 0)
-    h = plot([x(idx); NaN*ones(1, nt)](:), ...
-	     [y(idx); NaN*ones(1, nt)](:), varargin{:});
+    h = plot ([x(idx); NaN*ones(1, nt)](:),
+	      [y(idx); NaN*ones(1, nt)](:), varargin{:});
   else
-    plot([x(idx); NaN*ones(1, nt)](:), ...
-	 [y(idx); NaN*ones(1, nt)](:), varargin{:});
+    plot ([x(idx); NaN*ones(1, nt)](:),
+	  [y(idx); NaN*ones(1, nt)](:), varargin{:});
   endif
 endfunction