clear_session.m

主成分分析和偏最小二乘SquaresPrincipal成分分析（ PCA ）和偏最小二乘（ PLS ）

function clear_session(auto);
% CLEAR_SESSION clear session and prepare Lab432 to work
% provide any input argument to clear_session if you don't want to get
% confirmation dialog
%
% last modified 06.01.05

global GSD_GLOBALS TS

if nargin<1
	button = questdlg('All data will lost. Proceed?',...
	'Clear Session','Yes','No','No');
else
    button='Yes';
end
if strcmp(button,'Yes')
    close_graphics_figures;
    GSD_GLOBALS=[];
    GSD_GLOBALS.fig_handles=[];
    GSD_GLOBALS.advanced_fig_handles=[];
    TS=[];
    set(findobj('tag','MainFig'),'name','Lab432');
    init_properties;
    gui_en_dis;
end