www.gusucode.com > mbcmodels 工具箱 matlab 源码程序 > mbcmodels/@localmod/completecopymodel.m

    function mcp = completecopymodel(mcp,mp)
%COMPLETECOPYMODEL
% 
% mcp = completecopymodel(mp,mcp);

%  Copyright 2007 The MathWorks, Inc. and Ford Global Technologies, Inc.

if nargin>1 && isa(mp,'localmod')
    if supportCovModel(mcp)
        % copy fit algorithm and covariance model
        mcp = covmodel(mcp,covmodel(mp));
        if isempty(covmodel(mcp));
            set(mcp,'fitalg','ols');
        else
            set(mcp,'fitalg','gls');
        end
    else
        set(mcp,'fitalg','ols');
        mcp = covmodel(mcp,xregcovariance);
    end

    if permitsDatum(mcp)
        %copy datumtype
        mcp = set(mcp,'datumtype',DatumType(mp));
    else
        % no datum
        mcp = set(mcp,'datumtype',0);
    end
end