www.gusucode.com > mbcdata 工具箱 matlab 源码程序 > mbcdata/@calibrationdata/@calibration/pDoRemoveCurve.m

    function pDoRemoveCurve(obj, identifier)
%PDOREMOVECURVE  Private method.

%  Implementation for removeCurve.

%  Copyright 2004-2005 The MathWorks, Inc.


if ischar(identifier)
    identifier = {identifier};
elseif ~iscell(identifier)
    error(message('mbc:calibrationdata:calibration:InvalidArgument'))
end

[match, position] = ismember(identifier, obj.getCurveIdentifiers);
if any(~match)
    error(message('mbc:calibrationdata:calibration:ObjectNotFound6'))
else
    % Remove (ugly to work around R13 bug)
    curves = obj.Curves;
    curves(position) = [];
    obj.Curves = curves;
end