SET set an provenance property. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: SET set an provenance property. CALL: prov = set(prov, 'creator', 'unknown'); prov = set(prov, 'created', time()); prov = set(prov, 'ip', '127.0.0.2'); prov = set(prov, 'hostname', 'hws165'); prov = set(prov, 'os', 'GLNX86'); prov = set(prov, 'matlab_version', '7.4 (R2007a)'); prov = set(prov, 'matlab_version', '6.7 (R2007a)'); prov = set(prov, 'matlab_version', '0.4 (R2007a)'); VERSION: $Id: set.m,v 1.5 2008/02/12 15:20:33 ingo Exp $ HISTORY: 30-01-2007 M Hewitson Creation %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0001 function p = set(p, varargin) 0002 % SET set an provenance property. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: SET set an provenance property. 0007 % 0008 % CALL: prov = set(prov, 'creator', 'unknown'); 0009 % prov = set(prov, 'created', time()); 0010 % prov = set(prov, 'ip', '127.0.0.2'); 0011 % prov = set(prov, 'hostname', 'hws165'); 0012 % prov = set(prov, 'os', 'GLNX86'); 0013 % prov = set(prov, 'matlab_version', '7.4 (R2007a)'); 0014 % prov = set(prov, 'matlab_version', '6.7 (R2007a)'); 0015 % prov = set(prov, 'matlab_version', '0.4 (R2007a)'); 0016 % 0017 % VERSION: $Id: set.m,v 1.5 2008/02/12 15:20:33 ingo Exp $ 0018 % 0019 % HISTORY: 30-01-2007 M Hewitson 0020 % Creation 0021 % 0022 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0023 0024 VERSION = '$Id: set.m,v 1.5 2008/02/12 15:20:33 ingo Exp $'; 0025 CATEGORY = 'Helper'; 0026 DEFAULT_PLIST = plist('creator', '', ... 0027 'created', time(), ... 0028 'ip', '', ... 0029 'histname', '', ... 0030 'os', '', ... 0031 'matlab_version', '', ... 0032 'sigproc_version', '', ... 0033 'ltpda_version', ''); 0034 0035 p = generic_set(p, varargin, DEFAULT_PLIST, VERSION, CATEGORY); 0036 0037 if (nargout == 0) 0038 display(p); 0039 error('\n### No output variable!\n### Please use: %s = set(%s, ''key'', ''value'');', inputname(1), inputname(1)); 0040 end