% this handles the deletion of the impulse response figure for the BERGulator% Copyright 1997-1998 Phil Schniter % keep all variables local in scope function [] = ui_del_imp(); % declare global variables berg_global; ui_private_global;  % delete all test-eq impulse response traces for i=1:length(h_trace_i),   if ishandle(h_trace_i(i)), delete(h_trace_i(i)); end; end; h_trace_i = []; % delete all reference impulse response traces for i=1:length(h_trace_ii),   if ishandle(h_trace_ii(i)), delete(h_trace_ii(i)); end; end; h_trace_ii = []; % delete all local-solution impulse response traces for i=1:length(h_trace_iii),   if ishandle(h_trace_iii(i)), delete(h_trace_iii(i)); end; end; h_trace_iii = [];