ta()

function fig = ta()
load ta
h0 = figure('Units','points', ...
	'Color',[1 1 0], ...
	'Colormap',mat0, ...
	'FileName','A:\ta.m', ...
	'PaperPosition',[18 180 576 432], ...
	'PaperUnits','points', ...
   'Position',[301.5 204.75 279.75 175.5], ...
    'MenuBar','none', ...
	'Name','solar transmittance(due to absorption)', ...
	'NumberTitle','off', ...
	'Tag','ta', ...
	'ToolBar','none');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
   'Position',[12.75 113 195.75 52.5], ...
   'BackgroundColor',[1 1 0], ...
	'FontSize',13, ...
	'FontWeight','bold', ...
	'ForegroundColor',[1 0 1], ...
   'Style','text', ...
   'string','extinction coefficient',...
	'Style','text', ...
	'Tag','StaticText1');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[10.5 66.75 198 54], ...
	'Style','text', ...
   'BackgroundColor',[1 1 0], ...
	'FontSize',13, ...
	'FontWeight','bold', ...
	'ForegroundColor',[1 0 1], ...
   'Style','text', ...
   'string','actual path of radiation through the medium(m)',...
   'Tag','StaticText2');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[5.25 .5 201.75 56.25], ...
   'Style','text', ...
   'BackgroundColor',[1 1 0], ...
	'FontSize',13, ...
	'FontWeight','bold', ...
	'ForegroundColor',[1 0 1], ...
   'Style','text', ...
   'string','incidence angle throught the mediume(degree)',...
	'Tag','StaticText3');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[223 17.25 55 22], ...
   'Style','edit', ...
   'callback','tacal',...
	'Tag','EditText1');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[223 84 55 22], ...
   'Style','edit', ...
   'callback','tacal',...
	'Tag','EditText2');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[222.75 141.75 48.75 18.75], ...
	'String',{'whiteglass' 'normalglass'}, ...
	'Style','popupmenu', ...
   'Tag','PopupMenu1ta', ...
	'Value',1);
if nargout > 0, fig = h0; end