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