


COPY Make copy of fsdata objects depending of the second input
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: COPY Make copy of fsdata objects depending of the second input
CALL: objs = copy(objs, [1,0]);
M-FILE INFO: Get information about this methods by calling
>> fsdata.getInfo('copy')
VERSION: $Id: copy.m,v 1.6 2008/08/10 20:06:47 hewitson Exp $
HISTORY: 11-07-2008 Diepholz
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


0001 % COPY Make copy of fsdata objects depending of the second input 0002 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0003 % 0004 % DESCRIPTION: COPY Make copy of fsdata objects depending of the second input 0005 % 0006 % CALL: objs = copy(objs, [1,0]); 0007 % 0008 % M-FILE INFO: Get information about this methods by calling 0009 % >> fsdata.getInfo('copy') 0010 % 0011 % VERSION: $Id: copy.m,v 1.6 2008/08/10 20:06:47 hewitson Exp $ 0012 % 0013 % HISTORY: 11-07-2008 Diepholz 0014 % Creation 0015 % 0016 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0017 0018 function varargout = copy(varargin) 0019 0020 %%% Check if this is a call for parameters 0021 if utils.helper.isinfocall(varargin{:}) 0022 varargout{1} = getInfo(varargin{3}); 0023 return 0024 end 0025 0026 % Collect all fsdata objects 0027 old = utils.helper.collect_objects(varargin(:), 'fsdata'); 0028 deepcopy = varargin{end}; 0029 0030 if deepcopy 0031 ps = properties('fsdata'); 0032 s = size(old); 0033 obj(s(1),s(2)) = fsdata; 0034 for kk=1:numel(old) 0035 utils.helper.msg(utils.const.msg.OPROC2, 'copying fsdata'); 0036 for jj=1:length(ps) 0037 obj(kk).(ps{jj}) = old(kk).(ps{jj}); 0038 end 0039 % copy time object 0040 obj(kk).t0 = copy(old(kk).t0, 1); 0041 obj(kk).version = fsdata.VEROUT; 0042 end 0043 else 0044 obj = old; 0045 end 0046 varargout{1} = obj; 0047 end 0048 0049 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0050 % Local Functions % 0051 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0052 0053 function ii = getInfo(varargin) 0054 if nargin == 1 && strcmpi(varargin{1}, 'None') 0055 sets = {}; 0056 pl = []; 0057 else 0058 sets = {'Default'}; 0059 pl = getDefaultPlist; 0060 end 0061 % Build info object 0062 ii = minfo(mfilename, 'fsdata', '', 'Internal', '$Id: copy.m,v 1.6 2008/08/10 20:06:47 hewitson Exp $', sets, pl); 0063 end 0064 0065 function plo = getDefaultPlist() 0066 plo = plist(); 0067 end 0068