Mercurial > hg > octave-lyh

diff scripts/geometry/inpolygon.m @ 11587:c792872f8942

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
all script files: untabify and strip trailing whitespace
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:35:29 -0500
parents fd0a3ac60b0e
children 85c77dd2e85b
line wrap: on
line diff
--- a/scripts/geometry/inpolygon.m
+++ b/scripts/geometry/inpolygon.m
@@ -53,12 +53,12 @@
 
   npol = length (xv);
   do_boundary = (nargout >= 2);
-  
+
   in = zeros (size(x), "logical");
-  if (do_boundary) 
-    on = zeros (size(x), "logical"); 
+  if (do_boundary)
+    on = zeros (size(x), "logical");
   endif
-  
+
   j = npol;
   for i = 1 : npol
     delta_xv = xv(j) - xv(i);
@@ -95,7 +95,7 @@
 %! ya=[0:0.1:1.4];
 %! [x,y]=meshgrid(xa,ya);
 %! [in,on]=inpolygon(x,y,xv,yv);
-%! 
+%!
 %! inside=in & !on;
 %! plot(xv,yv)
 %! hold on
@@ -119,7 +119,7 @@
 %! ya=[0:0.1:1.4];
 %! [x,y]=meshgrid(xa,ya);
 %! [in,on]=inpolygon(x,y,xv,yv);
-%! 
+%!
 %! inside=in & ~ on;
 %! plot(xv,yv)
 %! hold on