


TRANSPOSE overloads the .' operator for Analysis Objects.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: TRANSPOSE overloads the .' operator for Analysis Objects.
CALL: a = a1.'
PARAMETERS: see help for data2D/applymethod for additional parameters
M-FILE INFO: Get information about this methods by calling
>> ao.getInfo('transpose')
Get information about a specified set-plist by calling:
>> ao.getInfo('transpose', 'None')
VERSION: $Id: transpose.m,v 1.19 2008/08/11 08:40:36 hewitson Exp $
HISTORY: 08-05-07 A Monsky
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


0001 % TRANSPOSE overloads the .' operator for Analysis Objects. 0002 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0003 % 0004 % DESCRIPTION: TRANSPOSE overloads the .' operator for Analysis Objects. 0005 % 0006 % CALL: a = a1.' 0007 % 0008 % PARAMETERS: see help for data2D/applymethod for additional parameters 0009 % 0010 % M-FILE INFO: Get information about this methods by calling 0011 % >> ao.getInfo('transpose') 0012 % 0013 % Get information about a specified set-plist by calling: 0014 % >> ao.getInfo('transpose', 'None') 0015 % 0016 % VERSION: $Id: transpose.m,v 1.19 2008/08/11 08:40:36 hewitson Exp $ 0017 % 0018 % HISTORY: 08-05-07 A Monsky 0019 % Creation 0020 % 0021 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0022 0023 function varargout = transpose(varargin) 0024 0025 % Check if this is a call for parameters 0026 if utils.helper.isinfocall(varargin{:}) 0027 varargout{1} = getInfo(varargin{3}); 0028 return 0029 end 0030 0031 import utils.const.* 0032 utils.helper.msg(msg.MNAME, 'running %s/%s', mfilename('class'), mfilename); 0033 0034 % Collect input variable names 0035 in_names = cell(size(varargin)); 0036 for ii = 1:nargin,in_names{ii} = inputname(ii);end 0037 0038 % Collect all AOs 0039 [as, ao_invars] = utils.helper.collect_objects(varargin(:), 'ao', in_names); 0040 pl = utils.helper.collect_objects(varargin(:), 'plist', in_names); 0041 0042 % Decide on a deep copy or a modify 0043 bs = copy(as, nargout); 0044 0045 % Combine plists 0046 pl = combine(pl, getDefaultPlist); 0047 0048 % Apply method to all AOs 0049 applymethod(bs, ao_invars, 'transpose', pl, getDefaultPlist, getInfo); 0050 0051 % Set output 0052 if nargout > 0 0053 varargout{1} = bs; 0054 end 0055 end 0056 0057 %-------------------------------------------------------------------------- 0058 % Get Info Object 0059 %-------------------------------------------------------------------------- 0060 function ii = getInfo(varargin) 0061 if nargin == 1 && strcmpi(varargin{1}, 'None') 0062 sets = {}; 0063 pl = []; 0064 else 0065 sets = {'Default'}; 0066 pl = getDefaultPlist; 0067 end 0068 % Build info object 0069 ii = minfo(mfilename, 'ao', '', 'Operator', '$Id: transpose.m,v 1.19 2008/08/11 08:40:36 hewitson Exp $', sets, pl); 0070 end 0071 0072 %-------------------------------------------------------------------------- 0073 % Get Default Plist 0074 %-------------------------------------------------------------------------- 0075 function pl_default = getDefaultPlist() 0076 pl_default = plist('axis', 'xy'); 0077 end 0078 0079 % END