delete point from mps_pointlist object. note: delete key is name(char string). [USAGE] [obj] = vb_mps_pointlist_delete_point(<obj>, <name>); [IN] obj : mps_pointlist object name : point name [OUT] obj : mps_pointlist object Copyright (C) 2011, ATR All Rights Reserved. License : New BSD License(see VBMEG_LICENSE.txt)
0001 function [obj] = vb_mps_pointlist_delete_point(obj, name) 0002 % delete point from mps_pointlist object. 0003 % note: delete key is name(char string). 0004 % [USAGE] 0005 % [obj] = vb_mps_pointlist_delete_point(<obj>, <name>); 0006 % [IN] 0007 % obj : mps_pointlist object 0008 % name : point name 0009 % [OUT] 0010 % obj : mps_pointlist object 0011 % 0012 % Copyright (C) 2011, ATR All Rights Reserved. 0013 % License : New BSD License(see VBMEG_LICENSE.txt) 0014 0015 if ~exist('obj', 'var'), error('obj is need parameter'); end 0016 if ~exist('name', 'var'), error('name is need parameter'); end 0017 0018 % 0019 % --- Search by name and remove point. 0020 % 0021 remove_ix = strmatch(name, obj.name_list, 'exact'); 0022 if ~isempty(remove_ix) 0023 obj.name_list(remove_ix) = []; 0024 obj.point_list(remove_ix) = []; 0025 end 0026