ischildren.m

来自「matlab处理图像的一些基本方法。其中有一部分mex程序需要安装编译」· M 代码 · 共 35 行

function is=ischildren(children, parent)
% ISCHILDREN Check if an object exists
%
%	IS=ISCHILDREN(CHILDREN, PARENT)
%
%	If children exists in parent return 1.
%	If not return 0.
%
%	Claudio 8 Apr, 1995
% 	modified by Mark 31 Aug, 1995 to take into account the case where
%	CHILDREN is empty.
%

%
% Copyright (c) 1995 by Claudio Rivetti and Mark Young
% [e-mail],    [e-mail]
%

if nargin>2
  error('Too many input arguments.');
end
if nargin<2
  error('Too few input arguments.');
end

child=get(parent, 'children');

if isempty(child) | isempty(children) | isempty(find(child==children)) 
  is=0;
else
  is=1;
end

return