Mercurial > hg > ltpda
diff m-toolbox/classes/@parfrac/respCore.m @ 0:f0afece42f48
Import.
| author | Daniele Nicolodi <nicolodi@science.unitn.it> |
|---|---|
| date | Wed, 23 Nov 2011 19:22:13 +0100 |
| parents | |
| children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/m-toolbox/classes/@parfrac/respCore.m Wed Nov 23 19:22:13 2011 +0100 @@ -0,0 +1,31 @@ +% RESPCORE returns the complex response of one parfrac object. +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% DESCRIPTION: RESPCORE returns the complex response of one parfrac object +% as a data-vector. This function should only be used by the +% resp method of the ltpda_tf class. +% +% CALL: r = respCore(obj, f); +% +% VERSION: $Id: respCore.m,v 1.5 2011/02/04 10:55:32 luigi Exp $ +% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +function r = respCore(varargin) + + %%% Get Inputs + obj = varargin{1}; + f = varargin{2}; % Row vector + + %%% Compute response + pfparams = struct('type', 'cont', ... + 'freq', f, ... + 'res', obj.res, ... + 'pol', obj.poles, ... + 'pmul', obj.pmul, ... + 'dterm', obj.dir); + pfr = utils.math.pfresp(pfparams); + r = reshape(pfr.resp,size(f)); + +end +