function frommatfile_callback
[fname,pname]=uigetfile('*.mat','Initialize From Mat File');
if ~fname
    return
end


for i=1:length(fname)%get the file name without the extension
    if fname(i)=='.'
        break;
    end
    name(i)=fname(i);
end

load([pname,name]);

save inidata A B H Q R P0 X0;%you should specify the variables in the stand-alone exe file 

CI=findobj(gcf,'tag','compo1');
set(CI,'userdata',[]);

generatezk;