bayes_parm_basic_close

 close bayes basic parameter gui.
 [USAGE]
    bayes_parm_basic_close(<fig>);
 [IN]
    fig : figure handle of bayes basic parameter gui.
 [OUT]
    none

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

0001 function bayes_parm_basic_close(fig)
0002 % close bayes basic parameter gui.
0003 % [USAGE]
0004 %    bayes_parm_basic_close(<fig>);
0005 % [IN]
0006 %    fig : figure handle of bayes basic parameter gui.
0007 % [OUT]
0008 %    none
0009 %
0010 % Copyright (C) 2011, ATR All Rights Reserved.
0011 % License : New BSD License(see VBMEG_LICENSE.txt)
0012 
0013 %
0014 % --- Previous check
0015 %
0016 if ~exist('fig', 'var') || isempty(fig) || ~ishandle(fig)
0017     error('invalid figure handle is specified.');
0018 end
0019 
0020 %
0021 % --- Main Procedure
0022 %
0023 data = guidata(fig);
0024 delete(fig);
0025 bayes_parm_editor_basic_closed_notify(data.main_obj);