Mercurial > octave-nkf

comparison scripts/set/intersect.m @ 6046:34f96dd5441b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-10 16:10:25 by jwe]
author jwe
date Tue, 10 Oct 2006 16:10:31 +0000
parents 11e4ae44984f
children 7fad1fad19e1
comparison
equal deleted inserted replaced
6045:421d8a903df7 6046:34f96dd5441b
31 ## @end deftypefn 31 ## @end deftypefn
32 ## @seealso{unique, union, setxor, setdiff, ismember} 32 ## @seealso{unique, union, setxor, setdiff, ismember}
33 33
34 function [c, ia, ib] = intersect (a, b) 34 function [c, ia, ib] = intersect (a, b)
35 if (nargin != 2) 35 if (nargin != 2)
36 usage ("intersect (a, b)"); 36 print_usage ();
37 endif 37 endif
38 38
39 if (isempty (a) || isempty (b)) 39 if (isempty (a) || isempty (b))
40 c = ia = ib = []; 40 c = ia = ib = [];
41 else 41 else