Home > classes > @param > display.m

display

PURPOSE ^

DISPLAY display a parameter

SYNOPSIS ^

function txt = display(p)

DESCRIPTION ^

 DISPLAY display a parameter

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

 DESCRIPTION: DISPLAY display a parameter

 VERSION: $Id: display.m,v 1.17 2007/11/01 15:12:17 ingo Exp $

 HISTORY: 30-01-2007 M Hewitson
             Creation

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

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function txt = display(p)
0002 % DISPLAY display a parameter
0003 %
0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0005 %
0006 % DESCRIPTION: DISPLAY display a parameter
0007 %
0008 % VERSION: $Id: display.m,v 1.17 2007/11/01 15:12:17 ingo Exp $
0009 %
0010 % HISTORY: 30-01-2007 M Hewitson
0011 %             Creation
0012 %
0013 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0014 
0015 txt = {};
0016 
0017 for i=1:length(p)
0018   banner = sprintf('---- param %d ----', i);
0019   txt{end+1} = banner;
0020 
0021   % get key and value
0022   name = get(p(i), 'key');
0023   v    = get(p(i), 'val');
0024 
0025   % convert value for printing
0026   if ischar(v)
0027     sval = ['''' v ''''];
0028   elseif islogical(v)
0029     if v == true
0030       sval = 'true';
0031     else
0032       sval = 'false';
0033     end
0034   elseif isnumeric(v)
0035     sval = '';
0036     if size(v,1) == 1 || size(v,2) == 1
0037       for j=1:min(length(v), 10)
0038         sval = [sval sprintf('%g ', v(j))];
0039       end
0040       if length(v) > 10
0041         sval = [sval '...'];
0042       end
0043     elseif isempty(v)
0044       sval = '[]';
0045     else
0046       sval = sprintf('Matrix [%dx%d]', size(v,1), size(v,2));
0047     end
0048   elseif isa(v, 'specwin');
0049     sval = char(v);
0050   elseif isa(v, 'miir');
0051     sval = char(v);
0052   elseif isa(v, 'time') || isa(v, 'timespan') || isa(v, 'timeformat')
0053     sval = char(v);
0054   elseif isa(v, 'mfir');
0055     sval = char(v);
0056   %!!!!!!!!!!!!!
0057   % Here I'm assuming there is a name field in the structure
0058   % - what else could we display here??
0059   %
0060   elseif isstruct(v)
0061     sval = v.name;
0062   elseif isa(v, 'ao') || isa(v, 'fsdata') || isa(v, 'tsdata') || isa(v, 'cdata')
0063     vinfo = whos('v');
0064     sval = [vinfo.class '-object'];
0065   elseif isa(v, 'pole') || isa(v, 'zero') || isa(v, 'pzmodel')
0066     sval = '';
0067     for j=1:length(v)
0068       sval = [sval ' ' char(v(j))];
0069     end
0070   elseif iscell(v)
0071     sval = '';
0072     for ii = 1:length(v)
0073       sval = [sval '''' v{ii} ''' '];
0074     end
0075   else
0076     error('### parameter has unknown type')
0077   end
0078 
0079   % display
0080   txt{end+1} = sprintf('key: %s\nval: %s', name, deblank(sval));
0081 
0082   banner_end(1:length(banner)) = '-';
0083   txt{end+1} = banner_end;
0084 
0085 end
0086 
0087 if nargout == 0
0088   for ii=1:length(txt)
0089     disp(txt{ii});
0090   end
0091 end
0092 
0093 
0094

Generated on Fri 02-Nov-2007 19:39:27 by m2html © 2003