bm_list_add_model

 add brain_data to list
 [USAGE]
    [obj, index] = bm_list_add_model(<obj>, <brain_data>);
 [IN]
           obj : bm_list object
    brain_data : brain_data object
 [OUT]
    index : after added index of bm_list.

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function [obj, index] = bm_list_add_model(obj, brain_data)
0002 % add brain_data to list
0003 % [USAGE]
0004 %    [obj, index] = bm_list_add_model(<obj>, <brain_data>);
0005 % [IN]
0006 %           obj : bm_list object
0007 %    brain_data : brain_data object
0008 % [OUT]
0009 %    index : after added index of bm_list.
0010 %
0011 % Copyright (C) 2011, ATR All Rights Reserved.
0012 % License : New BSD License(see VBMEG_LICENSE.txt)
0013 
0014 %
0015 % --- Previous check
0016 %
0017 if ~exist('obj', 'var'), error('obj is a required parameter.'); end
0018 if ~exist('brain_data', 'var')
0019     error('brain_data is a required parameter.');
0020 end
0021 if ~strcmp(obj.class_type, 'bm_list')
0022     error('class type is invalid.');
0023 end
0024 
0025 %
0026 % --- Main Procedure
0027 %
0028 
0029 % regist model
0030 Nmodel = length(obj.brain_data_list);
0031 obj.brain_data_list{Nmodel+1} = brain_data;
0032 
0033 % return index
0034 index = bm_list_get_brain_model_index(obj);
0035 
0036 %
0037 % --- After check
0038 %
0039 if nargout == 0
0040     error('function caller should receive obj and index');
0041 end