vb_ch_info_set_channel_info_meg

 <<provate>> set MEG channel label list to ch_info
 [usage]
   [ch_info] = vb_ch_info_set_channel_info_meg(ch_info, ch_list)
 [input]
   ch_info : <required> <<struct>> temporal channel information 
           :   which is before changing
   ch_list : <optional> list of MEG channel label [N x 1] or [1 x N]
 [output]
   ch_info : <<struct>> temporal channel information which is after changing
 [note]
   this function is private
   returned channel list's size is [N x 1]
 [history]
   2007-07-12 (Sako) initial version

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

0001 function [ch_info] = vb_ch_info_set_channel_info_meg(ch_info, ch_list)
0002 % <<provate>> set MEG channel label list to ch_info
0003 % [usage]
0004 %   [ch_info] = vb_ch_info_set_channel_info_meg(ch_info, ch_list)
0005 % [input]
0006 %   ch_info : <required> <<struct>> temporal channel information
0007 %           :   which is before changing
0008 %   ch_list : <optional> list of MEG channel label [N x 1] or [1 x N]
0009 % [output]
0010 %   ch_info : <<struct>> temporal channel information which is after changing
0011 % [note]
0012 %   this function is private
0013 %   returned channel list's size is [N x 1]
0014 % [history]
0015 %   2007-07-12 (Sako) initial version
0016 %
0017 % Copyright (C) 2011, ATR All Rights Reserved.
0018 % License : New BSD License(see VBMEG_LICENSE.txt)
0019 
0020 % --- CHECK ARGUMENTS --- %
0021 if ~exist('ch_info', 'var'), ch_info = []; end
0022 if ~exist('ch_list', 'var'), ch_list = []; end
0023 [ch_info, ch_list] = inner_check_arguments(ch_info, ch_list);
0024 
0025 % --- MAIN PROCEDURE --------------------------------------------------------- %
0026 %
0027 ch_info.meg_channel = ch_list;
0028 return;
0029 %
0030 % --- END OF MAIN PROCEDURE -------------------------------------------------- %
0031 
0032 % --- INNER FUNCTIONS -------------------------------------------------------- %
0033 %
0034 % --- inner_check_arguments()
0035 %
0036 function [ch_info, ch_list] = inner_check_arguments(ch_info, ch_list)
0037 func_ = mfilename;
0038 if isempty(ch_info)
0039 %   error('(%s)ch_info is a required parameter', func_);
0040   % require no action
0041 end
0042 
0043 if isempty(ch_list)
0044   % require no action
0045 else
0046   % [N x 1]
0047   ch_list = vb_util_arrange_list(ch_list);
0048 end
0049 return;
0050 %
0051 % --- end of inner_check_arguments()
0052 %
0053 % --- END OF INNER FUNCTIONS ------------------------------------------------- %
0054 
0055 %%% END OF FILE %%%