time   calls  line
                108 function ax = ObserveAxesNextPlot(ax, hsave)
                109 %
                110 % Helper fcn for preparing axes for nextplot, optionally
                111 % preserving specific existing descendants
                112 % GUARANTEED to return an axes in the same figure as the passed-in
                113 % axes, even if that axes gets deleted by an overzealous create or
                114 % delete fcn anywhere in the figure.
                115 %
                116 
                117 % for performance only call ancestor when needed 
           677  118 fig = get(ax,'Parent'); 
  0.01     677  119 if ~strcmp(get(fig,'Type'),'figure') 
                120   fig = ancestor(fig,'figure');
                121 end
                122 
  0.01     677  123 switch get(ax,'nextplot') 
           677  124   case 'replace' 
  0.77     243  125     cla(ax, 'reset',hsave);     
  0.02     434  126   case 'replacechildren' 
                127     cla(ax, hsave);
  0.01     434  128   case 'add' 
                129     % nothing    
           434  130 end 
                131 
  0.01     677  132 if ~any(ishghandle(ax)) && isempty(hsave) 
                133   if ~any(ishghandle(fig))
                134     ax = axes;
                135   else
                136     ax = axes('parent',fig);
                137   end
                138 end