SET set a miir object property. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: SET set a miir object property. CALL: miir = set(miir, property, value); miir = set(miir, 'name', 'name'); miir = set(miir, 'fs', 0); miir = set(miir, 'ntaps', 0); miir = set(miir, 'a', []); miir = set(miir, 'b', []); miir = set(miir, 'gain', 0); miir = set(miir, 'histin', history()); miir = set(miir, 'histout', history()); miir = set(miir, 'infile', 'name'); miir = set(miir, 'plist', plist()); miir = set(miir, 'created', time()); miir = set(miir, 'version', '$Date: 2007/10/24 10:55:11 $'); VERSION: $Id: set.m,v 1.7 2007/10/24 10:55:11 ingo Exp $ HISTORY: 30-01-2007 M Hewitson Creation %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0001 function f = set(f, varargin) 0002 % SET set a miir object property. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: SET set a miir object property. 0007 % 0008 % CALL: miir = set(miir, property, value); 0009 % miir = set(miir, 'name', 'name'); 0010 % miir = set(miir, 'fs', 0); 0011 % miir = set(miir, 'ntaps', 0); 0012 % miir = set(miir, 'a', []); 0013 % miir = set(miir, 'b', []); 0014 % miir = set(miir, 'gain', 0); 0015 % miir = set(miir, 'histin', history()); 0016 % miir = set(miir, 'histout', history()); 0017 % miir = set(miir, 'infile', 'name'); 0018 % miir = set(miir, 'plist', plist()); 0019 % miir = set(miir, 'created', time()); 0020 % miir = set(miir, 'version', '$Date: 2007/10/24 10:55:11 $'); 0021 % 0022 % VERSION: $Id: set.m,v 1.7 2007/10/24 10:55:11 ingo Exp $ 0023 % 0024 % HISTORY: 30-01-2007 M Hewitson 0025 % Creation 0026 % 0027 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0028 0029 propArgin = varargin; 0030 while length(propArgin) >= 2 0031 prop = propArgin{1}; 0032 val = propArgin{2}; 0033 propArgin = propArgin(3:end); 0034 switch prop 0035 case 'name' 0036 f.name = val; 0037 case 'version' 0038 f.version = val; 0039 case 'created' 0040 f.created = val; 0041 case 'fs' 0042 f.fs = val; 0043 case 'ntaps' 0044 f.ntaps = val; 0045 case 'a' 0046 f.a = val; 0047 case 'b' 0048 f.b = val; 0049 case 'gain' 0050 f.gain = val; 0051 case 'infile' 0052 f.infile = val; 0053 case 'histin' 0054 f.histin = val; 0055 case 'histout' 0056 f.histout = val; 0057 case 'plist' 0058 f.plist = val; 0059 otherwise 0060 error([prop, ' is not a valid miir property.']); 0061 end 0062 end