www.gusucode.com > mbcdesign 工具箱 matlab 源码程序 > mbcdesign/@xregdesign/deletefreepoints.m

    function des = deletefreepoints(des)
%DELETEFREEPOINTS Delete unfixed design points
%
%  D=deletefreepoints(D) deletes all the points in D which have
%  not been fixed.
%
%  SEE ALSO: FIXPOINTS, FREEPOINTS

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


if des.npoints
    fp = fixpoints(des);
    if length(fp)~=npoints(des)
        % Only keep fixed points
        des.design = des.design(fp,:);
        des.designindex = des.designindex(fp);
        des.npoints = size(des.design,1);
        des.designpointflags = des.designpointflags(fp);
        des = DesignType(des,0,[]);
        des = timestamp(des,'stamp');
        des.designstate = des.designstate+1;
    end
end