0001 function [obj, index] = bm_list_delete_model(obj, index)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018 if ~exist('obj', 'var'), error('obj is a required parameter.'); end
0019 if ~exist('index', 'var'), error('index is a required parameter.'); end
0020 if ~strcmp(obj.class_type, 'bm_list')
0021 error('class type is invalid.');
0022 end
0023
0024
0025
0026
0027
0028
0029 before_del_index = bm_list_get_brain_model_index(obj);
0030 for k=1:length(index)
0031 if isempty(find(before_del_index == index(k)))
0032 error('specified index is invalid.');
0033 end
0034 end
0035
0036
0037 save_index = setdiff(before_del_index, index);
0038
0039
0040 obj.brain_data_list = obj.brain_data_list(save_index);
0041
0042
0043 index = bm_list_get_brain_model_index(obj);
0044
0045
0046
0047
0048
0049 if nargout == 0
0050 error('function caller should receive obj.');
0051 end