www.gusucode.com > mbctools 工具箱 matlab 源码程序 > mbctools/@modeldev/tidytree.m

    function mdev= tidytree(mdev,mbH)
%TIDYTREE removes unnecessary model nodes from tree

%  Copyright 2000-2015 The MathWorks, Inc. and Ford Global Technologies, Inc.


InBrowser = isBrowserProject(mdev);
if nargin<2
    mbH = MBrowser;
end
if mdev.BestModel==0
	children(mdev,'tidytree',mbH);
else
	ch=children(mdev);
	if isa(mdev.Model,'xregtwostage');
		% delete all but best local node
		ind= find(children(mdev)~=mdev.BestModel);
        if InBrowser
            for i=ind;
                mbH.treeview(ch(i),'remove');
            end
        end
		children(mdev,ind,@delete);
		% tidy remaining best local model
		children(info(mdev),@tidytree,mbH);
    else
        if InBrowser
            for i=1:numChildren(mdev);
                mbH.treeview(ch(i),'remove');
            end
        end
		% best model copied up tree so delete all kids
		children(mdev,@delete);
	end

end

mdev= info(mdev);

if InBrowser
    mbH.treeview(address(mdev),'select');
end