Mercurial > hg > ltpda
view m-toolbox/classes/@stattest/copy.m @ 46:ca0b8d4dcdb6 database-connection-manager
Fix
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Tue, 06 Dec 2011 19:07:27 +0100 |
parents | f0afece42f48 |
children |
line wrap: on
line source
% COPY makes a (deep) copy of the input stattest objects. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % DESCRIPTION: COPY makes a deep copy of the input stattest objects. % % CALL: b = copy(a, flag) % % INPUTS: a - input stattest object % flag - 1: make a deep copy, 0: return copies of handles % % OUTPUTS: b - copy of inputs % % This is a transparent function and adds no history. % % VERSION: $Id: copy.m,v 1.1 2010/12/20 12:50:15 hewitson Exp $ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function varargout = copy(old, deepcopy) if deepcopy % Loop over input stattest objects new = stattest.newarray(size(old)); obj = copy@ltpda_uoh(new, old, 1); for kk=1:numel(old) for ll=1:numel(old(kk).data) obj(kk).data{ll} = copy(old(kk).data{ll}, 1); end obj(kk).pvalue = old(kk).pvalue; obj(kk).result = old(kk).result; end else obj = old; end varargout{1} = obj; end