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, 'version', '$Date: 2007/07/30 12:18:28 $'); miir = set(miir, 'created', time()); miir = set(miir, 'fs', 0); miir = set(miir, 'ntaps', 0); miir = set(miir, 'a', []); miir = set(miir, 'b', []); miir = set(miir, 'g', 0); miir = set(miir, 'infile', 'name'); miir = set(miir, 'histin', history()); miir = set(miir, 'histout', history()); miir = set(miir, 'plist', plist()); VERSION: $Id: set.m,v 1.6 2007/07/30 12:18:28 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, 'version', '$Date: 2007/07/30 12:18:28 $'); 0011 % miir = set(miir, 'created', time()); 0012 % miir = set(miir, 'fs', 0); 0013 % miir = set(miir, 'ntaps', 0); 0014 % miir = set(miir, 'a', []); 0015 % miir = set(miir, 'b', []); 0016 % miir = set(miir, 'g', 0); 0017 % miir = set(miir, 'infile', 'name'); 0018 % miir = set(miir, 'histin', history()); 0019 % miir = set(miir, 'histout', history()); 0020 % miir = set(miir, 'plist', plist()); 0021 % 0022 % VERSION: $Id: set.m,v 1.6 2007/07/30 12:18:28 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 'g' 0050 f.g = 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