% COPY makes a (deep) copy of the input pzmodel objects.%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: COPY makes a deep copy of the input pzmodel objects.%% CALL: b = copy(a, flag)%% INPUTS: a - input pzmodel 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.16 2010/06/25 15:11:48 ingo Exp $%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%function varargout = copy(old, deepcopy) if deepcopy % Loop over input pzmodel objects new = pzmodel.newarray(size(old)); obj = copy@ltpda_tf(new, old, 1); for kk=1:numel(old) if ~isempty(old(kk).poles) obj(kk).poles = copy(old(kk).poles,1); else obj(kk).poles = []; end if ~isempty(old(kk).zeros) obj(kk).zeros = copy(old(kk).zeros,1); else obj(kk).zeros = []; end obj(kk).gain = old(kk).gain; obj(kk).delay = old(kk).delay; end else obj = old; end varargout{1} = obj;end