Home > classes > @ao > char.m

char

PURPOSE ^

CHAR overloads char() function for analysis objects.

SYNOPSIS ^

function varargout = char(varargin)

DESCRIPTION ^

 CHAR overloads char() function for analysis objects.

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

 DESCRIPTION:     CHAR overloads char() function for analysis objects.

 CALL:            c = char(ao_in);

 FORMAT:          c = 'ao.name/ao.data.name class(ao.data) [size(ao.data.yaxis)]'

 POSSIBLE VALUES: ao_in  = [ao2 ao3]
                  ao_in  = ao_vector
                  ao_in  = ao_matrix

 VERSION:         $Id: char.m,v 1.8 2007/11/26 14:48:13 ingo Exp $

 HISTORY: 15-02-07  M Hewitson
             Creation

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

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function varargout = char(varargin)
0002 % CHAR overloads char() function for analysis objects.
0003 %
0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0005 %
0006 % DESCRIPTION:     CHAR overloads char() function for analysis objects.
0007 %
0008 % CALL:            c = char(ao_in);
0009 %
0010 % FORMAT:          c = 'ao.name/ao.data.name class(ao.data) [size(ao.data.yaxis)]'
0011 %
0012 % POSSIBLE VALUES: ao_in  = [ao2 ao3]
0013 %                  ao_in  = ao_vector
0014 %                  ao_in  = ao_matrix
0015 %
0016 % VERSION:         $Id: char.m,v 1.8 2007/11/26 14:48:13 ingo Exp $
0017 %
0018 % HISTORY: 15-02-07  M Hewitson
0019 %             Creation
0020 %
0021 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0022 
0023 VERSION = '$Id: char.m,v 1.8 2007/11/26 14:48:13 ingo Exp $';
0024 
0025 %% Check if this is a call for parameters
0026 if nargin == 2
0027   if isa(varargin{1}, 'ao') && ischar(varargin{2})
0028     in = char(varargin{2});
0029     if strcmp(in, 'Params')
0030       varargout{1} = plist();
0031       return
0032     elseif strcmp(in, 'Version')
0033       varargout{1} = VERSION;
0034       return
0035     end
0036   end
0037 end
0038 
0039 
0040 %% Collect input ao's, plist's and ao variable names
0041 in_names = {};
0042 for ii = 1:nargin
0043   in_names{end+1} = inputname(ii);
0044 end
0045 
0046 [ao_set, pl, invars] = collect_inputs(varargin, in_names);
0047 
0048 if ~isempty (pl)
0049   pl = combine(pl);
0050 end
0051 
0052 %% go through analysis objects
0053 for j=1:numel(ao_set)
0054 
0055   a = ao_set(j);
0056 
0057   pstr = [];
0058   pstr = [pstr a.name];
0059 
0060   % examine data object
0061   d = a.data;
0062 
0063   % get data type
0064   if isempty(d)
0065     pstr = [pstr '  /  No data-object'];
0066   else
0067     pstr = [pstr '/' d.name '   ' class(d)];
0068 
0069     [x,y] = get_xy_values(a.data);
0070 
0071     xinfo = whos('y');
0072     pstr = [pstr '   ' sprintf('[%d %d]', xinfo.size(1), xinfo.size(2)) ];
0073 
0074   end
0075   % get data time
0076 
0077   pstr = strrep(pstr, '_', '\_');
0078 
0079   varargout{j} = pstr;
0080 
0081 end
0082 
0083 % END

Generated on Tue 22-Jan-2008 10:39:13 by m2html © 2003