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

    function OK = SetupModel(mdev)
%SETUPMODEL

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

mbH= MBrowser;
OldModel= reset(model(mdev));

[m,OK]=gui_ModelSetup(OldModel,'boxcox',true);
drawnow

if OK && mbH.SelectNode(xregpointer,1)
   OldMdev= mdev;
   try
       if ~isequal(m,OldModel)
           % only refit if models are different
           OldName=name(OldModel);
           if any(  strncmp( OldName,name( mdev ),length(OldName) ) ) &&  ~strcmp(name(m),OldName)
               % rename modeldev
               mdev= name(mdev,name(m));
           end
           mdev= model(mdev,m);
           OK= fitmodel(mdev);
       end
   catch ME
      xregerror('Model Fit Error',ME.message); 
      xregpointer(OldMdev);
   end
   mbH.SelectNode(address(mdev),1);
end