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.6 2007/10/24 17:35:28 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.6 2007/10/24 17:35:28 ingo Exp $
0017 %
0018 % HISTORY: 15-02-07  M Hewitson
0019 %             Creation
0020 %
0021 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0022 
0023 VERSION = '$Id: char.m,v 1.6 2007/10/24 17:35:28 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 %% store the input ao's in the vector: ao_set
0041 ao_set = [];
0042 for i=1:nargin
0043   a = varargin{i};
0044   if isa(a, 'ao')
0045     [m,n] = size(a);
0046 
0047     for i = 1:m
0048       for j = 1:n
0049         ao_set  = [ao_set a(i,j)];
0050       end
0051     end
0052 
0053   end
0054 end
0055 
0056 %% go through analysis objects
0057 for j=1:length(ao_set)
0058 
0059   a = ao_set(j);
0060 
0061   pstr = [];
0062   pstr = [pstr a.name];
0063 
0064   % examine data object
0065   d = a.data;
0066 
0067   % get data type
0068   if isempty(d)
0069     pstr = [pstr '  /  No data-object'];
0070   else
0071     pstr = [pstr '/' d.name '   ' class(d)];
0072 
0073     [x,y] = get_xy_values(a.data);
0074 
0075     xinfo = whos('y');
0076     pstr = [pstr '   ' sprintf('[%d %d]', xinfo.size(1), xinfo.size(2)) ];
0077 
0078   end
0079   % get data time
0080 
0081   pstr = strrep(pstr, '_', '\_');
0082 
0083   varargout{j} = pstr;
0084 
0085 end
0086 
0087 % END

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