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