Home > classes > @param > char.m

char

PURPOSE ^

CHAR convert a param object into a string.

SYNOPSIS ^

function pstr = char(p, varargin)

DESCRIPTION ^

 CHAR convert a param object into a string.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

 DESCRIPTION: CHAR convert a param object into a string.

 CALL:        string = char(p)

 VERSION:     $Id: char.m,v 1.6 2008/02/13 17:33:38 mauro Exp $

 HISTORY:     04-02-2007 M Hewitson
                 Creation

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

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(p)
0009 %
0010 % VERSION:     $Id: char.m,v 1.6 2008/02/13 17:33:38 mauro Exp $
0011 %
0012 % HISTORY:     04-02-2007 M Hewitson
0013 %                 Creation
0014 %
0015 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0016 
0017 VERSION = '$Id: char.m,v 1.6 2008/02/13 17:33:38 mauro Exp $';
0018 CATEGORY = 'Output';
0019 
0020 % Check if this is a call for parameters
0021 if nargin == 2
0022   if isa(p, 'param') && ischar(varargin{1})
0023     in = char(varargin{1});
0024     if strcmp(in, 'Params')
0025       pstr = plist;
0026       return
0027     elseif strcmp(in, 'Version')
0028       pstr = VERSION;
0029       return
0030     elseif strcmp(in, 'Category')
0031       pstr = CATEGORY;
0032       return
0033     end
0034   end
0035 end
0036 
0037 if isnumeric(get(p, 'val'))
0038   pstr = [get(p, 'key') ' : ' ltpda_mat2str(get(p, 'val'))];
0039 else
0040   pstr = [get(p, 'key') ' : ' char(get(p, 'val'))];
0041 end
0042 
0043 
0044 
0045 % END

Generated on Mon 31-Mar-2008 13:54:54 by m2html © 2003