vb_meginfo_set_acqinfo

 <<setter>> of acq_info field of MEGinfo
 [usage]
   [meginfo] = vb_meginfo_set_acqinfo(meginfo, acqinfo)
 [input]
   meginfo : <required> <<struct>> MEGinfo
   acqinfo : <optional> <<struct>> the fields of which are as follows []
           :  .data_file : import data file
           :  .data_bit_len : bit length of stored binary data
           :  .type : acquisition type of original data. e.g. 'Continuous_Raw'
 [output]
   meginfo : <<struct>> MEGinfo after updating
 [note]
   The new standard format was defined. (2011-05)
 [history]
   2008-02-21 (Sako) initial version
   2011-05-26 (Sako) modified according to the new format

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

0001 function [meginfo] = vb_meginfo_set_acqinfo(meginfo, acqinfo)
0002 % <<setter>> of acq_info field of MEGinfo
0003 % [usage]
0004 %   [meginfo] = vb_meginfo_set_acqinfo(meginfo, acqinfo)
0005 % [input]
0006 %   meginfo : <required> <<struct>> MEGinfo
0007 %   acqinfo : <optional> <<struct>> the fields of which are as follows []
0008 %           :  .data_file : import data file
0009 %           :  .data_bit_len : bit length of stored binary data
0010 %           :  .type : acquisition type of original data. e.g. 'Continuous_Raw'
0011 % [output]
0012 %   meginfo : <<struct>> MEGinfo after updating
0013 % [note]
0014 %   The new standard format was defined. (2011-05)
0015 % [history]
0016 %   2008-02-21 (Sako) initial version
0017 %   2011-05-26 (Sako) modified according to the new format
0018 %
0019 % Copyright (C) 2011, ATR All Rights Reserved.
0020 % License : New BSD License(see VBMEG_LICENSE.txt)
0021 
0022 % --- CHECK ARGUMENTS --- %
0023 if ~exist('meginfo', 'var'), meginfo = []; end
0024 if ~exist('acqinfo', 'var'), acqinfo = []; end
0025 [meginfo, acqinfo] = inner_check_arguments(meginfo, acqinfo);
0026 
0027 % --- MAIN PROCEDURE --------------------------------------------------------- %
0028 %
0029 meginfo.device_info.acq_info = acqinfo;
0030 return;
0031 %
0032 % --- END OF MAIN PROCEDURE -------------------------------------------------- %
0033 
0034 % --- INNER FUNCTIONS -------------------------------------------------------- %
0035 %
0036 % --- inner_check_arguments()
0037 %
0038 function [meginfo, acqinfo] = inner_check_arguments(meginfo, acqinfo)
0039 func_ = mfilename;
0040 if isempty(meginfo)
0041   error('(%s)meginfo is a required parameter', func_);
0042 end
0043 
0044 if isempty(acqinfo)
0045   % require no action because this will be set as it is empty
0046 end
0047 return;
0048 %
0049 % --- end of inner_check_arguments()
0050 %
0051 % --- END OF INNER FUNCTIONS ------------------------------------------------- %
0052 
0053 % --- END OF FILE --- %