comparison m-toolbox/m/gui/ltpdv/callbacks/ltpdv_zeroDelete.m @ 0:f0afece42f48

Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:f0afece42f48
1 function ltpdv_zeroDelete(varargin)
2
3 % Handles
4 myh = varargin{1};
5 htab = varargin{end-1};
6 mainfig = varargin{end};
7
8 % Get selection
9 lh = findobj(htab, 'Tag', 'LTPDVfilterZerolist');
10 idx = get(lh, 'Value');
11
12 % Get zeros
13 zeros = getappdata(mainfig, 'FilterZeros');
14
15 % Make new list
16 ops = [];
17 for j=1:length(zeros)
18 if ~ismember(j, idx)
19 ops = [ops zeros(j)];
20 end
21 end
22 setappdata(mainfig, 'FilterZeros', ops);
23
24 % Set pole list
25 ltpdv_set_zero_list(mainfig);