Mercurial > octave-nkf

comparison scripts/geometry/dsearch.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 7911a62a300d
comparison
equal deleted inserted replaced
6825:59e22e30aff8 6826:8618f29520c6
26 ## @seealso{dsearchn, tsearch} 26 ## @seealso{dsearchn, tsearch}
27 ## @end deftypefn 27 ## @end deftypefn
28 28
29 function idx = dsearch (x, y, t, xi, yi, s) 29 function idx = dsearch (x, y, t, xi, yi, s)
30 if (nargin < 5 || nargin > 6) 30 if (nargin < 5 || nargin > 6)
31 print_usage(); 31 print_usage ();
32 endif 32 endif
33 idx = __dsearchn__ ([x(:),y(:)], [xi(:), yi(:)]); 33 idx = __dsearchn__ ([x(:), y(:)], [xi(:), yi(:)]);
34 endfunction 34 endfunction
35 35
36 %!shared x, y, tri 36 %!shared x, y, tri
37 %! x = [-1;-1;1]; 37 %! x = [-1;-1;1];
38 %! y = [-1;1;-1]; 38 %! y = [-1;1;-1];