Home > vbmeg > functions > leadfield > head > vb_headinfo_set_radius.m

vb_headinfo_set_radius

PURPOSE ^

setter Headinfo.R

SYNOPSIS ^

function Headinfo = vb_headinfo_set_radius(headinfo, radius)

DESCRIPTION ^

 setter Headinfo.R
 [usage]
   Headinfo = vb_headinfo_set_radius(headinfo, radius)
 [input]
   headinfo : <optional> <<struct>> Headinfo
            :  if it is not specified or is empty, Headinfo will be created
     radius : <optional> value of radius
            :  if it is not specified or is empty, [] will be set
 [output]
    Headinfo : <<struct>> updated Headinfo
 [note]

 [history]
   2007-04-06 (Sako) initial version

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

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SUBFUNCTIONS ^

SOURCE CODE ^

0001 function Headinfo = vb_headinfo_set_radius(headinfo, radius)
0002 % setter Headinfo.R
0003 % [usage]
0004 %   Headinfo = vb_headinfo_set_radius(headinfo, radius)
0005 % [input]
0006 %   headinfo : <optional> <<struct>> Headinfo
0007 %            :  if it is not specified or is empty, Headinfo will be created
0008 %     radius : <optional> value of radius
0009 %            :  if it is not specified or is empty, [] will be set
0010 % [output]
0011 %    Headinfo : <<struct>> updated Headinfo
0012 % [note]
0013 %
0014 % [history]
0015 %   2007-04-06 (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('headinfo', 'var') headinfo = []; end;
0022 if ~exist('radius', 'var')   radius = []; end;
0023 [Headinfo, radius] = inner_check_arguments(headinfo, radius);
0024 
0025 % --- MAIN PROCEDURE --------------------------------------------------------- %
0026 %
0027 Headinfo.R = radius;
0028 
0029 if nargout ~= 1
0030   error('!!! You must receive updated Headinfo !!!');
0031 end
0032 %
0033 % --- END OF MAIN PROCEDURE -------------------------------------------------- %
0034 
0035 % --- INNER FUNCTIONS -------------------------------------------------------- %
0036 %
0037 % --- inner_check_arguments()
0038 %
0039 function [headinfo, radius] = inner_check_arguments(headinfo, radius)
0040 % especially do nothing
0041 return;
0042 %
0043 % --- end of inner_check_arguments()
0044 
0045 %%% END OF FILE %%%

Generated on Mon 22-May-2023 06:53:56 by m2html © 2005