


SET sets a pole/zero model property.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: SET sets a pole/zero model property.
CALL: pzmodel = set(pzmodel, 'name', str);
pzmodel = set(pzmodel, 'gain', g);
pzmodel = set(pzmodel, 'poles', p);
pzmodel = set(pzmodel, 'zeros', z);
VERSION: $Id: set.m,v 1.3 2007/07/18 13:58:45 ingo Exp $
HISTORY: 30-01-2007 M Hewitson
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

0001 function p = set(p, varargin) 0002 % SET sets a pole/zero model property. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: SET sets a pole/zero model property. 0007 % 0008 % CALL: pzmodel = set(pzmodel, 'name', str); 0009 % pzmodel = set(pzmodel, 'gain', g); 0010 % pzmodel = set(pzmodel, 'poles', p); 0011 % pzmodel = set(pzmodel, 'zeros', z); 0012 % 0013 % VERSION: $Id: set.m,v 1.3 2007/07/18 13:58:45 ingo Exp $ 0014 % 0015 % HISTORY: 30-01-2007 M Hewitson 0016 % Creation 0017 % 0018 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0019 0020 propArgin = varargin; 0021 while length(propArgin) >= 2 0022 prop = varargin{1}; 0023 val = varargin{2}; 0024 propArgin = propArgin(3:end); 0025 switch prop 0026 case 'name' 0027 p.name = val; 0028 case 'gain' 0029 p.gain = val; 0030 case 'poles' 0031 p.poles = val; 0032 case 'zeros' 0033 p.zeros = val; 0034 otherwise 0035 error([prop, ' is not a property of pzmodel class']); 0036 end 0037 end