deletelntag.m

物流分析工具包。Facility location: Continuous minisum facility location, alternate location-allocation (ALA)

function deletelinetag()
%DELETELNTAG Delete last tagged line objects from plot.
% deletelntag()
%
% Executes commands:
%    s = get(gca,'UserData');
%    delete(findobj(s.LastLineTag))
%    projtick

% Copyright (c) 1994-2006 by Michael G. Kay
% Matlog Version 9 13-Jan-2006 (http://www.ie.ncsu.edu/kay/matlog)

% Input Error Checking ****************************************************
% End (Input Error Checking) **********************************************

s = get(gca,'UserData');
if isstruct(s) && isfield(s,'LastLineTag')
   delete(findobj('Tag',s.LastLineTag))
   projtick
end