function plotmodel(event)

frame=event;

fem=getdata(frame);

plottype=frame.get('plots').getSelectedIndex;

parent=frame.get('axis').getHandle;
cla(parent);

switch plottype
  case 1
	postplot(fem, ...
         	'liny',{'T','cont','internal'}, ...
         	'lincolor',[0.0,0.0,0.0], ...
         	'title','Line: Temperature [K]', ...
		'geom','off',...
		'refine',1, ...
         	'parent',parent);
  case 2
	postplot(fem, ...
         	'liny',{'flux_ht','cont','internal'}, ...
         	'lincolor',[0.0,0.0,0.0], ...
         	'title','Line: Heat flux [W/m<sup>2</sup>]', ...
		'geom','off',...
		'refine',1, ...
         	'parent',parent);
end
