


CHAR convert a param object into a string.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: CHAR convert a param object into a string.
CALL: string = char(fsd)
INPUTS: fsd - frequency-series object
OUTPUTS: string - a string which represent a frequency-series object
VERSION: $Id: char.m,v 1.3 2007/11/14 18:18:36 ingo Exp $
HISTORY: 04-02-2007 M Hewitson
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

0001 function pstr = char(p, varargin) 0002 % CHAR convert a param object into a string. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: CHAR convert a param object into a string. 0007 % 0008 % CALL: string = char(fsd) 0009 % 0010 % INPUTS: fsd - frequency-series object 0011 % 0012 % OUTPUTS: string - a string which represent a frequency-series object 0013 % 0014 % VERSION: $Id: char.m,v 1.3 2007/11/14 18:18:36 ingo Exp $ 0015 % 0016 % HISTORY: 04-02-2007 M Hewitson 0017 % Creation 0018 % 0019 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0020 0021 VERSION= '$Id: char.m,v 1.3 2007/11/14 18:18:36 ingo Exp $'; 0022 0023 % Check if this is a call for parameters 0024 if nargin == 2 0025 if isa(p, 'fsdata') && ischar(varargin{1}) 0026 in = char(varargin{1}); 0027 if strcmp(in, 'Params') 0028 pstr = plist(); 0029 return 0030 elseif strcmp(in, 'Version') 0031 pstr = VERSION; 0032 return 0033 end 0034 end 0035 end 0036 0037 pstr = get(p,'name'); 0038 0039 0040 % END