GET get parameter list properties. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: GET get parameter properties. CALL: name = get(pl, 'name'); params = get(pl, 'params'); version = get(pl, 'version'); created = get(pl, 'created'); VERSION: $Id: get.m,v 1.4 2007/10/15 17:16:56 ingo Exp $ HISTORY: 30-01-07 M Hewitson Creation %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0001 function val = get(pl, propName) 0002 % GET get parameter list properties. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: GET get parameter properties. 0007 % 0008 % CALL: name = get(pl, 'name'); 0009 % params = get(pl, 'params'); 0010 % version = get(pl, 'version'); 0011 % created = get(pl, 'created'); 0012 % 0013 % VERSION: $Id: get.m,v 1.4 2007/10/15 17:16:56 ingo Exp $ 0014 % 0015 % HISTORY: 30-01-07 M Hewitson 0016 % Creation 0017 % 0018 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0019 0020 VERSION = '$Id: get.m,v 1.4 2007/10/15 17:16:56 ingo Exp $'; 0021 0022 % Check if this is a call for parameters or for the cvs-version number 0023 if nargin == 2 0024 if isa(pl, 'plist') && ischar(propName) 0025 in = char(propName); 0026 if strcmp(in, 'Params') 0027 val = plist(); 0028 return 0029 elseif strcmp(in, 'Version') 0030 val = VERSION; 0031 return 0032 end 0033 end 0034 end 0035 0036 switch propName 0037 case 'name' 0038 val = pl.name; 0039 case 'params' 0040 val = pl.params; 0041 case 'version' 0042 val = pl.version; 0043 case 'created' 0044 val = pl.created; 0045 otherwise 0046 error([propName, ' is not a valid plist property.']); 0047 end