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