Get poles
0001 function ltpdv_set_zero_list(mainfig) 0002 0003 % Get poles 0004 poles = getappdata(mainfig, 'FilterZeros'); 0005 0006 % Get handle to pole list 0007 lh = findobj(mainfig, 'Tag', 'LTPDVfilterZerolist'); 0008 set(lh, 'Value', 1); 0009 0010 % Build string 0011 str = {}; 0012 for j=1:length(poles) 0013 p = poles(j); 0014 if isnan(p.q) 0015 str = [str {num2str(p.f)}]; 0016 else 0017 str = [str {[num2str(p.f) ', ' num2str(p.q)]}]; 0018 end 0019 end 0020 0021 set(lh, 'String', str);