Home > classes > @specwin > set.m

set

PURPOSE ^

SET sets a specwin property.

SYNOPSIS ^

function w = set(w, varargin)

DESCRIPTION ^

 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

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

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

Generated on Fri 02-Nov-2007 19:39:27 by m2html © 2003