SET sets a specwin property. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: SET sets a specwin property. CALL: w = set(w, 'name', 'my window'); w = set(w, 'alpha', -1); w = set(w, 'psll', -1); w = set(w, 'rov', -1); w = set(w, 'nenbw', -1); w = set(w, 'w3db', -1); w = set(w, 'flatness', -1); w = set(w, 'ws', -1); w = set(w, 'ws2', -1); w = set(w, 'win', -1); w = set(w, 'created', time-object); w = set(w, 'version', 'cvs version string'); VERSION: $Id: set.m,v 1.3 2007/11/02 13:19:20 ingo Exp $ HISTORY: 30-01-2007 M Hewitson Creation %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0001 function w = set(w, varargin) 0002 % SET sets a specwin property. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: SET sets a specwin property. 0007 % 0008 % CALL: w = set(w, 'name', 'my window'); 0009 % w = set(w, 'alpha', -1); 0010 % w = set(w, 'psll', -1); 0011 % w = set(w, 'rov', -1); 0012 % w = set(w, 'nenbw', -1); 0013 % w = set(w, 'w3db', -1); 0014 % w = set(w, 'flatness', -1); 0015 % w = set(w, 'ws', -1); 0016 % w = set(w, 'ws2', -1); 0017 % w = set(w, 'win', -1); 0018 % w = set(w, 'created', time-object); 0019 % w = set(w, 'version', 'cvs version string'); 0020 % 0021 % VERSION: $Id: set.m,v 1.3 2007/11/02 13:19:20 ingo Exp $ 0022 % 0023 % HISTORY: 30-01-2007 M Hewitson 0024 % Creation 0025 % 0026 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0027 0028 property_argin = varargin; 0029 0030 fields = fieldnames(w); 0031 0032 while length(property_argin) >= 2 0033 prop = property_argin{1}; 0034 val = property_argin{2}; 0035 property_argin = property_argin(3:end); 0036 0037 if ~ismember(prop, fields) 0038 error(['### ', prop, ' is not a valid specwin property.']); 0039 else 0040 0041 %% For all specwin objects (specwin can be a vector or a matrix) 0042 for ii = 1:length(w) 0043 w(ii).(prop) = val; 0044 end 0045 0046 end 0047 0048 0049 end