Home > functions > device > meg > vb_meginfo_set_sensor_weight_refmg.m

vb_meginfo_set_sensor_weight_refmg

PURPOSE ^

set sensor weight for refmg channels to MEGinfo

SYNOPSIS ^

function [meg_info] = vb_meginfo_set_sensor_weight_refmg(meg_info, s_weight)

DESCRIPTION ^

 set sensor weight for refmg channels to MEGinfo
 [usage]
   [meg_info] = vb_meginfo_set_sensor_weight_refmg(meg_info, s_weight)
 [input]
   meg_info : <required> <<struct>> MEGinfo
            :  If this is empty, return new MEGinfo only with sensor weight
            :  for refmg
   s_weight : <required> [n_channel x 1] sensor weight for refmg channels
            :  If this is empty, set empty field
 [output]
   meg_info : updated MEGinfo
            :  MEGinfo.device_info.sensor_weight_ref
 [note]

 [history]
   2011-07-20 (Sako) initial version

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SUBFUNCTIONS ^

SOURCE CODE ^

0001 function [meg_info] = vb_meginfo_set_sensor_weight_refmg(meg_info, s_weight)
0002 % set sensor weight for refmg channels to MEGinfo
0003 % [usage]
0004 %   [meg_info] = vb_meginfo_set_sensor_weight_refmg(meg_info, s_weight)
0005 % [input]
0006 %   meg_info : <required> <<struct>> MEGinfo
0007 %            :  If this is empty, return new MEGinfo only with sensor weight
0008 %            :  for refmg
0009 %   s_weight : <required> [n_channel x 1] sensor weight for refmg channels
0010 %            :  If this is empty, set empty field
0011 % [output]
0012 %   meg_info : updated MEGinfo
0013 %            :  MEGinfo.device_info.sensor_weight_ref
0014 % [note]
0015 %
0016 % [history]
0017 %   2011-07-20 (Sako) initial version
0018 
0019 % --- CHECK ARGUMENTS --- %
0020 if ~exist('meg_info', 'var'), meg_info = []; end
0021 if ~exist('s_weight', 'var'), s_weight = []; end
0022 [meg_info, s_weight] = inner_check_arguments(meg_info, s_weight);
0023 
0024 
0025 % --- MAIN PROCEDURE --------------------------------------------------------- %
0026 %
0027 meg_info.device_info.sensor_weight_ref = s_weight;
0028 return;
0029 %
0030 % --- END OF MAIN PROCEDURE -------------------------------------------------- %
0031 
0032 
0033 % --- INNER FUNCTIONS -------------------------------------------------------- %
0034 %
0035 % --- inner_check_arguments()
0036 %
0037 function [meg_info, s_weight] = inner_check_arguments(meg_info, s_weight)
0038 if isempty(meg_info)
0039   % do nothing
0040 end
0041 
0042 if isempty(s_weight)
0043   % do nothing
0044   % --- set empty field
0045 end
0046 return;
0047 %
0048 % --- end of inner_check_arguments()
0049 %
0050 % --- END OF INNER FUNCTIONS ------------------------------------------------- %
0051 
0052 % --- END OF FILE --- %

Generated on Tue 27-Aug-2013 11:46:04 by m2html © 2005